Forever Ragnarok
Would you like to react to this message? Create an account in a few clicks or log in to continue.
Forever Ragnarok

Forums of FRO
 
HomeHome  Latest imagesLatest images  SearchSearch  RegisterRegister  Log in  

 

 Poring Event

Go down 
AuthorMessage
GM Noob Killer
Admin
GM Noob Killer


Posts : 872
Join date : 2009-05-16
Age : 29
Location : Behind you

Poring Event Empty
PostSubject: Poring Event   Poring Event EmptyFri May 29, 2009 9:46 pm

/////////////////////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;
}
Back to top Go down
 
Poring Event
Back to top 
Page 1 of 1
 Similar topics
-
» Event Warper
» Event Idea
» Dice Event!

Permissions in this forum:You cannot reply to topics in this forum
Forever Ragnarok :: Scripts-
Jump to: