.版本 2 .子程序 _播放窗口_尺寸被改变 执行成功否 ＝ 多媒体命令 (“put MCI window at 0 0 ” ＋ 到文本 (播放窗口.取用户区宽度 ()) ＋ “ ” ＋ 到文本 (播放窗口.取用户区高度 ()), “0”, 0, 0) .子程序 _播放窗口_可否被关闭, 逻辑型 播放窗口.可视 ＝ 假 执行成功否 ＝ 多媒体命令 (“stop MCI”, “0”, 0, 0) _启动窗口.标签5.标题 ＝ “暂停状态” 是否播放中 ＝ 假 _启动窗口.时钟1.时钟周期 ＝ 0 返回 (假) .子程序 _播放窗口_被激活 .如果真 (播放窗口.位置 ＝ 3) _启动窗口.检测鼠标时钟.时钟周期 ＝ 200 .如果真结束