Buff Bot Implimentation

[Andrew80k]

Originally Posted by Racerx719

Hey guys I did some searching around the forums and found some helpful information about how to write the script up for a buff bot. And I am fully aware to save it as a.pl file... I am having a tough time to actually get it working in game. Below is a copy of the .PL file.. I was wondering if anyone could take a look at it and see if there is any errors on my part... Also I don't mean to sound completely stupid but if someone could explain to me in simple terms step by step how to make the NPC appear in game? I would greatly appreciate it.

sub EVENT_SAY {
if ($text =~/Hail/i)
{ quest::say("Hey ya cheapskate! You want the good stuff? just say the magic word! [juice] me! If you want me to [heal] you, I will do it for free."); }
if($text=~/juice/i)
{quest::selfcast(27;}
{quest::selfcast(457);}
{quest::selfcast(1693);}
{quest::selfcast(2176);}
{quest::selfcast(2177);}
{quest::selfcast(3692);}
{quest::selfcast(3467);}
{quest::selfcast(2570);}

if ($text=~/heal/i) { quest::selfcast(13); }
}

#END of FILE Zone:poknowledge ID:2700013 -- Innoroid

If you just want a generic buff bot in PoK, use Vicar Qadar. He is already spawned, at least from PEQ database. He doesn't come with a .pl script by default so feel free to place Vicar_Qadar.pl file in your quests/poknowledge directory. As for the file itself try this instead:

sub EVENT_SAY {
   if ($text =~/Hail/i){ 
      quest::say("Hey ya cheapskate! You want the good stuff? just say the magic word! [juice] me! If you want me to [heal] you, I will do it for free."); 
   }
   if($text=~/juice/i) {
      quest::selfcast(278);  
      quest::selfcast(457);  
      quest::selfcast(1693);
      quest::selfcast(2176);
      quest::selfcast(2177);
      quest::selfcast(3692);
      quest::selfcast(3467);
      quest::selfcast(2570);
   }
   if ($text=~/heal/i) { 
      quest::selfcast(13); 
   }
}

#END of FILE Zone:poknowledge  ID:2700013 -- Innoroid