Page 1 of 1
Авто ВАР
Posted: 2011-01-05 18:10:54
by some
Кто может помочь с написанием скрипта - чтобы висел в запущенных, проверял чара на дохлость , если чар гост ( убит ) - сразу нажимал бы вармод 1 ( чтобы ресать )
заранее спасибо
Re: Авто ВАР
Posted: 2011-01-15 03:36:11
by 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
Re: Авто ВАР
Posted: 2011-01-15 09:58:25
by 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
Re: Авто ВАР
Posted: 2011-01-15 13:21:28
by 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