ひとりゴト

音量調整.UWS

さっき作ったスクリプトを日記に書いてみる。短くて単純。Win標準付属のボリュームコントロールというプログラムを操作して音量を調整するという内容。PC環境によって設定値は異なるので最初の二行は要変更。Volは0で最大、255で最小。Mas = 5;MasVol = 110//5番目のマスターを中の上(110)に。Mic = 9;MicVol = 0//9番目のマイクを...//ボリュームコントロールが起動していなければ起動。id = getid("ボリューム コントロール")if id < 0 then id = exec("sndvol32.exe /s")//sオプションで小さいウィンドウ。rオプションで録音コントロール//スライダーを操作して音量を調整する。setslider(id, MasVol, Mas);setslider(id, MicVol, Mic)これをタスクスケジューラで指定した時間に呼び出して使う。作成した理由は、パソコンでラジオを録音している時、普段は録音中にパソコンからラジオの音が聞こえないよう消音状態になっているんだけど、リアルタイムで聴きたい日時にだけ、マスターとマイク（ライン）ボリュームを上げたいから。これだけなら、VBスクリプトでレジストリ操作するだけでも出来るかもしれないけど、やっぱりUWSCが好きなんで。スクリプトを編集しなくても他の環境でも使えるようにするのが理想かな。UWSC.EXE 音量調整.UWS マイク=0 WAVE=100　みたいな感じで。----その音を出したい日時は土曜１４時。サタデー・ホットリクエストというNHK FMの番組が流れている。その時間には、ちょうどバイト前だと知らせるアラームが鳴るので、ついでに音を出しちゃえというわけだ。この番組のパーソナリティーによるグタグダぼけぼけトークは別につまらなくもないし、毎回登場するゲストを目的に毎週録音して聴いている。こういっちゃ失礼かもしれないがゲストはマイナーな人が多い。　だ　が　そ　れ　が　い　い　。だってヲタだもの(｀・ω・´)録音しておけば聴きたくない部分は飛ばせて、トーク部分を倍速再生(速聴)して時間の節約にも。聴きたくない部分については秘密。まぁNHKが媚びてるアレだ。アノ情報はどうでも良いを通り越して嫌悪感を感じるほどになった。・・・つーか今、まさに流れてる。この時間だけMicVol=255にしちゃおうか。