[lerxst2112]

Basic Buffbot. Replace/add/remove spells IDs as desired.

sub EVENT_SAY 
{

	my $buffs = quest::saylink("buffs");
	if($text=~/Hail/i) 
	{
		quest::say("Greetings $name. Would you like some [$buffs]?"); 
	}

	if($text=~/buffs/i)
	{
		quest::selfcast(18323);
		quest::selfcast(5521);
		quest::selfcast(19426);
		quest::selfcast(5405);
		quest::selfcast(9868);
		quest::selfcast(10211);
		quest::selfcast(10031);
	}
}