Jump to content
  • 0

poring catcher help


darking123

Question


  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  

when the event start the warper doesnt show up

- script poring#announcer -1,{

OnInit:
disablenpc "poringevent";
hideonnpc "Poring Catcher#evnt2";
end;
OnClock1200:
OnClock1100:
OnClock1300:
OnClock2300:
OnStart:

announce "Poring Catcher : It's time to play some Poring Catcher!",bc_all,0xFF0000;
killmonster "poring_w01","All";
sleep2 10000;
announce "Poring Catcher : Please make your way to Prontera.",bc_all,0xFF0000;
sleep2 10000;
announce "Poring Catcher : After one minute the portal will close.",bc_all,0xFF0000;
sleep2 10000;
announce "Poring Catcher : Enter the warp portal now if you want to join.",bc_all,0xFF0000;
enablenpc "poringevent";
initnpctimer;
end;

OnTimer30000:
announce "Poring Catcher : Last 30 seconds.",bc_all,0xFF0000;
sleep2 5000;
announce "Poring Catcher : Hurry to Prontera if you want to join.",bc_all,0xFF0000;
end;

OnTimer50000:
announce "Poring Catcher : Last 10 seconds.",bc_all,0xFF0000;
end;

OnTimer55000:
announce "Poring Catcher : 5.",bc_all,0xFF0000;
end;

OnTimer56000:
announce "Poring Catcher : 4.",bc_all,0xFF0000;
end;

OnTimer57000:
announce "Poring Catcher : 3.",bc_all,0xFF0000;
end;

OnTimer58000:
announce "Poring Catcher : 2.",bc_all,0xFF0000;
end;

OnTimer59000:
announce "Poring Catcher : 1.",bc_all,0xFF0000;
end;

OnTimer60000:
announce "Poring Catcher : Next Event will start in 1 hour.",bc_all,0xFF0000;
end;

OnTimer61000:
disablenpc "poringevent";
donpcevent "Poring Catcher#evnt2::OnEnable";
stopnpctimer;
end;
}

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

prontera,148,197,0 warp poringevent 2,2,poring_w01,106,129 

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

poring_w01,100,127,4 script Poring Catcher#evnt2 715,{

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

mes "[Poring Catcher]";
if(PORING == 1) goto L_PORING;
mes "Please tell me your name";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
mes "[Poring Catcher]";
mes "Are you sure thats your character name?";
close;
}
mes "[Poring Catcher]";
mes "Congrats. You've won.";
close2;
announce "Poring Catcher : All laugh at, "+.@name$+". - This player tried to cheat the system. Muhahahahaha!",0;
warp "prontera",0,0;
end;

L_PORING:
mes "Please tell me your name";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
mes "[Poring Catcher]";
mes "Are you sure thats your character name?";
close;
}
mes "[Poring Catcher]";
mes "Congrats. You've won.";
close2;
announce "Poring Catcher : We have a winner, "+.@name$+". - 2 TCG Card Won!",0;

getitem 7227,2;

set PORING,0;
warp "prontera",0,0;
hideonnpc "Poring Catcher#evnt2";
end;

OnEnable:
mapannounce "poring_w01","Poring Catcher : I will be summoning 100 different Porings.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : Only one of these Porings is the correct Poring.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : The correct Poring is called [ Poring ], all the other Porings have different names.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : Take your time because if you kill the wrong Poring, your out of the game.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : The first player to kill the correct Poring wins.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : That's that.. Now let's play...",0;
goto L_Start;
end;

L_Start:
mapannounce "poring_w01","Poring Catcher : 5",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 4",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 3",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 2",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 1",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : Lets Do This!",0;
areamonster "poring_w01",84,119,121,90,"Poring",1002,1,"poringwin::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Pouring",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Proing",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poiring",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poing",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"I am not Poring",1002,5,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Gniriop",1002,1,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poring",1113,1,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poring",1062,1,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poriiing",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"PoriNg",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Porong",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"P0ring",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Por1ng",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Porng",1002,1,"poringlose::OnMobKilled";
end;
}

- script poringwin -1,{

OnMobKilled:
dispbottom "Poring : Congratulations. You've got me.";
set PORING,1;
atcommand "@doommap";
killmonster "poring_w01","All";
mapannounce "poring_w01","Poring Catcher : Come to me and tell me your name.",0;
hideoffnpc "Poring Catcher#evnt2";
end;

}

