Jump to content

Sky Slate Blueberry Blackcurrant Watermelon Strawberry Orange Banana Apple Emerald Chocolate
Photo

Madplay Mixer SoundOsCheck


  • Please log in to reply
1 reply to this topic
olaf
  • Members
  • 25 posts
  • Last active: Nov 08 2005 08:09 PM
  • Joined: 20 Apr 2005
Although it's simple to have a bat file with
X:\path\to\MADPLAY.EXE -v %1
CLS
and then create a shortcut to the bat file in which mp3s can be dropped on,
I wanted a madplay http://members.home....ad_frontend.htm
with a volume.
Note: I just noticed the -v currently stuck on.

Madplay.ahk
madpath = X:\path\to\madplay.exe

SoundGet, master_volume, MASTER, Volume
SoundGet, wave_volume, WAVE, Volume
SoundGet, master_bass, MASTER, BASS
SoundGet, master_treble, MASTER, TREBLE

SoundGet, master_mute, MASTER, MUTE
if master_mute = ON
		master_mute_status =1
else
		master_mute_status =0

SoundGet, wave_mute, WAVE, MUTE
if wave_mute = ON
		wave_mute_status =1
else
		wave_mute_status =0


Gui, Add, Text, ym, Volume
Gui, Add, Slider, Center Thick25 Vertical Invert Range0-100 TickInterval25 ToolTipRight h300 vMasterVolSlider gMasterVol AltSubmit, %master_volume%
Gui, Add, Checkbox, x+-30 y+5 vMasterMuteCheckbox gMasterMuteCheck Checked%master_mute_status%, Mute


Gui, Add, Text, ym, %A_Space%Wave
Gui, Add, Slider, Center Thick25 Vertical Invert Range0-100 TickInterval25 ToolTipRight h300 vWaveVolSlider gWaveVol AltSubmit, %wave_volume%
Gui, Add, Checkbox, x+-30 y+5 vWaveMuteCheckbox gWaveMuteCheck Checked%wave_mute_status%, Mute


Gui, Add, Text, ym y100, Bass
Gui, Add, Slider, Center Thick25 Range0-100 TickInterval20 ToolTipRight w150 vMasterBassSlider gMasterBass AltSubmit, %master_bass%
Gui, Add, Text,, Treble
Gui, Add, Slider, Center Thick25 Range0-100 TickInterval20 ToolTipRight w150 vMasterTrebleSlider gMasterTreble AltSubmit, %master_treble%

Gui, Add, Checkbox, x+-130 y+30 vmadverbose Checked, -&v
Gui, Add, Button, x+10 y+-20 w60 h30 Default, &Play
Gui, Add, Button, x+-50 y+20, &Quit

Gui, Show, h360, Madplay
Return

ButtonPlay:
Gui, Submit, NoHide
Exec = %madpath%
	if (madverbose)
	Exec = %Exec% -v

FileSelectFile, in1,,,"Choose From file",(*.*)
if ErrorLevel <> 0
return
Run, %Exec% %madverbose1% %in1%
Return


MasterVol:
SoundSet, MasterVolSlider, MASTER, Volume
return

WaveVol:
SoundSet, WaveVolSlider, WAVE, Volume
return

MasterBass:
SoundSet, MasterBassSlider, MASTER, BASS
return

MasterTreble:
SoundSet, MasterTrebleSlider, MASTER, TREBLE
return

MasterMuteCheck:
Gui, Submit, NOHIDE
SoundSet, MasterMuteCheckbox, MASTER, MUTE
return

WaveMuteCheck:
Gui, Submit, NOHIDE
SoundSet, WaveMuteCheckbox, WAVE, MUTE
return

ButtonQuit:
Gui, Destroy

GuiClose:
GuiEscape:
ExitApp


For no other reason than to learn how to use the sound settings.
This may not be complete for your soundcard.
Use at your own risk.
A lot of the errorlevel checking can be removed once you know
that control works.
Note: The Synth Mute error checking is commented, since it did not
work for me. To try it, uncommented the two error level lines in the
Mute SoundGet section AND remove "Disabled" from it's Checkbox.

Mixerahk.ahk

Gui, +Resize
; Volume
SoundGet, master_volume, MASTER, Volume
if ErrorLevel <> 0
	MsgBox, Error Description: Master Volume`n%ErrorLevel%

SoundGet, wave_volume, WAVE, Volume
if ErrorLevel <> 0
	MsgBox, Error Description: Wave Volume`n%ErrorLevel%

