Hello! I've been searching or looking for a script of Poring Summoner that is not an automated event. This is my current poring summoner script, what I want is to remove the OnHourXX variable, but if I remove it, I'll get an error.
//===== eAthena Script ================================================================================================================
//= Poring Summoner
//===== Created By: ===================================================================================================================
//= MoonlightRO
//===== Current Version: ==============================================================================================================
//= 1.2
//===== Compatible With: ==============================================================================================================
//= TXT & SQL
//===== Link: ==============================================================================================================
//= http://www.eathena.ws/board/index.php?showtopic=236779
//===== Credits: ==============================================================================================================
//= Myself
//===================================================================================================================
ayo_in01,191,195,4 script Poring Summoner 975,{
mes "[Poring Summoner]";
if(getgmlevel() < 50) {
if(.Event) mes "There is no Poring Summon Event on now.";
else {
mes "There is a Poring Summon Event on now!";
mes "Location: " + .Map$;
mes "Special Porings: " + .SpecialPorings[1];
mes "Normal Porings: " + .NormalPorings[0];
}
close;
}
mes "Please customize the Poring Summon Event:";
Main:
next;
mes "[Poring Summoner]";
switch(select("Item [" + getitemname(.ItemID) + "]:Special Porings [" + .SpecialPorings + "]:Normal Porings [" + .NormalPorings + "]:Start Event:End Event")) {
case 1:
mes "Which item would you like Special Porings to drop?";
mes "Please input the item ID:";
input .ItemID;
goto Main;
case 2:
mes "How many Special Porings would you like me to summon?";
input .SpecialPorings;
goto Main;
case 3:
mes "How many Normal Porings would you like me to summon?";
input .NormalPorings;
goto Main;
case 4:
mes "Starting the event now...";
OnHour02: //CHANGE THIS TO THE HOUR YOU WOULD LIKE THIS EVENT TO LOAD!
OnHour05:
OnHour09:
OnHour14:
OnHour17:
OnHour20:
OnHour23:
set $@ran, rand(1,11);
if ($@ran == 11) set .Map$,"hugel";
if ($@ran == 10) set .Map$,"ayothaya";
if ($@ran == 9) set .Map$,"umbala";
if ($@ran == 8) set .Map$,"comodo";
if ($@ran == 7) set .Map$,"xmas";
if ($@ran == 6) set .Map$,"aldebaran";
if ($@ran == 5) set .Map$,"izlude";
if ($@ran == 4) set .Map$,"payon";
if ($@ran == 3) set .Map$,"geffen";
if ($@ran == 2) set .Map$,"morocc";
if ($@ran == 1) set .Map$,"prontera";
set .Event,1;
monster .Map$,0,0,"Poring",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill";
monster .Map$,0,0,"Poring",1002,.NormalPorings,"Poring Summoner::OnNormalKill";
set .SpecialPorings[1],.SpecialPorings;
set .NormalPorings[1],.NormalPorings;
announce "The Poring Event has begun!",bc_all;
announce "Location: " + .Map$,bc_all;
announce "Special Porings: " + .SpecialPorings,bc_all;
announce "Normal Porings: " + .NormalPorings,bc_all;
close;
case 5:
mes "Ending the event now...";
goto EndEvent;
}
OnTimer216000000:
announce "Poring Summoner has ended. No one killed the Porings.",bc_all;
killmonster .Map$,"All";
set .Event,0;
stopnpctimer;
end;
OnSpecialKill:
set .SpecialPorings[1],.SpecialPorings[1]-1;
announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map;
getitem .ItemID,1;
goto PoringCount;
OnNormalKill:
set .NormalPorings[1],.NormalPorings[1]-1;
goto PoringCount;
PoringCount:
announce "Special Porings: " + .SpecialPorings[1] + " || Normal Porings: " + .NormalPorings[1],bc_map;
if(!.SpecialPorings[1]) goto EndEvent;
end;
EndEvent:
if(.Event) announce "The Poring Summon Event is now over!",bc_all;
killmonster .Map$,"All";
set .Event,0;
set .SpecialPorings[1],0;
set .NormalPorings[1],0;
close;
}
My question is: How will I remove the "OnHourXX" without affecting the entire script? Or what should I replace? Thank you.
