View Single Post
  #1  
Old 12-19-2008, 01:27 AM
talra
Fire Beetle
 
Join Date: Dec 2008
Location: Florida
Posts: 5
Default Spellscriber/Disctrainer

so i am using George's tools to make a spellscriber and i found the function for training discs on the forums also but my script doesnt seem to work. any advice would be very useful as i am new to perl scripting.

Code:
sub EVENT_SAY
{
 {
if ($text =~/hail/i){   quest::say ("Good day to you, $name. Do you want me to teach you [spells] or [disc]."); }
}

if($text =~/spells/i)
{
 quest::say ("Good, stand where you are while I cast");
 quest::scribespells();
}
if($text =~/disc/i)
{
 quest::say ("Good, stand where you are while I cast");
 quest::traindiscs();
}

}
Reply With Quote