[bbgunz]

what i use on my lan test box

#NPC Elminster scribes player spells and increases them to level 65
#
#
#
sub EVENT_SAY{
if ($ulevel <=64){
if ($text =~/hail/i){
quest::say("Hello adventurer $uname. I have travelled far and my magic is great. Would you like me to help you [level] up?");
}
if ($text =~/level/i){
quest::say("Prepare to feel yourself burn with power!");
quest::level(65);
quest::scribespells(65,60);
}
}
else{
quest::say("You are a high level already fool!. However If you want to be leveled I can show you how its done!?");
}
}