prontera,141,172,5	script	RFYL Event	100,{
	if ( getgmlevel() < 99 ) end;
	donpcevent "runordie::Onmanually";
	end;
}

prontera,141,170,5	script	Run Or Die	100,{
	set .@size, getarraysize( getvariableofnpc( .aid, "runordie"

) );
	if ( .@size >= 100 ) {
		mes "I'm sorry, the room is full";
		close;
	}
	if (Weight>0)
	{
	mes "please dont bring any items";
	close;
	}
	sc_end SC_ALL;
	percentheal 100, 100;
	warp "guild_vs5", 0, 0;
	set getvariableofnpc( .aid[ .@size ], "runordie" ),

getcharid(3);
	end;
}
-	script	runordie	-1,{
OnInit:
	disablenpc "Run Or Die";
	end;

OnWhisperGlobal:
	if ( getgmlevel() < 99 ) end;
	else if ( compare( @whispervar0$ , "debug" ) ) {
		dispbottom "Player left: "+ getarraysize(.aid);
		end;
	}
	else if ( compare( @whispervar0$, "on" ) == 0 ) end;
Onmanually:
	enablenpc "Run Or Die";
	deletearray .aid;
	mapwarp "guild_vs5", "prontera", 142,170;
	killmonsterall "guild_vs5";
	set .stop, 1;
	disablenpc "RFYL Event";
	announce "Run Or Die!!!: Are you ready to join the Run Or Die

Event?", 0;
	sleep 4000;
	announce "Run Or Die: For those who wants to join please

'@warp prontera 142 170' to participate", 0;
	sleep 6000;
	announce "Run Or Die: Registration NPC will disappear after 1

minute", 0;
	sleep 20000;
	announce "Run Or Die: Last 30 second", 0;
	sleep 10000;
	announce "Run Or Die: Make it fast, type in '@warp prontera

142 170' to join", 0;
	sleep 10000;
	announce "Run Or Die: Last 10 seconds to register", 0;
	sleep 5000;
	announce "Run Or Die: 5", 0;
	sleep 1000;
	announce "Run Or Die: 4", 0;
	sleep 1000;
	announce "Run Or Die: 3", 0;
	sleep 1000;
	announce "Run Or Die: 2", 0;
	sleep 1000;
	announce "Run Or Die: 1", 0;
	sleep 1000;
	announce "Run Or Die: Time is up...I will come again 3 hour

later..", 0;
	disablenpc "Run Or Die";
	mapannounce "guild_vs5", "Welcome to Run Or Die event", 0;
	sleep 3000;
	mapannounce "guild_vs5", "This is just an easy event", 0;
	sleep 3000;
	mapannounce "guild_vs5", "Just stay AWAY from the PORING

BOMBS!!", 0;
	sleep 3000;
	mapannounce "guild_vs5", "Stay alive as long as YOU CAN!!!!",

0;
	sleep 3000;
	mapannounce "guild_vs5", "The LAST SURVIVOR will be the

WINNER", 0;
	sleep 3000;
	mapannounce "guild_vs5", "event will start in 3", 0;
	sleep 1000;
	mapannounce "guild_vs5", "2...", 0;
	sleep 1000;
	mapannounce "guild_vs5", "1...", 0;
	sleep 1000;
	mapannounce "guild_vs5", "It's time to run !!", 0;
	donpcevent "runordie::Onstart";
	set .stop, 0;
	while ( .stop == 0 ) {
		set .@extra, .@extra + rand(1,2);
		set .@round, .@round +1;
		monster "guild_vs5", 0,0, "Come On Baby!!!", 1904, 2

+ .@extra, 0;
		monster "guild_vs5", 0,0, "Come On Baby!!!", 1904, 2

+ .@extra, 2;
		monster "guild_vs5", 0,0, "Come On Baby!!!", 1904, 2

+ .@extra, 4;
		sleep 5000;
	}
	end;
Onstart:
	while ( getarraysize(.aid) > 1 ) {
		sleep 500;
		for ( set .@i, 0; .@i < getarraysize(.aid); set .@i,

.@i +1 ) {
			if ( isloggedin(.aid[.@i]) == 0 ) {
				deletearray .aid[.@i], 1;
				set .@i, .@i -1;
			}
			else {
				attachrid .aid[.@i];
				if ( strcharinfo(3) != "guild_vs5" ||

hp == 0 ) {
					deletearray .aid[.@i], 1;
					set .@i, .@i -1;
				}
			}
		}
	}
	detachrid;
	set .stop, 1;
	killmonsterall "guild_vs5";
	if ( getarraysize(.aid) == 1 ) {
		announce "Congratulations!!! The Winner is "+

rid2name(.aid), 0;
		sleep 5000;
		announce rid2name(.aid) +" Win 100 Budots Coin", 0;
		attachrid .aid;
		getitem 9524, 100; // winner prize
		warp "prontera", 156,180;
		deletearray .aid;
	}
	else {
		announce "Nobody WINS, too bad", 0;
	}
	enablenpc "RFYL Event";
	end;
}
guild_vs5	mapflag	nowarp
guild_vs5	mapflag	nowarpto
guild_vs5	mapflag	noteleport
guild_vs5	mapflag	nosave	SavePoint
guild_vs5	mapflag	noskill
guild_vs5	mapflag	nomemo
guild_vs5	mapflag	nopenalty
guild_vs5	mapflag	nocommand