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

Чёт нетак работает...
http://forum.yoko.com.ua/viewtopic.php?f=20&t=3137		 Page 1 of 1
Author:  Ekkie [ 2005-02-18 09:07:30 ]
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:  Ekkie [ 2005-02-18 09:10:39 ]
Post subject: 
И ещё вопросик..
Как сделать чтоб место Гритер пойзенов делал простие пойзони?
Author:  Sfagnum [ 2005-02-18 09:29:47 ]
Post subject: 
1. указывай цвет бутылок явно, а не любой ;)
2. uo.WaitMenu('What','(2)') - Пойзон
uo.WaitMenu('What','(first)') - лессер
Author:  Ekkie [ 2005-02-18 09:34:20 ]
Post subject: 
Sfagnum wrote:
1. указывай цвет бутылок явно, а не любой ;)
2. uo.WaitMenu('What','(2)') - Пойзон
uo.WaitMenu('What','(first)') - лессер

А где цвет указать...скажите неюбику бедному.
Author:  Sfagnum [ 2005-02-18 09:37:53 ]
Post subject: 
тут вроде
Code:
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

1ю строку заменить на эту:
Code:
UO.FindType('0x0F0E','0x0000','backpack')
Author:  Ekkie [ 2005-02-18 09:44:19 ]
Post subject: 
Sfagnum wrote:
тут вроде
Code:
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

1ю строку заменить на эту:
Code:
UO.FindType('0x0F0E','0x0000','backpack')

Спасибобольшое вроде всё работает
Author:  Sfagnum [ 2005-02-18 09:48:05 ]
Post subject: 
хех... очередной косяк на Ветра ;)
Author:  Askaneli [ 2005-02-18 10:13:45 ]
Post subject: 
Не проверяет, выкладывает, надеется что на авторитете скрипт выедет.
Author:  Goggy [ 2005-02-18 15:11:51 ]
Post subject: 
А хитрые нубики взяли и нашли баг у Ветерка :D
Author:  Sfagnum [ 2005-02-18 15:24:23 ]
Post subject: 
Goggy wrote:
А хитрые нубики взяли и нашли баг у Ветерка :D
а чо их искать то? их куда не ткни везде есть ;)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/