Page 1 of 1

Alchemy

Posted: 2004-12-28 03:10:08
by PARASITE
Вместо того чтобы делать поизоны, он делает лезер поизон, если кто знает в чём проблема помогите плиз

Code: Select all

sub alchemy() 
# BETEP™ #
VAR Exit=0, LastTimer
uo.print('Сундук с регами и бутылками')
uo.exec('addobject Bag')
while uo.targeting()
wait(100)
wend
uo.print('Сундук куда бутылки бросать')
uo.exec('addobject Bag2')
while uo.targeting()
wait(100)
wend
while Exit<>1
UO.DeleteJournal()

UO.FindType('0x0F0E','0x0998','backpack')
If UO.GetQuantity('finditem')>0 Then
UO.SetReceivingContainer('Bag2')
wait(1000)
UO.Grab('all','finditem')
wait(1000)
UO.UnSetReceivingContainer()
Endif

UO.FindType('0x0F0E',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x0F0E','0x0000','Bag')
wait(1000)
UO.Grab('500','finditem')
wait(1000)
Endif

UO.FindType('0x0F88','0x0000','backpack')
If UO.GetQuantity('finditem')<20 then
UO.FindType('0x0F88','0x0000','Bag')
wait(1000)
UO.Grab('400','finditem')
wait(1000)
Endif

LastTimer=UO.Timer()
UO.DeleteJournal()

UO.UseType('0x0F88')
uo.WaitMenu('What','Poison')     
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You toss the failed")
wait(500)
wend
If UO.InJournal("You toss the failed") then
repeat
wait(100)
until UO.Timer()>=LastTimer+100
Else
EndIf
wend   
end sub

Правлено Ветром(небыло тяг

Posted: 2004-12-28 04:49:40
by PARASITE
Предложили заменить строчку uo.WaitMenu('What',Poison) на uo.WaitMenu('What',(2)) , щас буду тестить

Posted: 2004-12-28 06:09:38
by Askaneli
PARASITE wrote:Предложили заменить строчку uo.WaitMenu('What',Poison) на uo.WaitMenu('What',(2)) , щас буду тестить

Code: Select all

uo.WaitMenu('What','(last)')

я те уже говорил по моему

Posted: 2004-12-28 06:26:44
by PARASITE
Наверно не мне

Posted: 2004-12-28 14:28:23
by PARASITE
НЕ РАБОТАЕТ!!!
Я пробовал вставлять uo.WaitMenu('What',(2)) и пробовал uo.WaitMenu('What',(last)) тоже не работает
Кто поможет?

Posted: 2004-12-28 14:36:25
by BETEPAH
PARASITE wrote:НЕ РАБОТАЕТ!!!
Я пробовал вставлять uo.WaitMenu('What',(2)) и пробовал uo.WaitMenu('What',(last)) тоже не работает
Кто поможет?
Попробуй оставить Ласт ……но перед запуском скрипта один раз сделай все в ручную.
Еще не знаю попробуй удалить строчку удаления авто меню (вдруг влияет )

Posted: 2004-12-28 14:40:32
by Askaneli
BETEPAH wrote:
PARASITE wrote:НЕ РАБОТАЕТ!!!
Я пробовал вставлять uo.WaitMenu('What',(2)) и пробовал uo.WaitMenu('What',(last)) тоже не работает
Кто поможет?
Попробуй оставить Ласт ……но перед запуском скрипта один раз сделай все в ручную.
Еще не знаю попробуй удалить строчку удаления авто меню (вдруг влияет )

В кавычки просто забыл взять (last) !!!

Posted: 2004-12-29 09:05:16
by PARASITE
Вот вообщем рабочий вариант

Вместо того чтобы делать поизоны, он делает лезер поизон, если кто знает в чём проблема помогите плиз

Code: Select all

sub alchemy() 
# BETEP™ #
VAR Exit=0, LastTimer
uo.print('Сундук с регами и бутылками')
uo.exec('addobject Bag')
while uo.targeting()
wait(100)
wend
uo.print('Сундук куда бутылки бросать')
uo.exec('addobject Bag2')
while uo.targeting()
wait(100)
wend
while Exit<>1
UO.DeleteJournal()

UO.FindType('0x0F0E','0x0998','backpack')
If UO.GetQuantity('finditem')>0 Then
UO.SetReceivingContainer('Bag2')
wait(1000)
UO.Grab('all','finditem')
wait(1000)
UO.UnSetReceivingContainer()
Endif

UO.FindType('0x0F0E',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x0F0E','0x0000','Bag')
wait(1000)
UO.Grab('500','finditem')
wait(1000)
Endif

UO.FindType('0x0F88','0x0000','backpack')
If UO.GetQuantity('finditem')<20 then
UO.FindType('0x0F88','0x0000','Bag')
wait(1000)
UO.Grab('400','finditem')
wait(1000)
Endif

LastTimer=UO.Timer()
UO.DeleteJournal()

UO.UseType('0x0F88')
uo.WaitMenu('What','(last)')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You toss the failed")
wait(500)
wend
If UO.InJournal("You toss the failed") then
repeat
wait(100)
until UO.Timer()>=LastTimer+100
Else
EndIf
wend
end sub

Правлено Ветром(небыло тяг)

Posted: 2004-12-29 09:11:35
by Sfagnum
PARASITE wrote:Вот вообщем рабочий вариант

Вместо того чтобы делать поизоны, он делает лезер поизон, если кто знает в чём проблема помогите плиз
а ты пойзоны то делать могёшь?

Posted: 2004-12-29 09:14:03
by Askaneli
PARASITE wrote:Вот вообщем рабочий вариант

Вместо того чтобы делать поизоны, он делает лезер поизон, если кто знает в чём проблема помогите плиз

Чёт я тебя не понял, по асе говоришь что пашет, а в форуме что нет !!!

Posted: 2004-12-30 09:15:38
by zarg
А у меня почемут о после каждого крафта бутылки берет новую партию бутылок.. как исправить?

Posted: 2005-01-03 12:22:48
by zarg
Помогите исправить что бы он не брал бутылки после того как скрафтит пойзон...

Posted: 2005-01-04 05:00:11
by PARASITE
Askaneli извеняюсь там оппечатка вышла, выше лежит рабочий вариант, а насчёт того что бутылки берёт каждый раз я не знаю у меня всё нормально, правда я сейчас вообще на другом макросе качаю, он после того как сделает поизон сразу его на дагер использует.

Posted: 2005-02-10 21:34:56
by Ekkie
PARASITE wrote:Askaneli извеняюсь там оппечатка вышла, выше лежит рабочий вариант, а насчёт того что бутылки берёт каждый раз я не знаю у меня всё нормально, правда я сейчас вообще на другом макросе качаю, он после того как сделает поизон сразу его на дагер использует.
даи скрипт...

Posted: 2005-02-11 06:20:01
by Askaneli
Ekkie wrote:
PARASITE wrote:Askaneli извеняюсь там оппечатка вышла, выше лежит рабочий вариант, а насчёт того что бутылки берёт каждый раз я не знаю у меня всё нормально, правда я сейчас вообще на другом макросе качаю, он после того как сделает поизон сразу его на дагер использует.
даи скрипт...

http://yoko.netroof.net/forum/viewtopic ... a15b#15194

Posted: 2005-02-11 07:19:08
by Ekkie
Askaneli wrote:
Ekkie wrote:
PARASITE wrote:Askaneli извеняюсь там оппечатка вышла, выше лежит рабочий вариант, а насчёт того что бутылки берёт каждый раз я не знаю у меня всё нормально, правда я сейчас вообще на другом макросе качаю, он после того как сделает поизон сразу его на дагер использует.
даи скрипт...

http://yoko.netroof.net/forum/viewtopic ... a15b#15194

А без тинкера можете сделать?

Posted: 2005-02-11 07:54:12
by Askaneli
Ekkie wrote:
Askaneli wrote:
Ekkie wrote:
PARASITE wrote:Askaneli извеняюсь там оппечатка вышла, выше лежит рабочий вариант, а насчёт того что бутылки берёт каждый раз я не знаю у меня всё нормально, правда я сейчас вообще на другом макросе качаю, он после того как сделает поизон сразу его на дагер использует.
даи скрипт...

http://yoko.netroof.net/forum/viewtopic ... a15b#15194

А без тинкера можете сделать?

Просто алхимию запусти, тинкер там не обязательно запускать.