PDA

View Full Version : Quest error


Valcrist
02-22-2007, 09:26 AM
[Quest] WARNING: error compiling quest file quests/nexus/Master_of_Spells.pl: Pe
rl runtime error: Undefined subroutine &main::eval_file called.
(reverting to default questfile)
[Quest] WARNING: error compiling quest file quests/nexus/Guardian_of_Bristlebane
.pl: Perl runtime error: Undefined subroutine &main::eval_file called.
(reverting to default questfile)

cannot get either NPC quest to load.
one NPC code is
sub EVENT_SAY
{
if($text=~/Hail/i)
{
quest::say("Greetings $name, are you [interested] in getting your starting equip?");
}
if($text=~/interested/i)
{
quest::say("Alright then here you are");
quest::summonitem("000001")
quest::summonitem("000002")
quest::summonitem("000003")
quest::summonitem("000004")
quest::summonitem("000005")
quest::summonitem("000006")
}
}
#END of FILE Zone:nexus ID:189029 -- Guardian_of_Bristlebane

Angelox
02-22-2007, 09:46 AM
Don't you need to ";" them?
quest::summonitem("000001");
quest::summonitem("000002");
quest::summonitem("000003");
quest::summonitem("000004");
quest::summonitem("000005");
quest::summonitem("000006");

Valcrist
02-22-2007, 09:51 AM
i did that. i still got that error up top. not sure why?

Angelox
02-22-2007, 10:33 AM
I can't test/fix it now, but will try and figure it out in a few hours (can't right away), if no one else can.

Angelox
02-22-2007, 02:48 PM
Try this;
sub EVENT_SAY{
if($text=~/Hail/i){
quest::say("Greetings $name, are you [interested] in getting your starting equip?");
}
if($text=~/interested/i){
quest::say("Alright then here you are");
quest::summonitem(000001);
quest::summonitem(000002);
quest::summonitem(000003);
quest::summonitem(000004);
quest::summonitem(000005);
quest::summonitem(000006);
}
}
#END of FILE Zone:nexus ID:189029 -- Guardian_of_Bristlebane

Valcrist
02-23-2007, 05:22 AM
i put that in, still got the runtime error. maybe im missing a file for perl?

GeorgeS
03-05-2007, 07:18 PM
sub EVENT_SAY {
if ($text=~/hail/i) {
quest::say("Greetings $name, are you [interested] in getting your starting equip?");
}


if ($text=~/interested/i) {
quest::say("Here's your Items");
quest::summonitem("1001");
quest::summonitem("1002");
quest::summonitem("1003");
quest::summonitem("1004");
}

}


Tried this and the quest works. If you get an error, it's likely a perl config/missing file issue

GeorgeS