Вот что у мя получилось .моя задача чтобы бил с кулака (я вырезал вроде все не нужное ) и лутал тока нужные мне веши вместо лута всего просто поставил свой loot(), хотелось бы еше добавить Автохел (моно его добавить просто запустив другой скрипт ) , но я хотел все же чтобы он был прям в этом...За ранее блогодарен
Code:
sub Bird2()
VAR i,dist, Exit, GrowType
UO.Print('Kogo budem bit`?')
UO.AddObject('Grow')
While UO.Targeting()
wait(500)
Wend
GrowType=UO.GetGraphic('Grow')
dist=0
UO.Set('finddistance',dist)
While not uo.Dead()
UO.Findtype(GrowType,-1,'ground')
If UO.FindCount() Then
UO.Exec('warmode 1')
wait(500)
; UO.Attack('finditem')
CheckLag()
Repeat
If uo.life<UO.STR/3 then
healing()
endif
If UO.GetDistance('finditem')>1 Then
SuperWalk(0,0,'finditem')
UO.Attack('finditem')
wait(1000)
Endif
Until UO.InJournal("Body")
UO.WaitTargetObject('lastcorpse')
wait(500)
loot()
Else
dist=dist+1
if dist>50 then
dist=0
end if
UO.Set('finddistance',dist)
Endif
Wend
end sub