//= Poring Catcher - Auto Event Script//===== By: =================================================================================//= Washi - www.EarthBound-RO.com//===== Compatible With: ====================================================================//= Any eAthena Version//===== Description: ========================================================================//= Single NPC that starts automatically starts every hour.//===== Additional Comments: ================================================================//= This script is a combenation of the Dice Event by [Mahina]//= and the origonal Poring Catcher Event by [Wild Karrd]//===========================================================================================//= OnMinute - Change this to the minute you would like this script to load. [ LINE 22 ]//= getitem - Change this to the Item ID of your prize. [ LINE 118 ]//===========================================================================================- script poring#announcer -1,{OnInit: disablenpc "poringevent"; hideonnpc "poringevent"; hideonnpc "Poring Catcher#evnt2"; end;OnMinute27: // SET THE 30 TO THE MINUTE YOU WANT THE EVENT TO START EACH HOUR. announce "Poring Catcher : It's time to play some Poring Catcher!",bc_blue; announce "Poring Catcher : Prize will be Credit.",bc_blue; killmonster "poring_w01","All"; sleep2 10000; announce "Poring Catcher : Please make your way to the centre of Event Area.",bc_blue; sleep2 10000; announce "Poring Catcher : After one minute the portal will close.",bc_blue; sleep2 10000; announce "Poring Catcher : Enter the warp portal now if you want to join.",bc_blue; hideoffnpc "poringevent"; enablenpc "poringevent"; initnpctimer; end;OnTimer30000: announce "Poring Catcher : Last 30 seconds.",bc_blue; sleep2 5000; announce "Poring Catcher : Hurry to the upper Left of dewata if you want to join.",bc_blue; end; OnTimer50000: announce "Poring Catcher : Last 10 seconds.",bc_blue; end; OnTimer55000: announce "Poring Catcher : 5.",bc_blue; end; OnTimer56000: announce "Poring Catcher : 4.",bc_blue; end; OnTimer57000: announce "Poring Catcher : 3.",bc_blue; end; OnTimer58000: announce "Poring Catcher : 2.",bc_blue; end; OnTimer59000: announce "Poring Catcher : 1.",bc_blue; end; OnTimer60000: announce "Poring Catcher : Time's up! Portal will open again in 1 hour.",bc_blue; end; OnTimer61000: disablenpc "poringevent"; hideonnpc "poringevent"; donpcevent "Poring Catcher#evnt2::OnEnable"; stopnpctimer; end; } //-------------------------------------------------- florian,95,115,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!",bc_blue; warp "dicastes01",197,184; 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$+". - Event Award Won!",0; getitem 7227,2; //set zeny,zeny+1000000; set PORING,0; warp "dicastes01",197,184; 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,"Porring",1113,1,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Porinng",1062,1,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"Poriiing",1002,10,"poringlose::OnMobKilled"; areamonster "poring_w01",84,119,121,90,"PoriNgg",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 "florian",111,150; end;}// -- Mapflagsporing_w01 mapflag nowarpporing_w01 mapflag nowarptoporing_w01 mapflag noteleportporing_w01 mapflag nosaveporing_w01 mapflag nomemoporing_w01 mapflag nobranchporing_w01 mapflag nolootporing_w01 mapflag noskillporing_w01 mapflag nopenalty
hello.. i need help to fix this script.. player cant get reward after kill the real poring.
hello.. i need help to fix this script.. player cant get reward after kill the real poring.
Share this post
Link to post
Share on other sites