Code:
DIM Layers[8]
Layers[0]='Hat'
Layers[1]='Neck'
Layers[2]='Gloves'
Layers[3]='Arms'
Layers[4]='Torso'
Layers[5]='Legs'
Layers[6]='Lhand'
Хотя тут немного некоректно написанно, массив обозначе как на 8 частей, а используются 7. Хотя все работате

Ну я тут немного поудалял, чтобы сразу ченил, а не тестил армор, так быстрее получается

Code:
sub Repair()
VAR i,Exit,Part
VAR Molotok='0x13E4'
DIM Layers[8]
Layers[0]='Hat'
Layers[1]='Neck'
Layers[2]='Gloves'
Layers[3]='Arms'
Layers[4]='Torso'
Layers[5]='Legs'
Layers[6]='Lhand'
For i=0 to 6
Part=UO.ObjAtLayer(Layers[i])
If Part<>"" Then
UO.UnEquip(Layers[i])
wait(1000)
UO.WaitTargetObject(Part)
UO.UseType(Molotok)
wait(1500)
UO.Equip(Layers[i],Part)
Endif
Next
UO.Print("!!Vse po4ineno!!")
end sub
[/code]