- script poringlose -1,{

OnMobKilled:
dispbottom "Poring Catcher : Wahaha, your a loser! - I wasnt the correct Poring.";
warp "prontera",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

Link to comment
Share on other sites

11 answers to this question

Recommended Posts


  • Group:  Members
  • Topic Count:  13
  • Topics Per Day:  0.00
  • Content Count:  106
  • Reputation:   3
  • Joined:  01/01/12
  • Last Seen:  

Try mine script:

-	script	announceporing	-1,{

OnMinute30:

announce "Event 'Poring Catcher' is starting!",0;
sleep 1000;
enablenpc "Poring";
announce "Go to Prontera to play this event",0;
sleep 1000;
announce "Event will start in 3 minutes",0;
sleep 60000;
announce "Event will start in 2 minutes",0;
sleep 60000;
announce "Even will start in 1 minute, hurry!",0;
sleep 60000;
announce "Event 'Poring Catcher' has started!",0;
donpcevent "monstri::OnStart";
disablenpc "Poring";
initnpctimer;

OnTimer5000:
if ( getmapusers("poring_w01") == 0 )
{
	killmonsterall "poring_w01";
	announce "Event 'Poring Catcher' didn't start because there's no players.",0;
	stopnpctimer;
	end;
}
}

prontera,150,150,6 script Poring 1002,2,2,{
OnTouch:
warp "poring_w01",0,0;
end;
}

-	script	pobeditel	-1,{

OnTruePoring:
	warp "SavePoint",0,0;
	killmonsterall "poring_w01";
	dispbottom "You've killed the right poring!";
	getitem 7227,1;
	getitem 671, 10;
	announce ""+strcharinfo(0)+" won in  'Poring catcher'. Congratulations! ",0;
}

-	script	monstri	-1,{

OnStart:
	monster "poring_w01",0,0,"Poring",1002,1,"pobeditel::OnTruePoring";
	monster "poring_w01",0,0,"PorinG",1002,25,"proigral::OnFalsePoring";
	monster "poring_w01",0,0,"P0ri",1002,25,"proigral::OnFalsePoring";
	monster "poring_w01",0,0,"P0r1ng",1002,25,"proigral::OnFalsePoring";
	monster "poring_w01",0,0,"Porning",1002,24,"proigral::OnFalsePoring";
}


-	script	proigral	-1,{

OnFalsePoring:
	dispbottom "You loose!";
	percentheal -100,0;
	warp "SavePoint",0,0;
}

poring_w01	mapflag	nowarp
poring_w01	mapflag	noskill

Edited by Oxxy
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  

[Error]: Missing 1 right curlys at file 'npc/custom/poring_catcher.txt', line '75'.

- script announceporing -1,{

OnClock1200:
OnClock1100:
OnClock1300:
OnClock2300:

announce "Event 'Poring Catcher' is starting!",0;
sleep 1000;
enablenpc "Poring";
announce "Go to Prontera to play this event",0;
sleep 1000;
announce "Event will start in 3 minutes",0;
sleep 60000;
announce "Event will start in 2 minutes",0;
sleep 60000;
announce "Even will start in 1 minute, hurry!",0;
sleep 60000;
announce "Event 'Poring Catcher' has started!",0;
donpcevent "monstri::onstart";
disablenpc "Poring";
initnpctimer;

OnTimer5000:
if ( getmapusers("poring_w01") == 0 )
{
killmonsterall "poring_w01";
announce "Event 'Poring Catcher' didn't start because there's no players.",0;
stopnpctimer;
end;
}
}

prontera,148,197,6 script Poring 1002,2,2,{
OnTouch:
warp "poring_w01",0,0;
end;

- script pobeditel -1,{

OnTruePoring:
warp "SavePoint",0,0;
killmonsterall "poring_w01";
dispbottom "You've killed the right poring!";
getitem 7227,10;
announce ""+strcharinfo(0)+" won in  'Poring catcher'. Congratulations! ",0;
}

- script monstri -1,{

onstart:
monster "poring_w01",0,0,"Poring",1002,1,"pobeditel::OnTruePoring";
monster "poring_w01",0,0,"PorinG",1002,25,"proigral::OnFalsePoring";
monster "poring_w01",0,0,"P0ri",1002,25,"proigral::OnFalsePoring";
monster "poring_w01",0,0,"P0r1ng",1002,25,"proigral::OnFalsePoring";
monster "poring_w01",0,0,"Porning",1002,24,"proigral::OnFalsePoring";
}


- script proigral -1,{

OnFalsePoring:
dispbottom "You loose!";
percentheal -100,0;
warp "SavePoint",0,0;
}
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

[Error]: npc_enable: Attempted to show a non-existing NPC 'Poring' (flag=1).

[Error]: npc_enable: Attempted to hide a non-existing NPC 'Poring' (flag=0).

i tried other script this is the error of this script

[Error]: npc_enable: Attempted to hide a non-existing NPC 'Poring Catcher#evnt2' (flag=4).



- script poring#announcer -1,{

OnInit:
disablenpc "poringevent";
hideonnpc "Poring Catcher#evnt2";
end;
OnClock1200:
OnClock1100:
OnClock1300:
OnClock2300:

announce "Poring Catcher : It's time to play some Poring Catcher!",0;
killmonster "poring_w01","All";
sleep2 10000;
announce "Poring Catcher : Please make your way to the centre of Prontera.",0;
sleep2 10000;
announce "Poring Catcher : After one minute the portal will close.",0;
sleep2 10000;
announce "Poring Catcher : Enter the warp portal now if you want to join.",0;
enablenpc "poringevent";
initnpctimer;
end;


OnTimer30000:
announce "Poring Catcher : Last 30 seconds.",0;
sleep2 5000;
announce "Poring Catcher : Hurry to the centre of Prontera if you want to join.",0;
end;

OnTimer50000:
announce "Poring Catcher : Last 10 seconds.",0;
end;

OnTimer55000:
announce "Poring Catcher : 5.",0;
end;

OnTimer56000:
announce "Poring Catcher : 4.",0;
end;

OnTimer57000:
announce "Poring Catcher : 3.",0;
end;

OnTimer58000:
announce "Poring Catcher : 2.",0;
end;

OnTimer59000:
announce "Poring Catcher : 1.",0;
end;

OnTimer60000:
announce "Poring Catcher : Time's up. Portal Will Open again when a GM activates it.",0;
end;

OnTimer61000:
disablenpc "poringevent";
donpcevent "Poring Catcher#evnt2::OnEnable";
stopnpctimer;
end;
}

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

prontera,156,172,0 warp poringevent 2,2,poring_w01,106,129 

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

poring_w01,100,127,4 script Poring Catcher#evnt2 715,{

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

mes "[Poring Catcher]";
if(PORING == 1) goto L_PORING;
mes "Please tell me your name";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
mes "[Poring Catcher]";
mes "Are you sure thats your character name?";
close;
}
mes "[Poring Catcher]";
mes "Congrats. You've won.";
close2;
announce "Poring Catcher : All laugh at, "+.@name$+". - This player tried to cheat the system. Muhahahahaha!",0;
warp "prontera",155,182;
end;

