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

Подскажите
http://forum.yoko.com.ua/viewtopic.php?f=20&t=1939		 Page 1 of 1
Author:  666Man666 [ 2004-11-13 18:39:59 ]
Post subject:  Подскажите
Вот макрос на питьё банок маны - првоеряет если маны меньше 30 то припивает банку... если больше нечё не делает...
как поставить проверку на банки в паке? чтобы если они кончились то макрос останавливался

Code:
Sub automana()
var i
while NOT UO.Dead()
   If   UO.Mana<30 then
      UO.usetype('0x1F40') 
      for i=1 to 100 
      wait(5) 
   If   UO.Mana>30 then
                i=100 
   end if 
      NEXT
   end if
   wait(5)
WEnd
end sub


подмогните плиз
Author:  Revenant [ 2004-11-13 19:03:00 ]
Post subject:  Re: Подскажите
Code:
Sub automana()
    repeat
      if UO.Count('0x1F40') and  UO.Mana<30 then
         UO.UseType('0x1F40') 
         wait(500)
      else
         uo.Exec('terminate automana')
      end if
      wait(500)
    Until UO.Dead()
end sub
Author:  666Man666 [ 2004-11-13 21:46:20 ]
Post subject: 
Спасибо Реванджер!!!
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/