EQEmulator Forums

EQEmulator Forums (https://www.eqemulator.org/forums/index.php)
-   Quests::Submissions (https://www.eqemulator.org/forums/forumdisplay.php?f=634)
-   -   the Hollowshade Moor quest (https://www.eqemulator.org/forums/showthread.php?t=31636)

sithouse 07-09-2010 11:00 PM

the Hollowshade Moor quest
 
I got the quest updaate today by SVN (Completed: At revision: 592 )

This update so many pl files in hollowshade
But i think some database also need update too

Code:

UPDATE `npc_types` SET `qglobal`='1' WHERE (`id`='166146');  #a_sonic_guardian
UPDATE `npc_types` SET `qglobal`='1' WHERE (`id`='166179');  #a_grimling_lookout
UPDATE `npc_types` SET `qglobal`='1' WHERE (`id`='166217');  #an_owlbear_lookout
UPDATE `npc_types` SET `qglobal`='1' WHERE (`id`='166084');  # Tolah_Rakknak

the four NPC had use $qglobals in PL files.

and also need edit the fifteen PL files because they all need use $qglobals
166238
166279
166280
166281
166282

166242
166284
166285
166286
166288

166264
166289
166290
166291
166292

PHP Code:

#angelox
#defender1 script grimlin

sub EVENT_DEATH {


                
quest::setglobal("defder1",1,3,"F");
            
#grimlins killed wolves
                
if (($qglobals{defder1}==1)&&($qglobals{defder2}==1)&&($qglobals{defder3}==1)&&($qglobals{defder4}==1)&&($qglobals{defder5}==1)&&($qglobals{astate}==1)&&($qglobals{sstate}==3)){
                    
quest::spawn_condition($zonesn,3,0); #wolves are 3
                    
quest::spawn_condition($zonesn,2,0); #owls are 2
                    
quest::spawn_condition($zonesn,1,1); #grimlin are 1
                    
quest::spawn_condition($zonesn,6,0); #wolf defender are 6
                    
quest::spawn_condition($zonesn,5,0); #owl defender are 5
                
}
                
#grimlins killed owlbears
                
elsif (($qglobals{defder1}==1)&&($qglobals{defder2}==1)&&($qglobals{defder3}==1)&&($qglobals{defder4}==1)&&($qglobals{defder5}==1)&&($qglobals{astate}==1)&&($qglobals{sstate}==2)){
                    
quest::spawn_condition($zonesn,3,0); #wolves are 3
                    
quest::spawn_condition($zonesn,2,0); #owls are 2
                    
quest::spawn_condition($zonesn,1,1); #grimlin are 1
                    
quest::spawn_condition($zonesn,6,0); #wolf defender are 6
                    
quest::spawn_condition($zonesn,5,0); #owl defender are 5
                
}
                
#owls killed gremlins
                
elsif (($qglobals{defder1}==1)&&($qglobals{defder2}==1)&&($qglobals{defder3}==1)&&($qglobals{defder4}==1)&&($qglobals{defder5}==1)&&($qglobals{astate}==2)&&($qglobals{sstate}==1)){
                    
quest::spawn_condition($zonesn,3,0);
                    
quest::spawn_condition($zonesn,2,1);
                    
quest::spawn_condition($zonesn,1,0);
                    
quest::spawn_condition($zonesn,6,0); #wolf defender are 6
                    
quest::spawn_condition($zonesn,4,0); #grimlin defender are 4
                
}
                
#owls killed  wolves
                
elsif (($qglobals{defder1}==1)&&($qglobals{defder2}==1)&&($qglobals{defder3}==1)&&($qglobals{defder4}==1)&&($qglobals{defder5}==1)&&($qglobals{astate}==2)&&($qglobals{sstate}==3)){
                    
quest::spawn_condition($zonesn,3,0);
                    
quest::spawn_condition($zonesn,2,1);
                    
quest::spawn_condition($zonesn,1,0);
                    
quest::spawn_condition($zonesn,6,0); #wolf defender are 6
                    
quest::spawn_condition($zonesn,4,0); #grimlin defender are 4
                
}
                
#wolves killed owls
                
elsif (($qglobals{defder1}==1)&&($qglobals{defder2}==1)&&($qglobals{defder3}==1)&&($qglobals{defder4}==1)&&($qglobals{defder5}==1)&&($qglobals{astate}==3)&&($qglobals{sstate}==2)){
                    
quest::spawn_condition($zonesn,3,1);
                    
quest::spawn_condition($zonesn,2,0);
                    
quest::spawn_condition($zonesn,1,0);
                    
quest::spawn_condition($zonesn,5,0); #owl defender are 5
                    
quest::spawn_condition($zonesn,4,0); #grimlin defender are 4
                
}
                
#wolves killed grimlins
                
elsif (($qglobals{defder1}==1)&&($qglobals{defder2}==1)&&($qglobals{defder3}==1)&&($qglobals{defder4}==1)&&($qglobals{defder5}==1)&&($qglobals{astate}==3)&&($qglobals{sstate}==1)){
                    
quest::spawn_condition($zonesn,3,1);
                    
quest::spawn_condition($zonesn,2,0);
                    
quest::spawn_condition($zonesn,1,0);
                    
quest::spawn_condition($zonesn,5,0); #owl defender are 5
                    
quest::spawn_condition($zonesn,4,0); #grimlin defender are 4
                
}


and edit the Tolah_Rakknak.pl
when server reboot
the mobs in the zone will spawn the same before reboot!
PHP Code:

sub EVENT_SAY 
if(
$text=~/Hail/i){
quest::say("Hello. $name. you may call me Tolah. Please feel free to peruse my wares. I think you'll find my prices very fair considering the risk I am taking to bring them here. If not. you can always go all the way to town to do your shopping."); }
}
#END of FILE Zone:hollowshade  ID:166012 -- Tolah_Rakknak 

sub EVENT_SPAWN
{
    
quest::setglobal("defder1",0,3,"F");
    
quest::setglobal("defder2",0,3,"F");
    
quest::setglobal("defder3",0,3,"F");
    
quest::setglobal("defder4",0,3,"F");
    
quest::setglobal("defder5",0,3,"F");
    
quest::setglobal("astate",0,3,"F");
    
my $mobstate 1;
    if (
defined $qglobals{sstate}){
        
$mobstate $qglobals{sstate};
    }
    
quest::spawn_condition($zonesn,3,0); #wolves are 3
    
quest::spawn_condition($zonesn,2,0); #owls are 2
    
quest::spawn_condition($zonesn,1,0); #grimlin are 1
    
quest::spawn_condition($zonesn,"$mobstate",1); 
    
quest::spawn_condition($zonesn,4,0); #grimlin defender are 4
    
quest::spawn_condition($zonesn,5,0); #owls defender are 5
    
quest::spawn_condition($zonesn,6,0); #wolves defender are 6

}
# EOF zone: Hollowshade  Global Watcher 



All times are GMT -4. The time now is 12:16 AM.

Powered by vBulletin®, Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.