Sign in to follow this  
Followers 0
AzKay

Possible to make a volume script?

13 posts in this topic

Yeah, because, ive got this dvd, and its crap quality, so, I need a way to make the speakers go louder, is there a way to, maybe amplify them? or have, like, a volume bar, where:

Just say, your sound is on max, then you make a volume bar of your own, and when your volume bar, is on the lowest it can be, it would be, the windows volume bars max volume. Does that make sense?

And yes, ive even tryed wearing headphones, in the middle of the night, to watch it, and I still cant hear it clearly. Its like, worse than wispering...


# MY LOVE FOR YOU... IS LIKE A TRUCK- #

Share this post


Link to post
Share on other sites



I would invest in a set of quality speakers if yours are that bad. :D



Get Beta versions Here Get latest SciTE editor Here AutoIt 1-2-3 by Valuater - A great starting point.

Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

Share this post


Link to post
Share on other sites

HI,

yes. I think Gary did that.

Search for it or ...

;by wiredbits
;first run at doing a volume control for mixer
;my system has two sounds cards and all went well with both
#include <GUIConstants.au3>
#include <MXSelectInputSrc_include.au3>
;default mixer is always 0 (so far) which is last audio device installed or prefered deviced selected by user
$curmixer=0
 CONST $MM_MIXM_CONTROL_CHANGE= 0x3D1
 CONST $CALLBACK_WINDOW =0x10000
 OpenAllMixers($mixers)
 If @error Then Exit
 GetMXWaveoutID($mixers,$curmixer,$MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT)
