prontera,155,181,5  script  Repair  811,{
getinventorylist;
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;
}
close;
 
OnInit:
set .itemid,999;
end;
}