Jump to content
  • 0

poring catcher adding 3 live's her/him life.


Blue Jem

Question


  • Group:  Members
  • Topic Count:  151
  • Topics Per Day:  0.04
  • Content Count:  393
  • Reputation:   3
  • Joined:  09/16/13
  • Last Seen:  

//=========== 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 TCG and Gold 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;






OnClock0600:
OnClock0700:
OnClock0800:
OnClock0900:
OnClock1000:
OnClock1100:
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 TCG and Gold 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,173,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 7227,1;
   getitem 671, 10;
   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

-how can add 3 life's for every player enter the event

-if the player wrong killed remove 1 life

Edited by Blue Jem
Link to comment
Share on other sites

5 answers to this question

Recommended Posts

  • 1

  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10013
  • Reputation:   2348
  • Joined:  10/28/11
  • Last Seen:  

annie's method will end up "4 life" ??.... xP

you killed a wrong poring. life [-1/3]   // but display from 2 ~ -1

i believe should be

//==================DUMY PORINGS FOR LOSERS======================\\
-	script	poringlose	-1,{
OnMobKilled:
	@wrong_poring_kill++;
	if( @wrong_poring_kill < 3 ){
		dispbottom "you killed a wrong poring. life ["+( 3 - @wrong_poring_kill ) +"/3]";

	}else{
		dispbottom "Your out of the game, You did not catch the right Poring !";
		unitkill getcharid(3);
		warp "SavePoint",0,0;
		@wrong_poring_kill = 0;
	}
	end;
}

  • Upvote 2
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  18
  • Topics Per Day:  0.00
  • Content Count:  2044
  • Reputation:   682
  • Joined:  10/09/12
  • Last Seen:  

change poringlose npc into like this

-	script	poringlose	-1,{
OnMobKilled:
	if ( @wrong_poring_kill <= 3 ) {
		@wrong_poring_kill++;
		dispbottom "you killed a wrong poring. life ["+( 3 - @wrong_poring_kill ) +"/3]";
		end;
	}
   dispbottom "Your out of the game, You did not catch the right Poring !";
   percentheal -99,-99;
   warp "SavePoint",0,0;
   @wrong_poring_kill = 0;
   end;
}
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  18
  • Topics Per Day:  0.00
  • Content Count:  2044
  • Reputation:   682
  • Joined:  10/09/12
  • Last Seen:  

you want spoon feed

poring_catcher.txt

here you go

Edited by AnnieRuru
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  18
  • Topics Per Day:  0.00
  • Content Count:  2044
  • Reputation:   682
  • Joined:  10/09/12
  • Last Seen:  

ehhh ...

I almost sure that I use

if ( @wrong_poring_kill < 3 ) {
when I script that ... how come it become <= 3

damn Emistry your PM distract me lol

gives you 1 rep

and she says "add 3 life" ... means can have 4 tries

edited the previous script

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.

×
×
  • Create New...