1 Тема от Tradus

  • Tradus
  • Участник
  • Неактивен

Тема: AHK: Помогите пожалуйста добавить звуковое сопровождение моему скрипту

Здравствуйте.
Имеется очень простой скрипт, который запускает бесконечное нажатие клавиши Enter, включается и отключается клавишей Home

Pause
Loop {
  Send {Enter}
  Sleep 600
}
Home::Pause

Мне нужна ваша помощь!)
Я очень хочу слышать когда включаю и когда отключаю скрипт.
Допустим при снятии с паузы нужно воспроизвести

SoundPlay, %A_WinDir%\Media\Windows Logon.wav

А когда я ставлю скрипт на паузу, должен звучать

SoundPlay, %A_WinDir%\Media\Windows Notify System Generic.wav

2 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: AHK: Помогите пожалуйста добавить звуковое сопровождение моему скрипту

Home::
fn(isTimer := false) {
    static toggle := false, timer := Func("fn").Bind(true)
    if isTimer {
        Send {Enter}
    } else {
        SetTimer % timer, % (toggle ^= 1) ? 600 : "Off"
        file := toggle ? "Windows Logon.wav" : "Windows Notify System Generic.wav"
        SoundPlay %A_WinDir%\Media\%file%
    }
}
Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder
+ Tradus

3 Ответ от Tradus

  • Tradus
  • Участник
  • Неактивен

Re: AHK: Помогите пожалуйста добавить звуковое сопровождение моему скрипту

teadrinker, большое спасибо за новый скрипт!
Всё работает!)