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

Ask for help

Moderators: Murderator+, Murderator

Post Reply
gmur
Posts: 141
Joined: 2004-07-18 13:01:15
Contact:

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

Post 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
Подскажите что надо изменить что бы чар при копание натыкаясь на айрон переходил к другому тайлу..
gmur
Posts: 141
Joined: 2004-07-18 13:01:15
Contact:

Post by gmur »

Что всем жалко помочь начинающему ?
Yoko
Site Admin
Posts: 1964
Joined: 2004-04-03 16:49:38
Contact:

Post by Yoko »

добавь ещё одно условие к своему мегасписку условий...
Niwo
Posts: 10
Joined: 2004-07-22 11:32:06

Post by Niwo »

список полюбе решает.... :D не мешало бы чаще пробели ставить
Post Reply