- script Poring -1,{
// Start time
OnClock0000:
OnClock0400:
OnClock0800:
OnClock1200:
OnClock1600:
OnClock2000:
setarray .Maps$[0],"payon","comodo","morocc","geffen"; // Possible maps, add how many you want
.Prize = 674; // Reward item ID
.Amount = 2; // Reward item amount
.Spawn = rand(100,200); // How many Killer-Poring will spawn? - Give no Price kill Player
.Spawn2 = rand(10,15); // How many Normal-Poring will spawn - Give price
.Map$ = .Maps$[rand(getarraysize(.Maps$))];
announce "Poring Catcher: El evento ah comenzado y el premio son las famosas "+getitemname(.Prize)+"!",0;
sleep 2500;
announce "Actualmente existen unos "+(.Spawn+.Spawn2)+" Porings Salvajes en "+.Map$+"!",0;
monster .Map$,0,0,"Event Poring",1002,.Spawn,strnpcinfo(0)+"::OnMobKilled";
monster .Map$,0,0,"Event Poring",1002,.Spawn2,strnpcinfo(0)+"::OnMobKiller";
initnpctimer;
end;
OnMobKilled:
if (playerattached()) {
announce ""+strcharinfo(0)+" ah sido explotado por un Poring Salvaje.",0;
atcommand "@nuke "+strcharinfo(0);
}
end;
OnMobKiller:
if (playerattached()) {
getitem .Prize, .Amount;
announce ""+strcharinfo(0)+" consiguio el premio por matar al Poring correcto.",0;
}
end;
OnTimer3600000:
if (mobcount(.Map$,strnpcinfo(0)+"::OnMobKilled") || mobcount(.Map$,strnpcinfo(0)+"::OnMobKiller")) {
killmonster .Map$,strnpcinfo(0)+"::OnMobKilled";
killmonster .Map$,strnpcinfo(0)+"::OnMobKiller";
announce "El Poring Catcher evento ha finalizado...",0;
}
stopnpctimer;
end;
}
Untested