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 508 times, submitted by Pneuma.