скрипт сбивается после ворлд сейфа.

Ask for help

Moderators: Murderator+, Murderator

Post Reply
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

скрипт сбивается после ворлд сейфа.

Post by ausLINX »

Вобщем играю я на дрв, решил покачать мининг а за одно и БС. Иногда приходится отойти, а иногда просто пофиг на руду лиш бы мининг качался (т.е. на ночь поставить да и все), но не тут то было... Мешают ворлд сейфы на дрв :(.
Что собственно происходит:
Капаешь капаешь капаешь...
Вдруг выдает: World is saving now... Сейф длиться в среднем от 80 - 100 секунд... за это время выдает раз 7 (UO.Print) "Auto target cancelled"
после того как сейф прошел, скрипт сбивается, т.е. чар не капает, а именно подряд с перерывом в 0.5-1 сек выдаются сообщения: "Where do you want to use the pickaxe?" т.е. типо запрашивает де капать...

Дело наврядли в скрипте, а там хз, версия инжы старенькая, поставил последнюю, все равно так же происходит... Кому не ясна ситуация могу скринов сделать.

Ах да, вот собственно сам скрипт:
sub mining()
var mx, my, mz, i, j
var ismining, ixx, isheavy
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
xx:
UO.DeleteJournal()
for i = mx -4 to mx+4
for j = my -4 to my+4
UO.Print("Now Mining In: "+str(mx-i)+" "+str(my-j))
ismining = 1
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and ismining

UO.DeleteJournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype('0x0e85')

ixx = 0
ismining=1
while not UO.InJournal("You put") 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 ixx <= 100
wait (100)
ixx = ixx + 1
wend

if not ismining then
uo.print("Not mining here")
endif
wend
UO.DeleteJournal()
next
next
goto xx
uo.print("*** Script ended ***")
end sub


Токо не нада кричать что он кривой =) Я его переделал так что бы он тупо стоял на месте и копал вокруг себя до посинения, пока я сам не выключу скрипт =)
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Re: скрипт сбивается после ворлд сейфа.

Post by Kynep »

ausLINX wrote:бла бла бла=)


Поправь у себя в скрипте:

Code: Select all

cheklag()
UO.DeleteJournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype('0x0e85')


А это добавь в самый конец, после своего мининга.

Code: Select all

sub cheklag()
  UO.DeleteJournal()
  UO.Click('backpack')
  repeat
    wait(100)
  until UO.InJournal('backpack')
end sub
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

Re: скрипт сбивается после ворлд сейфа.

Post by ausLINX »

спс, будем пробовать =)

Ммм... а можно узнать хотя бы принцип работы? Когда чар копает постоянно клацает на бакпак и показывает сколько итемов, а как это поможет то? :)?
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

Post by ausLINX »

Вот беда... все отлично работало, только до ворлд сейфа я не дожил, случился какой то дисконект, и после этого при запуске скрипта стало выдавать: "invalid object: backpack" :(
Как теперь с этим бороться? :(?
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

ausLINX wrote:Вот беда... все отлично работало, только до ворлд сейфа я не дожил, случился какой то дисконект, и после этого при запуске скрипта стало выдавать: "invalid object: backpack" :(
Как теперь с этим бороться? :(?


Дабл клик на себя, чтоб открылся папердол с твоим изображением. И сделай логаут, чтоб сохранилось. Потом после того как зайдешь в игру должен остаться открытым папердол. Он не видит бекпак вот и пишет так. Пробуй.
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

Post by ausLINX »

Дабл клик на себя, чтоб открылся папердол с твоим изображением. И сделай логаут, чтоб сохранилось. Потом после того как зайдешь в игру должен остаться открытым папердол. Он не видит бекпак вот и пишет так. Пробуй.[/quote]

Папердол открыт, все равно такая батва... Сделал логаут, захожу, теперь почему то (после дисконекта) у меня УО открывается в окне 1024х768 (разрешение у меня 1280х1024) т.е. открывается как окошко слева вверху... и видно тем временем рабочий стол... Ща буду капаццо, мб удастся исправить.
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

Post by ausLINX »

Нет, не видит он бакпак :(
------------------------------------
мм... вроде начал видеть ток почему выеживался до этого хз
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

ausLINX wrote:Нет, не видит он бакпак :(
------------------------------------
мм... вроде начал видеть ток почему выеживался до этого хз


Переставь клиент или инжект, причем скорее всего второе.
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

Post by ausLINX »

Kynep wrote:
ausLINX wrote:Нет, не видит он бакпак :(
------------------------------------
мм... вроде начал видеть ток почему выеживался до этого хз


Переставь клиент или инжект, причем скорее всего второе.


Я инжект.длл новее поставил =) Теперь ждем ворлд сейва...
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

Post by ausLINX »

Опа, не работает :(
Проходит сейф, и пошел запрос куда копать... Вид такой:
World data saved in 89 seconds.
Where do you want to use the pickaxe?
Where do you want to use the pickaxe?
Where do you want to use the pickaxe?
Where do you want to use the pickaxe?
Where do you want to use the pickaxe?
Where do you want to use the pickaxe?
Where do you want to use the pickaxe?
и т.д...
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

ausLINX wrote:Опа, не работает :(
Проходит сейф, и пошел запрос куда копать... Вид такой:
Where do you want to use the pickaxe?
и т.д...


Перечитай еще раз мой первй пост ВНИМАТЕЛЬНО, и сделай как там написанно, или выложи тот скрипт на которм ты СЕЙЧАС копал.
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

Post by ausLINX »

sub mining()
var mx, my, mz, i, j
var ismining, ixx, isheavy
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
xx:
UO.DeleteJournal()
for i = mx -4 to mx+4
for j = my -4 to my+4
UO.Print("Now Mining In: "+str(mx-i)+" "+str(my-j))
ismining = 1
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and ismining

cheklag()
UO.DeleteJournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype('0x0e85')

ixx = 0
ismining=1
while not UO.InJournal("You put") 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 ixx <= 100
wait (100)
ixx = ixx + 1
wend

if not ismining then
uo.print("Not mining here")
endif
wend
UO.DeleteJournal()
next
next
goto xx
uo.print("*** Script ended ***")
end sub

sub cheklag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(100)
until UO.InJournal('backpack')
end sub

воть

Я конечно чайник, но я читал что есть разница писать sub или Sub... мб в данном случае должно быть Sub cheklag() ?
GAUHAR
Posts: 137
Joined: 2006-11-06 21:45:23

Post by GAUHAR »

Выход по счетчику это конечно хорошо, но если у тебя связь с сервером нормальная и пакеты не пропадают, то я посоветовал бы в твоем скрипте:

Code: Select all

ixx = 0 
ismining=1
while not UO.InJournal("You put") 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 ixx <= 100
wait (100)
ixx = ixx + 1
wend

убрать этот счетчик, т.е. убрать and ixx <= 100, просто у меня скрипт работает без счетчика и никогда еще не сбился.
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

Post by ausLINX »

GAUHAR wrote: т.е. убрать and ixx <= 100, просто у меня скрипт работает без счетчика и никогда еще не сбился.

Сделал как ты сказал... убрал строку and ixx <= 100... ждем ворлд сейва...
ausLINX
Posts: 12
Joined: 2008-06-17 12:54:46

Post by ausLINX »

Спс биг всем... теперь чар капает нормально, скрипт не сбивается!!!
Post Reply