Jump to content
  • 0

Poring catcher automated

elcontrol00

Asked by elcontrol00,

 Share

Question

elcontrol00 Poring

elcontrol00

Posted
  • Group:  Members
  • Topic Count:  36
  • Topics Per Day:  0.01
  • Content Count:  236
  • Reputation:   1
  • Joined:  04/25/12
  • Last Seen:  
Posted

Ok this Poring catcher works fine the only thing i want to add is for it to be automatic every 1 hour and can also be turned on by a GM if chosen to.

 

Found my poring catcher here http://rathena.org/board/topic/76323-poring-catcher-help/

Searched rathena and found this >http://rathena.org/board/topic/92806-help-poring-catcher/    <<DIDN'T help

~Thanks in advance.

Link to comment
Share on other sites

6 answers to this question

Recommended Posts

EL Dragon Poring

EL Dragon

Posted
  • Group:  Members
  • Topic Count:  86
  • Topics Per Day:  0.02
  • Content Count:  591
  • Reputation:   146
  • Joined:  06/19/12
  • Last Seen:  
Posted 
//=========== PORING CATCHER MADE ==============\\
//=== BY: SHOGS-GFX and RAGNAROK DEVELOPERS ====\\
//= Please Report if you encounter some errors =\\
//===== https://www.facebook.com/ShogsGfx ======\\
//==============================================\\
//==FUNCTIONS===================================\\
/* GM Can start the event manualy
   GM Can also stop the event manualy
HOW: just PM this npc (npc:pcatch)
The Next Guide Will Be Given by the Manager 	*/
//======= PLEASE DO NOT REMOVE CREDITS =========\\
//==============================================\\
//== MORE UPDATES TO COME FOR BETTER FUNCTION ==\\
//===== https://www.facebook.com/ShogsGfx ======\\
//==============================================\\

//====LEVEL OF GM CAN CONTROL THE EVENT=========\\

-	script	GMCONTROL	-1,{
OnInit:
set $gmcontrol,60;
end;

}
//---------------END OF SETUP-------------------\\

//================ON WHISPER=========================\\
-	script	pcatch	-1,{

//====LEVEL OF GM CAN CONTROL THE EVENT=========\\
//OnInit:
//set $gmcontrol,60;
//end;
//---------------END OF SETUP-------------------\\

OnWhisperGlobal:
if(getgmlevel() >= $gmcontrol) {
mes "^3399FF[Poring Catcher]^000000";	
mes "Hello GameMaster!";
mes "What do you want to do?";
switch(select("Start Event:Stop Event:Nothing"))
{
	case 1: 
	{
		next;
		mes "^3399FF[Poring Catcher]^000000";
		mes "Please confirm by typing START."; 
		input .@confirm$;          
		if (.@confirm$ == "START") 
		{
			donpcevent "Announcer2::OnGMStart"; 
			close;
		}
		mes "Confirmation failed";
		close;
		break;
	}
	case 2:
	{
		next;
		mes "^3399FF[Poring Catcher]^000000";
		mes "Please confirm by typing STOP."; 
		input .@confirm$;          
		if (.@confirm$ == "STOP") 
		{
			donpcevent "Announcer2::OnGMStop";
			close;
		}
		mes "Confirmation failed";
		close;
		break;
		
	}
					
	case 3:
	{
		next; mes "^3399FF[Poring Catcher]^000000";
		mes "Good bye"; 
		close;
	}

}
}
}


//====================ANNOUNCER======================\\

