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