Takumirai

I agree why make a fully non bug pre renewal svn. So that we can use it.

Try it
prontera,146,231,5 script Run Or Die 100,{ if (!.start) { mes "Check Schedule NPC, Event is Offline."; close; } if (.start == 2) { mes "Event in Progress.."; close; } if (.register_count >= .register_limit) { mes "this event has reach the maximum player participations"; close; } percentheal 100,100; warp .map$, 104,103; .register_aid[.register_count] = getcharid(3); .register_count++; end;OnCommand:// put all your start timer hereOnClock0500:OnClock1100:OnClock1700:OnClock2300: if (.start) end; announce "Run or Die event registration start", bc_all; .start = 1; for (.@c = 3; .@c > 0; .@c--) { announce "Run or Die event registration is open in "+.@c+" minute", bc_all; sleep 60000; } announce "Run or Die event registration close", bc_all; .start = 2; sleep 3000; mapannounce .map$, "Survive as long as you can !", bc_map; if (.register_count < .register_min) { announce "Not enough participants for Run or Die event", 0; getmapxy .@map$, .@x, .@y, 1; mapwarp .map$, .@map$, .@x, .@y; callsub L_reset; end; } while (.register_count > 1) { monster .map$, 0,0, "Come On Baby!!!", 1904, 5 + rand(5), "", 0; monster .map$, 0,0, "Come On Baby!!!", 1904, 5 + rand(5), "", 1; monster .map$, 0,0, "Come On Baby!!!", 1904, 5 + rand(5), "", 2; sleep 5000; } killmonsterall .map$; announce "Congratulations ~ the winner of Run Or Die event is "+ rid2name( .register_aid ), bc_all; getitem .reward_item_id, .reward_item_amount, .register_aid; // winner prize warpchar "SavePoint", 0,0, getcharid( 0, rid2name( .register_aid ) ); callsub L_reset; end;OnPCDieEvent:OnPCLogoutEvent: if ( !.start || strcharinfo(3) != .map$ ) end; while (.@i < .register_count && .register_aid[.@i] != getcharid(3)) .@i++; if ( .@i == .register_count ) end; deletearray .register_aid[.@i], 1; .register_count--; warp "SavePoint", 0,0; end; L_reset: deletearray .register_aid; .start = .register_count = 0; return;OnInit: waitingroom "Run or Die",0; .map$ = "poring_w01"; .register_min = 2; // minimum amount of players to start this event, or else it auto-abort .register_limit = 100; // maximum amount of players able to participate in this event .reward_item_id = 30802; // reward item id .reward_item_amount = 1; // reward item amount to the sole winner bindatcmd "runordie", strnpcinfo(0)+"::OnCommand", 99,99; end;}poring_w01 mapflag nosave SavePointporing_w01 mapflag nowarpporing_w01 mapflag nowarptoporing_w01 mapflag noteleportporing_w01 mapflag nomemoporing_w01 mapflag nopenaltyporing_w01 mapflag noicewallporing_w01 mapflag nobranchporing_w01 mapflag noskill

So, based on what you posted it should look like this:
OnClock2100:OnClock2200:OnClock2300:OnClock0000:OnClock0100:OnClock0200:OnClock0300:OnClock0400:OnClock0500:OnClock0600:OnClock0700:.Rounds = 5;callsub iRound5;end;OnClock0800:OnClock1000:OnClock1200:OnClock1400:OnClock1600:OnClock1800:OnClock2000: set .Rounds,10;iRound5: set .ResetCounter,.ResetCounter+1; set .EventON,1; set .Timer,1; set .Wait,1; announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue; announce "The Event is being held in Prontera.",bc_all | bc_blue; setnpctimer 0; initnpctimer; end;

my 1st impression is that ... why not just use my setbgid ?
just setbgid the whole party into battleground team without having to use waitingroom
.
.
.
try thishttp://upaste.me/309471
 
though, not only this script uses older techniques, those custom stuffs are too unoptimized
that will be a lot of time needed if I want to rewrite everything from scratch
so ... just stick with it