смысл в апе через минуту? Афигенно опустили?
3 действия в операторах условий в цикл забить - делов то.
Code:
sub Healing1()
var x = uo.GetGraphic(uo.ObjAtLayer('Lhand')) ; не помню щит в левой или правой руке - если что на Rhand исправь
var k
While not UO.Dead()
if uo.warmode() == 1 then
uo.warmode(0)
wait(100)
endif
If UO.Life < uo.str Then
uo.bandageself()
Wait(3000)
Endif
If x <> uo.GetGraphic(uo.ObjAtLayer('Lhand')) Then
uo.Equipt('Lhand',x)
Endif
Wait(100)
Wend
End Sub
sub Healing2() ; более понтовый но дольше настраивать.
var x = uo.GetGraphic(uo.ObjAtLayer('Lhand')) ; не помню щит в левой или правой руке - если что на Rhand исправь
var k
While not UO.Dead()
if uo.warmode() == 1 then
uo.warmode(0)
wait(100)
endif
If UO.Life < uo.str Then
if uo.warmode() == 1 then
uo.warmode(0)
wait(100)
endif
UO.DeleteJournal()
uo.bandageself()
k=0
repeat
Wait(100)
k=k+1
until UO.InJournal('You put|You failed|but they barely') or k>300
Endif
If x <> uo.GetGraphic(uo.ObjAtLayer('Lhand')) Then
uo.Equipt('Lhand',x)
Endif
Wait(100)
Wend
End Sub