Помогите сделать со скриптом так, чтобы звук он проигрывал кажды полторы секунды, а "exec recall" только один раз.
Code: sub Alarm()
st:
If UO.InJournal("Персонал")>0 or UO.InJournal("Персонал сервера!")>0 or UO.InJournal("Личинка")>0 or UO.InJournal("Имперец")>0 or UO.InJournal("GM")>0 or UO.InJournal("Seer")>0 or UO.InJournal("Counselor")>0 or UO.InJournal("LKnight")>0 or UO.InJournal("Привет")>0 or UO.InJournal("Хм")>0 or UO.InJournal("Здесь?")>0 or UO.InJournal("Тут?")>0 or UO.InJournal("Гном")>0 or UO.InJournal("Светлый")>0 or UO.InJournal("Орк")>0 or UO.InJournal("уровня")>0 or UO.InJournal("Темный")>0 or UO.InJournal("Эльф") Then
While not UO.InJournal("privet")
UO.Playwav("C:\Alarm.wav")
UO.Exec("exec recall")
Wait(1500)
Wend
End if
if UO.countground(0x0F6C)>0 or UO.countground(0x0DDA)>0 then
While not UO.InJournal("privet")
UO.Playwav("C:\Alarm.wav")
Wait(1500)
Wend
end if
wait(1000)
goto st
end sub
|