viewing paste item to point exchanger | Athena

Posted on the | Last edited on
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
// 1 poring coin = 10 cash point
 
prontera,155,181,5  script  Sample#cashitem 757,{
.@item = 7539;
.@rate = 10;
 
.@countitem = countitem( .@item );
mes "Exchange "+.@countitem+" x "+getitemname( .@item )+" to "+( .@countitem * .@rate )+" Point ?";
 
if( .@countitem )
    if( select( "YES","Cancel" ) == 1 ){
        delitem .@item,.@countitem;
        #CASHPOINTS = #CASHPOINTS + ( .@countitem * .@rate );
        mes "Done";
    }
close;
}
Viewed 1450 times, submitted by Emistry.