SoundGet, synth_volume, SYNTH, Volume
if ErrorLevel <> 0
	MsgBox, Error Description: Synth Volume`n%ErrorLevel%

SoundGet, CD_volume, CD, Volume
if ErrorLevel <> 0
	MsgBox, Error Description: CD Volume`n%ErrorLevel%

SoundGet, line_volume, LINE, Volume
if ErrorLevel <> 0
	MsgBox, Error Description: Line Volume`n%ErrorLevel%

SoundGet, microphone_volume, MICROPHONE, Volume
if ErrorLevel <> 0
	MsgBox, Error Description: Microphone Volume`n%ErrorLevel%

SoundGet, pcspeaker_volume, PCSPEAKER, Volume
if ErrorLevel <> 0
	MsgBox, Error Description: PC Speaker`n%ErrorLevel%



; Mute
SoundGet, master_mute, MASTER, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: Master MUTE`n%ErrorLevel%
if master_mute = ON
		master_mute_status =1
else
		master_mute_status =0

SoundGet, wave_mute, WAVE, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: WAVE MUTE`n%ErrorLevel%
if wave_mute = ON
		wave_mute_status =1
else
		wave_mute_status =0

SoundGet, synth_mute, SYNTH, MUTE
;if ErrorLevel <> 0
;	MsgBox, Error Description: Synth MUTE`n%ErrorLevel%
if synth_mute = ON
		synth_mute_status =1
else
		synth_mute_status =0

SoundGet, cd_mute, CD, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: CD MUTE`n%ErrorLevel%
if cd_mute = ON
		cd_mute_status =1
else
		cd_mute_status =0

SoundGet, line_mute, LINE, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: LINE MUTE`n%ErrorLevel%
if line_mute = ON
		line_mute_status =1
else
		line_mute_status =0

SoundGet, microphone_mute, MICROPHONE, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: Microphone MUTE`n%ErrorLevel%
if microphone_mute = ON
		microphone_mute_status =1
else
		microphone_mute_status =0

SoundGet, pcspeaker_mute, PCSPEAKER, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: %ErrorLevel%
if pcspeaker_mute = ON
		pcspeaker_mute_status =1
else
		pcspeaker_mute_status =0


; Extra
SoundGet, master_bass, MASTER, BASS
if ErrorLevel <> 0
	MsgBox, Error Description: Bass Volume`n%ErrorLevel%

SoundGet, master_treble, MASTER, TREBLE
if ErrorLevel <> 0
	MsgBox, Error Description: TREBLE VOLUME`n%ErrorLevel%


/* Not Working
SoundGet, master_pan, MASTER, PAN
if ErrorLevel <> 0
	MsgBox, Error Description: Master PAN`n%ErrorLevel%

