Помогите подкоректировать скрипт

SLAK · Post by **SLAK** » 2005-08-27 20:55:01

Вот есть такой скрипт на автохил бинтами

sub Heal() 
   While UO.Life > UO.Dead()
      If UO.Life < UO.GetMaxHp()  Then 
         UO.Bandageself() 
         wait(4500)
      Else 
         wait(50) 
      Endif 
   Wend 
endsub

Очень нужно, чтобы задержка (wait(4500)) была не фиксирована!! Тоесть хиляюсь я бинтом и как только бинт наложило, а жизни еще не полные , сразу наматывало следующий бинт!!! Я играю на АоС (shard "Nightday")

Leo · Post by **Leo** » 2005-08-27 21:06:45

Code: Select all

sub Heal() 
   While UO.Life > UO.Dead() 
      If UO.Life < UO.GetMaxHp()  Then 
         UO.Bandageself() 
         Repeat 
            UO.DeleteJournal() 
                 wait(100) 
         Until UO.InJournal("You sucessfully") OR UO.InJournal("You bandage")       
      Else 
         wait(50) 
      Endif 
   Wend 
endsub

Сообщения поставь свои, при физле и при успешном приминении бинта.

flake · Post by **flake** » 2005-08-27 21:20:11

Лучше так:

Code: Select all

sub Heal() 
   While UO.Life > UO.Dead() 
      If UO.Life < UO.GetMaxHp()  Then 
         UO.DeleteJournal() 
         UO.Bandageself() 
         Repeat             
                 wait(100) 
         Until UO.InJournal("You sucessfully") OR UO.InJournal("You bandage")        
      Else 
         wait(50) 
      Endif 
   Wend 
endsub

SLAK · Post by **SLAK** » 2005-08-27 22:41:46

Огромное спасибо!! Были некоторые нюансы, но из-за моей не очень хорошей внимательности!!Еще раз спасибо вы мне очень помогли.

SLAK · Post by **SLAK** » 2005-08-28 00:04:32

Между прочим!! Если этот топик будут читать ламеры типа меня!! То знайте , что кроме хильнулся и не хильнулся, НУЖНО ЕЩЕ ДОБАВЛЯТЬ такие как вылечил себя от яда , снял кровотечение, цель уже и так здороваи т.п. На каждом шарде свое , иначе скрипт может перестать работать в совсем неподходящий момент!!