viewing paste Unknown #21943 | Text

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 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151
/**
 * Pawnage Ragnarok Online
 * Author: Poison
 *  v1.0 = Initial Creation [01.13.2015]
 * Lethalia Gaming © 2013 
 **/
 
izlude,128,119,3    script  BATTLEGROUNDS   4_M_BLACKMAN,{
    
    if (BaseLevel == 1)
        end;
    
    callsub L_Show_Rank;
    
    if (!RWC) {
        
        // PvP Map
        .@pvp_map$ = "pvp_x_1-1";
        .@pvp_map_name$ = "Free For All";
        
        // CvC Map
        .@cvc_map$ = "pvp_n_1-3";
        .@cvc_map_name$ = "Champion vs Champion";
        
        // GvG Maps
        .@gvg_map$ = "prt_gld";
        .@gvg_map_name$ = "W O E";
        .@gvg_map_x = 153;
        .@gvg_map_y = 135;
        
        // Boss Maps
        .@boss_map$ = "1@rev";
        .@boss_name$ = "Boss Challenge (IFRIT)";
        .@boss_map_x = 111;
        .@boss_map_y = 108;
        
        setarray .@PvP_Menu$[0], "["+getmapusers(.@pvp_map$)+"/0] ^666666"+.@pvp_map_name$+"^000000",
                                "["+getmapusers(.@cvc_map$)+"/0] ^666666"+.@cvc_map_name$+"^000000",
                                "["+getmapusers(.@gvg_map$)+"/0] ^666666"+.@gvg_map_name$+"^000000",
                                "["+getmapusers(.@boss_map$)+"/0] ^666666"+.@boss_name$+"^000000";
        
    }
    
    for (.@i = 0; .@i < getarraysize(.@PvP_Menu$); .@i++)
        .@menu$ = .@menu$ + .@PvP_Menu$[.@i] +":";
    
    .@option = select(.@menu$) - 1;
    
    // PvP
    if (.@option == 0) {
 
        if (RWC) {
            callsub OnCheckBlock, 1;
            warp .@pvp_map$, 0, 0;
        }
        
        warp .@pvp_map$, 0, 0;
        end;
        
    }
    
    // CvC
    if (.@option == 1) {
    
        if (Class != Job_Champion) {
            dispbottom "[BATTLEGROUND] You cannot enter due to job restriction.";
            close;
        }
        
        if (readparam(bAgi) > 1) {
            dispbottom "[BATTLEGROUND] Please set your AGI to 1.";
            close;
        }
        
        if (StatusPoint > 1) {
            dispbottom "[BATTLEGROUND] Please use all your status points.";
            close;
        }
        
        warp .@cvc_map$, 0, 0;
        end;
        
    }
    
    // GvG
    if (.@option == 2) {
        
        // WOE is disabled for RWC characters
        if (RWC)
            end;
        
        warp .@gvg_map$, .@gvg_map_x, .@gvg_map_y;
        end;
    
    }
    
    // Boss
    if (.@option == 3) {
    
        if (RWC)
            end;
            
        warp .@boss_map$, .@boss_map_x, .@boss_map_y;
        end;
        
    }
    
    close;
    
    L_Show_Rank:
    
        query_sql "SELECT `char`, `kill`, `death`, `kdr` FROM `pvp_rank` WHERE `char_mode` = 0 ORDER BY `kill` DESC LIMIT 10", .@char$, .@kill, .@death, .@kdr$;
        
        mes "[^0000FFTop 10 PvP of "+callfunc("F_Time_Month")+"^000000 ]";
        mes "#. Name Kill Death KDR";
        
        for (.@i = 0; .@i < getarraysize(.@char$); .@i++)
            mes ""+(.@i + 1)+". "+.@char$[.@i]+" "+.@kill[.@i]+" "+.@death[.@i]+" "+.@kdr$[.@i]+"";
        
        return;
    
    OnCheckBlock:
        
        .@rwc = getarg(0);
        
        if (.@rwc != RWC) {
            emotion e_mail, 1;
            dispbottom "[BATTLEGROUND] You cannot enter due to Character Mode restriction.";
            close;
        }
        
        if (callfunc("F_RWC_Check_Registered", getcharid(2)) == 1) {
            emotion e_mail, 1;
            dispbottom "[BATTLEGROUND] You cannot enter because your team is registered.";
            close;
        }
        
        return;
    
}
1@rev   mapflag nobranch
1@rev   mapflag noteleport
1@rev   mapflag monster_noteleport
1@rev   mapflag noreturn
1@rev   mapflag novending
 
1@rev, 112,117,0,0  monster Ifrit   1832,1,300000,0,0
 
 
pvp_x_1-1   mapflag pvp_noguild
pvp_x_1-1   mapflag pvp_noparty
Viewed 986 times, submitted by Guest.