Page 1 of 1

ерор линя 20 фунция нот фаунд

Posted: 2007-07-11 14:13:15
by BulldoZer
Кто поможет? Зделал простой скрипт по учебнику а он неработает(((

Code: Select all

sub Pripivon() 

Var Svord='0x13B9'  ;Тип оружия
Var Sheld='0x1B76'  ;Тип щита
Var str='0x0F0C'    ;Тип бутылки силы
Var scolor='0x0000' ;цвет бут силы
Var dex='0x0F0C'    ;Тип бутылки ловкости
Var dcolor='0x0000' ;цвет бут ловкости

UO.unequip('Rhand')
UO.unequip('Lhand')

UO.FindType(str, scolor, 2)
UO.UseObject('finditem')

UO.FindType(dex, dcolor, 2)
UO.UseObject('finditem')

UO.Equipt('Rhand',Svord)
UO.Equipt('Lhand',Sheld)
Endsub

Re: ерор линя 20 фунция нот фаунд

Posted: 2007-07-11 14:22:21
by Rivory
BulldoZer wrote:

Code: Select all

sub Pripivon() 

Var Svord='0x13B9'  ;Тип оружия
Var Sheld='0x1B76'  ;Тип щита
Var str='0x0F0C'    ;Тип бутылки силы
Var scolor='0x0000' ;цвет бут силы
Var dex='0x0F0C'    ;Тип бутылки ловкости
Var dcolor='0x0000' ;цвет бут ловкости

UO.unarm()

UO.useType(str, scolor, 2) 

UO.useType(dex, dcolor, 2)

uo.usetype(Svord)
UO.usetype(Sheld)
Endsub
И тип тоже одинаковый ? и тип и цвет ? это нереально. А вообще вот этот скрипт должен работать.

Posted: 2007-07-11 14:26:27
by BulldoZer
разве это имеет значение??? счас проверю с 1 бутылкой

Posted: 2007-07-11 14:36:41
by BulldoZer
да цвет у них одинаковый 0x0000

Posted: 2007-07-12 08:20:36
by BulldoZer
Я немного переделал скрипт и ошибки больше нету...

Code: Select all

sub Pripivon() 

Var Svord='0x13B9'  ;Тип оружия
Var Sheld='0x1B76'  ;Тип щита
Var str='0x0F0C'    ;Тип бутылки силы
Var dex='0x0F0C'    ;Тип бутылки ловкости

UO.unarm()

UO.useType(str) 
UO.useType(dex)

uo.usetype(Svord)
UO.usetype(Sheld)
Endsub


Но у меня вторая проблема(((

Когда я запускаю скрипт - чар скидывает оружие и все
Нажимаю еще раз - чар пьет 1 банку
нажимаю еще ра - чар пьет вторую (но не факт, на этом этапе бывает ничего неделает и зависает)
нажимаю 4 раз - чар поднимает оружие (что тоже по настроению)

Кто мне может обьяснить что я зделал нетак?

Posted: 2007-07-12 09:29:27
by Scripts Writer

Code: Select all

wait(time) || until uo.InJournal()

Posted: 2007-07-12 11:57:46
by BulldoZer

Code: Select all

sub Pripivon() 

Var Svord='0x13B9'  ;Тип оружия
Var Sheld='0x1B76'  ;Тип щита
Var str='0x0F0C'    ;Тип бутылки силы
Var dex='0x0F0C'    ;Тип бутылки ловкости

UO.unarm()
 wait(100)
uo.Print ('Снял оружие')
uo.findtype(str)
if uo.FindCount() then
    uo.usetype(str)
    wait(10)
    uo.Print('Выпил силу')
else
    uo.Print('Нифига нелезет в горло')
end if   
uo.findtype(dex)
if uo.FindCount() then
    uo.usetype(dex)
    wait(10)   
    uo.Print('Выпил ловкость')
else
    uo.Print('Думай федя думай!!')
end if
wait (100)

uo.usetype(Svord)
wait(100)
UO.usetype(Sheld)
Endsub


Так поидее?

Posted: 2007-07-12 12:25:25
by Scripts Writer

Code: Select all

wait(10) 
слишком мало. от 100 до 500

Posted: 2007-07-12 14:39:15
by BulldoZer
ХЕЛП МИ Скриптеры!!


Хотел бы узнать, раз для коректной работы требует большего ожидания, а его неугадаеш, возможно впоймать ЛАГ, есть ли другой способ? (альтернатива)

С журналом пользоваться неумею... покажите явный пример по действию плиз... как вариант

Posted: 2007-07-12 17:03:02
by Rivory
BulldoZer wrote:ХЕЛП МИ Скриптеры!!


Хотел бы узнать, раз для коректной работы требует большего ожидания, а его неугадаеш, возможно впоймать ЛАГ, есть ли другой способ? (альтернатива)

С журналом пользоваться неумею... покажите явный пример по действию плиз... как вариант


Самая первая функция тебе в помощь

Posted: 2007-07-12 22:26:27
by Ururu
юзай оружие и ставь после этого фиксированную паузу, потом бери это все в цыкл и ставь проверку по слоям, одето оно или нет

Posted: 2007-07-13 07:52:15
by Scripts Writer
BulldoZer wrote:ХЕЛП МИ Скриптеры!!


Хотел бы узнать, раз для коректной работы требует большего ожидания, а его неугадаеш, возможно впоймать ЛАГ, есть ли другой способ? (альтернатива)

С журналом пользоваться неумею... покажите явный пример по действию плиз... как вариант


Code: Select all

CheckLag()

Posted: 2007-07-13 09:02:40
by Rivory
Scripts Writer wrote:

Code: Select all

CheckLag()
Зачем ты повторяешь ? я же уже это написал !

Posted: 2007-07-13 13:17:44
by BulldoZer
8) сенк

попробую изучить может получиться)))