viewing paste Unknown #49411 | Athena

Posted on the | Last edited on
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
-   script  PrtBuffs    -1,{
 
OnPCStatCalcEvent:
    
.@GID = getcharid(2);
.CasID = getcastledata("prtg_cas01",1);
.@GName$ = getguildname(.CasID);
setarray .PrtMaps$[0],"prontera","prt_fild00","prt_fild01","prt_fild02","prt_fild03","prt_monk","prt_fild04","prt_fild05","prt_fild06","prt_fild07","prt_fild08","prt_fild09","prt_fild10","prt_fild11";
set .@PrtMap$,.PtrMaps$[rand(getarraysize(.PrtMaps$))];
 
 
    if(.@GID == .CasID){    
        if(strcharinfo(3) == .@PrtMap$){
            sc_start SC_SPEEDUP1,180000,50;
            sc_start SC_EXPBOOST,180000,50;
            sc_start SC_ITEMBOOST,180000,100;
            dispbottom "[Server] You are receiving Territory Buffs.";
        } else {
        end;}
    } else {
    end;}
}
Viewed 1299 times, submitted by Pneuma.