vasa2008

помогите плиз вставить в этот скрипт еще сброс руды нишки до голды


sub main()
var i
uo.print("Poneslas`!!!")
While UO.Life>0
for i=1 to 12
kopat()
uo.press(34)
wait(500)
uo.press(34)
next
uo.press(34)
wait(500)
uo.press(34)
wait(500)
uo.press(34)
uo.print("Idem nazad!!!")
kopat()
for i=1 to 11
uo.press(36)
wait(500)
uo.press(36)
next
uo.press(36)
wait(500)
uo.press(36)

wend
end sub
sub kopat()
var where_x,where_y,coords,i
UO.DeleteJournal()
where_x=uo.getx()
where_y=uo.gety()
for i=-2 to 2
uo.print("Kopaem "+str(i+3)+"/5")
coords="waittargettile "+" 1339 "+str(where_x)+" "+str(where_y+i)+" 0"
uo.exec(coords)
uo.exec("usetype '0x0E86'")
UO.DeleteJournal()
repeat
wait(1000)
until (uo.inJournal("You stop mining") or uo.inJournal("far") or uo.inJournal("You can't mine or dig anything there.") or uo.inJournal("cannot mine") or uo.inJournal("dig") or uo.inJournal("stop") or uo.inJournal("mining elsewhere") or uo.inJournal("no line") or uo.inJournal("nothing"))

next
end sub