-	script	Announcer2	-1,{


OnGMStart:
	killmonster "poring_w01.gat","All";
	announce "(Poring Manager) : A Gamemaster started a Poring Catcher Event now.",0;
	sleep 3000;
	announce "(Poring Manager) : If you want to join, come at the middle of Prontera, enter the warp portal.",0;
	enablenpc "PoringCatcher";
	sleep 2000;
	announce "(Poring Manager) : Prize: will be Poring Coins",0;
	sleep 2000;
	announce "(Poring Manager) : The portal is going to close in one minute.",0;  
	sleep 60000;
	announce "(Poring Manager) : The portal has been closed.",0;
	disablenpc "PoringCatcher";
	if(getmapusers("poring_w01") == 0) 
	{
		disablenpc "Poring Banker";
		announce "Event Poring Catcher didn't start because there's no players.",0;
		end;
	}

	donpcevent "Poring Banker::OnEnable";
	end;

OnGMStop:

	killmonster "poring_w01.gat","All";
	announce "A Gamemaster has stopped the Poring Catcher Event",0;
	mapwarp "poring_w01.gat","prontera.gat",155,173;
	disablenpc "Poring Banker";
	disablenpc "PoringCatcher";
	end;



OnMinute00:
	killmonster "poring_w01.gat","All";
	announce "(Poring Manager) : Poring Catcher Event will start at the moment.",0;
	sleep 3000;
	announce "(Poring Manager) : If you want to join, come at the middle of Prontera, enter the warp portal.",0;
	enablenpc "PoringCatcher";
	sleep 2000;
	announce "(Poring Manager) : Prize: will be Poring Coins",0;
	sleep 2000;
	announce "(Poring Manager) : The portal is going to close in one minute.",0;  
	sleep 60000;
	announce "(Poring Manager) : The portal has been closed.",0;
	disablenpc "PoringCatcher";
	if(getmapusers("poring_w01") == 0) 
	{
		disablenpc "Poring Banker";
		announce "Event Poring Catcher didn't start because no players found in map.",0;
		end;
	}

	donpcevent "Poring Banker::OnEnable";
	end;

OnInit:
	disablenpc "Poring Banker";
	disablenpc "PoringCatcher";
}
//---------All Job Registration----------------------------------------
prontera,155,158,0	warp	PoringCatcher	2,2,poring_w01,105,128

//---------------------------------------------------------------------


//---------------------------------------------------------------------
-	script	Poring Banker	-1,{

OnEnable:
mapannounce "poring_w01","Poring Manager: The Poring Catcher Event will start shortly",0;
sleep2 10000;
mapannounce "poring_w01","Poring Manager: I will be summoning 100 porings with different names kill the real poring",0;
sleep2 10000;
mapannounce "poring_w01","Poring Manager: What are we waiting for?..Let's Catch some Porings!!...",0;
sleep2 10000;
goto L_Start;
end;
L_Start:
	if(getmapusers("poring_w01") == 0) goto L_None;
	if(getmapusers("poring_w01") >= 1) {

	mapannounce "poring_w01","Poring Manager: Get ready at the count of 5 we will start!....",0;
	sleep2 6000;
	mapannounce "poring_w01","Poring Manager: 5",0;
	sleep2 5000;
	mapannounce "poring_w01","Poring Manager: 4",0;
	sleep2 4000;
	mapannounce "poring_w01","Poring Manager: 3",0;
	sleep2 3000;
	mapannounce "poring_w01","Poring Manager: 2",0;
	sleep2 2000;
	mapannounce "poring_w01","Poring Manager: 1",0;
	donpcevent "Poringsummoner::OnSummon";
	end;
	}

	L_None:
	disablenpc "Poring Banker";
	killmonster "poring_w01.gat","All";
	end;
}

//==================SUMMONER OF PORINGS ======================\\
-	script	Poringsummoner	-1,{

OnSummon:
   if(getmapusers("poring_w01") == 0) goto L_2None;
   monster "poring_w01.gat",0,0,"Poring",1002,1,"poringwin::OnMobKilled";
   monster "poring_w01.gat",0,0,"Pouring",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Proing",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Poirng",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Poing",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"I'm not a Poring",1002,5,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Gnirop",1002,1,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Poring",1113,1,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Poring",1062,1,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Por|ng",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Por1ng",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Porong",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"P0ring",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"P@ring",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Porng",1002,1,"poringlose::OnMobKilled";end;
L_2None:
disablenpc "Poring Banker";
killmonster "poring_w01.gat","All";
end;
}

//==================REAL PORING FOR WIN======================\\
-	script	poringwin	-1,{

OnMobKilled:
   killmonster "poring_w01.gat","All";
   atcommand "@doommap";
   getitem 7539,5;
   announce "Poring Banker: We have a winner! well done " + strcharinfo(0) + ".",0;
   warp "SavePoint",0,0;
   end;
}

//==================DUMY PORINGS FOR LOSERS======================\\
-	script	poringlose	-1,{
OnMobKilled:
   dispbottom "Your out of the game, You did not catch the right Poring !";
   percentheal -99,-99;
   warp "SavePoint",0,0;
   end;
}


