Authorwar中背景音乐的制作
2007年10月25日 by xxjswxh
Authorware中不可以同时播放两个wav声音，当课件中已经有了一个wav的课件解说声，如何在给课件添加背景音乐呢？添加的背景音乐又改如何控制它的启与停呢？下面我们就来谈谈利用MIDILOOP来导入MIDI的背景音乐。
1． 外部先导入MIDILOOP.U32函数
LoopMidi(File) 加载midi音乐，例如：LoopMidi("c:\\midi\\metal.mid").
这个是利用绝对路径的导入音乐，打包后可能会提示找不到音乐，所以我们习惯还有用相对路径的导入，具体方法如下：把要导入的midi音乐放到源程序的目录下，使用如下的命令格式：
LoopMidi(Filelocation^”metal.mid")
StopMidi（） 控制midi音乐停，没有参数。
2.音乐的控制
程序的流程：
（1）拖一个交互图标到流程线上，设置为按钮交互（假设按钮名为“音乐”），按钮的属性为“永久”、“返回”，其余属性默认。
（2）拖一个计算图标在按钮之下，代码如下：（变量I的初值为0）
I:=I+1;
If(mod(I,2)=0) then StopMidi()
Else loopMidi(Filelocation^”metal.mid”)
整个程序制作完成。运行时，可以听到音乐播放，单击“音乐”按钮，声音停止；再次单击“音乐”按钮，则声音继续播放。很不错哦，你可以试一试！