View Single Post
  #1  
Old 06-24-2011, 02:04 PM
Astal
Hill Giant
 
Join Date: Mar 2010
Posts: 236
Default Can anyone help me finish a quest my scripter was workin on?

He left and i havent heard from him since.

We were trying to make the quest groupable, so everyone gets credit.

Im not sure exactly what he was doing but he said it was sorta working.

I would appreciate the help.

Code:
#The Hunt For Gollum  999303
sub EVENT_SPAWN {


my $tasktracker = 0;
quest::shout("We only wish to catch a fish so juicey SWEEEEEEEEEEEEEEET!!");
quest::settimer("sing",10);
$npc->quest::selfcast(278);
}
sub EVENT_TIMER {
	if ($timer eq "depopnpc") {
		quest::stoptimer("depopnpc");
		quest::shout("We flee my precious !! Yes we flee !!");
		# Have to signal depop and quest depop, if i remove one or the other
		# He dont repop WTF!
		quest::signalwith(999303,1,0);
		quest::stop();
		quest::depop(999303); 

		
	}
	if ($timer eq "sing"){
	my $random_number = int(rand(4));
		if ($random_number == 0)
		{
			quest::say("Smelly stick fish so SWEEEETT!!");
			quest::doanim(58);
			#quest::doanim(51);
			
			}
		elsif ($random_number == 1)
		{
			quest::say("Precious, whats a tasty tasy trreeaatt?");
			quest::doanim(58);
			}
		elsif ($random_number == 2)
		{
			quest::say("Oh look we have some meat to eaatt !");
			quest::doanim(58);
			}
		elsif ($random_number == 3)
			{
			quest::say("My singings haves a catchy beaatt!!");
			quest::doanim(58);		
		}
	
	}
}



