[lerxst2112]

This is a simple one I use. Replace spell ids with what you want instead.

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);
	}
}