[Tilar]

Actually this one is simple and seems to work alright.

sub EVENT_SAY { 
if($text=~/Hail/i){
quest::say("Greetings $name, I can scribe all of your [spells] if you wish.") ;}

if ($text=~/spells/i) { quest::say("Scribing your spells $name!");
quest::scribespells(65); }
}


#END of FILE Zone:poknowledge