#NoEnv
#SingleInstance Force
;Insert Color here like HEX 00C222
TabColors_Tab1=C0C0C0
TabColors_Tab2=C29200
TabColors_Tab3=000000
Gui, +AlwaysOnTop
Gui, Tab, 1
;Gui, Font, underline
Gui, Font, bold
Gui, Font, s9
Gui, Add, Text, x2 y10 cBlue gFunction1, Copy Selected Track Levels
Gui, Add, Text, x2 y30 cRed gFunction2, Paste Selected Track Levels
Gui, Tab, 2
Gui, Tab, 3
Gui, Add, Tab, x2 y100 h20 w180 AltSubmit gTab vTab
, 1|2|3
Gosub, Tab
Gui, Show, , BB Quick Menu
;Gui Color, 0xC0C0C0
return
Tab:
GuiControlGet, Tab
Gui, Color, % TabColors_Tab%Tab%
return
Function1:
Winactivate, ahk_class TBandWindow
Send, {F7}
WinWait, ahk_class TTrackSettingsDialog
Winactivate, ahk_class TTrackSettingsDialog
ControlGet, Volume, Choice,, TComboBox5, ahk_class TTrackSettingsDialog
ControlGet, Reverb, Choice,, TComboBox4, ahk_class TTrackSettingsDialog
ControlGet, Panning, Choice,, TComboBox3, ahk_class TTrackSettingsDialog
ControlGet, Tone, Choice,, TComboBox2, ahk_class TTrackSettingsDialog
Send, !o
;MsgBox, 262144, Track, Select Source Track
return
Function2:
Winactivate, ahk_class TBandWindow
Send, {F7}
WinWait, ahk_class TTrackSettingsDialog
Winactivate, ahk_class TTrackSettingsDialog
Control, ChooseString, %Volume%, TComboBox5, ahk_class TTrackSettingsDialog
Control, ChooseString, %Reverb%, TComboBox4, ahk_class TTrackSettingsDialog
Control, ChooseString, %Panning%, TComboBox3, ahk_class TTrackSettingsDialog
Control, ChooseString, %Tone%, TComboBox2, ahk_class TTrackSettingsDialog
Send, !o
return
GuiClose:
GuiEscape:
ExitApp