AutoCure

[John Bosoy]

Подскажите что не так в скрипте, почему не работает?

sub AUTO_Cure()
while not uo.dead()
If uo.Poisoned() > 0 Then
If uo.Count('0x0F07') > 0 Then
uo.unequip('Rhand','0x401A4B7C')
wait(700)
repeat
If uo.Count('0x0F07') < 1 Then
goto a
EndIf
uo.usetype(0x0F07)
wait(700)
until uo.Poisoned() < 1
a:
uo.equip('Rhand','0x401A4B7C')
wait(700)
Else
Wait(40)
EndIf
EndIf
wend
end sub

[RL_ka]

Код нужно оформлять вот так, тогда у людей будет намного больше желания помогать тебе

Code: Select all

sub AUTO_Cure()
   while not uo.dead()
      If uo.Poisoned() > 0 Then
         If uo.Count('0x0F07') > 0 Then
            uo.unequip('Rhand','0x401A4B7C')
            wait(700)
            repeat
               If uo.Count('0x0F07') < 1 Then
                  goto a
               EndIf
               uo.usetype(0x0F07)
               wait(700)
            until uo.Poisoned() < 1
            a:
            uo.equip('Rhand','0x401A4B7C')
            wait(700)
         Else
            Wait(40)
         EndIf
      EndIf
   wend
end sub

[John Bosoy]

Код нужно оформлять вот так, тогда у людей будет намного больше желания помогать тебе

Code: Select all

sub AUTO_Cure()
   while not uo.dead()
      If uo.Poisoned() > 0 Then
         If uo.Count('0x0F07') > 0 Then
            uo.unequip('Rhand','0x401A4B7C')
            wait(700)
            repeat
               If uo.Count('0x0F07') < 1 Then
                  goto a
               EndIf
               uo.usetype(0x0F07)
               wait(700)
            until uo.Poisoned() < 1
            a:
            uo.equip('Rhand','0x401A4B7C')
            wait(700)
         Else
            Wait(40)
         EndIf
      EndIf
   wend
end sub

Буду знать!)

[John Bosoy]

Помогите пожалуйста.

[Mirage]

А что не так?
Паузы не хватает в цикле да не понятно для чего скачек на a: сделан.

Code: Select all

sub AUTO_Cure()
   while not uo.dead()
      If uo.Poisoned() and uo.Count('0x0F07') Then
         uo.unequip('Rhand','0x401A4B7C')
         wait(700)
         while uo.Poisoned() or uo.Count('0x0F07')
            uo.usetype(0x0F07)
            wait(700)
         wend
         uo.equip('Rhand','0x401A4B7C')
         wait(700)
      EndIf
      Wait(100)
   wend
end sub

Разумеется это будет работать если тип бутылки и ID оружия указаны верно.

[John Bosoy]

Code: Select all

sub drink_cure()
   while not uo.dead()
      While UO.Poisoned()
         If uo.Count('0x0F07') > 0 Then
            uo.unequip('Lhand',0x40106d68)
            wait(600)
            uo.usetype(0x0f07)
            wait(600)
            uo.equip('Lhand',0x40106d68)
            wait(600)
         Else
            Wait(40)
         EndIf
      wend
   wend
end sub

Code: Select all

sub drink_cure()
   while not uo.dead()
      If UO.Poisoned() and uo.Count('0x0F07') > 0 Then       
            uo.unequip('Lhand',0x40106d68)
            wait(600)
            uo.usetype(0x0f07)
            wait(600)
            uo.equip('Lhand',0x40106d68)
            wait(600)
         Else
            Wait(40)
      EndIf
   wend
end sub

не работают оба...

[Mirage]

Бида.
А мой у меня работает. Если все правильно прописать.

PS ну так ты опять у себя одни и теже ошибки допускаешь. Зачем спрашивать если не слушаешь что говорят?

Напиши на бумаге по русски последовательно действия которые ты хочешь чтобы скрипт делал и посмотри что ты ваяешь. Зачем цикл в цикле? Почему нет паузы если условия не выполняются? В общем в уроки в уроки...