viewing paste Unknown #13791 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
OnNPCKillEvent:
    setarray .exp[0],1,2,3,4,5,6,7,8,9,10; //Experience per kill
    setarray .weapons[0],1201,1101;
    set .XPperKill,.exp[rand(getarraysize(.exp))];
    set $@Weapon$, getequipname(EQI_HAND_R);
    if(getequipid(EQI_HAND_R) == .weapons[0]){
        if(WeaponLv == .MaxWLV){
        end;} else{
            dispbottom "["+$@Weapon$+"] +"+.XPperKill+" Experience";
        set WeaponExp, WeaponExp+.XPperKill;}
        if(.WepXP[WeaponLv] <= WeaponExp && WeaponLv < .MaxWLV){
        set WeaponLv, WeaponLv+1;
        set StatusPoint, StatusPoint+1*WeaponLv;
        dispbottom "["+$@Weapon$+"] Weapon Level: "+WeaponLv+"!";
        dispbottom "["+$@Weapon$+"] Stats: "+1*WeaponLv+"!";
        }
    }else{
    end;}
Viewed 1001 times, submitted by Pneuma.