;Generated with Form Designer preview
$Form1 = GUICreate("Mixer Volume", 437, 197, 270, 282)
GUISetFont(10, 400, 0, "MS Sans Serif")
$Group1 = GUICtrlCreateGroup("Volume", 56, 24, 313, 137)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$SL_WaveOut = GUICtrlCreateSlider(72, 64, 270, 29)
GUICtrlCreateLabel(" Volume", 144, 43, 53, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$LB_vol=GUICtrlCreateLabel("0", 208, 43, 50, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$RAD_MasterVol = GUICtrlCreateRadio("Master Volume", 96, 128, 113, 17)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$RAD_WaveOut = GUICtrlCreateRadio("Wave Out", 248, 128, 105, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
$dumCallback=GUICtrlCreateDummy ()
 Main()
 CloseAllMixers($mixers)
 Exit
Func Main()
 Local $mxvol,$msg,$admsg,$wo,$hmxobj,$x,$savevolume
 GUIRegisterMsg ($MM_MIXM_CONTROL_CHANGE,"MyCallBack") ;cool commnad! first time plaing with it.
 $hmxobj=MixerOpen($curmixer,$Form1,$MM_MIXM_CONTROL_CHANGE,BitOR($CALLBACK_WINDOW,$MIXER_OBJECTF_MIXER) )
 $mxvol=GetSetOutVolume($mixers,$curmixer,0,0)
 $savevolume=$mxvol
 GUICtrlSetData($SL_WaveOut,BitAND($mxvol/ 0xFFFF * 100,0xffff))
 GUICtrlSetData($LB_vol,BitAND($mxvol/ 0xFFFF * 100,0xffff))
 $wo=GUICtrlRead($SL_WaveOut)
While 1
    $admsg = GuiGetMsg(1)
    $msg=$admsg[0]
;might be more accurate if use steps from control but this suits my needs
    If GUICtrlRead($SL_WaveOut)<>$wo Then
        $wo=GUICtrlRead($SL_WaveOut)
        GUICtrlSetData($LB_vol,$wo)
        $x=mod($wo*0xffff,100)
        $wo=BitAND($wo*0xffff/100,0xffff)
        $wo=$wo+$x
        GetSetOutVolume($mixers,$curmixer,$wo);this will also trigger callback routine
        $wo=GUICtrlRead($SL_WaveOut)
    EndIf
    Select
    Case $msg=$RAD_MasterVol ;could have just made two sliders for this example but i only need one.
        GetSetOutVolume($mixers,$curmixer,$savevolume)
        GetMXWaveoutID($mixers,$curmixer,$MIXERLINE_COMPONENTTYPE_DST_SPEAKERS)
        $savevolume=GetSetOutVolume($mixers,$curmixer,0,0)
        $mxvol=$savevolume
        GUICtrlSetData($SL_WaveOut,BitAND($mxvol/ 0xFFFF * 100,0xffff))
        GUICtrlSetData($LB_vol,BitAND($mxvol/ 0xFFFF * 100,0xffff))
    Case $msg=$RAD_WaveOut
        GetSetOutVolume($mixers,$curmixer,$savevolume)
        GetMXWaveoutID($mixers,$curmixer,$MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT)
        $savevolume=GetSetOutVolume($mixers,$curmixer,0,0)
        $mxvol=$savevolume
        GUICtrlSetData($SL_WaveOut,BitAND($mxvol/ 0xFFFF * 100,0xffff))
        GUICtrlSetData($LB_vol,BitAND($mxvol/ 0xFFFF * 100,0xffff))
    Case $msg=$dumCallback
        $x=GetSetOutVolume($mixers,$curmixer,0,0)
        If $x<>$mxvol Then
            $mxvol=$x
            GUICtrlSetData($SL_WaveOut,BitAND($mxvol/ 0xFFFF * 100,0xffff))
            GUICtrlSetData($LB_vol,BitAND($mxvol/ 0xFFFF * 100,0xffff))
        EndIf
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    EndSelect
WEnd
 GUIDelete($Form1)
 GetSetOutVolume($mixers,$curmixer,$savevolume)
 MixerClose($hmxobj)
EndFunc


Func GetSetOutVolume($mixers,$index,$vol=0,$doset=1)    
 Local $i,$x,$arraysize,$channels,$mtiems
 CONST $MIXERCONTROLDETAILS_UNSIGNED_SIZEOF=4
 Local $mixercontroldetails=DllStructCreate( _
"dword;" & _;DWORD cbStruct
"dword;" & _;DWORD dwControlID
"dword;" & _;DWORD cChannels;
"dword;" & _;HWND  hwndOwner  DWORD cMultipleItems; 
"dword;" & _;DWORD  cbDetails; 
"dword")    ;LPVOID paDetails;
  If @error Then Return False
 $mitems=$mixers[$index][$MIX_OUTMULTIEMS]
 $channels=$mixers[$index][$MIX_OUTCHANNELS]
 $arraysize=$channels
 If $mitems Then $arraysize=$channels*$mitems
 Local $plistbool=DllStructCreate("dword["&$arraysize+1 &"]");give me one mroe than needed
    If @error Then Return False
    $hmxobj=$mixers[$index][$MIX_HMXOBJ]
    $mxcd=$mixercontroldetails
    DllStructSetData($mxcd,$cbStruct,DllStructGetSize($mxcd))
    DllStructSetData($mxcd,2,$mixers[$index][$MIX_OUTCTRLID]) 
    DllStructSetData($mxcd,3,$mixers[$index][$MIX_OUTCHANNELS])
    DllStructSetData($mxcd,4,$mixers[$index][$MIX_OUTMULTIEMS])
    DllStructSetData($mxcd,5,$MIXERCONTROLDETAILS_UNSIGNED_SIZEOF);cbDetails to sizeof one unsigned struct
    DllStructSetData($mxcd,6,DllStructGetPtr($plistbool));paDetails set ptr
    $ret = DLLCall("winmm.dll","long","mixerGetControlDetails","hwnd",$hmxobj,"ptr",DllStructGetPtr($mxcd),"long",BitOR($MIXER_OBJECTF_HMIXER,$MIXER_GETCONTROLDETAILSF_VALUE))
    If @error Then Return False
    If $ret[0]=$MMSYSERR_NOERROR Then
        $x=DllStructGetData($plistbool,1,1);just return right channel
        For $i= 1 To $arraysize 
            DllStructSetData($plistbool,1,$vol,$i);set left right to same value
        Next;i
        If $doset Then $ret = DLLCall("winmm.dll","long","mixerSetControlDetails","hwnd",$hmxobj,"ptr",DllStructGetPtr($mxcd),"long",BitOR($MIXER_OBJECTF_HMIXER,$MIXER_SETCONTROLDETAILSF_VALUE))
        Return $x
    EndIf
Return False
EndFunc

Func MyCallBack($hWndGUI, $MsgID, $WParam, $LParam)
  If $mixers[$curmixer][$MIX_OUTCTRLID]=$LParam Then
     GUICtrlSendToDummy($dumCallback)
  EndIf
 Return 0;need to research what value to return:P
EndFunc

Func GetMXWaveoutID(ByRef $mixers,$index,$linetype)
 Local $mitems,$chans,$hmxobj,$x,$ret,$lineid
;local structures are nuked on exit...so i have read..LOL
Local $mixercontrol=DllStructCreate( _ 
"dword;" & _; DWORD cbStruct; 
"dword;" & _;   DWORD dwControlID; 
"dword;" & _;   DWORD dwControlType;  
"dword;" & _;   DWORD fdwControl;   
"dword;" & _;   DWORD cMultipleItems; 
"char[16];" & _;szShortName[MIXER_SHORT_NAME_CHARS]; 
"char[64];" & _;szName[MIXER_LONG_NAME_CHARS]; 
"dword;" & _;lMinimum
"dword;" & _;lMaximum
"dword[4];" & _;dwReserved[4];
"dword;"  & _ ;cSteps
"dword[5]");   DWORD dwReserved[6];
   If @error Then return False
Local $mixerlinecontrols=DllStructCreate( _
"dword;"& _;      cbStruct; 
"dword;" & _;   DWORD dwLineID; 
"dword;" & _;   DWORD dwControlID    DWORD dwControlType;
"dword;" & _;   DWORD  cControls;  
"dword;" & _;   DWORD cbmxctrl; 
"ptr");       LPMIXERCONTROL pamxctrl; 
    If @error Then return False
    $hmxobj=$mixers[$index][$MIX_HMXOBJ]
    zeroline($mxline)
    $mxline[$dwLineID]=BitOR($index,0xFFFF0000)
    $mxline[$dwComponentType]=$linetype
    MixerGetLineInfo($hmxobj,$mxline,$MIXER_GETLINEINFOF_COMPONENTTYPE)
    $lineid=$mxline[$dwLineID]  
    DllStructSetData($mixerlinecontrols,$cbStruct,DllStructGetSize($mixerlinecontrols))
    DllStructSetData($mixerlinecontrols,2,$lineid)
    DllStructSetData($mixerlinecontrols,3,$MIXERCONTROL_CONTROLTYPE_VOLUME )
    DllStructSetData($mixerlinecontrols,4,1)
    DllStructSetData($mixerlinecontrols,5,DllStructGetSize($mixercontrol))
    DllStructSetData($mixerlinecontrols,6,DllStructGetPtr($mixercontrol))
    $ret = DLLCall("winmm.dll","long","mixerGetLineControls","hwnd",$hmxobj,"ptr",DllStructGetPtr($mixerlinecontrols),"long",BitOR($MIXER_OBJECTF_HMIXER,$MIXER_GETLINECONTROLSF_ONEBYTYPE ))
    If $ret[0]<>$MMSYSERR_NOERROR Then Return False 
    $chans=$mxline[$cChannels]
    $x=DllStructGetData($mixercontrol,4);fwControl
    If BitAND($x,$MIXERCONTROL_CONTROLF_UNIFORM) Then $chans=1
    $mitems= 0
    If BitAND($x,$MIXERCONTROL_CONTROLF_MULTIPLE) Then $mitems=DllStructGetData($mixercontrol,5) 
    $x=DllStructGetData($mixercontrol,3);fwControl
    If BitAND($x,$MIXERCONTROL_CT_CLASS_FADER ) Then
        $mixers[$index][$MIX_OUTCHANNELS]=$chans
        $mixers[$index][$MIX_OUTMULTIEMS]=$mitems
        $mixers[$index][$MIX_OUTCTRLID]=DllStructGetData($mixercontrol,2)
        Return True
    EndIf
    Return False
EndFunc

Func zeroline(ByRef $line)
 local $i
  For $i=0 To UBound($line)-1
      $line[$i]=0
  Next;i
EndFunc

Func MixerGetLineInfo($hmxobj,ByRef $line,$flag)
 Local $mixerline= DllStructCreate("dword;dword;dword;dword;dword;dword;dword;dword;dword;dword;char[16];char[64];dword;dword;short;short;dword;char[32]")
  If @error Then
     SetError(1)
     Return False
  EndIf
 Local $i
 For $i=1 To UBound($line)-1
    DllStructSetData($mixerline,$i,$line[$i])
 Next;i
 DllStructSetData($mixerline,$cbStruct,DllStructGetSize($mixerline))
 $ret = DLLCall("winmm.dll","long","mixerGetLineInfo","hwnd",$hmxobj,"ptr",DllStructGetPtr($mixerline),"int", $flag)
  If @error Then
     SetError(1)
     Return False
  EndIf
 for $i=1 To $szMPname
 $line[$i]=DllStructGetData($mixerline,$i)
 Next;i
 If $ret[0]=$MMSYSERR_NOERROR Then Return True
 SetError(1)
 Return False
EndFunc

;On Exit: MIX_HMXOBJ set to return value from mixeropn...check for @error
Func OpenAllMixers(ByRef $mixers)
 Local $i,$mxnumdevs,$hmxobj
  $mxnumdevs=mixerGetNumDevs()
  If $mxnumdevs Then
    ReDim $mixers[$mxnumdevs+1][$AMIX_SIZEOF]
    For $i=0 To $mxnumdevs-1
        $hmxobj=mixerOpen($i,0,0,$MIXER_OBJECTF_MIXER)
        If @error Then 
            SetError(1)
            Return False
        EndIf
    $mixers[$i][$MIX_HMXOBJ]=$hmxobj
    Next;i
  EndIf
  $mixers[0][0]=$mxnumdevs
EndFunc

;On ENtry: mixer id and flag(s) , if no id passed then the preffered id is used (0) ditto for flag
;on exit: mixer handle
Func MixerOpen($uMxid=0,$hwnd=0,$instance=0,$fdwOpen=0)
 Local $x,$h_struct
    $h_struct=DllStructCreate("udword");since a local will be deleted on exit of function
    If @error Then
        SetError(1)
        Return False
    EndIf
    $ret = DLLCall("winmm.dll","long","mixerOpen","ptr",DllStructGetPtr($h_struct),"int",$uMxid,"int",$hwnd,"int",$instance,"int",$fdwOpen)
    If NOT @error    Then 
        If $ret[0]<>$MMSYSERR_NOERROR Then Return -1
        $x=DllStructGetData($h_struct,1)
        Return $x
    EndIf
    SetError(1)
 return False
EndFunc

Func  CloseAllMixers($mixers)
 Local $i,$cnt
  $cnt=$mixers[0][0]
    For $i= 0 To $cnt-1
        MixerClose($mixers[$i][$MIX_HMXOBJ])
    Next;i
EndFunc

;On Entry: mixer handle
Func MixerClose($hmxobj)
    $ret = DLLCall("winmm.dll","long","mixerClose","long",$hmxobj)
 If NOT @error Then Return True
 return False
EndFunc

Func mixerGetNumDevs()
 $ret = DLLCall("winmm.dll","long","mixerGetNumDevs")
 If NOT @error Then Return $ret[0]
 SetError(1)
 return False
EndFunc

So long,

Mega


Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Share this post


Link to post
Share on other sites

BigDod is right

I have heard sound systems like yours that play so low you cant hear it, so getting an amplified speaker system will work... and some have a plug-in for headphones

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

BigDod is right

I have heard sound systems like yours that play so low you cant hear it, so getting an amplified speaker system will work... and some have a plug-in for headphones

8)

But, the sound works fine, its just on this one dvd, its like really crap quality.

# MY LOVE FOR YOU... IS LIKE A TRUCK- #

Share this post


Link to post
Share on other sites

&, where can I find

MXSelectInputSrc_include.au3


# MY LOVE FOR YOU... IS LIKE A TRUCK- #

Share this post


Link to post
Share on other sites

;added constants as i needed them so not really in order.
CONST $MMSYSERR_NOERROR=0
CONST $WAVERR_BASE=32
CONST $WAVERR_BADFORMAT =($WAVERR_BASE + 0)
CONST $MAXPNAMELEN= 32

 CONST $MIXERLINE_COMPONENTTYPE_DST_FIRST= 0
CONST $MIXERLINE_COMPONENTTYPE_DST_SPEAKERS=($MIXERLINE_COMPONENTTYPE_DST_FIRST+4)

CONST $MIXER_GETLINEINFOF_COMPONENTTYPE=3
CONST $MIXERLINE_COMPONENTTYPE_SRC_FIRST= 0x1000
CONST $MIXERLINE_COMPONENTTYPE_SRC_MICROPHONE= ($MIXERLINE_COMPONENTTYPE_SRC_FIRST+3)
CONSt $MIXERLINE_COMPONENTTYPE_DST_WAVEIN =($MIXERLINE_COMPONENTTYPE_DST_FIRST+7)
CONST $MIXERLINE_COMPONENTTYPE_DST_LAST =($MIXERLINE_COMPONENTTYPE_DST_FIRST+8)
CONSt $MIXER_GETLINEINFOF_SOURCE= 1

CONST $MIXER_GETLINEINFOF_DESTINATION=0
CONST $MIXER_GETLINEINFOF_LINEID =2
CONST $MIXERCONTROL_CT_SC_LIST_SINGLE =  0x00000000
CONST $MIXERCONTROL_CT_CLASS_LIST  =        0x70000000
CONST $MIXERCONTROL_CT_SC_LIST_MULTIPLE  =  0x01000000
CONST $MIXERCONTROL_CT_UNITS_BOOLEAN   =    0x00010000
CONST $MIXERCONTROL_CT_CLASS_MASK =         0xF0000000
CONST $MIXERCONTROL_CONTROLTYPE_MULTIPLESELECT= BitOR($MIXERCONTROL_CT_CLASS_LIST , $MIXERCONTROL_CT_SC_LIST_MULTIPLE , $MIXERCONTROL_CT_UNITS_BOOLEAN)
CONST $MIXERCONTROL_CONTROLTYPE_MIXER   =     ($MIXERCONTROL_CONTROLTYPE_MULTIPLESELECT + 1)
CONST $MIXERCONTROL_CONTROLTYPE_SINGLESELECT=   BitOR($MIXERCONTROL_CT_CLASS_LIST , $MIXERCONTROL_CT_SC_LIST_SINGLE , $MIXERCONTROL_CT_UNITS_BOOLEAN)
CONST $MIXERCONTROL_CONTROLTYPE_MUX =($MIXERCONTROL_CONTROLTYPE_SINGLESELECT+1)
CONST $MIXER_GETCONTROLDETAILSF_VALUE= 0
CONST $MIXER_SETCONTROLDETAILSF_VALUE= 0
CONST $MIXERCONTROL_CONTROLF_UNIFORM= 1
CONST $MIXERCONTROL_CONTROLF_MULTIPLE= 2

CONSt $MIXERCONTROL_CT_SC_METER_POLLED =0
CONST $MIXERCONTROL_CT_CLASS_METER= 0x10000000
CONST $MIXERCONTROL_CT_UNITS_SIGNED= 0x20000
CONST $MIXERCONTROL_CT_UNITS_UNSIGNED= 0x30000
CONST $MIXERCONTROL_CT_CLASS_FADER= 0x50000000
CONST $MIXERCONTROL_CT_CLASS_NUMBER= 0x30000000
CONST $MIXERCONTROL_CONTROLTYPE_FADER= BitOR($MIXERCONTROL_CT_CLASS_FADER,$MIXERCONTROL_CT_UNITS_UNSIGNED)
CONST $MIXERCONTROL_CONTROLTYPE_VOLUME= ($MIXERCONTROL_CONTROLTYPE_FADER+1)
CONST $MIXERCONTROL_CONTROLTYPE_UNSIGNEDMETER= BitOR($MIXERCONTROL_CT_CLASS_METER,$MIXERCONTROL_CT_SC_METER_POLLED,$MIXERCONTROL_CT_UNITS_UNSIGNED)
CONST $MIXERCONTROL_CONTROLTYPE_UNSIGNED =BitOR($MIXERCONTROL_CT_CLASS_NUMBER,$MIXERCONTROL_CT_UNITS_UNSIGNED)
CONST $MIXERCONTROL_CONTROLTYPE_SIGNED =BitOR($MIXERCONTROL_CT_CLASS_NUMBER,$MIXERCONTROL_CT_UNITS_SIGNED)

CONST $MIXER_OBJECTF_WAVEIN= 0x20000000
CONST $MIXER_SHORT_NAME_CHARS= 16
CONST $MIXER_LONG_NAME_CHARS= 64
CONST $MIXER_GETLINECONTROLSF_ALL =0
CONST $MIXER_GETLINECONTROLSF_ONEBYID= 1
CONST $MIXER_GETLINECONTROLSF_ONEBYTYPE= 2
CONST $MIXER_OBJECTF_HANDLE= 0x80000000
CONST $MIXER_OBJECTF_MIXER =0
CONST $MIXER_OBJECTF_HMIXER= BitOR ($MIXER_OBJECTF_HANDLE,$MIXER_OBJECTF_MIXER)
CONST $MIXER_GETCONTROLDETAILSF_LISTTEXT=1
CONST $CALLBACK_NULL= 0
CONST $WAVE_MAPPED= 4
CONST $MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT =($MIXERLINE_COMPONENTTYPE_SRC_FIRST+8)

CONST $wMid=1
CONST $wPid=2
CONST $vDriverVersion=3
CONST $szPname=4
CONST $dwFormats=5
CONST $wChannels=6
CONST $wReserved1=7
CONST $AWICAPS_SIZEOF=$wReserved1+1

;mixer 
CONST $fdwSupport=5
CONST $cDestinations=6
CONST $AMXCAPS_SIZEOF=$cDestinations+2;leave room for num cells

;line struct
 CONST $cbStruct=1
 CONST $dwDestination=2
 CONST $dwSource=3
 CONST $dwLineID=4
 CONST $fdwLine=5
 CONST $dwUser=6
 CONST $dwComponentType=7
 CONST $cChannels=8
 CONST $cConnections=9
 CONST $cControls=10
 CONST $szShortName=11
 CONST $szName=12
    CONST $dwType=13
    CONST $dwDeviceID=14
    CONST $wMMid=15
    CONST $wMPid=16
    CONST $vMDriverVersion=17
    CONST $szMPname=18
$AMXLINE_SIZEOF=$szMPname+2

CONST $cbCStruct=   1
CONST $dwCLineID=   2
CONST $dwControlID= 3
CONST $dwControlType=4
CONST $cCControls=  5
CONST $cbmxctrl=    6
CONST $pamxctrl=    7
CONST $MXXTRLS_SIZEOF=$pamxctrl+2

CONST $lst_destname=            1
CONST $lst_dwComponentType=     2
CONST $lst_ctrid=           3

CONST $MIX_HMXOBJ=  1
CONST $MIX_DEVNAME=     2
CONST $MIX_CAPCDEST=    3

CONST $MIX_RECNAME=     4
CONST $MIX_CCONNECTIONS= 5
CONST $MIX_INCCONTROLS= 6
CONST $MIX_DWLINEID=    7
CONST $MIX_INCHANNELS=  8
CONST $MIX_INMULTIITEMS=    9
CONST $MIX_INCTRLID=    10
CONST $MIX_OUTCHANNELS=11
CONST $MIX_OUTMULTIEMS=12
CONST $MIX_OUTCTRLID=   13
CONST $MIX_LAST=$MIX_OUTCTRLID+1
CONST $AMIX_SIZEOF= $MIX_LAST+1
Dim $mxline[$AMXLINE_SIZEOF]
Dim $mixers[1][$AMIX_SIZEOF]
Dim $mxInList[2][4] 
$mixernames=""
$FormSelectInput =0
$TV_SelectInput = 0
$CMB_DevName=0
$CKB_EnableLinefocus =0
$defaultmixer=0
$lastlinesrc=-1
$curmixer=$defaultmixer

So long,

Mega


Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Share this post


Link to post
Share on other sites

please let us know if this worked for you ( the posted codes by th.meger )

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

It works, but its the same as the windows volume control, I was asking if it was possible to make it louder than however much the windows control goes up to


# MY LOVE FOR YOU... IS LIKE A TRUCK- #

Share this post


Link to post
Share on other sites

as i thought... you will need powered speakers

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

Oke, ^^ Thanks for the help. Not going to get any though, soon, once my rooms done, im gonna plug it into the stereo. Big speakers xD


# MY LOVE FOR YOU... IS LIKE A TRUCK- #

Share this post


Link to post
Share on other sites

Oke, ^^ Thanks for the help. Not going to get any though, soon, once my rooms done, im gonna plug it into the stereo. Big speakers xD

It is possible to extract the audio and amplify it using Audacity, have a look here http://www.videohelp.com/


2015 - Still no flying cars, instead blankets with sleeves.

Share this post


Link to post
Share on other sites

My problem is that it seems that the "$admsg = GuiGetMsg(1)" in the script along with my standard "$msg = GuiGetMsg()" is causing a slight conflict. It is causing my GUI to act sluggish, buttons are not as responsive...sometimes two or three button pushes to get things going. I am planning on putting it in a "secondary script", basically have my main app launch a background app which would be this volume script. Before I do that, I wanted to check if there was a way to fix my problem so it isn't sluggish and everything works smoothly together so I didn't have to do the secondary app thing.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0