L_PORING:
mes "Please tell me your name";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
mes "[Poring Catcher]";
mes "Are you sure thats your character name?";
close;
}
mes "[Poring Catcher]";
mes "Congrats. You've won.";
close2;
announce "Poring Catcher : We have a winner, "+.@name$+". - 1 Event Token Won!",0;

getitem 7227,10; // SET THE 20085 TO THE ITEM ID OF YOUR PRIZE

set PORING,0;
warp "prontera",155,182;
hideonnpc "Poring Catcher#evnt2";
end;

OnEnable:
mapannounce "poring_w01","Poring Catcher : I will be summoning 100 different Porings.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : Only one of these Porings is the correct Poring.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : The correct Poring is called [ Poring ], all the other Porings have different names.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : Take your time because if you kill the wrong Poring, your out of the game.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : The first player to kill the correct Poring wins.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : That's that.. Now let's play...",0;
goto L_Start;
end;

L_Start:
mapannounce "poring_w01","Poring Catcher : 5",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 4",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 3",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 2",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 1",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : Lets Do This!",0;
areamonster "poring_w01",84,119,121,90,"Poring",1002,1,"poringwin::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Pouring",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Proing",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poiring",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poing",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"I am not Poring",1002,5,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Gniriop",1002,1,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poring",1113,1,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poring",1062,1,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poriiing",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"PoriNg",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Porong",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"P0ring",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Por1ng",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Porng",1002,1,"poringlose::OnMobKilled";
end;
}

