Yoko
http://forum.yoko.com.ua/

Авто ВАР
http://forum.yoko.com.ua/viewtopic.php?f=17&t=16056		 Page 1 of 1
Author:  some [ 2011-01-05 18:10:54 ]
Post subject:  Авто ВАР
Кто может помочь с написанием скрипта - чтобы висел в запущенных, проверял чара на дохлость , если чар гост ( убит ) - сразу нажимал бы вармод 1 ( чтобы ресать )
заранее спасибо
Author:  Makarov [ 2011-01-15 03:36:11 ]
Post subject:  Re: Авто ВАР
Code:
sub AmIDead()
  Repeat
    If uo.GetHP() == 0 then
      UO.Warmode(1)
      UO.Print('Ласты склеены успешно. Конец связи.')
    Endif
    Wait(1000) ; проверка раз в секунду - можешь снизить до 50 миллисекунд, но не удаляй совсем! Иначе может инжа повиснуть от ацкаго цикла.
  Until 0
end sub
Author:  Mirage [ 2011-01-15 09:58:25 ]
Post subject:  Re: Авто ВАР
Так не очень хорошо. Он будет дрюкать вар находясь в варе когда будет гостом ;)

Лучше вот так:
Code:
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
Author:  Makarov [ 2011-01-15 13:21:28 ]
Post subject:  Re: Авто ВАР
Да, так получше, а можно потом вот так:
Code:
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
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/