sample\mmaudio\mmaudio3.hsp » Plain Format
#use strict #use mod_mmaudio ; mod_mmaudioモジュールサンプル(3) ; (Windows Vista以降で動作します) ; オーディオのマスター音量を表示します ; ボタンにより音量/ミュート状態を変更できます button gosub "MUTE",*a_mute button gosub "VOL50",*a_vol50 button gosub "VOL75",*a_vol75 button gosub "VOL100",*a_vol100 *main vol=GetMasterVolume() ; 音量を取得する(0-100) mute=GetMute() ; ミュート状態を取得する(0-1) redraw 0 color 255,255,255 : boxf color 0,0,0:pos 100,0 mes "Volume = "+vol mes "Mute = "+mute redraw 1 await 1000/30 goto *main *a_mute mute=1-mute ; ミュート状態を反転する SetMute mute return *a_vol50 SetMasterVolume 50 return *a_vol75 SetMasterVolume 75 return *a_vol100 SetMasterVolume 100 return