sub kill(enemy)
   if (not uo.GetHP(enemy)) then
      return
   end if
   
   var done = 0
   var enemyX
   var enemyY
   var dx
   var dy
   var delay = 500   
   var time = 0
   
   uo.warmode(1)
   CheckLag()
   uo.attack(enemy)
   CheckLag()

   repeat
      enemyX = uo.GetX(enemy)
      enemyY = uo.GetY(enemy)
      dx = enemyX - uo.GetX()
      dy = enemyY - uo.GetY()
      
      if (uo.GetHP(enemy)) then

         if (abs(dx) > 20 or abs(dy) > 20) then
            uo.print('enemy too far')
            done = 1
         else
            if (abs(dx) > 1 or abs(dy) > 1) then
               uo.print('closed in on the enemy')
               Walker(enemyX + sign(dx), enemyY + sign(dy))
            end if
         end if

      else
         uo.print('enemy dead')
         done = 1 #враг убит
      end if

      if (uo.Life < uo.str * 0.6) then #мало хп, хилимся
         uo.print('low hp. healing')
         uo.bandageself()
         wait(5000)
      end if

      if (uo.Life == 0) then   #нас убили(
         uo.print('I am dead')
         done = 1
      end if
      
      if (time > 5*60*1000) then #убиваем больше 5 минут - возможно глюк
         uo.print('possible hung. terminate')
         done = 1
      end if
      
      wait(delay)
      time = time + delay
   until done
   
   if (uo.Life) then
      uo.warmode(0)
   end if
end sub

sub KillElemental()
VAR x, y, a, b
x = uo.getx()
y = uo.gety()
if val(uo.getglobal('per3')) == 1 then
  x = uo.getx() + 2
  walk(x,y)
endif
if val(uo.getglobal('per3')) == 2 then
  x = uo.getx() - 2
  walk(x,y)
endif
if val(uo.getglobal('per3')) == 3 then
  x = uo.getx() - 2
  walk(x,y)
endif
if val(uo.getglobal('per3')) == 4 then
  x = uo.getx() + 2
  walk(x,y)
endif
uo.usetype('0x0F08') 
step:
if uo.Mana < 50 then
  uo.usetype('0x0F09')
  wait(100)
endif
a = uo.getglobal('per5')
uo.waittargetobject('a')
uo.cast('Energy Vortex')
wait(5000)
checklag()
if uo.injournal('The spell fizzles.') then 
  wait(500)
  uo.deletejournal('The spell fizzles.')
  goto step
endif
while not uo.injournal('Body of')
  while val(uo.getglobal('per4')) == 1 
    wait(50)
  wend
  uo.set('finddistance', '10')
  uo.findtype('0x000D', '-1', '1')
  if uo.findcount() == 0 then
    goto step
  else
    wait(100)
  endif
  if not uo.Hidden() then
    uo.usetype('0x0F08')
    wait(100)
  else
    wait(100)
  endif 
  wait(15000)
wend
step2:
if uo.Mana < 40 then
  uo.usetype('0x0F09')
  wait(100)
endif
uo.cast('Mass Dispel', 'self')
wait(5000)
checklag()
if uo.injournal('The spell fizzles') then
  wait(500)
  uo.deletejournal('The spell fizzles')
  goto step2
endif
if val(uo.getglobal('per3')) == 1 then
  x = uo.getx() - 2
  walk(x,y)
endif
if val(uo.getglobal('per3')) == 2 then
  x = uo.getx() + 2
  walk(x,y)
endif
if val(uo.getglobal('per3')) == 3 then
  x = uo.getx() + 2
  walk(x,y)
endif
if val(uo.getglobal('per3')) == 4 then
  x = uo.getx() - 2
  walk(x,y)
endif
DIM item[2]
item[0] = '0x1BF5' #тип ингов#
item[1] = '0x0EED' #тип золота# 
uo.useobject('lastcorpse')
wait(1000)
checklag()
for b = 0 to 1
  uo.findtype( item[b], '-1', 'lastcorpse')
  while uo.findcount() > 0
    uo.moveitem('finditem')
    wait(1000)
  wend
next
end sub

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) 
else 
uo.press(35) 
endif 
endif 
checklag() 
wend 
checklag() 
if not uo.getX() == x || not uo.getY() == y then 
goto go 
endif 
end sub

sub Sign(n)
   if (n < 0) then
      n = -1
   end if

   if (n > 0) then
      n = 1
   end if

   return n
end sub

Walker(enemyX + sign(dx), enemyY + sign(dy))