Page 1 of 1

Помогите со скриптом.

Posted: 2004-09-14 21:39:48
by gmur
Вот есть скрипт на мининг :
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

while not UO.Hidden()
UO.Warmode("0")
UO.UseSkill("Hiding")
wait(4000)
wend
UO.Print("Now Mining In: "+str(mx-i)+" "+str(my-j))

mark:
UO.DeleteJournal()
if uo.waiting() then
uo.canceltarget()
endif
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Useobject(0x40F81F9A)
wait(600)
if not UO.InJournal("nothing")and not UO.InJournal("elsewhere")and not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock")and not UO.InJournal("where it")then
while not UO.InJournal("You put") and not UO.InJournal("heavy") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("must wait")and not UO.InJournal("nothing") and not UO.InJournal("elsewhere")and not UO.InJournal("where it")
wait(500)
wend
goto mark
endif

next
next

end sub
Подскажите что надо изменить что бы чар при копание натыкаясь на айрон переходил к другому тайлу..

Posted: 2004-09-15 08:12:31
by gmur
Что всем жалко помочь начинающему ?

Posted: 2004-09-15 12:15:01
by Yoko
добавь ещё одно условие к своему мегасписку условий...

Posted: 2004-09-17 00:03:59
by Niwo
список полюбе решает.... :D не мешало бы чаще пробели ставить