Yoko

All sides of Injection
It is currently 2025-11-05 22:21:56

All times are UTC+02:00




Post new topic  Reply to topic  [ 3 posts ] 
Author Message
PostPosted: 2006-02-09 17:23:34 
Offline

Joined: 2004-12-13 01:27:00
Posts: 190
Решил прокачать алхимию себе на оскоме, взял скрипт ветерана, пытался переделать, но нечего не вышло.
Работа:
Code:
1. Взять 150 регов - '0x0F7A'  из сунудка
2. Взять 50 бутлей - '0x0F0E'  из сундука
3. Сундук - '0x402E63D3'
4. Если бутлей меньше 1, брать еще 50 из сундука.
5. Если рега меньше 20, брать еще 150 из сундука.
6. Если бутлей готовой продукции больше 60, перекидываем их в суднук.

Особенность: бутылки не складываются в кучку.

**оригинал скрипта**

Вот сам переделанный мною скрипт. СКрипт начинается и тут же завершается, без всякого еффекта.
Code:
sub alchemytrain() 
VAR Exit=0, LastTimer
var reg='0x0F7A'
var chest='0x402E63D3'

while uo.dead()
;completed bottles moved to pack
   UO.DeleteJournal()
   UO.FindType('0x0F0B','0x0000','backpack')
         while uo.findcount()>10
           checklag()
           uo.moveitem('finditem','all',chest)
           wait(500)
           uo.findtype('0x0F0B','0x0000','backpack')
         wend
   wait(1000)
;empty bottles grab
   UO.FindType('0x0F0B',-1,'backpack')
   If UO.GetQuantity('finditem')<10 then
      UO.FindType('0x0F0B','0x0000',chest)
      wait(1000)
      UO.Grab('100','finditem')
      wait(1000)
   Endif
;regs grab
   UO.FindType(reg,'0x0000','backpack')
   If UO.GetQuantity('finditem')<20 then
      UO.FindType(reg,'0x0000','Bag')
      wait(1000)
      UO.Grab('250','finditem')
      wait(1000)
   Endif

   LastTimer=UO.Timer()
   UO.DeleteJournal()
;toss
   UO.UseType('0x0F7A')
   UO.WaitMenu('What','Total Refresh')       
   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


Заранее спасибо.


Top
   
 Post subject:
PostPosted: 2006-02-09 17:33:14 
Offline
Expert!
User avatar

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва
гыгыгы
Code:
while uo.dead() 
;completed bottles moved to pack
   UO.DeleteJournal()

Ты мертв?;) НЕТ!;) по этому вайл и завершается!


Top
   
 Post subject:
PostPosted: 2006-02-09 17:42:44 
Offline

Joined: 2004-12-13 01:27:00
Posts: 190
О боже! :D
А ты уверен, что на етом месте проблемы кончаются? Мне кажется что я там столько всего накромсал... :lol:


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 4 guests


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