Yoko

помогите найти ошибку

sub mining()
var mx, my, mz, i, j

na4alo:
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")

UO.DeleteJournal()

for i = mx-2 to mx+2
for j = my -2 to my+2

UO.Print("Копаем в координатах: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("0xAD00") and not UO.InJournal("0xA866") and not UO.InJournal("0xA20D")
UO.DeleteJournal()

if uo.waiting() then
uo.canceltarget()
endif

UO.Waittargettile("0", str(i), str(j), str(mz))
UO.Usetype("Pickaxe")
while not UO.InJournal("0xACF9") and not UO.InJournal("0xAD03")
wait (500)

wend
wend

UO.DeleteJournal()
goto na4alo
end sub

sub mining() 
  var mx, my, mz, i, j 

  mx = UO.GetX("self")  
  my = UO.GetY("self") 
  mz = UO.GetZ("self") 

  UO.DeleteJournal() 

  for i = mx-2 to mx+2 
    for j = my -2 to my+2 

    UO.Print("Копаем в координатах: "+str(mx-i)+" "+str(my-j)) 
      while not UO.InJournal("0xAD00") and not UO.InJournal("0xA866") and not UO.InJournal("0xA20D") 
        UO.DeleteJournal() 
        if uo.waiting() then 
          uo.canceltarget() 
        endif 
        UO.Waittargettile("0", str(i), str(j), str(mz)) 
        UO.Usetype("Pickaxe") 
        while not UO.InJournal("0xACF9") and not UO.InJournal("0xAD03") 
          wait (500) 
        wend 
      wend 
      UO.DeleteJournal() 
    next
  next
end sub

Спасибо работает.