Page 1 of 1

Помогите где ошибка ? пишет Unhandled exceptoon in parser

Posted: 2006-02-08 10:36:33
by Mitya
Скрипт предназначен для копания
Ошибка Unhandled exceptoon in parser возникает иногда :( как от неё избавиться ??

Code: Select all

sub mining()

VAR mx
VAR my
Var col
Var col2



na4alo:


mx = UO.GetX()
my = UO.GetY()

wait ( 100 )

#PEREXOD 1-y #
per1:
mx = UO.GetX()
my = UO.GetY()
if my > 1727 and my <= 1735 and mx == 5224 Then
UO.waittargettile( mx, my )
wait ( 500 )
UO.UseType ( '0x0E85' )
wait ( 5000 )
gotoxy( mx, my+1, 0)
wait ( 1000 )
goto per1
endif

wait ( 50 )

#PEREXOD 2-x #
per2:
mx = UO.GetX()
my = UO.GetY()
if mx < 5225 and mx >= 5217 and my == 1736 Then
UO.waittargettile( mx, my )
wait ( 500 )
UO.UseType ( '0x0E85' )
wait ( 5000 )
gotoxy( mx-1,my,0)
wait ( 1000 )
goto per2
endif

wait ( 50 )

ИТД..

Posted: 2006-02-08 13:02:37
by Mitya
Такое ошущение что тут что-то с координатами,
скрипт работает, работает и слетает, потом отойду на клетку он опять работаетъ
что делать ???

Posted: 2006-02-08 13:08:34
by Savage
Странно что вообще работает, неправильно прописан вайттаргеттайл.

Posted: 2006-02-08 13:43:30
by Mitya
Спасибо за помощь.
это мой первый скрипт, учусь :)
Я как правильно написать его, чтобы ловушка прицела была на месте где стоит чар чтобы копать??

универсальный ключ к домофону

Posted: 2006-02-08 13:51:59
by LordTom
наверно, нужно действительно перестать заходить на его страницы, читать, как и чем он живет иначе я никогда не вылезу из этого состояния тем более, судя по всему, даже если первое время о

Posted: 2006-02-08 13:58:11
by Savage
LordTom wrote:
Mitya wrote:Спасибо за помощь.
это мой первый скрипт, учусь :)
Я как правильно написать его, чтобы ловушка прицела была на месте где стоит чар чтобы копать??

Code: Select all

uo.waittargettile('0',STR(uo.getx()),STR(uo.gety()),STR(uo.getz()))

А если надо под собой копать то:

Code: Select all

UO.WaitTargetObject('kirka')
UO.UseObject('kirka')

Кирку добавляешь в объекты инжы или вместо нее сериал прописываешь. Если кирки часто ломаются тогда таргет вешаешь на self - кое где не работает надо проверять, и UO.UseType('Type_of_kirka')

Posted: 2006-02-08 14:10:42
by Mitya
Спасибо!!
написал вот так вот

Code: Select all

VAR TileNum = '1339'
UO.waittargettile( TileNum, mx, my, 0 )

щас тестирую :)

это правильно?

Posted: 2006-02-08 14:17:01
by Savage
Параметры должны быть строчные.

Posted: 2006-02-08 14:41:02
by Mitya
Заменил на

Code: Select all

UO.waittargettile( TileNum, STR(mx), STR(my), 0 )

Posted: 2006-02-08 14:42:05
by Savage
А нолик?

Posted: 2006-02-08 14:56:07
by Mitya
Огромное спасибо за помощь,
теперь вроде не слетает, хотя надо подождать

Code: Select all

UO.waittargettile( TileNum, STR(mx), STR(my), STR(0) )

Posted: 2006-02-10 22:18:51
by Mitya

Code: Select all

mx = UO.GetX()
my = UO.GetY()
 if mx == 5212 and my == 1728 Then

col2 = uo.Count ( '0x1bef', '0x0000' ) ; iron
uo.cancelmenu()
While col2 >= 3
wait ( 1500 )
uo.waittargettype ( '0x1bef', '0x0000' ) ; iron
UO.UseType ( '0x1ebc' ) ;instryment
wait ( 1500 )
uo.automenu('Tinkering','Tools')
wait ( 1500 )
uo.automenu( 'Tools','Mortar and Pestle')
wait ( 3000 )
col2 = uo.Count ( '0x1bef', '0x0000' ) ; iron
Wend

endif


А подскажите тут что не так ?
Это прокачка тинкереда