sub EVENT_SAY {
		
	if(quest::istaskactive(504)) {
		
		#1
		if(quest::istaskactivityactive(504,1)) {
		
			if($text=~/Hail/i) {
				quest::set_proximity($x-20,$x+20,$y-20,$y+20);
				quest::shout("Ahhh the orcses they are after meeez");
				# Move the Hailer and his whole group to these coords
				quest::movepc(415,-862.3,434.8,72.4); 
				quest::movegrp(415,-862.3,434.8,72.4);
				$tasktracker = 1;
				#quest::shout("My Tasktracker = $tasktracker");
				# Npc run to this 
				quest::settimer("depopnpc", 4); 
				quest::moveto(-934.5,184.3,42.8);

				#despawn gollum and respawn him at the next location
				#quest::depop(999303);
				#spawn orc lieutants
				quest::spawn(999204,0,0,-866.3,357.1,90.3);
				#spawn gollum in dif loc
				quest::spawn(999303,0,0,-1023.7,-344.3,7.5);
				#updatetaskactivity(504, 1,[1])
			}
			
		}
		
		#2
		if(quest::istaskactivityactive(504,3)) {
		
			if($text=~/Hail/i) {
				quest::shout("Ahhh the orcses they are after meeez");
				# Move the Hailer and his whole group to these coords
				quest::movepc(3,153.6,49.8,1.9); 
				quest::movegrp(3,153.6,49.8,1.9);
				$tasktracker = 3;
				# Npc run to this location
				quest::moveto(-47.0,2.7,0.9);
				quest::depop(999303); 
				#spawn gollum in dif loc
				quest::spawn(999303,0,0,-562.3,-741.3,19.5);
				#spawn orc lieutants
				quest::spawn(999204,0,0,-1022,-330.1,7.3);
				quest::spawn(999204,0,0,-1023,-359.1,7.7);
			}	
		}
		
		#3
		if(quest::istaskactivityactive(504,5)) {
		
			if($text=~/Hail/i) {
				quest::shout("Ahhh the orcses they are after meeez");
				# Move the Hailer and his whole group to these coords
				quest::movepc(3,153.6,49.8,1.9); 
				quest::movegrp(3,153.6,49.8,1.9);
				$tasktracker = 5;
				# Npc run to this location
				quest::moveto(-47.0,2.7,0.9);
				quest::depop(999303); 
				#spawn gollum in dif loc
				quest::spawn(999303,0,0,-72.3,-432.7,26.8);
				#spawn orc lieutants
				quest::spawn(999204,0,0,-562.5,-726.8,18.7);
				quest::spawn(999204,0,0,-562.2,-748.0,20.1);
				quest::spawn(999204,0,0,-544.2,-741.1,20.5);
			}	
		}

		#4
		if(quest::istaskactivityactive(504,7)) {
		
			if($text=~/Hail/i) {
				quest::shout("Ahhh the orcses they are after meeez");
				# Move the Hailer and his whole group to these coords
				quest::movepc(3,153.6,49.8,1.9); 
				quest::movegrp(3,153.6,49.8,1.9);
				$tasktracker = 7;
				# Npc run to this location
				quest::moveto(-47.0,2.7,0.9);
				quest::depop(999303); 
				#spawn gollum in dif loc
				quest::spawn(999303,0,0,526.9,40.8,3.1);
				#spawn orc lieutants
				quest::spawn(999204,0,0,-72.3,-423.2,25.3);
				quest::spawn(999204,0,0,-72.3,-442.7,26.8);
				quest::spawn(999204,0,0,-62.3,-437.2,26.8);
			}	
		}

		#5
		if(quest::istaskactivityactive(504,9)) {
		
			if($text=~/Hail/i) {
				quest::shout("Ahhh the orcses they are after meeez");
				# Move the Hailer and his whole group to these coords
				quest::movepc(3,153.6,49.8,1.9); 
				quest::movegrp(3,153.6,49.8,1.9);
				$tasktracker = 9;
				# Npc run to this location
				quest::moveto(-47.0,2.7,0.9);
				quest::depop(999303); 
				#spawn gollum in dif loc
				quest::spawn(999303,0,0,432.7,393.0,43.1);
				#spawn orc lieutants
				quest::spawn(999204,0,0,526.9,54.1,3.1);
				quest::spawn(999204,0,0,526.9,31.3,3.1);
				quest::spawn(999204,0,0,545.0,43.3,3.2);
			}	
		}		

		#6
		if(quest::istaskactivityactive(504,11)) {
		
			if($text=~/Hail/i) {
				quest::shout("Ahhh the orcses they are after meeez");
				# Move the Hailer and his whole group to these coords
				quest::movepc(3,153.6,49.8,1.9); 
				quest::movegrp(3,153.6,49.8,1.9);
				$tasktracker = 11;
				# Npc run to this location
				quest::moveto(-47.0,2.7,0.9);
				quest::depop(999303); 
				#spawn gollum in dif loc
				quest::spawn(999303,0,0,478.3,914.2,34.8);
				#spawn orc lieutants
				quest::spawn(999204,0,0,432.4,405.5,43.4);
				quest::spawn(999204,0,0,433.1,387.3,42.9);
				quest::spawn(999204,0,0,423.3,394.8,43.6);
			}	
		}

		#7
		if(quest::istaskactivityactive(504,13)) {
		
			if($text=~/Hail/i) {
				quest::shout("Ahhh the orcses they are after meeez");
				# Move the Hailer and his whole group to these coords
				quest::movepc(3,153.6,49.8,1.9); 
				quest::movegrp(3,153.6,49.8,1.9);
				$tasktracker = 13;
				# Npc run to this location
				quest::moveto(-47.0,2.7,0.9);
				quest::depop(999303); 
				#spawn gollum in dif loc
				quest::spawn(999303,0,0,-261.6,926.7,12.7);
				#spawn orc lieutants
				quest::spawn(999204,0,0,478.4,923.3,35.1);
				quest::spawn(999204,0,0,478.2,907.7,34.7);
				quest::spawn(999204,0,0,490.7,912.8,33.9);
			}	
		}
		
		#8
		if(quest::istaskactivityactive(504,15)) {
		
			if($text=~/Hail/i) {
				quest::shout("Ahhh the orcses they are after meeez");
				# Move the Hailer and his whole group to these coords
				quest::movepc(3,153.6,49.8,1.9); 
				quest::movegrp(3,153.6,49.8,1.9);
				$tasktracker = 15;
				# Npc run to this location
				quest::moveto(-47.0,2.7,0.9);
				quest::depop(999303);
				#spawn gollum in dif loc
				quest::spawn(999303,0,0,38.4,477.8,49.0);
				#spawn orc lieutants
				quest::spawn(999204,0,0,-261.6,938.1,14.8);
				quest::spawn(999204,0,0,-261.6,920.7,12.3);
				quest::spawn(999204,0,0,-251.8,931.6,13.5);
			}	
		}
		
		#9
		if(quest::istaskactivityactive(504,17)) {
		
			if($text=~/Hail/i) {
				quest::shout("NO NOO NOT BACK TO MORDOR!! WE MUST'NT PRECIOUS!!!");
				#dont respawn gollum he has been captured
				# Move the Hailer and his whole group to these coords
				quest::movepc(3,153.6,49.8,1.9); 
				quest::movegrp(3,153.6,49.8,1.9);
				$tasktracker = 17;
				# Npc run to this location
				# Dont run Here quest::moveto(-47.0,2.7,0.9);
				quest::depop(999303);
				#spawn Gothmog
				quest::spawn(999202,0,0,39.5,459.8,48.3);
			}	
		}
		
	}
}

sub EVENT_ATTACK {
	quest::shout2("Filthy $race ses attacked us precious!!!");
}

sub EVENT_EXIT{

	if($tasktracker == 1){
		quest::updatetaskactivity(504, 1,[1]);

		}
	elsif($tasktracker == 3){
		updatetaskactivity(504, 3,[1]);
		}
	elsif($tasktracker == 5){
		updatetaskactivity(504, 5,[1]);
		}
	elsif($tasktracker == 7){
		updatetaskactivity(504, 7,[1]);
		}
	elsif($tasktracker == 9){
		updatetaskactivity(504, 9,[1]);
		}
	elsif($tasktracker == 11){
		updatetaskactivity(504, 11,[1]);
		}
	elsif($tasktracker == 13){
		updatetaskactivity(504, 1,[13]);
		}
	elsif($tasktracker == 15){
		updatetaskactivity(504, 1,[15]);
		}
	elsif($tasktracker == 17){
		updatetaskactivity(504, 1,[17]);
		}
	else{
	quest::shout("NO TASKS ARE ACTIVE ASSHOLE !!");
		#No tasks are active
		}
	

	}	
sub EVENT_SIGNAL {
# To Handle Depop
  if ($signal == 1) {
		quest::depop(999303);
		}
	}
Reply With Quote