ツリー一括表示

Nomal 音量を変えたりしたいんですが… / (11/06/16(Thu) 15:30) [#5324]
Nomal Re[7]: 音量を変えたりしたいんですが… /Mr. K (17/04/26(Wed) 02:58) [#7740]
Nomal Re[1]: 音量を変えたりしたいんですが… /metola (16/02/28(Sun) 21:03) [#7332]
Nomal Re[1]: 音量を変えたりしたいんですが… /abracadabra (11/06/20(Mon) 18:29) [#5325]
  └Nomal Re[2]: 音量を変えたりしたいんですが… / (11/06/21(Tue) 15:25) [#5326]
    └Nomal Re[3]: 音量を変えたりしたいんですが… /abracadabra (11/06/21(Tue) 19:53) [#5327]
      └Nomal Re[4]: 音量を変えたりしたいんですが… /abracadabra (11/06/21(Tue) 19:58) [#5328]
        └Nomal Re[5]: 音量を変えたりしたいんですが… / (11/06/28(Tue) 20:44) [#5334]
          └Nomal Re[6]: 音量を変えたりしたいんですが… /abracadabra (11/07/04(Mon) 12:05) [#5335]


親記事 / ▼[ 7740 ] ▼[ 7332 ] ▼[ 5325 ]
/ 親階層)  音量を変えたりしたいんですが…
□投稿者/ 【126.131.64.33】(2011/06/16(Thu) 15:30:56)

    MCIによる音量制御はできますが、パソコン本体の音量(以下、マスタ)を変更することはできますか?ミュートもできたらと思います。
    APIとかで実現できないでしょうか。詳しい方お願いします。
    また、もう一つ、マイクの音量を変更することはできませんか?
    http://stoneofkingdom.web.fc2.com/001.png
    上のリンク先にある画像で調整できるものです。
    音量と、ミュート設定ができないか、教えてください!

    *(2011/06/17(Fri) 21:51:16 編集[投稿者])
[ □ Tree ] 返信 削除キー/
[ □ Tree ] 返信

▲[ 5324 ] / 返信無し
/ 1階層)  Re[7]: 音量を変えたりしたいんですが…
□投稿者/ Mr. K 【218.42.4.233】(2017/04/26(Wed) 02:58:04)

[ 親 5324 / □ Tree ] 返信 削除キー/
[ 親 5324 / □ Tree ] 返信

▲[ 5324 ] / 返信無し
/ 1階層)  Re[1]: 音量を変えたりしたいんですが…
□投稿者/ metola 【61.245.69.210】(2016/02/28(Sun) 21:03:07)

    わたしも同じ悩みを抱えていまして、
    こんなのをつくってみました。試してみてください。

    !VOL_MUTE = 『{END}』
    !VOL_20UP = 『{PGUP}』
    !VOL_1UP = 『{UP}』
    !VOL_END = 『{ESC}』

    !SET_PCVOL = 45

    「sndvol.exe」を起動
    1から1000まで繰り返す
     「音量ミキサー*」の窓ハンドル検索してミキサー窓に代入。
     ミキサー窓が0でないならば抜ける
     0.2秒待つ。

    ミキサー窓にVOL_MUTEをキー送信
    CurVol=0

    1から100まで繰り返す
     もし、(SET_PCVOL-CurVol<1)ならば
      抜ける
     違えば、もし(SET_PCVOL-CurVol<20)ならば
      ミキサー窓にVOL_1UPをキー送信
      CurVol=CurVol+1
     違えば、
      ミキサー窓にVOL_20UPをキー送信
      CurVol=CurVol+20

    ミキサー窓にVOL_ENDをキー送信

    #他に検討するものとしては
    #http://www.nirsoft.net/utils/nircmd.html
[ 親 5324 / □ Tree ] 返信 削除キー/
[ 親 5324 / □ Tree ] 返信

▲[ 5324 ] / ▼[ 5326 ]
/ 1階層)  Re[1]: 音量を変えたりしたいんですが…
□投稿者/ abracadabra 【203.179.24.126】(2011/06/20(Mon) 18:29:14)

    ※マスタ音量ならなでしこ上からVBSを実行する下記のコードでいじれました。マイク等の変更のやり方は分かりません。


    Function TEST(a)
      Set DX = CreateObject("MSWebDVD.MSWebDVD")
      TEST = DX.volume
      DX.Volume = a
    End Function
    」をVBSCRIPTコード追加。


    ※全音量(0)〜無音(-10,000)で設定
    音量は、-8000。/*←自由に変更*/
      
    「TEST({音量})」をVBSCRIPTする。
    変更前音量はそれ。 ※変更前の音量をVBSの戻り値に設定し「変更前音量」に格納。
              ※元の音量に戻したいときのために。

    「もともとの音量は {変更前音量} です。」と言う。

    おわり。

    ●母艦設計
     母艦の可視はオフ。

[ 親 5324 / □ Tree ] 返信 削除キー/
[ 親 5324 / □ Tree ] 返信

▲[ 5325 ] / ▼[ 5327 ]
/ 2階層)  Re[2]: 音量を変えたりしたいんですが…
□投稿者/ 【126.131.158.106】(2011/06/21(Tue) 15:25:03)

    No5325に返信(abracadabraさんの記事)
    > ※マスタ音量ならなでしこ上からVBSを実行する下記のコードでいじれました。マイク等の変更のやり方は分かりません。
    >
    > 「
    > Function TEST(a)
    >   Set DX = CreateObject("MSWebDVD.MSWebDVD")
    >   TEST = DX.volume
    >   DX.Volume = a
    > End Function
    > 」をVBSCRIPTコード追加。
    >
    >
    > ※全音量(0)〜無音(-10,000)で設定
    > 音量は、-8000。/*←自由に変更*/
    >   
    > 「TEST({音量})」をVBSCRIPTする。
    > 変更前音量はそれ。 ※変更前の音量をVBSの戻り値に設定し「変更前音量」に格納。
    >           ※元の音量に戻したいときのために。
    >
    > 「もともとの音量は {変更前音量} です。」と言う。
    >
    > おわり。
    >
    > ●母艦設計
    >  母艦の可視はオフ。

    ソースをそのまま貼り付けたら、こんなエラーが出ました。どうすればいいですか?

    [エラー] com.nadesi.exe.nakopad.temp.nako1.bak(1): 関数『VBSCRIPTコード追加』の実行中にエラーが起きました。文字が正しくありません。(関数)

[ 親 5324 / □ Tree ] 返信 削除キー/
[ 親 5324 / □ Tree ] 返信

▲[ 5326 ] / ▼[ 5328 ]
/ 3階層)  Re[3]: 音量を変えたりしたいんですが…
□投稿者/ abracadabra 【203.179.24.126】(2011/06/21(Tue) 19:53:09)

    投稿前は平気だったんですが、投稿後のをコピペしたらエラーが出ちゃいました…
    部分のSet〜DXの3行の頭にあるタブを削除したらうまく動きました。


    <修正前>
    Function TEST(a)
      Set DX = CreateObject("MSWebDVD.MSWebDVD")
      TEST = DX.volume
      DX.Volume = a
    End Function


    <修正後>
    Function TEST(a)
    Set DX = CreateObject("MSWebDVD.MSWebDVD")
    TEST = DX.volume
    DX.Volume = a
    End Function
[ 親 5324 / □ Tree ] 返信 削除キー/
[ 親 5324 / □ Tree ] 返信

▲[ 5327 ] / ▼[ 5334 ]
/ 4階層)  Re[4]: 音量を変えたりしたいんですが…
□投稿者/ abracadabra 【203.179.24.126】(2011/06/21(Tue) 19:58:25)

    事象が分かりましたので追記します。



    > Set〜DXの3行の頭にあるタブを削除したらうまく動きました。

    「Set〜DXの3行の頭に」あるのがタブであれば動きますが、全角スペース×2だとエラーとなるようです。
    また、投稿時にタブであっても、投稿後には全角スペース×2に置換されるようです。
[ 親 5324 / □ Tree ] 返信 削除キー/
[ 親 5324 / □ Tree ] 返信

▲[ 5328 ] / ▼[ 5335 ]
/ 5階層)  Re[5]: 音量を変えたりしたいんですが…
□投稿者/ 【126.131.158.106】(2011/06/28(Tue) 20:44:37)

    No5328に返信(abracadabraさんの記事)
    > 事象が分かりましたので追記します。
    >
    >
    >
    >>Set〜DXの3行の頭にあるタブを削除したらうまく動きました。
    >
    > 「Set〜DXの3行の頭に」あるのがタブであれば動きますが、全角スペース×2だとエラーとなるようです。
    > また、投稿時にタブであっても、投稿後には全角スペース×2に置換されるようです。

    忙しくてのぞけなくてすいません。
    やってみましたが、たぶん環境的なエラーが…

    [エラー] com.nadesi.exe.nakopad.temp.nako1.bak(11): 関数『VBSCRIPT』の実行中にエラーが起きました。ActiveX コンポーネントはオブジェクトを作成できません。: 'MSWebDVD.MSWebDVD'(関数)

[ 親 5324 / □ Tree ] 返信 削除キー/
[ 親 5324 / □ Tree ] 返信

▲[ 5334 ] / 返信無し
/ 6階層)  Re[6]: 音量を変えたりしたいんですが…
□投稿者/ abracadabra 【203.179.24.126】(2011/07/04(Mon) 12:05:24)

    すいません。
    自分の環境ではうまくいったので、どなたか再現できる人or分かる人の助言をまってください。
[ 親 5324 / □ Tree ] 返信 削除キー/
[ 親 5324 / □ Tree ] 返信


Pass/

BBS CGI RSS CGI
Child Tree RSS/SPAM対応版