"Слушайте устройство" Autohotkey нужен совет, чтобы закончить

честно говоря, я понятия не имею, что я делаю, и мне действительно нужна помощь
Я пытаюсь включить и выключить" прослушивание микрофона" с помощью клавиши " end " и иметь ярлык на рабочем столе. Я закончил, но мне просто нужна помощь, чтобы закончить.
Чтобы сделать процесс вручную, он состоит из

панель управления > Оборудование и звук > управление аудиоустройствами > запись > микрофон (только один в списке) > Свойства > прослушивание > прослушивание этого устройства .

Я делаю этот процесс более 15 раз в день, и это сводит меня с ума.
Вот что у меня пока

Run, mmsys.cpl

WinWait, Sound

отправить, {сочетание клавиш Ctrl вниз}{вкладка}{Ctrl и вверх}

ControlSend, SysListView321, {Down}

ControlClick, & Свойства

winwait свойства

winwait mircophone свойства

Я был бы очень признателен за любую помощь

9
задан Blake
30.12.2022 23:14 Количество просмотров материала 3648
Распечатать страницу

2 ответа

переключить файл.ini и заполнить его с именем устройства, которое должно быть включено и выключено ("слушать это устройство" флажок)

Я собрал этот ехе: Отлично подходит для моего дела... ПК (Windows 10) не попадал в спящий режим или спящий режим, а powercfg requestsoverride не работал, поэтому я сделал это. 

#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

надеюсь, что это может помочь кому-то...

3
отвечен Sicco 2023-01-01 07:02
#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:=""
0
отвечен Grey 2023-01-01 09:19

Постоянная ссылка на данную страницу: [ Скопировать ссылку | Сгенерировать QR-код ]

Ваш ответ

Опубликуйте как Гость или авторизуйтесь

Имя

Похожие вопросы про тегам:

audio
autohotkey
microphone
script
windows-8
Мы используем cookie. Это позволяет нам анализировать взаимодействие посетителей с сайтом и делать его лучше. Продолжая пользоваться сайтом, вы соглашаетесь с использованием файлов cookie. Политика конфиденциальности
Согласен
Вверх