который выбирает цель хиллера , который стоит через тайл от куклы , и пытается ее атаковать пока ее бьют , но к сожалению почему то через какое то время кукла начинает бить качающегося чара ...
вот код
Code: Select all
sub WarTraining()
uo.setarm('current armor')
var x = uo.getX()
var y = uo.getY()
var time = uo.timer(), tx, ty
uo.addObject('opponent')
while uo.targeting()
wait(200)
wend
uo.addObject('shield')
while uo.targeting()
wait(200)
wend
uo.addObject('target')
while uo.targeting()
wait(200)
wend
uo.addObject('bandages')
while uo.targeting()
wait(200)
wend
if uo.getX()-uo.getX('opponent') > 1 || uo.getX('opponent')-uo.getX() > 1 || uo.getY()-uo.getY('opponent') > 1 || uo.getY('opponent')-uo.getY() > 1 then
## uo.print('Ia?niia?e aie?iu noiyou ?yaii!')
return
endif
if uo.getX() > uo.getX('opponent') then
tx = x+1
ty = y
else
if uo.getX('opponent') > uo.getX() then
tx = x-1
ty = y
else
if uo.getY() > uo.getY('opponent') then
tx = x
ty = y+1
else
if uo.getY('opponent') > uo.getY() then
tx = x
ty = y-1
else
## uo.print('Au aie?iu auou ia ?annoiyiee!!')
return
endif
endif
endif
endif
uo.useobject('shield')
uo.warmode(true)
uo.attack('target')
repeat
if uo.getHP() < uo.getMaxHP()/2 then
uo.disarm()
Walk(tx,ty)
uo.warmode(false)
uo.attack('target')
while not uo.getHP()==uo.getMaxHP()
uo.deletejournal()
uo.waittargetobject('self')
uo.useobject('bandages')
while not uo.injournal('put') and not uo.injournal('wanna')
wait(100)
wend
wend
uo.arm('current armor')
uo.useobject('shield')
uo.warmode(true)
uo.attack('target')
wait (1000)
uo.useobject('shield')
uo.warmode(true)
uo.attack('target')
Walk(x,y)
endif
until uo.dead()
endsub
sub Walk(x,y)
go:
while not uo.getX() == x || not uo.getY() == y
if not uo.getX() == x then
if uo.getX() > x then
uo.press(36)
else
uo.press(34)
endif
endif
if not uo.getY() == y && uo.getX() == x then
if uo.getY() > y then
uo.press(33)
wait(100)
uo.press(33)
else
uo.press(35)
wait(100)
uo.press(35)
endif
endif
checklag()
wend
checklag()
if not uo.getX() == x || not uo.getY() == y then
goto go
endif
endsub
sub CheckLag()
if uo.Waiting()>0 then
uo.Exec('canceltarget')
end if
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until uo.InJournal('backpack')
while uo.injournal('backpack')
uo.setJournalLine(uo.Injournal('backpack')-1,'is Empty!')
wend
end sub
ппц
