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

Alchemy
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2389		 Page 1 of 1
Author:  PARASITE [ 2004-12-28 03:10:08 ]
Post subject:  Alchemy
Вместо того чтобы делать поизоны, он делает лезер поизон, если кто знает в чём проблема помогите плиз

Code:
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

Правлено Ветром(небыло тяг
Author:  PARASITE [ 2004-12-28 04:49:40 ]
Post subject: 
Предложили заменить строчку uo.WaitMenu('What',Poison) на uo.WaitMenu('What',(2)) , щас буду тестить
Author:  Askaneli [ 2004-12-28 06:09:38 ]
Post subject: 
PARASITE wrote:
Предложили заменить строчку uo.WaitMenu('What',Poison) на uo.WaitMenu('What',(2)) , щас буду тестить

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

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

В кавычки просто забыл взять (last) !!!
Author:  PARASITE [ 2004-12-29 09:05:16 ]
Post subject: 
Вот вообщем рабочий вариант

Вместо того чтобы делать поизоны, он делает лезер поизон, если кто знает в чём проблема помогите плиз
Code:
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

Правлено Ветром(небыло тяг)
Author:  Sfagnum [ 2004-12-29 09:11:35 ]
Post subject: 
PARASITE wrote:
Вот вообщем рабочий вариант

Вместо того чтобы делать поизоны, он делает лезер поизон, если кто знает в чём проблема помогите плиз
а ты пойзоны то делать могёшь?
Author:  Askaneli [ 2004-12-29 09:14:03 ]
Post subject: 
PARASITE wrote:
Вот вообщем рабочий вариант

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

Чёт я тебя не понял, по асе говоришь что пашет, а в форуме что нет !!!
Author:  zarg [ 2004-12-30 09:15:38 ]
Post subject: 
А у меня почемут о после каждого крафта бутылки берет новую партию бутылок.. как исправить?
Author:  zarg [ 2005-01-03 12:22:48 ]
Post subject: 
Помогите исправить что бы он не брал бутылки после того как скрафтит пойзон...
Author:  PARASITE [ 2005-01-04 05:00:11 ]
Post subject: 
Askaneli извеняюсь там оппечатка вышла, выше лежит рабочий вариант, а насчёт того что бутылки берёт каждый раз я не знаю у меня всё нормально, правда я сейчас вообще на другом макросе качаю, он после того как сделает поизон сразу его на дагер использует.
Author:  Ekkie [ 2005-02-10 21:34:56 ]
Post subject: 
PARASITE wrote:
Askaneli извеняюсь там оппечатка вышла, выше лежит рабочий вариант, а насчёт того что бутылки берёт каждый раз я не знаю у меня всё нормально, правда я сейчас вообще на другом макросе качаю, он после того как сделает поизон сразу его на дагер использует.
даи скрипт...
Author:  Askaneli [ 2005-02-11 06:20:01 ]
Post subject: 
Ekkie wrote:
PARASITE wrote:
Askaneli извеняюсь там оппечатка вышла, выше лежит рабочий вариант, а насчёт того что бутылки берёт каждый раз я не знаю у меня всё нормально, правда я сейчас вообще на другом макросе качаю, он после того как сделает поизон сразу его на дагер использует.
даи скрипт...

http://yoko.netroof.net/forum/viewtopic ... a15b#15194
Author:  Ekkie [ 2005-02-11 07:19:08 ]
Post subject: 
Askaneli wrote:
Ekkie wrote:
PARASITE wrote:
Askaneli извеняюсь там оппечатка вышла, выше лежит рабочий вариант, а насчёт того что бутылки берёт каждый раз я не знаю у меня всё нормально, правда я сейчас вообще на другом макросе качаю, он после того как сделает поизон сразу его на дагер использует.
даи скрипт...

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

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

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

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

Просто алхимию запусти, тинкер там не обязательно запускать.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/