//===== eAthena Script =====================================
//= Run or Die ( aka. Poring Bomb Event )
//===== By: ================================================
//= AnnieRuru
//===== Current Version: ===================================
//= 2.0
//===== Compatible With: ===================================
//= Hercules 2015-10-29
//===== Description: =======================================
//= Avoid the poring bomb at all cost !
//===== Topic ==============================================
//= http://herc.ws/board/topic/11010-
//===== Additional Comments: ===============================
//= another script that finally has a release topic for it
//==========================================================
 
prontera,148,172,5  script  Run Or Die  1_F_MARIA,{
    if ( ( .@size = getvariableofnpc( .aidtotal, "runordie" ) ) >= 100 ) { // 100 participant max
        mes "Run Or Die";
        mes "I'm sorry, the room is full";
        close;
    }
    percentheal 100, 100;
    warp "guild_vs5", 0,0;
    set getvariableofnpc( .aid[ .@size ], "runordie" ), getcharid(3);
    set getvariableofnpc( .aidtotal, "runordie" ), getvariableofnpc( .aidtotal, "runordie" ) +1;
    end;
}
 
-   script  runordie    FAKE_NPC,{
OnInit:
    disablenpc "Run Or Die";
    bindatcmd "runordie", strnpcinfo(0)+"::OnStart", 99,100;
    .onesec = 1000; // use for script debugging... set to 100 to make the announcement run faster
    end;
OnStart:
OnClock0145: // set your time here
OnClock0445:
OnClock0745:
OnClock1045:
OnClock1345:
OnClock1645:
OnClock1945:
OnClock2245:
    enablenpc "Run Or Die";
    deletearray .aid;
    .aidtotal = 0;
    mapwarp "guild_vs5", "prontera", 148,172;
    killmonsterall "guild_vs5";
    .start = 1;
    announce "Run Or Die!!!: Are you ready to join Run Or Die event???", bc_all;
    sleep 4 * .onesec;
    announce "Run Or Die: For Those who dare to join please '@warp prontera 148 172' to participate", bc_all;
    sleep 6 * .onesec;
    announce "Run Or Die: Register time will be closing after 1 minute", bc_all;
    sleep 20 * .onesec;
    announce "Run Or Die: Last 30 second", bc_all;
    sleep 10 * .onesec;
    announce "Run Or Die: Rush type in '@warp prontera 148 172' to join", bc_all;
    sleep 10 * .onesec;
    announce "Run Or Die: Last 10 second to register", bc_all;
    sleep 5 * .onesec;
    announce "Run Or Die: 5", bc_all;
    sleep 1000;
    announce "Run Or Die: 4", bc_all;
    sleep 1000;
    announce "Run Or Die: 3", bc_all;
    sleep 1000;
    announce "Run Or Die: 2", bc_all;
    sleep 1000;
    announce "Run Or Die: 1", bc_all;
    sleep 1000;
    announce "Run Or Die: Time is up...I will come again 3 hour later..", bc_all;
    disablenpc "Run Or Die";
    if ( .aidtotal < 2 ) { // cannot start event if nobody joins(0) or just having (1) player
        announce "Run Or Die: Not enough players to start the event...", bc_all;
        mapwarp "guild_vs5", "prontera", 148,172;
        deletearray .aid;
        .aidtotal = 0;
        .start = 0;
        end;
    }
    mapannounce "guild_vs5", "Welcome to Run Or Die event", bc_map;
    sleep 3 * .onesec;
    mapannounce "guild_vs5", "This is an easy event", bc_map;
    sleep 3 * .onesec;
    mapannounce "guild_vs5", "Just stay AWAY from anything that you think its DANGEROUS!!", bc_map;
    sleep 3 * .onesec;
    mapannounce "guild_vs5", "Stay alive as long as YOU CAN!!!!", bc_map;
    sleep 3 * .onesec;
    mapannounce "guild_vs5", "The LAST SURVIVOR will be the WINNER", bc_map;
    sleep 3 * .onesec;
    mapannounce "guild_vs5", "event will start in 3", bc_map;
    sleep 1 * .onesec;
    mapannounce "guild_vs5", "2...", bc_map;
    sleep 1 * .onesec;
    mapannounce "guild_vs5", "1...", bc_map;
    sleep 1 * .onesec;
    mapannounce "guild_vs5", "Its time to run !!", bc_map;
    while ( .start ) {
        .@more += rand(1,2);
        monster "guild_vs5", 0,0, "Come On Baby!!!", 1904, 2 + .@more, "", 0;
        monster "guild_vs5", 0,0, "Come On Baby!!!", 1904, 2 + .@more, "", 1;
        monster "guild_vs5", 0,0, "Come On Baby!!!", 1904, 2 + .@more, "", 2;
        sleep 5000;
    }
    end;
OnPCDieEvent:
OnPCLogoutEvent:
    if ( strcharinfo(3) == "guild_vs5" && .start ) {
        if ( .aidtotal > 1 ) {
            for ( .@i = 0; .@i < .aidtotal; .@i++ ) {
                if ( getcharid(3) == .aid[.@i] ) {
                    deletearray .aid[.@i], 1;
                    .aidtotal--;
                }
            }
        }
        if ( .aidtotal == 1 ) {
            .start = 0;
            killmonsterall "guild_vs5";
            announce "Run Or Die: Congratulations ~ the winner is "+ rid2name(.aid), bc_all;
            getitem Poring_Coin, 5; // winner prize
            sleep 5000;
            attachrid .aid;
            warp "prontera", 148,172;
            deletearray .aid;
            .aidtotal = 0;
        }
    }
    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 noicewall