//==================Mapflags========================\\
poring_w01	mapflag	nowarp
poring_w01	mapflag	nowarpto
poring_w01	mapflag	noteleport
poring_w01	mapflag	nosave
poring_w01	mapflag	nomemo
poring_w01	mapflag	nobranch
poring_w01	mapflag	noloot
poring_w01	mapflag	noskill
poring_w01	mapflag	nopenalty

GM can WHISPER to the npc with npc:pcatch  and it start doing so 

Link to comment
Share on other sites
elcontrol00 Poring

elcontrol00

Posted
  • Group:  Members
  • Topic Count:  36
  • Topics Per Day:  0.01
  • Content Count:  236
  • Reputation:   1
  • Joined:  04/25/12
  • Last Seen:  
  • Author
Posted

yes but i would like it for it to be automatic every hour

Link to comment
Share on other sites
Magnetix Santa Poring

Magnetix

Posted
  • Group:  Members
  • Topic Count:  6
  • Topics Per Day:  0.00
  • Content Count:  446
  • Reputation:   30
  • Joined:  12/08/11
  • Last Seen:  
Posted

Add this

-    script    pcatch    -1,{

OnMinute00:
	donpcevent "Announcer2::OnGMStart";
	end;
Link to comment
Share on other sites
elcontrol00 Poring

elcontrol00

Posted
  • Group:  Members
  • Topic Count:  36
  • Topics Per Day:  0.01
  • Content Count:  236
  • Reputation:   1
  • Joined:  04/25/12
  • Last Seen:  
  • Author
Posted

 

Add this

-    script    pcatch    -1,{

OnMinute00:
	donpcevent "Announcer2::OnGMStart";
	end;

Where exactly?

Link to comment
Share on other sites
Magnetix Santa Poring

Magnetix

Posted
  • Group:  Members
  • Topic Count:  6
  • Topics Per Day:  0.00
  • Content Count:  446
  • Reputation:   30
  • Joined:  12/08/11
  • Last Seen:  
Posted

If you used what EL Dragon provided, you can use that line.. but if you prefer using glemor123's script then

 

find this line

OnClock1200:
OnClock1100:
OnClock1300:
OnClock2300:
OnStart:

and replace with

OnMinute00:
  • Upvote 1
Link to comment
Share on other sites
markiez22 Poporing

markiez22

Posted
  • Group:  Members
  • Topic Count:  11
  • Topics Per Day:  0.00
  • Content Count:  126
  • Reputation:   5
  • Joined:  10/31/12
  • Last Seen:  
Posted

Poring Catcher Round 1 to Round 10

automatic every 2 hours
 

prontera,156,187,3	script	Poring Catcher Warper	723,{

mes "Do you want to join the Poring Catcher Event?";
menu "Yes",-;
set @rex,rand(102,104);
warp "poring_c01",@rex,101;
close;

}

-	script	pcetrigger	-1,{
OnClock0000:
OnClock0200:
OnClock0400:
OnClock0600:
OnClock0800:
OnClock1000:
OnClock1200:
OnClock1400:
OnClock1600:
OnClock1700:
OnClock1200:
OnClock1400:
OnClock1600:
OnClock1800:
OnClock2000:
OnClock2200:
enablenpc "Poring Catcher Warper";
announce "Poring Catcher Event: We are going to have a Poring Catcher Event",bc_all,0xFF7F50;
sleep2 1000;
announce "Poring Catcher Event: For those who want to join, please warp @ center of prontera",bc_all,0xFF7F50; //Edit to where would you place the warper
sleep2 1000;
announce "Poring Catcher Event: Poring Catcher Start in 1 minute",bc_all,0xFF7F50;
sleep2 30000;
announce "Poring Catcher Event: Last 30 Seconds.",bc_all,0xFF7F50;
sleep2 30000;
announce "Poring Catcher Event: Join Now.",bc_all,0xFF7F50;
donpcevent "Poring Catcher Event::OnPoringCatcherStart";
end;

}

poring_c01,106,110,3	script	Got Stuck?#pce	948,{

mes "[ Got Stuck? ]";
mes "Do you wish to go back?";
menu "Yes",-;
warp "prontera]",154,177;
close;

}

-	script	Poring Catcher Event	-1,{

OnPoringCatcherStart:
mapannounce "poring_c01","We are about to start the Poring Catcher Event.",bc_blue;
sleep2 1000;
mapannounce "poring_c01","Rules are simple:",bc_blue;
sleep2 1000;
mapannounce "poring_c01","In a few seconds I'm going to spawn tons of porings..",bc_blue;
sleep2 1000;
mapannounce "poring_c01","..All you need to do is kill the Poring with the right name..",bc_blue;
sleep2 1000;
mapannounce "poring_c01","..Which would be Poring.",bc_blue;
sleep2 1000;
mapannounce "poring_c01","If you kill the wrong one, you're out!",bc_blue;
sleep2 3000;
mapannounce "poring_c01","That's it.. Now let's get this on!",bc_blue;
sleep2 3000;
goto Lstart;
end;


Lstart:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
mapannounce "poring_c01","Ready...",bc_blue;
sleep2 1000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin1::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poling",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porng",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"pH0ur1n6",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"P0ring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porong",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,1*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}



}



