Yoko

All sides of Injection
It is currently 2025-11-06 14:04:09

All times are UTC+02:00




Post new topic  Reply to topic  [ 10 posts ] 
Author Message
PostPosted: 2005-02-18 09:07:30 
Offline
User avatar

Joined: 2005-01-13 08:40:40
Posts: 56
Короче скрипт то работает норм (Берёт бутылки и НС, делает пойзонии ложит их в сундук, когда кончаются бутылки или НС берёт ещё).
НО иногда он работает так :Берёт бутылки и НС , делает пойзон
ложит пойзон в сундук, берёт ещё бутылки и Т.Д!

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


Last edited by Ekkie on 2005-02-18 09:28:52, edited 1 time in total.

Top
   
 Post subject:
PostPosted: 2005-02-18 09:10:39 
Offline
User avatar

Joined: 2005-01-13 08:40:40
Posts: 56
И ещё вопросик..
Как сделать чтоб место Гритер пойзенов делал простие пойзони?


Top
   
 Post subject:
PostPosted: 2005-02-18 09:29:47 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
1. указывай цвет бутылок явно, а не любой ;)
2. uo.WaitMenu('What','(2)') - Пойзон
uo.WaitMenu('What','(first)') - лессер


Top
   
 Post subject:
PostPosted: 2005-02-18 09:34:20 
Offline
User avatar

Joined: 2005-01-13 08:40:40
Posts: 56
Sfagnum wrote:
1. указывай цвет бутылок явно, а не любой ;)
2. uo.WaitMenu('What','(2)') - Пойзон
uo.WaitMenu('What','(first)') - лессер

А где цвет указать...скажите неюбику бедному.


Top
   
 Post subject:
PostPosted: 2005-02-18 09:37:53 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
тут вроде
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')


Top
   
 Post subject:
PostPosted: 2005-02-18 09:44:19 
Offline
User avatar

Joined: 2005-01-13 08:40:40
Posts: 56
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')

Спасибобольшое вроде всё работает


Top
   
 Post subject:
PostPosted: 2005-02-18 09:48:05 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
хех... очередной косяк на Ветра ;)


Top
   
 Post subject:
PostPosted: 2005-02-18 10:13:45 
Offline
Sphere expert
User avatar

Joined: 2004-10-01 08:27:38
Posts: 1143
Location: Уфа
Не проверяет, выкладывает, надеется что на авторитете скрипт выедет.

_________________
Сделал дело - флуди смело !!!


Top
   
 Post subject:
PostPosted: 2005-02-18 15:11:51 
Offline
User avatar

Joined: 2004-11-07 01:22:35
Posts: 291
Location: Черкассы
А хитрые нубики взяли и нашли баг у Ветерка :D


Top
   
 Post subject:
PostPosted: 2005-02-18 15:24:23 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
Goggy wrote:
А хитрые нубики взяли и нашли баг у Ветерка :D
а чо их искать то? их куда не ткни везде есть ;)


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 10 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited