Yoko

Posted: **2009-01-10 14:49:41**

http://www.zuluhotel.net


sub main()
var i
uo.print("Poneslas`!!!")
While UO.Life>0
for i=1 to 15
kopat()
uo.press(116)
wait(1000)
uo.press(116)
next
uo.press(116)
wait(1000)
uo.press(116)
uo.print("Idem nazad!!!")
kopat()
for i=1 to 15
uo.press(117)
wait(1000)
uo.press(117)
next
uo.press(117)
wait(1000)
uo.press(117)

wend
end sub

sub kopat()
var where_x,where_y,where_z,coords,i
UO.DeleteJournal()
where_x=uo.getx()
where_y=uo.gety()
where_z=uo.getz()
for i=-2 to 2
uo.print("Kopaem "+str(i+3)+"/5")
coords="waittargettile 1343 "+str(where_x)+" "+str(where_y+i)+" 0"
uo.exec(coords)
uo.exec("usetype '0x0E85'")
UO.DeleteJournal()
while (not (UO.InJournal("stop mining") or UO.InJournal("left there") or UO.InJournal("far away")))
wait(1000)
wend
next
end sub

Выскакивает ошибка Unhandled exception in parser.

Прошу проверить и найти ошибку. Ходит копает иногда даже возращаеться!

Posted: **2009-01-10 14:52:17**

останавливаеться постоянно на одном и том же месте.

Code: Select all

for i=-2 to 2
uo.print("Kopaem "+str(i+3)+"/5")

Posted: **2009-01-10 16:04:47**

Code: Select all

coords="waittargettile 1343 "+str(where_x)+" "+str(where_y+i)+" 0"

Тайл обязательно 1343 или без разницы? Если любой - замени 1343 на -1. Проверь все тайлы которые копаешь, вдруг какой-нибудь отличается.

Code: Select all

while (not (UO.InJournal("stop mining") or UO.InJournal("left there") or UO.InJournal("far away")))
wait(1000)
wend

wait можно и поменьше например 200.

Posted: **2009-01-11 09:22:33**

Code: Select all

for i=-2 to +2

Posted: **2009-01-13 09:39:49**

А зачем тебе переменная "where_z", если ты её не используешь? И неужели есть только 3 варианта ответа на твои действия?

Code: Select all

while (not (UO.InJournal("stop mining") or UO.InJournal("left there") or UO.InJournal("far away")))

С другой стороны ходит - копает... Хмм... Странно.
Попробуй так:

Code: Select all

sub main()
var i
uo.print("Poneslas`!!!")
While not uo.dead()
for i=1 to 15
kopat()
wait(1000)
uo.press(116)
wait(1000)
uo.press(116)
next
uo.print("Idem nazad!!!")
wait(1000)
for i=1 to 15
uo.press(117)
wait(1000)
uo.press(117)
wait(1000)
kopat()
next
uo.press(117)
wait(1000)
uo.press(117)
wend
end sub 

sub kopat()
var where_x, where_y, i
UO.DeleteJournal()
where_x=uo.getx()
where_y=uo.gety()
for i=-2 to 2
uo.print("Kopaem "+str(i+3)+"/5")
uo.waittargettile(-1,str(where_x+i),str(where_y+i),0)
uo.usetype('0x0E85')
UO.DeleteJournal()
while not UO.InJournal("stop mining|left there|far away")
wait(200)
wend
next
end sub

И ещё вопрос: что за клавиши 116 и 117?

Yoko

Скрипт на мининг ZuluHotel.(проверьте.)

Скрипт на мининг ZuluHotel.(проверьте.)