viewing paste Identifier | Plain 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
casp_in01,171,268,6     script  Identifier      100,{
        getinventorylist;
        for( set .@i,0; .@i < @inventorylist_count; set .@i, .@i + 1 ) {
        if ( @inventorylist_identify[.@i] == 1 ) continue;
 
        // Merchant's Identify skill
        if ( getskilllv(40) == 1 && sp >= 10 ) heal 0,-10;
 
        // check if there is any Magnifier
        else if ( countitem(611) ) delitem 611,1;
 
        // base on Magnifier price, Rogue's Compulsion Discount skill
        else if ( getskilllv(224) && zeny >= ( 100 - ( 5 + 4 * getskilllv(224) ) )* 2/5 )
        set zeny, zeny - ( 100 - ( 5 + 4 * getskilllv(224) ) )* 2/5;
 
        // base on Magnifier price, Merchants that not enough sp and learned Discount skill
        else if ( getskilllv(37) && zeny >= ( 100 - ( 5 + 2 * getskilllv(37) ) )* 2/5 )
        set zeny, zeny - ( 100 - ( 5 + 2 * getskilllv(37) ) )* 2/5;
 
        // if none of the above, deduct the zeny
        else if ( zeny >= 40 )  set zeny, zeny - 40;
 
        // or stop the script if there the person not enough money
        else break;
        delitem2 @inventorylist_id[.@i],1,0,0,0,0,0,0,0;
        getitem @inventorylist_id[.@i],1;
        }
}
Viewed 329 times, submitted by unknown.