First off , I'd like to say thanks for any help I can get on this. I've looked through the wiki , and forums probably a dozen times. I've tried and retried everything that they have said to do with no success. I'm guessing that there's got to be either a step I'm missing , or my quest syntax is off , or a combination of the both. I appologise if this has been answerd already , but I just can't find it for the life of me. I'm good with everything else , but Perl and quest building is new to me. So please , be gentle. =)
Ok , here's what I've done. And this is what I'm looking for.
First off I created an NPC in PoK named Librarian Meeki. She's in the database , she spawns right where I want her to , so NPC placement is good.
Next I made a file called Librarian_Meeki.pl and add this to the file.
Code:
sub EVENT_SAY
{
if ($text=~/Hail/i) { quest::say("I am... Oh that's not important right now, would you care to have your spells [scribed]?"); }
if ($text=~/scribed/i) { quest::scribespells($ulevel); }
}
After saving that , I placed the file in the C:/EqEmu/quests/poknowledge
folder on the server , and had the server rebooted just to make sure that everything was kosher.
I walk up to my new NPC and Hail her. She says nothing ... what am I doing wrong ? I want her to scribe spells for people up to thier current lvl , but I'm obviously missing something. Thanks again for any help in this matter.