Priestess (buffbot)(cure)(bind)
 

this chick has cure, free starter buffs, level 50ish buffs for 100pp, and binds as well. Its not clean, but it works well.

Dear lord man, this is awesome. This is new and original, I for one look forward to any new material you create.

Yeah, I just started a couple of weeks ago. Still, I have people starting new servers asking questions about it, so i put it on here so there are some more cut+paste npcs available. Feel free to post more advanced plug and play type NPCs. I don't think there is a limit.

ROFL...that was a good one

bodi wins :D

hi, i used your script to make a buff bot, with a couple changes...the only problem now is that for some reason..well let me show ya


sub EVENT_SAY {

my $cure = quest::saylink ("cure", 1);
my $bind = quest::saylink ("bind", 1);
my $advanced = quest::saylink ("advanced blessing");
my $Kimura = quest::saylink ("Kimura's Super Buff");

if ($text =~/Hail/i)
{ quest::say("Greetings $name. I have been sent to aid you on your journey! Would you like a [$cure], [$advanced], [$Kimura] or I can [$bind] you to this location."); }
if ($text=~/cure/i) { quest::selfcast(3299); }
if ($text=~/bind/i) { quest::selfcast(35); }

if ($text =~/advanced/i)
{
quest::say ("I charge 200pp for superior buffs.");
}

if ($text =~/Kimura/i)
{
quest::say ("I charge 20000pp for a buff so AWESOME!");
}
}

sub EVENT_ITEM
{

if($platinum == 20000)
{
quest::say ("Get ready for a breath from Kimura!");
quest::selfcast(6817);
}

if($platinum == 200)
{
quest::say ("Good, stand where you are while I cast");
quest::selfcast(5278);
quest::selfcast(5358);
quest::selfcast(3178);
quest::selfcast(1568);
quest::selfcast(2524);
}
}

for some reason that i cannot figure out, when i hail him he adds this line to the original text that is supposed to be the response from hailing only:

"I charge 20000pp for a buff so AWESOME"

will you tell me what im doing wrong please? Thank you

How do I put scripts in that nifty little box thing? Anyone able to tell me how to fix the above script?

To use the code boxes, just click the little # sign button above the post window when you are typing.

The problem with your script is probably that your character you are testing it on is named Kimura. The comparison you are doing in the if statement is looking for any string that contains that word /Kimura/. You will see the line as "You say blah blah blah", but I think the NPC will see it as "Kimura says blah blah blah". So, the NPC will see your name in the line of text and it will match you if statement. If you want to prevent that, you can do it in multiple ways, but the easiest is to just be more specific in the response you are looking for such as:

Thanks for the response! I will try that when I get home, the only thing is that I'm not using a character with that name. Thanks for the # hint!

Is the NPC named Kimura then?

NPC is named Kimura's_Buffer lol :P (real original, i know)

well, leave it to Trevius to fix another problem!! thanks a lot man, can always depend on you :P

Edited your script a tad bit, you don't need individual if ($text=~/buff/i) just separate the quest:: by semi colons.