Yoko

Posted: **2004-11-13 18:39:59**

Вот макрос на питьё банок маны - првоеряет если маны меньше 30 то припивает банку... если больше нечё не делает...
как поставить проверку на банки в паке? чтобы если они кончились то макрос останавливался

Code: Select all

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

подмогните плиз

Posted: **2004-11-13 19:03:00**

Code: Select all

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

Posted: **2004-11-13 21:46:20**

Спасибо Реванджер!!!

Yoko

Подскажите

Подскажите

Re: Подскажите