- script poringwin -1,{

OnMobKilled:
dispbottom "Poring : Congratulations. You've got me.";
set PORING,1;
atcommand "@doommap";
killmonster "poring_w01","All";
mapannounce "poring_w01","Poring Catcher : Come to me and tell me your name.",0;
hideoffnpc "Poring Catcher#evnt2";
end;

}

- script poringlose -1,{

OnMobKilled:
dispbottom "Poring Catcher : Wahaha, your a loser! - I wasnt the correct Poring.";
warp "prontera",155,178;
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

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  13
  • Topics Per Day:  0.00
  • Content Count:  106
  • Reputation:   3
  • Joined:  01/01/12
  • Last Seen:  

Try the script now.

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  13
  • Topics Per Day:  0.00
  • Content Count:  91
  • Reputation:   8
  • Joined:  03/03/12
  • Last Seen:  

is this already solved?

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  13
  • Topics Per Day:  0.00
  • Content Count:  91
  • Reputation:   8
  • Joined:  03/03/12
  • Last Seen:  

can I see your full script let me fix it

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  318
  • Topics Per Day:  0.07
  • Content Count:  931
  • Reputation:   13
  • Joined:  12/20/11
  • Last Seen:  

- script announceporing -1,{

OnClock1200:
OnClock1100:
OnClock1300:
OnClock2300:

announce "Event 'Poring Catcher' is starting!",0;
sleep 1000;
enablenpc "Poring";
announce "Go to Prontera to play this event",0;
sleep 1000;
announce "Event will start in 3 minutes",0;
sleep 60000;
announce "Event will start in 2 minutes",0;
sleep 60000;
announce "Even will start in 1 minute, hurry!",0;
sleep 60000;
announce "Event 'Poring Catcher' has started!",0;
donpcevent "monstri::onstart";
disablenpc "Poring";
initnpctimer;

OnTimer5000:
if ( getmapusers("poring_w01") == 0 )
{
killmonsterall "poring_w01";
announce "Event 'Poring Catcher' didn't start because there's no players.",0;
stopnpctimer;
end;
}
}

prontera,150,150,6 script Poring 1002,2,2,{
OnTouch:
warp "poring_w01",0,0;
end;
}

- script pobeditel -1,{

OnTruePoring:
warp "SavePoint",0,0;
killmonsterall "poring_w01";
dispbottom "You've killed the right poring!";
getitem 7227,1;
getitem 671, 10;
announce ""+strcharinfo(0)+" won in  'Poring catcher'. Congratulations! ",0;
}

- script monstri -1,{

onstart:
monster "poring_w01",0,0,"Poring",1002,1,"pobeditel::OnTruePoring";
monster "poring_w01",0,0,"PorinG",1002,25,"proigral::OnFalsePoring";
monster "poring_w01",0,0,"P0ri",1002,25,"proigral::OnFalsePoring";
monster "poring_w01",0,0,"P0r1ng",1002,25,"proigral::OnFalsePoring";
monster "poring_w01",0,0,"Porning",1002,24,"proigral::OnFalsePoring";
}


- script proigral -1,{

OnFalsePoring:
dispbottom "You loose!";
percentheal -100,0;
warp "SavePoint",0,0;
}

// -- 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

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  13
  • Topics Per Day:  0.00
  • Content Count:  91
  • Reputation:   8
  • Joined:  03/03/12
  • Last Seen:  

I've made a good script for this just wait for the approval. I'll give you the link later if it is already approve by mods.

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  80
  • Topics Per Day:  0.02
  • Content Count:  325
  • Reputation:   76
  • Joined:  03/22/12
  • Last Seen:  

try this this is working both in my server rathena and eathena

- script poring#announcer -1,{
OnInit:
disablenpc "poringevent";
hideonnpc "Poring Catcher#evnt2";
end;
OnClock2000:
OnClock5000:
OnClock9000:
OnClock1200:
OnClock1600:
OnClock1900:
OnClock2300:
announce "Poring Catcher : It's time to play some Poring Catcher!",0;
killmonster "poring_w01","All";
sleep2 10000;
announce "Poring Catcher : Please make your way to the centre of Prontera.",0;
sleep2 10000;
announce "Poring Catcher : After one minute the portal will close.",0;
sleep2 10000;
announce "Poring Catcher : Enter the warp portal now if you want to join.",0;
enablenpc "poringevent";
initnpctimer;
end;

OnTimer30000:
announce "Poring Catcher : Last 30 seconds.",0;
sleep2 5000;
announce "Poring Catcher : Hurry to the centre of Prontera if you want to join.",0;
end;

OnTimer50000:
announce "Poring Catcher : Last 10 seconds.",0;
end;

OnTimer55000:
announce "Poring Catcher : 5.",0;
end;

OnTimer56000:
announce "Poring Catcher : 4.",0;
end;

OnTimer57000:
announce "Poring Catcher : 3.",0;
end;

OnTimer58000:
announce "Poring Catcher : 2.",0;
end;

OnTimer59000:
announce "Poring Catcher : 1.",0;
end;

OnTimer60000:
announce "Poring Catcher : Time's up. Portal Will Open again when a GM activates it.",0;
end;

OnTimer61000:
disablenpc "poringevent";
donpcevent "Poring Catcher#evnt2::OnEnable";
stopnpctimer;
end;
}

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

