Jump to content
  • 0

Poring Catcher Problem

Cooon

Asked by Cooon,

 Share

Question

Cooon Poring

Cooon

Posted
  • Group:  Members
  • Topic Count:  11
  • Topics Per Day:  0.00
  • Content Count:  42
  • Reputation:   0
  • Joined:  12/23/11
  • Last Seen:  
Posted (edited) 
- script poring#announcer -1,{

OnInit:
disablenpc "poringevent";
hideonnpc "Poring Catcher#evnt2";
end;
}

prontera,147,175,6 script Poring Catcher 715,{
if (getgmlevel() >= 40) goto L_GM;
mes "[Poring Catcher]";
mes "Hello, im under orders to only activate this great event when a GM says so.";
close;

L_No:
close;

L_GM:
mes "[Poring Catcher]";
mes "Would you like to start this event?";
menu " - Yes",-,"- No",L_No;
mes "^00DD00Please Wait^000000. (^DD000010 Seconds^000000)";
announce "Poring Catcher : It's time to play some Poring Catcher!",0;
killmonster "poring_w01","All";
sleep2 10000;
mes "Please Wait.. (^DD000010 Seconds^000000)";
announce "Poring Catcher : Please make your way to the centre of Prontera.",0;
sleep2 10000;
mes "^00DD00Please Wait^000000... (^DD000010 Seconds^000000)";
announce "Poring Catcher : After one minute the portal will close.",0;
sleep2 10000;
mes "Please Wait.... (^DD000010 Seconds^000000)";
announce "Poring Catcher : Enter the warp portal now if you want to join.",0;
enablenpc "poringevent";
initnpctimer;
close;

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$+". - 1 Proof of Donation!",0;

getitem 7179,1; // 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[/codeBOX]

Edited by Arcenciel
Please use a codebox next time.
Link to comment
Share on other sites

7 answers to this question

Recommended Posts

Emistry Deviling

Emistry

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

in your case....

OnMinute00:

add this at above

OnTimer30000:

announce "Poring Catcher : Last 30 seconds.",0;

then the portal should have open for 30 seconds before the game start...

Link to comment
Share on other sites
Arcenciel Poring

Arcenciel

Posted
  • Group:  Members
  • Topic Count:  69
  • Topics Per Day:  0.02
  • Content Count:  1315
  • Reputation:   372
  • Joined:  12/10/11
  • Last Seen:  
Posted

What's the problem with it? And do note that script was imported from TSR so it's very unlikely that you'll get any support.

Link to comment
Share on other sites
Cooon Poring

Cooon

Posted
  • Group:  Members
  • Topic Count:  11
  • Topics Per Day:  0.00
  • Content Count:  42
  • Reputation:   0
  • Joined:  12/23/11
  • Last Seen:  
  • Author
Posted

i need a script that poring catcher starts automatically every 1hour.. w/o gm permision or clicking in the pc npc. tnx

Link to comment
Share on other sites
Cooon Poring

Cooon

Posted
  • Group:  Members
  • Topic Count:  11
  • Topics Per Day:  0.00
  • Content Count:  42
  • Reputation:   0
  • Joined:  12/23/11
  • Last Seen:  
  • Author
Posted

@Emistry: cant understand sir.. sorry newbie here..

where should i put

OnMinute00:

i think it is not automatcially start.. need to click the npc again.

Link to comment
Share on other sites
Emistry Deviling

Emistry

Posted
  • Group:  Forum Moderator
  • Topic Count:  93
  • Topics Per Day:  0.02
  • Content Count:  10015
  • Reputation:   2348
  • Joined:  10/28/11
  • Last Seen:  
Posted (edited)

:(

find this

OnTimer30000:

announce "Poring Catcher : Last 30 seconds.",0;

then replace with this

OnMinute00:

announce "Poring Catcher : Enter the warp portal now if you want to join.",0;
enablenpc "poringevent";
OnTimer30000:
announce "Poring Catcher : Last 30 seconds.",0;

Edited by Emistry
Link to comment
Share on other sites
Cooon Poring

Cooon

Posted
  • Group:  Members
  • Topic Count:  11
  • Topics Per Day:  0.00
  • Content Count:  42
  • Reputation:   0
  • Joined:  12/23/11
  • Last Seen:  
  • Author
Posted (edited) 


//= Poring Catcher - GM Control Event Script
//===== By: =================================================================================
//= Washi - www.EarthBound-RO.com
//===== Compatible With: ====================================================================
//= Any eAthena Version
//===== Description: ========================================================================
//= Single NPC that starts when a GM activates it.
//===== Additional Comments: ================================================================
//= This script is a combenation of the Dice Event by [Mahina]
//= and the origonal Poring Catcher Event by [Wild Karrd]
//===========================================================================================
//= getgmlevel() >= 40 - Change the 40 to the GM level allowed to active this event. [ LINE 24 ]
//= getitem - Change this to the Item ID of your prize. [ LINE 134 ]
//===========================================================================================
- script poring#announcer -1,{
OnInit:
disablenpc "poringevent";
hideonnpc "Poring Catcher#evnt2";
end;
}
prontera,147,175,6 script Poring Catcher 715,{
if (getgmlevel() >= 40) goto L_GM;
mes "[Poring Catcher]";
mes "Hello, im under orders to only activate this great event when a GM says so.";
close;
L_No:
close;
L_GM:
mes "[Poring Catcher]";
mes "Would you like to start this event?";
menu " - Yes",-,"- No",L_No;
mes "^00DD00Please Wait^000000. (^DD000010 Seconds^000000)";
announce "Poring Catcher : It's time to play some Poring Catcher!",0;
killmonster "poring_w01","All";
sleep2 10000;
mes "Please Wait.. (^DD000010 Seconds^000000)";
announce "Poring Catcher : Please make your way to the centre of Prontera.",0;
sleep2 10000;
mes "^00DD00Please Wait^000000... (^DD000010 Seconds^000000)";
announce "Poring Catcher : After one minute the portal will close.",0;
sleep2 10000;
mes "Please Wait.... (^DD000010 Seconds^000000)";
announce "Poring Catcher : Enter the warp portal now if you want to join.",0;
enablenpc "poringevent";
initnpctimer;
close;
OnMinute00:
announce "Poring Catcher : Enter the warp portal now if you want to join.",0;
enablenpc "poringevent";
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$+". - 1 Proof of Donation!",0;
getitem 7179,1; // 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
[/codeBOX]

is this correct? cuz its too fast to countdown the npc.. HELP PLEASE :(

Thanks a Lot Sir.

Edited by Arcenciel
Please use a codebox next time.
Link to comment
Share on other sites
Cooon Poring

Cooon

Posted
  • Group:  Members
  • Topic Count:  11
  • Topics Per Day:  0.00
  • Content Count:  42
  • Reputation:   0
  • Joined:  12/23/11
  • Last Seen:  
  • Author
Posted

Request SOLVED..

Thank You Again Emistry for Helping :(

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