OnMyDSeeAtAll
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Код: ; "...для переключения между окнами (Alt+Tab), зажимаю одну из боковых кнопок и кручу колесом."
XButton2 & WheelUp::AltTab ; scroll right
XButton2 & WheelDown::ShiftAltTab ; scroll left
; "...Win+Alt+колесо для регулировки громкости с отображением индикатора."
#!MButton:: ; un/mute
#!WheelUp:: ; +
#!WheelDown:: ; -
Exit, ShowTip(A_ThisHotkey)
XButton1:: ; here exit
KeyWait, % A_ThisHotkey
ExitApp
Label:
TrayTip
Return
ShowTip(p)
{
If Not p~="MB"
SoundSet, % (p~="lU" ? "+":"-")"1"
Else
SoundSet, +1,, Mute
SoundGet, vol
ListLines, Off
Loop, 25
meter.=MakeMeter(A_Index<=Round(vol/4) ? 1:0)
ListLines, On
TrayTip,, % meter "`t"Round(vol)
SetTimer, % "Label", -750 ; timeout of tips in ms
}
MakeMeter(fraction)
{ ; http://www.autohotkey.net/~Lexikos/docs/VA.html#VA_GetAudioMeter
Loop, % fraction*1
meter.="|"
Loop, % (1-fraction)*1
meter.="."
Return, meter
} |
|
