viewing paste repair using steel | 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
prontera,155,181,5      script  Repair  811,{
while( .@i < @inventorylist_count ){
        if( @inventorylist_attribute[.@i] )
                set .@broken,.@broken + 1;
        set .@i,.@i + 1;
}
mes "You have "+.@broken+" broken items.";
mes "So you need to have "+.@broken+" "+getitemname( .itemid )+" to repair all.";
if( select( ( countitem( .itemid ) < .@broken )?"":"Repair","Cancel" ) == 1 ){
        repairall;
        mes "Done repaired all items.";
        delitem .itemid,.@broken;
}
 
OnInit:
set .itemid,999;
}
Viewed 444 times, submitted by Emistry.