viewing paste Unknown #14748 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99
prontera,138,182,5      script  PVP Warper      105,{
        mes "[PvP Warper]";
        if ( agitcheck() || agitcheck2() ) {
                mes "Sorry, PVP Rooms are Locked During WOE.";
                close;
        }
        mes "Which arena do you want to go to?";
        switch ( select (
                "PvP Guild Room 3 [^FF0000" + getmapusers("guild_vs3") + "^000000/100]",
                "PvP Sandwich Room [^FF0000" + getmapusers("pvp_n_1-1") + "^000000/100]",
                "PvP Four Room [^FF0000" + getmapusers("pvp_n_1-3") + "^000000/30]",
                "View PvP Stats Of My Char" ) ) {
        default: // VIEW STATUS
                mes "Your PvP stats are:";
                query_sql "select kills, deaths from `char` where char_id = "+ getcharid(0), .@kills, .@deaths;
                mes "^009500     Kills: " + .@kills;
                mes "^FF0000     Deaths: " + .@deaths;
                close;
 
 
        case 1: // GVG
        if (getmapusers("guild_vs3") > 99) callsub S_full;
                //announce "[ "+strcharinfo(0)+" ] from the Guild [ "+strcharinfo(2)+" ] has entered to the PvP Arena Room",bc_map,0x81DAF5;
                warp "guild_vs3",0,0;
                end;
 
 
        case 2: // GVG
        if (getmapusers("pvp_n_1-1") > 99) callsub S_full;
                //announce "[ "+strcharinfo(0)+" ] from the Guild [ "+strcharinfo(2)+" ] has entered to the PvP Arena Room",bc_map,0x81DAF5;
                warp "pvp_n_1-1",0,0;
                end;
 
        case 3: // GVG
        if (getmapusers("pvp_n_1-3") > 29) callsub S_full;
                //announce "[ "+strcharinfo(0)+" ] from the Guild [ "+strcharinfo(2)+" ] has entered to the PvP Arena Room",bc_map,0x81DAF5;
                warp "pvp_n_1-3",0,0;
                end;
 
        }
 
        close;
 
S_full:
        mes " ";
        mes "I'm sorry, this arena is full. Please try again later...";
        close;
 
 
 
//======================================
//      OnPCKillEvent
//======================================
 
OnPCKillEvent:
        .@map$ = strcharinfo(3);
        .@killer$ = strcharinfo(0);
        .@killed$ = rid2name( killedrid );
//      if ( killedrid == getcharid(3) ) end; // suicide seems to be counted in this script ...
//      if ( getmapflag( .@map$, mf_gvg ) || getmapflag( .@map$, mf_gvg_castle ) || getmapflag( .@map$, mf_pvp ) ) { // on PVP/GVG maps, and during WoE
//      getmapflag( .@map$, mf_battleground ) // <-- left this one out ? XD
                query_sql "update `char` set kills = kills +1 where char_id = "+ getcharid(0);
                query_sql "select kills from `char` where char_id = "+ getcharid(0), .@kills;
                dispbottom "You have killed "+ .@killed$ +". [Total Kills = "+ .@kills +"]";
                attachrid killedrid;
                query_sql "update `char` set deaths = deaths +1 where char_id = "+ getcharid(0);
                query_sql "select deaths from `char` where char_id = "+ getcharid(0), .@deaths;
                dispbottom "You have been killed by "+ .@killer$ +". [Total Deaths = "+ .@deaths +"]";
        }
        end;
}
guild_vs3       mapflag pvp
guild_vs3       mapflag nobranch
guild_vs3       mapflag nomemo
guild_vs3       mapflag noreturn
guild_vs3       mapflag noteleport
guild_vs3       mapflag nowarpto
guild_vs3       mapflag nowarp
guild_vs3       mapflag nosave
guild_vs3       mapflag noexppenalty
guild_vs3       mapflag notrade
guild_vs3       mapflag novending
guild_vs3       mapflag nomobloot
guild_vs3       mapflag nomvploot
guild_vs3       mapflag nodrop
pvp_n_1-1       mapflag pvp
pvp_n_1-1       mapflag nobranch
pvp_n_1-1       mapflag nomemo
pvp_n_1-1       mapflag noreturn
pvp_n_1-1       mapflag noteleport
pvp_n_1-1       mapflag nowarpto
pvp_n_1-1       mapflag nowarp
pvp_n_1-1       mapflag nosave
pvp_n_1-1       mapflag noexppenalty
pvp_n_1-1       mapflag notrade
pvp_n_1-1       mapflag novending
pvp_n_1-1       mapflag nomobloot
pvp_n_1-1       mapflag nomvploot
pvp_n_1-1       mapflag nodrop
Viewed 268 times, submitted by unknown.