/////////////////////Edited Poring Event by hellflaem aka Nezra.///////////////////////
/////////////////////Credit: Wild Karrd////////////////////////////////////////////////
/////////////////////http://www.eathena.ws/board/Poring-Event-t183026.html/////////////
prontera,147,171,3 script PoringEvent 763,{
if(getgmlevel() > 50) goto GMmenu;
if(!.poringcatch){
mes "[PoringEvent]";
mes "No event for the moment.";
close;
}
mes "[PoringcEvent]";
mes "Hello "+strcharinfo(0)+" what can I help you with?";
next;
menu "Enter",L_enter,"Information",L_info,"Nothing",bye;
close;
L_enter:
mes "[PoringEvent]";
mes "Have Fun!";
next;
warp "poring_c01", 100, 100;
end;
L_info:
mes "[PoringEvent]";
mes "This Event summons 100 Poring.";
mes "Only one is the real one can you find it.";
mes "If you do find it you are rewarded with a Event Credit.";
mes "Good Luck.";
close;
bye:
mes "[PoringEvent]";
mes "Bye.";
close;
Onclock0200:
Onclock0030:
OnClock1630:
OnClock0500:
OnClock2000:
OnClock1900:
announce "Poring Event: Hey Guys Event Time,Come Talk to me.",0;
initnpctimer;
monster "poring_c01",0,0,"Poring",1002,1,strnpcinfo(0)+"::OnMobKilled";
monster "poring_c01",0,0,"Pouring",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Proing",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Poirng",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Poing",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"I'm not a Poring",1002,5,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Gnirop",1002,1,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Poring",1113,1,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Poring",1062,1,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Por|ng",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Por1ng",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Porong",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"P0ring",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"P@ring",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Porng",1002,1,strnpcinfo(0)+"::OnWrongKilled";
set .poringcatch,1;
end;
OnTimer600000:
stopnpctimer;
announce "Poring Event: Times up better luck next time.",0;
set .poringcatch,0;
killmonsterall "poring_c01";
end;
OnMobKilled:
stopnpctimer;
announce "Poring Event: Some one found it, Better luck next time.",0;
dispbottom "Congrats, You found me.";
getitem 3027,1;
killmonsterall "poring_c01";
set .poringcatch,0;
end;
OnWrongKilled:
dispbottom "Whaa, you weren't even close.";
//percentheal -99,-99;
warp "prontera",157,175;
end;
GMmenu:
mes "[PoringEvent]";
mes "Would you like to start this event?";
menu "yes",Y_event,"no",-,"Enter",gm_warp;
mes "Good by then";
close;
Y_event:
announce "Poring Event: Hey Guys Event Time,Come Talk to me.",0;
initnpctimer;
monster "poring_c01",0,0,"Poring",1002,1,strnpcinfo(0)+"::OnMobKilled";
monster "poring_c01",0,0,"Pouring",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Proing",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Poirng",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Poing",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"I'm not a Poring",1002,5,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Gnirop",1002,1,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Poring",1113,1,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Poring",1062,1,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Por|ng",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Por1ng",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Porong",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"P0ring",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"P@ring",1002,10,strnpcinfo(0)+"::OnWrongKilled";
monster "poring_c01",0,0,"Porng",1002,1,strnpcinfo(0)+"::OnWrongKilled";
set .poringcatch,1;
close;
gm_warp:
mes "[PoringEvent]";
mes "Have Fun!";
next;
warp "poring_c01", 100, 100;
end;
}