Kasandra

вот еще один мой скрипт:

sub Black()
repeat
UO.CancelMenu()
UO.DeleteJournal("You put")
UO.DeleteJournal("fail")
UO.Usetype(0x1BEF)
wait(1000)
UO.LClick(488,454)
repeat
wait(1000)
until UO.InJournal("You put") or UO.InJournal("fail")
until UO.Dead()
end sub

выдает ошибку:
Unhandled exception in parser.
в чем проблема?

вот мой скрипт на мининг(брал с ДРВ и перестраивал под себя):


sub main()
uo.set('finddistance','3')
UO.FindType( -1 , -1 ,'ground')
If UO.FindCount() then
uo.moveitem('finditem')
uo.ignore('finditem')
Wait(5)
Endif
Wait(5)
end sub

sub mineone()
var x,y,z, n
VAR LastTimer
UO.Set('finddistance','2')
n=0
z=UO.GetZ("self")
for x=-2 to 2
for y=-2 to 2
UO.Print(str(x)+" "+str(y))
Repeat
if UO.InJournal('TORMOZ') then
pause()
endif
UO.DeleteJournal()
UO.Warmode("0")
UO.WaitTargetTile("1341",STR(UO.GetX()+x),STR(UO.GetY()+Y),str(z))
UO.UseType('0x0E85')
LastTimer=UO.Timer()
Repeat
wait(500)
Until UO.InJournal("can't see") or UO.InJournal("You stop") or UO.InJournal("location") or UO.InJournal("no ore") or UO.InJournal("but fail") or UO.InJournal("far away") or UO.InJournal("in rock") or UO.InJournal("must wait") or UO.InJournal("nothing") or UO.InJournal("elsewhere") or UO.InJournal("You cannot") or UO.InJournal("where it") OR UO.Timer()>LastTimer+200
if UO.InJournal("You put") then
n=0
else
n=n+1
endif
Until UO.InJournal("nothing") or UO.InJournal("elsewhere") or UO.InJournal("no ore here") or UO.InJournal("location") or UO.InJournal("far away") or UO.InJournal("in rock") or UO.InJournal("where it") or n>=5
next
next
end sub

можете подсказать как сделать так, что бы он оставлял только определенный вид руды в инвентаре, а остальное выкидывал?