#A conversation to Heal Player for a Cost
sub EVENT_SAY
{
if ($text =~/Hail/i){ quest::say ("Welcome to Citadel Of the Warlord , $name. Would you like me to [Scribe] your spells? Maybe you would like Your (Meditate) skill, Or maybe your a (Bard) or would you like [buffs] or do you just need a small [heal] to save your butt");}
if ($text =~/Heal/i){ quest::say ("Good, stand where you are while I cast");
quest::selfcast(13);}
if ($text =~/Buff/i){
if ($ulevel <= 46) { quest::say ("Good, stand where you are while I cast");
quest::selfcast(27

;
quest::selfcast(10);
quest::selfcast(174);
quest::selfcast(145);
quest::selfcast(3692);} }
if ($text =~/Meditate/i){ quest::say ("Here you go $name");
quest::setskill(31,150);}
if ($text =~/Bard/i){ if($class eq 'Bard') { quest::say ("Here you go $name");
quest::setskill(70,150);
quest::setskill(54,150);
quest::setskill(49,150);
quest::setskill(12,150);
quest::setskill(41,150);
} }
if ($text =~/Buff/i){ if ($ulevel >= 46) { quest::say ("Good, stand where you are while I cast");
quest::selfcast(156

;
quest::selfcast(4054);
quest::selfcast(3397);
quest::selfcast(5507);
quest::selfcast(2570);
quest::selfcast(3467); } }
if ($text =~/Scribe/i){
quest::say ("Good, stand where you are while I cast");
quest::scribespells($ulevel); } }
if ($text =~/Buffs/i){ plugin::check_hasitem($client, 2377);
quest::selfcast(5297);
quest::selfcast(527

;
quest::selfcast(5522);
quest::selfcast(5507);
quest::selfcast(5415);
quest::selfcast(5365);
quest::selfcast(539

;
quest::selfcast(2886); }
thats what im using now and still nto getting anything