Авто ВАР

[some]

Кто может помочь с написанием скрипта - чтобы висел в запущенных, проверял чара на дохлость , если чар гост ( убит ) - сразу нажимал бы вармод 1 ( чтобы ресать )
заранее спасибо

[Makarov]

Code: Select all

sub AmIDead()
  Repeat
    If uo.GetHP() == 0 then
      UO.Warmode(1)
      UO.Print('Ласты склеены успешно. Конец связи.')
    Endif
    Wait(1000) ; проверка раз в секунду - можешь снизить до 50 миллисекунд, но не удаляй совсем! Иначе может инжа повиснуть от ацкаго цикла.
  Until 0
end sub

[Mirage]

Так не очень хорошо. Он будет дрюкать вар находясь в варе когда будет гостом

Лучше вот так:

Code: Select all

sub AmIDead()
  Repeat
    If UO.Life < 1 && uo.warmode()==0 then ; Если сдох И вар мод НЕ включен.
      UO.Warmode(1)
    UO.Print('А мы умираем!33')
    Endif
    Wait(1000) ; проверка раз в секунду - можешь снизить до 50 миллисекунд, но не удаляй совсем! Иначе может инжа повиснуть от ацкаго цикла.
  Until 0
end sub

[Makarov]

Да, так получше, а можно потом вот так:

Code: Select all

sub AmIDead()
  Repeat
    If UO.Life < 1 && uo.warmode()==0 then ; Если сдох И вар мод НЕ включен.
      UO.Warmode(1)
      UO.Print('А мы умираем!33')
    Else
       UO.Warmode(0) ; в пис после ресурректа
    Endif
    Wait(1000) ; проверка раз в секунду - можешь снизить до 50 миллисекунд, но не удаляй совсем! Иначе может инжа повиснуть от ацкаго цикла.
  Until 0
end sub