prontera,163,187,0 warp poringevent 2,2,poring_w01,106,129

//--------------------------------------------------
poring_w01,100,127,4 script Poring Catcher#evnt2 715,{
//--------------------------------------------------
mes "[Poring Catcher]";
if(PORING == 1) goto L_PORING;
mes "Please tell me your name";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
 mes "[Poring Catcher]";
 mes "Are you sure thats your character name?";
 close;
}
mes "[Poring Catcher]";
mes "Congrats. You've won.";
close2;
announce "Poring Catcher : All laugh at, "+.@name$+". - This player tried to cheat the system. Muhahahahaha!",0;
warp "prontera",155,182;
end;
L_PORING:
mes "Please tell me your name";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
 mes "[Poring Catcher]";
 mes "Are you sure thats your character name?";
 close;
}
mes "[Poring Catcher]";
mes "Congrats. You've won.";
close2;
announce "Poring Catcher : We have a winner, "+.@name$+".",0;
getitem 17027,1;
set #CASHPOINTS,#CASHPOINTS + 500;
dispbottom "You have Won 500 Cash Points Total of = "+#CASHPOINTS+" Points.";
set PORING,0;
warp "prontera",155,182;
hideonnpc "Poring Catcher#evnt2";
end;

OnEnable:
mapannounce "poring_w01","Poring Catcher : I will be summoning 100 different Porings.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : Only one of these Porings is the correct Poring.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : The correct Poring is called [ Poring ], all the other Porings have different names.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : Take your time because if you kill the wrong Poring, your out of the game.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : The first player to kill the correct Poring wins.",0;
sleep2 10000;
mapannounce "poring_w01","Poring Catcher : That's that.. Now let's play...",0;
goto L_Start;
end;

L_Start:
mapannounce "poring_w01","Poring Catcher : 5",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 4",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 3",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 2",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : 1",0;
sleep2 1000;
mapannounce "poring_w01","Poring Catcher : Lets Do This!",0;
areamonster "poring_w01",84,119,121,90,"Poring",1002,1,"poringwin::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Pouring",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Proing",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poiring",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poing",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"I am not Poring",1002,5,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Gniriop",1002,1,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poring",1113,1,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poring",1062,1,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Poriiing",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"PoriNg",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Porong",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"P0ring",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Por1ng",1002,10,"poringlose::OnMobKilled";
areamonster "poring_w01",84,119,121,90,"Porng",1002,1,"poringlose::OnMobKilled";
end;
}
- script poringwin -1,{
OnMobKilled:
dispbottom "Poring : Congratulations. You've got me.";
set PORING,1;
atcommand "@doommap";
killmonster "poring_w01","All";
mapannounce "poring_w01","Poring Catcher : Come to me and tell me your name.",0;
hideoffnpc "Poring Catcher#evnt2";
end;
}
- script poringlose -1,{
OnMobKilled:
dispbottom "Poring Catcher : Wahaha, your a loser! - I wasnt the correct Poring.";
warp "que_moon",34,24;
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

Edited by Emistry
Please use [CODEBOX] or Attachments for long contents.
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...