Code: Select all
winTitle = ahk_exe MusicBee.exe
x := 1360, y := 591 ; GUI uses screen coordinates
Gui, +AlwaysOnTop
Gui, Color, FFFFC2
Gui, Font, s20 w700
Gui, Add, Text , x+m ym w200 Center, 1.00x
Gui, Font, s12 w400
Gui, Add, Button, x+m ym+5 w50 , FF
Gui, Color, FFFFC2
Gui, Font, s12 w400
Gui, Add, Button, ym+5 w50 , REW
Gui, Add, Text , vt1 , 1.00x
Gui, Add, Text , vt2 , 2.00x
Gui, Add, Slider, xm+40 ys+55 w250 Range0-10 Buddy1t1 Buddy2t2 TickInterval AltSubmit gAdjust vslide, 0
WinSet, Transparent, 200
Loop {
WinWaitActive, ahk_class WindowsForms10.Window.8.app.0.2bf8098_r9_ad1 %winTitle%
Gui, % "+Owner" WinActive()
Gui, Show, x%x% y%y% h100 NoActivate, Playback speed
WinWaitNotActive ; When MusicBee is no longer active,
Gui, Hide ; hide the GUI
}
Adjust:
Gui, Submit, NoHide
GuiControl,, sVal, % Format("{:.2f}x", Round(slide / 10 + 1, 1))
If (A_GuiEvent != "Normal")
Return
SoundBeep, 1900
ControlSend,, ={] %slide%}, %winTitle%
Return
ButtonREW:
ControlSend,, _, %winTitle%
Return
ButtonFF:
ControlSend,, ', %winTitle%
Return