控制电脑音量模块例子

右音量 ＝ (滑块条2.位置 － 1) ÷ 8 × 100
左音量 ＝ 100 － 右音量
置音量 (左音量, 右音量)
标签1.标题 ＝ “左声道音量为：” ＋ 到文本 (左音量) ＋ “，右声道的音量为：” ＋ 到文本 (右音量)

.子程序 取音量, , 公开, 取出左右声道的音量，用参考变量，0～100
.参数 左声道音量, 整数型, 参考
.参数 右声道音量, 整数型, 参考
.局部变量 音量, 整数型

取得音量 (0, 音量)
左声道音量 ＝ 位与 (位或 (音量, 4294901760), 65535) ＼ 256
左声道音量 ＝ 左声道音量 × 100 ÷ 256
右声道音量 ＝ 位与 (位或 (音量, 65535), 4294901760) ÷ 65536 ＼ 256
右声道音量 ＝ 右声道音量 × 100 ÷ 256
.如果真 (右声道音量 ＜ 0)
.如果真 (右声道音量 ＝ -50)
右声道音量 ＝ 0
.如果真结束
右声道音量 ＝ 49 ＋ 取绝对值 (50 ＋ 右声道音量)