K-Meleon :: Extensions

Extensions : K-Meleon Forum

All about K-Meleon extensions.

Goto: Forum List•Message List•Search•Log In

Your Name:
Subject:

Help information

[quote=mhf]
Thanks again disrupted - if you do a scroogle on "controlling two sound cards in xp" you'll see that there are thousands of requests for information about how to do this very same thing ! So, maybe we won't be the only two to use it.

Apart from that I had a few problems with the macro, for one thing I'm somewhat colourblind so red and green don't go well together - it's hard to distinguish them. And then, I didn't realize at first that the soundcard names had to be changed further down. Here is what I've done - could you check it please for mistakes as I don't get the checkmark in the menu etc.

____________________________________________

# K-Meleon Macros (http://kmeleon.sourceforge.net/wiki/index.php?id=MacroLanguage)

# --------toggles soundcards(requires at least 2 audio devices)

#--edit values below according to soundcard names and regkey paths
$sc_primary=("SoundMAX Digital Audio");
$sc_secondary=("USB Headphone Set");
$primary_key=("C:\Program Files\K-Meleon\soundcard1.reg");
$secondary_key=("C:\Program Files\K-Meleon\soundcard2.reg");
#--end of edit values
#-------------------------------------------------------------------------------------------------

$_tool_path=getfolder(RootFolder)."\\Tools";
$primary_alert=getfolder(RootFolder)."\\Tools\\soundcontrol\\sc1.wav";
$second_alert=getfolder(RootFolder)."\\Tools\\soundcontrol\\sc2.wav";

primarysoundmax{
menuchecked=(getpref(INT,"soundcard.default")=="1");
togglepref(INT,"soundcard.default",1,2);
$soundmax=getpref(INT,"soundcard.default");
$soundmax==1?&soundcard1:&soundcard2;
}

soundcard1{
exec("regedit.exe /s \"".$primary_key."\"");
$scprime=("soundcard switched: ".$sc_primary);
exec($_tool_path."\\soundcontrol\\scalert.exe " . $primary_alert);
statusbar($scprime);
}

setdefaultsc{
exec("regedit.exe /s \"".$primary_key."\"");
$scprime=("soundcard switched: ".$sc_primary);
exec($_tool_path."\\soundcontrol\\scalert.exe " . $primary_alert);
statusbar($scprime);
}

secondaryUSB{
menuchecked=(getpref(INT,"soundcard.default")=="2");
togglepref(INT,"soundcard.default",2,1);
$USB=getpref(INT,"soundcard.default");
$USB==2?&soundcard2:&setdefaultsc;
}

soundcard2{
exec("regedit.exe /s \"".$secondary_key."\"");
$scsecond=("soundcard switched: ".$sc_secondary);
exec($_tool_path."\\soundcontrol\\scalert.exe " . $second_alert);
statusbar($scsecond);
}

resettoprimary{
setpref(INT,"soundcard.default",1);
exec("regedit.exe /s \"".$primary_key."\"");
}

soundcards_BuildMenu{
#alternative menu for me:edit>configuration
#setmenu("_Config_General",popup,"SC Audiomapper",10);
setmenu("&Tools",popup,"SC Audiomapper",3);
setmenu("SC Audiomapper",macro,$sc_primary,primarycreative);
setmenu("SC Audiomapper",macro,$sc_secondary,secondaryfm801);
}

togglecards_SetAccels{
setaccel("CTRL ALT L","macros(primarycreative)");
}

#---------------------------------------------------------------
$OnInit=$OnInit."soundcards_BuildMenu;togglecards_SetAccels;";
$OnQuit=$OnQuit."resettoprimary;";
$macroModules=$macroModules."togglesoundcards;";

_____________________________________________________

And the two reg keys :

[HKEY_CURRENT_USER\Software\Microsoft\Multimedia\Sound Mapper\soundcard1]
"Playback"="SoundMAX Digital Audio"

[HKEY_CURRENT_USER\Software\Microsoft\Multimedia\Sound Mapper\soundcard2]
"Playback"="USB Headphone Set"

____________________________________________________

Thanks again ![/quote]

K-Meleon forum is powered by Phorum.