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;
}