Yoko
http://forum.yoko.com.ua/

скрипт сбивается после ворлд сейфа.
http://forum.yoko.com.ua/viewtopic.php?f=3&t=13697		 Page 1 of 1
Author:  ausLINX [ 2008-06-17 13:04:28 ]
Post subject:  скрипт сбивается после ворлд сейфа.
Вобщем играю я на дрв, решил покачать мининг а за одно и БС. Иногда приходится отойти, а иногда просто пофиг на руду лиш бы мининг качался (т.е. на ночь поставить да и все), но не тут то было... Мешают ворлд сейфы на дрв :(.
Что собственно происходит:
Капаешь капаешь капаешь...
Вдруг выдает: World is saving now... Сейф длиться в среднем от 80 - 100 секунд... за это время выдает раз 7 (UO.Print) "Auto target cancelled"
после того как сейф прошел, скрипт сбивается, т.е. чар не капает, а именно подряд с перерывом в 0.5-1 сек выдаются сообщения: "Where do you want to use the pickaxe?" т.е. типо запрашивает де капать...

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

Ах да, вот собственно сам скрипт:
Quote:
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


Токо не нада кричать что он кривой =) Я его переделал так что бы он тупо стоял на месте и копал вокруг себя до посинения, пока я сам не выключу скрипт =)
Author:  Kynep [ 2008-06-17 14:53:14 ]
Post subject:  Re: скрипт сбивается после ворлд сейфа.
ausLINX wrote:
бла бла бла=)


Поправь у себя в скрипте:
Code:
cheklag()
UO.DeleteJournal() 
UO.Waittargettile("1341", str(i), str(j), str(mz)) 
UO.Usetype('0x0e85')


А это добавь в самый конец, после своего мининга.
Code:
sub cheklag()
  UO.DeleteJournal()
  UO.Click('backpack')
  repeat
    wait(100)
  until UO.InJournal('backpack')
end sub
Author:  ausLINX [ 2008-06-17 15:03:52 ]
Post subject:  Re: скрипт сбивается после ворлд сейфа.
спс, будем пробовать =)

Ммм... а можно узнать хотя бы принцип работы? Когда чар копает постоянно клацает на бакпак и показывает сколько итемов, а как это поможет то? :)?
Author:  ausLINX [ 2008-06-17 15:24:14 ]
Post subject: 
Вот беда... все отлично работало, только до ворлд сейфа я не дожил, случился какой то дисконект, и после этого при запуске скрипта стало выдавать: "invalid object: backpack" :(
Как теперь с этим бороться? :(?
Author:  Kynep [ 2008-06-17 15:30:16 ]
Post subject: 
ausLINX wrote:
Вот беда... все отлично работало, только до ворлд сейфа я не дожил, случился какой то дисконект, и после этого при запуске скрипта стало выдавать: "invalid object: backpack" :(
Как теперь с этим бороться? :(?


Дабл клик на себя, чтоб открылся папердол с твоим изображением. И сделай логаут, чтоб сохранилось. Потом после того как зайдешь в игру должен остаться открытым папердол. Он не видит бекпак вот и пишет так. Пробуй.
Author:  ausLINX [ 2008-06-17 15:35:49 ]
Post subject: 
Дабл клик на себя, чтоб открылся папердол с твоим изображением. И сделай логаут, чтоб сохранилось. Потом после того как зайдешь в игру должен остаться открытым папердол. Он не видит бекпак вот и пишет так. Пробуй.[/quote]

Папердол открыт, все равно такая батва... Сделал логаут, захожу, теперь почему то (после дисконекта) у меня УО открывается в окне 1024х768 (разрешение у меня 1280х1024) т.е. открывается как окошко слева вверху... и видно тем временем рабочий стол... Ща буду капаццо, мб удастся исправить.
Author:  ausLINX [ 2008-06-17 15:42:11 ]
Post subject: 
Нет, не видит он бакпак :(
------------------------------------
мм... вроде начал видеть ток почему выеживался до этого хз
Author:  Kynep [ 2008-06-17 15:50:10 ]
Post subject: 
ausLINX wrote:
Нет, не видит он бакпак :(
------------------------------------
мм... вроде начал видеть ток почему выеживался до этого хз


Переставь клиент или инжект, причем скорее всего второе.
Author:  ausLINX [ 2008-06-17 15:53:10 ]
Post subject: 
Kynep wrote:
ausLINX wrote:
Нет, не видит он бакпак :(
------------------------------------
мм... вроде начал видеть ток почему выеживался до этого хз


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


Я инжект.длл новее поставил =) Теперь ждем ворлд сейва...
Author:  ausLINX [ 2008-06-17 16:46:49 ]
Post subject: 
Опа, не работает :(
Проходит сейф, и пошел запрос куда копать... Вид такой:
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?
и т.д...
Author:  Kynep [ 2008-06-17 16:52:43 ]
Post subject: 
ausLINX wrote:
Опа, не работает :(
Проходит сейф, и пошел запрос куда копать... Вид такой:
Where do you want to use the pickaxe?
и т.д...


Перечитай еще раз мой первй пост ВНИМАТЕЛЬНО, и сделай как там написанно, или выложи тот скрипт на которм ты СЕЙЧАС копал.
Author:  ausLINX [ 2008-06-17 16:56:54 ]
Post subject: 
Quote:
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() ?
Author:  GAUHAR [ 2008-06-17 18:47:51 ]
Post subject: 
Выход по счетчику это конечно хорошо, но если у тебя связь с сервером нормальная и пакеты не пропадают, то я посоветовал бы в твоем скрипте:
Code:
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, просто у меня скрипт работает без счетчика и никогда еще не сбился.
Author:  ausLINX [ 2008-06-17 19:16:13 ]
Post subject: 
GAUHAR wrote:
т.е. убрать and ixx <= 100, просто у меня скрипт работает без счетчика и никогда еще не сбился.

Сделал как ты сказал... убрал строку and ixx <= 100... ждем ворлд сейва...
Author:  ausLINX [ 2008-06-18 20:41:23 ]
Post subject: 
Спс биг всем... теперь чар капает нормально, скрипт не сбивается!!!
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/