-	script	poringwin1	-1,{
OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 1!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 1",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin2::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poling",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porng",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"pH0ur1n6",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"P0ring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Boring",1002,1*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,1*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,1*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}


-	script	poringwin2	-1,{

OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 2!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 2",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin3::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poling",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porng",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"pH0ur1n6",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poriing",1002,1*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Boring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}

-	script	poringwin3	-1,{

OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 3!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 3",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin4::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poling",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porng",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"pH0ur1n6",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"P0ring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Boring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}

-	script	poringwin4	-1,{

OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 4!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 4",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin5::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poling",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porng",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"pH0ur1n6",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poriing",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Boring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}

-	script	poringwin5	-1,{

OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 5!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 5",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin6::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poling",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porng",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"pH0ur1n6",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poriing",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Boring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}


-	script	poringwin6	-1,{

OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 6!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 6",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin7::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"P0ring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porong",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Powing",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poring",1572,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Boring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}


-	script	poringwin7	-1,{

OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 7!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 7",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin8::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"P0ring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porong",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Powing",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poriing",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Boring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Zerrudoring!",1572,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}


-	script	poringwin8	-1,{

OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 8!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 8",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin9::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poling",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porng",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Powing",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poring",1572,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Boring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}


-	script	poringwin9	-1,{

OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 9!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 9",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwin10::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poling",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"P0ring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poring",1572,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Powing",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poriing",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Boring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}



-	script	poringwin10	-1,{

OnMobKilled:
if(getmapusers("poring_c01") == 0) goto Lnoone;
if(getmapusers("poring_c01") > 0) {
getitem 30076,3; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 10!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
mapannounce "poring_c01","Round 3",bc_blue;
sleep2 10000;
mapannounce "poring_c01","Get Set..",bc_blue;
sleep2 1500;
mapannounce "poring_c01","Go!",bc_blue;
sleep2 1000;
areamonster "poring_c01",95,108,113,87,"Poring",1002,1,"poringwinend::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poking",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poiring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poling",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"P0ring",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Porong",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Poring",1572,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Erning",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Nining",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Lolwut!?",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
areamonster "poring_c01",95,108,113,87,"Kill me to win!",1002,3*getmapusers("poring_c01"),"poringlose::OnMobKilled";
sleep2 1800000;
if(getmapusers("poring_c01") > 0) { goto Lnoone;
disablenpc "Poring Catcher Warper";
}
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}


-	script	poringwinend	-1,{

OnMobKilled:
getitem 30076,1; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event Round 10!",bc_all,0xFF7F50;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
mapwarp "poring_c01","prontera",154,177;
end;
}





-	script	poringlose	-1,{

OnMobKilled:
dispbottom "You killed the wrong Poring! Yerrrrrrrrrrrr out!";
warp "prontera",154,177; //Edit to where will you warp players that lost
sleep2 500;
if(getmapusers("poring_c01") == 0) goto Lnoone;
end;

Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","prontera",154,177;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;

}


poring_c01	mapflag	nopenalty
poring_c01	mapflag	noloot
poring_c01	mapflag	noskill
poring_c01	mapflag	nowarpto
poring_c01	mapflag	nowarp
poring_c01	mapflag	noteleport
poring_c01	mapflag	nomemo
poring_c01	mapflag	nosave	SavePoint
poring_c01	mapflag	nobranch
poring_c01	mapflag	nodrop

i want to share

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to question listing
×
×
  • Create New...