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

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
Ooze
Posts: 11
Joined: 2011-05-03 10:42:43

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

Post 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

Проблема в том что он сбивается после того как кинет скил пойзон на бутылку и покладет стрелу в пак и когда должен кинуть таргет на стрелу остается прицел и он стаит просто так какое то время, помогите пожаста :(
Last edited by Ooze on 2011-05-03 18:40:31, edited 1 time in total.
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

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

Post 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')
Ooze
Posts: 11
Joined: 2011-05-03 10:42:43

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

Post 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')

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