Page 1 of 1

Помогите найти проблему в макросе на пойзон

Posted: 2011-05-03 10:56:57
by Ooze

Code: Select all

sub pois()
 While 1==1
 UO.CancelMenu()
 UO.AutoMenu( 'Select a potion to make', 'Lesser Poison' ) # выбираешь тип тотлов
 wait(1000)
 repeat
 if UO.Count('0x0F88')==0 then
 UO.FindType('0x0F88',-1,'ground') поиск найтшайда
 UO.Grab('1','finditem') берем найтшайд в пак
 wait(500)
 end if
 UO.WaitTargetType('0x0F88') ожидаем таргет на найтшайд
 UO.UseType('0x0E9B') юзаем пестик
 wait(8000)
 until UO.Count('0x0F0A')==1 делаем пока не сварится тотл

 if UO.Count('0x0F3F')==0 then
 UO.FindType('0x0F3F',-1,'ground')
 UO.Grab('1','finditem')
 wait(350)
 end if
 #UO.FindType('0x0F0A',-1,'backpack') ищем тотл в паке (ставишь тип тотла которые варишь)
 #UO.WaitTargetType('0x0F0A') ждем таргет на тотл (ставишь тип тотла которые варишь)
 [color=#FF0000]UO.UseSkill('Poisoning')
 UO.WaitTargetType('0x0F0A')
 wait(350)
 UO.WaitTargetType('0x0F3F')[/color] таргет на стрелу
 wait(8000) ставишь время за которое запоизонит
 UO.FindType('0x0F3F','0x0044','backpack') ищем запоизоненую стрелу
 UO.MoveItem('finditem',1,'0x6F621603') кидаем запоизоненую стрелу в указаный пакет
 While UO.Life<UO.Str если хп меньше максимального
 UO.FindType('0x0E21',-1,'ground') ищем на полу бинты
 UO.WaitTargetSelf()
 UO.UseObject('finditem') юзаем их на себя
 wait(5500)
 wend
 wend
 end sub

Проблема в том что он сбивается после того как кинет скил пойзон на бутылку и покладет стрелу в пак и когда должен кинуть таргет на стрелу остается прицел и он стаит просто так какое то время, помогите пожаста :(

Re: Помогите найти проблему в макросе на пойзон

Posted: 2011-05-03 12:08:26
by Grin

Code: Select all

UO.UseSkill('Poisoning')
UO.WaitTargetType('0x0F0A')
wait(350)
UO.WaitTargetType('0x0F3F')

Code: Select all

UO.WaitTargetObject('^0x0F0A', '^0x0F3F')
UO.UseSkill('Poisoning')

Re: Помогите найти проблему в макросе на пойзон

Posted: 2011-05-03 12:20:40
by Ooze
Grin wrote:

Code: Select all

UO.UseSkill('Poisoning')
UO.WaitTargetType('0x0F0A')
wait(350)
UO.WaitTargetType('0x0F3F')

Code: Select all

UO.WaitTargetObject('^0x0F0A', '^0x0F3F')
UO.UseSkill('Poisoning')

это надо заменить? Спасибо, заменил часть и вроде не появляется