[codebox]
// Edited version by painisinsane/Eclipse.
// Creator of EclipseRO
// Please dont remove Credits!
// Credits: http://www.paste-it....public/a5d2cd4/
quiz_01 mapflag nowarpto
quiz_01 mapflag nowarp
quiz_01 mapflag noteleport
quiz_01 mapflag nomemo
quiz_01 mapflag nosave SavePoint
quiz_01 mapflag nobranch
quiz_01 mapflag noicewall
quiz_01 mapflag nopenalty
quiz_01 mapflag nobranch
quiz_01 mapflag noexp
quiz_01 mapflag noreturn
quiz_01 mapflag pvp_noparty
quiz_01 mapflag restricted 1
- script RFYL#disable -1,{
OnInit:
disablenpc "Zombie Master";
disablenpc "Present For You";
}
quiz_02,124,352,3 script Zombie Minion 1015,{
if (getgmlevel() >= 40) goto LMS_Admin;
mes "[Minion]";
mes "Hello " + strcharinfo(0) + ", my master is busy.";
mes "*sigh*";
close;
LMS_Admin:
mes "[Minion]";
mes "Hello " + strcharinfo(0) + ", would you like me to call my Boss?";
mes "He is the only one who can start it!";
menu "Start Event",RFYL,"Spectate",M_warp,"End Event",M_EndEvent,"No Thanks",leave;
RFYL:
next;
mes "[Minion]";
mes "Ok, I'll call him this instant.";
close2;
set $@offvar,1;
goto StartEvent;
M_warp:
mes "[Minion]";
mes "Very well, I will warp you to the map!";
warp "quiz_01",42,369;
close;
leave:
next;
mes "[Minion]";
mes "Ok " + strcharinfo(0) +", nice seeing you.";
close;
M_EndEvent:
mes "[Minion]";
mes "Ok master, I will stop the event for you right away!";
next;
set $@offvar,1;
disablenpc "Zombie Master";
disablenpc "Present For You";
killmonsterall "quiz_01";
areawarp "quiz_01",10,10,450,450,"prontera",149,169;
stopnpctimer;
disablenpc "Zombie Minion";
warp "prontera",149,169;
sleep 180000;
enablenpc "Zombie Minion";
StartEvent:
announce "Zombie Vs. Novice event Will begin in 3 minutes. Head East/North",0;
killmonsterall "quiz_01";
sleep 55000;
announce "Zombie Vs. Novice event will begin in 2 minutes! Head East/North",0;
sleep 5000;
announce "Zombie Master: I have now appeared in Event Room!",0;
enablenpc "Zombie Master";
sleep 60000;
announce "Zombie Vs. Novice event will begin in 1 minute!",0;
sleep 30000;
mapannounce "quiz_01","In 30 seconds the zombies will spawn!",0;
sleep 25000;
for( set .@i,5; .@i > 0; set .@i + 1 ){
announce "Zombie Vs. Novice event will begin in ~"+.@i+" seconds.~",0;
sleep 1000;
}
announce "Zombie Vs. Novice event has now begun!!",0,0x00FF00;
disablenpc "Zombie Master";
disablenpc "Present For You";
sleep 10000;
for( set .@x,0; .@x <= 6; set .@x,.@x + 1 ){
mapannounce "quiz_01","Round "+( .@x + 1 )+"!!",0;
for( set .@y,0; .@y <= 6; set .@y,.@y + 1 ){
monster "quiz_01",42,369,"Zombie-"+( .@x + 1 ),1015,1;
sleep ( .@y * 10000 );
}
sleep 55000;
monster "quiz_01",42,369,"Zombie-"+( .@x + 1 ),1015,1;
}
initnpctimer;
end;
OnTimer0500:
if ( !getmapusers("quiz_01") ){
killmonsterall "quiz_01";
announce "'Zombie Vs. Novice' event has ended. No one joined.",0;
stopnpctimer;
end;
}else if ( getmapusers("quiz_01") > 1 ){
mapannounce "quiz_01",getmapusers("quiz_01") +"has survived the event.",0,0x00FF00;;
initnpctimer;
end;
}
initnpctimer;
end;
OnPCDieEvent:
if ( strcharinfo(3) == "quiz_01") {
sleep2 1;
warp "prontera",149,169;
atcommand "@alive "+ strcharinfo(0);
dispbottom "you have lost...";
}
sleep2 0500;
if ( .@mapnvz$ == "quiz_01" && getmapusers("quiz_01") == 1 ) {
killmonsterall "quiz_01";
mapannounce "quiz_01","You have won, approach the Present For You Npc please.",0;
enablenpc "Present For You";
stopnpctimer;
}
end;
}
quiz_01,42,378,3 script Present For You 72,{
mes "[Present For You]";
mes "Please tell me your name.";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
mes "[Present For You]";
mes "Are you sure that is your name?";
close;
}
mes "[Present For You]";
mes "Congrats. You've won.";
close2;
announce "Present For You: We have a winner! "+.@name$+" has won the Novice vs Zombie event!",0;
getitem 7539,30; // Change This item id to what ever you want
warp "prontera",149,169;
disablenpc "Present For You";
if( $@offvar < 5 ){
set $@offvar,$@offvar + 1;
donpcevent "Zombie Minion::StartEvent";
}
end;
}
quiz_02,124,351,3 script Zombie Master 1298,{
if ( BaseLevel > 1 || Class > 0 ) goto NO;
mes "[^0000FFZombie Master^000000]";
mes "You wish to participate the Zombie Vs. Novice event?";
next;
if( select("Yes:No") ){
case 1:
sc_end SC_ALL;
sc_start SC_DECREASEAGI,1200000,10;
percentheal 100,100;
sc_start SC_STRIPSHIELD,1200000,5;
sc_start SC_STRIPWEAPON,1200000,5;
sc_start SC_STRIPARMOR,1200000,5;
sc_start SC_STRIPHELM,1200000,5;
statusup2 bStr,-999;
statusup2 bAgi,-999;
statusup2 bVit,-999;
statusup2 bInt,-999;
statusup2 bDex,-999;
statusup2 bLuk,-999;
warp "quiz_01",42,369;
end;
break;
case 2:
mes "Come back when your ready.";
close;
break;
NO:
mes "[^0000FFZombie Master^000000]";
mes "You are not a Novice, level 1.";
close;
}
OnInit:
disablenpc "Zombie Master";
disablenpc "Prize";
end;
}[/codebox]