SoundGet, analog_mute, ANALOG, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: ANALOG MUTE`n%ErrorLevel%
if analog_mute = ON
		analog_mute_status =1
else
		analog_mute_status =0
*/


; Buddy1var Buddy2var
Gui, Add, Text, ym, Volume
Gui, Add, Slider, Center Thick25 Vertical Invert Range0-100 TickInterval25 ToolTipRight h300 vMasterVolSlider gMasterVol AltSubmit, %master_volume%
Gui, Add, Checkbox, x+-30 y+5 vMasterMuteCheckbox gMasterMuteCheck Checked%master_mute_status%, Mute

Gui, Add, Text, ym, %A_Space%Wave
Gui, Add, Slider, Center Thick25 Vertical Invert Range0-100 TickInterval25 ToolTipRight h300 vWaveVolSlider gWaveVol AltSubmit, %wave_volume%
Gui, Add, Checkbox, x+-30 y+5 vWaveMuteCheckbox gWaveMuteCheck Checked%wave_mute_status%, Mute

Gui, Add, Text, ym, %A_Space%%A_Space%Midi
Gui, Add, Slider, Center Thick25 Vertical Invert Range0-100 TickInterval25 ToolTipRight h300 vSynthVolSlider gSynthVol AltSubmit, %synth_volume%
Gui, Add, Checkbox, x+-30 y+5 vSynthMuteCheckbox gSynthMuteCheck Checked%synth_mute_status% Disabled, Mute

Gui, Add, Text, ym, CD
Gui, Add, Slider, Center Thick25 Vertical Invert Range0-100 TickInterval25 ToolTipRight h300 vCDVolSlider gCDVol AltSubmit, %CD_volume%
Gui, Add, Checkbox, x+-30 y+5 vCDMuteCheckbox gCDMuteCheck Checked%cd_mute_status%, Mute

Gui, Add, Text, ym, Line-In
Gui, Add, Slider, Center Thick25 Vertical Invert Range0-100 TickInterval25 ToolTipRight h300 vLineVolSlider gLineVol AltSubmit, %line_volume%
Gui, Add, Checkbox, x+-30 y+5 vLineMuteCheckbox gLineMuteCheck Checked%line_mute_status%, Mute

Gui, Add, Text, ym, Mic
Gui, Add, Slider, Center Thick25 Vertical Invert Range0-100 TickInterval25 ToolTipRight h300 vMicrophoneVolSlider gMicrophoneVol AltSubmit, %microphone_volume%
Gui, Add, Checkbox, x+-30 y+5 vMicrophoneMuteCheckbox gMicrophoneMuteCheck Checked%microphone_mute_status%, Mute

Gui, Add, Text, ym, PCSpeaker
Gui, Add, Slider, Center Thick25 Vertical Invert Range0-100 TickInterval25 ToolTipRight Buddy2pcspeaker_mute h300 vPCSpeakerVolSlider gPCSpeakerVol AltSubmit, %pcspeaker_volume%
Gui, Add, Checkbox, x+-30 y+5 vPCSpeakerMuteCheckbox gPCSpeakerMuteCheck Checked%pcspeaker_mute_status%, Mute

; Extra
Gui, Add, Text, ym y100, Bass
Gui, Add, Slider, Center Thick25 Range0-100 TickInterval20 ToolTipRight w150 vMasterBassSlider gMasterBass AltSubmit, %master_bass%
Gui, Add, Text,, Treble
Gui, Add, Slider, Center Thick25 Range0-100 TickInterval20 ToolTipRight w150 vMasterTrebleSlider gMasterTreble AltSubmit, %master_treble%

Gui, Show, h400, MixerAhk
Return


; Volume
; SoundSet, NewSetting [, ComponentType, ControlType, DeviceNumber]
MasterVol:
SoundSet, MasterVolSlider, MASTER, Volume
return

WaveVol:
SoundSet, WaveVolSlider, WAVE, Volume
return

SynthVol:
SoundSet, SynthVolSlider, SYNTH, Volume
return

CDVol:
SoundSet, CDVolSlider, CD, Volume
return

LineVol:
SoundSet, LineVolSlider, LINE, Volume
return

MicrophoneVol:
SoundSet, MicrophoneVolSlider, MICROPHONE, Volume
return

PCSpeakerVol:
SoundSet, PCSpeakerVolSlider, PCSPEAKER, Volume
return


; Mute
MasterMuteCheck:
Gui, Submit, NOHIDE
SoundSet, MasterMuteCheckbox, MASTER, MUTE
return

WaveMuteCheck:
Gui, Submit, NOHIDE
SoundSet, WaveMuteCheckbox, WAVE, MUTE
return

SynthMuteCheck:
Gui, Submit, NOHIDE
SoundSet, SynthMuteCheckbox, SYNTH, MUTE
return

CDMuteCheck:
Gui, Submit, NOHIDE
SoundSet, CDMuteCheckbox, CD, MUTE
return

LineMuteCheck:
Gui, Submit, NOHIDE
SoundSet, LineMuteCheckbox, LINE, MUTE
return

MicrophoneMuteCheck:
Gui, Submit, NOHIDE
SoundSet, MicrophoneMuteCheckbox, MICROPHONE, MUTE
return

PCSpeakerMuteCheck:
Gui, Submit, NOHIDE
SoundSet, PCSpeakerMuteCheckbox, PCSPEAKER, MUTE
return


; Extra
MasterBass:
SoundSet, MasterBassSlider, MASTER, BASS
return

MasterTreble:
SoundSet, MasterTrebleSlider, MASTER, TREBLE
return


GuiClose:
GuiEscape:
ExitApp




Expanded from the example in the AutoHotKey help file.
This also may not be complete for your card.

SoundOsCheck.ahk

; Mute
SoundGet, master_mute, MASTER, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: Master MUTE`n%ErrorLevel%
else
	MsgBox, Master Mute is currently %master_mute%.`nThe Wave Mute is currently

SoundGet, wave_mute, WAVE, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: WAVE MUTE`n%ErrorLevel%
else
	MsgBox, The Wave Mute is currently %wave_mute%.

