“Ouça o dispositivo” Autohotkey precisa de conselhos para terminar

Question

Com toda a honestidade, não tenho ideia do que estou fazendo e realmente posso usar alguma ajuda Estou tentando ligar e desligar "Listen to microphone" com o uso da tecla "end" e ter um atalho na área de trabalho. Eu fiz um pouco, mas eu só preciso de ajuda para terminar. Para fazer o processo manualmente consiste em

Painel de controle > Hardware e som > gerenciar dispositivos de áudio > gravação > Microfone (apenas um na lista) > Propriedades > Ouça > Ouça este dispositivo.

Eu faço esse processo mais de 15 vezes por dia e isso me deixa louco. Isso é o que eu tenho até agora

Executar, mmsys.cpl

WinWait, som

Enviar {CTRL DOWN} {TAB} {CTRL UP}

ControlSend, SysListView321, {Down}

ControlClick, & Propriedades

Propriedades do winwait

propriedades do mircophone winwait

Eu realmente aprecio qualquer ajuda

    

Answer 1

crie um arquivo Toggle.ini e preencha com o nome do dispositivo que precisa ser ativado e desativado (caixa de seleção "Ouvir este dispositivo")

Eu compilei isto para um exe: Funciona perfeitamente para o meu caso ... PC (Windows 10) Não entrar em suspensão ou hibernar e powercfg requestsoverride não funcionou então eu fiz isso.

#SingleInstance
#NoTrayIcon

isExist:=WinExist("ahk_exe rundll32.exe ahk_class #32770")
Run, % "rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,recording",,, uPID
WinWait, % "ahk_pid"uPID,, 1

WinWait,Sound

Send {CTRL DOWN}{Down}{CTRL UP}

ControlGet, List, List,, SysListView321, % "ahk_pid"uPID

FileRead, OutputVar, toggle.ini

Loop, Parse, List, 'n
{
    IfInString, A_LoopField, %OutputVar%
    {
        ControlClick,&Properties
        Send {CTRL DOWN}{Tab}{CTRL UP}
        Send {Space}
        Send {Enter}
        break
    }
    else 
    {
        ControlSend,SysListView321,{Down}
    }
}

WinWait,Sound
Send {Esc}

ExitApp

Espero que isso ajude alguém ...

    

Answer 2

#KeyHistory, 0
ListLines, Off
SetBatchLines, -1

End::
   isExist:=WinExist("ahk_exe rundll32.exe ahk_class #32770")
   Run, % "rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,recording",,, uPID
   WinWait, % "ahk_pid"uPID,, 1
   If Not ErrorLevel
   {
      SendInput, {Down}
      ControlClick, % "Button3", % "ahk_pid"uPID,,, 3
      WinWait, % "A"
      PostMessage, 0x1330, 1,, % "SysTabControl321", % "ahk_pid"uPID
      WinWait, % "A"
      ControlGet, isEnabled, Checked,, % "Button1", % "ahk_pid"uPID
      Control, % isEnabled ? "UnCheck":"Check",, % "Button1", % "ahk_pid"uPID
      ControlClick, % "Button9", % "ahk_pid"uPID,,, 3
      Process, Close, % uPID
   }
   IfEqual, ErrorLevel, % True, MsgBox, % 2621 (isExist ? 92:60)
                                      , % isExist ? "Info:":"Oops:"
                                      , % isExist ? "Close other window":"Something went wrong!"
                                      , % isExist ? 1.5:3
   KeyWait, % A_ThisHotkey
   Exit, uPID:=isEnabled:=isExist:=""