.支持庫 eMMedia
.支持庫 spec.程序集 窗口程序集1
.程序集變量 x, 整數型, , "1,2".子程序 __啟動窗口_創建完畢系統音量1.打開 (4) ' 要想調整音量必須先打開設備
系統音量1.取音量 (x [1] [1], x [1] [2]) ' 取出左右聲道的音量存到數組X
調試輸出 (x [1] [1], x [1] [2])
滑塊條1.位置 ＝ x [1] [1] ÷ 系統音量1.取最大音量 () × 滑塊條1.最大位置 ' 取出的左右聲道音量百分比調整滑動塊的位置 .子程序 _滑塊條1_位置被改變x [1] [1] ＝ 滑塊條1.位置 ÷ 滑塊條1.最大位置 × 系統音量1.取最大音量 () ' 取出滑塊位置的百分比乘以最大音量
x [1] [2] ＝ x [1] [1] ' 使左右音量壹樣
系統音量1.置音量 (x [1] [1], x [1] [2])’設置音量
調試輸出 (x).子程序 __啟動窗口_將被銷毀系統音量1.關閉 (2)