SoundGet, synth_mute, SYNTH, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: Synth MUTE`n%ErrorLevel%
else
	MsgBox, The Synth Mute is %synth_mute%.

SoundGet, cd_mute, CD, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: CD MUTE`n%ErrorLevel%
else
	MsgBox, The CD Mute is %cd_mute%.

SoundGet, line_mute, LINE, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: LINE MUTE`n%ErrorLevel%
else
	MsgBox, The Line Mute is %line_mute%.

SoundGet, microphone_mute, MICROPHONE, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: Microphone MUTE`n%ErrorLevel%
else if microphone_mute = Off
	MsgBox, The microphone is not muted. Microphone MUTE is  %microphone_mute%
else
	Msgbox, The microphne is muted. Microphone MUTE is  %microphone_mute%

SoundGet, pcspeaker_mute, PCSPEAKER, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: %ErrorLevel%
else
	MsgBox, The PC Speaker Mute is %pcspeaker_mute%.




; Volume
; Default
SoundGet, master_volume, MASTER, Volume
if ErrorLevel <> 0
	MsgBox, Error Description: Master Volume`n%ErrorLevel%
else
	MsgBox, Master volume is %master_volume% percent.

SoundGet, wave_volume, WAVE, VOL
if ErrorLevel <> 0
	MsgBox, Error Description: Wave Volume`n%ErrorLevel%
else
	MsgBox, The Wave Volume is %wave_volume% percent.

SoundGet, synth_volume, SYNTH, VOL
if ErrorLevel <> 0
	MsgBox, Error Description: Synth Volume`n%ErrorLevel%
else
	MsgBox, The Synth Volume is %synth_volume% percent.

SoundGet, cd_volume, CD, VOL
if ErrorLevel <> 0
	MsgBox, Error Description: CD Volume`n%ErrorLevel%
else
	MsgBox, The CD Volume is %cd_volume% percent.

SoundGet, line_volume, LINE, VOL
if ErrorLevel <> 0
	MsgBox, Error Description: Line Volume`n%ErrorLevel%
else
	MsgBox, The Line Volume is %line_volume% percent.

SoundGet, microphone_volume, MICROPHONE, Volume
if ErrorLevel <> 0
	MsgBox, Error Description: Microphone Volume`n%ErrorLevel%
else
	MsgBox, The Microphone Volume is %microphone_volume% percent.

SoundGet, pcspeaker_volume, PCSPEAKER, VOL
if ErrorLevel <> 0
	MsgBox, Error Description: PC Speaker`Volume`n%ErrorLevel%
else
	MsgBox, The PC Speaker Volume is %pcspeaker_volume% percent.


; Extra
SoundGet, master_bass, MASTER, BASS
if ErrorLevel <> 0
	MsgBox, Error Description: Master Bass`n%ErrorLevel%
else
	MsgBox, The MASTER Bass level is %master_bass% percent.

SoundGet, master_treble, MASTER, TREBLE
if ErrorLevel <> 0
	MsgBox, Error Description: Master Treble`n%ErrorLevel%
else
	MsgBox, The MASTER Treble is %master_treble% percent.



;/* May not work. Uncomment the section comments to comment.
SoundGet, master_pan, MASTER, PAN
if ErrorLevel <> 0
	MsgBox, Error Description: Master PAN`n%ErrorLevel%
else
	MsgBox, The Master Pan is %master_pan% percent.

SoundGet, microphone_pan, MICROPHONE, PAN
if ErrorLevel <> 0
	MsgBox, Error Description: Microphone PAN`n%ErrorLevel%
else
	MsgBox, The Microphone Pan is %microphone_var% percent.

SoundGet, analog_mute, ANALOG, MUTE
if ErrorLevel <> 0
	MsgBox, Error Description: ANALOG MUTE`n%ErrorLevel%
else
	MsgBox, The Analog Mute is currently %analog_mute%.
;*/


Comments or suggestions are welcome.

Can the ToolTip for a Slider be inverted?
olaf
Berserker

Chris
  • Administrators
  • 10727 posts
  • Last active:
  • Joined: 02 Mar 2004
It looks good; thanks for sharing it.

Can the ToolTip for a Slider be inverted?

No, but you could provide your own tooltip manually by putting a g-label onto the slider.