sub Healing() var Exit, LastTimer, Live uo.Print('Vuberi vech kyrsanutuu ') uo.Exec('addobject Curse') while uo.Targeting() wait(100) wend wait(300) uo.DisArm() wait(2000) Exit=0 while Exit <> 1 Live=uo.STR CheckLag() uo.WaitTargetType('0x1008') uo.UseType('0x1F03') wait(500) uo.UseObject('Curse') SpiritSpeak() wait(1500) repeat wait(500) until uo.Life<Live CheckLag() LastTimer=uo.Timer() repeat uo.BandageSelf() wait(4000) until uo.Life==uo.STR or LastTimer+300<uo.Timer() wend end sub
sub SpiritSpeak() uo.usetype('0x097B') uo.UseSkill('Spirit Speak') wait(2500) end sub
sub CheckLag() uo.DeleteJournal() uo.Click('backpack') repeat wait(50) until UO.InJournal('backpack') end sub
Одевает курсу , пишет что есму ненадо хилиться , и не снимает курсу !!!!!!!!!!!!!!!!!!помогите исправить скрипт или дайте новый
sub healing()
var count=0
var Strength=150 < tut ukazy silu 4ara
UO.setarm('curs')
uo.disarm()
wait(500)
repeat
UO.Arm('curs')
checklag()
wait (100)
UO.UseSkill('Spirit')
repeat
wait(200)
if UO.InJournal("netherworld") then
UO.DeleteJournal()
UO.UseSkill('Spirit')
endif
until UO.Life<Strength-2
UO.disarm()
while not UO.InJournal("bloody") and UO.Count('0x0E21')>2
UO.DeleteJournal()
UO.Exec("bandageself")
count=0
repeat
wait(200)
count=count+1
until UO.InJournal("apply") or UO.InJournal("bloody") or count>50
wend
wait(500)
if UO.Count('0x0e20')>0 and UO.Count('0x0e20')<2 then
UO.Waittargettype('0x1008')
UO.Usetype('0x0e20')
wait(500)
endif
until UO.Count('0x0e20')==0 and UO.Count('0x0E21')==0
end sub
sub checklag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub
