MIDI背景音乐应用攻略

王朝other·作者佚名  2008-05-21
窄屏简体版  字體: |||超大  

Authorware 5.2支持的声音文件格式有一些限制,只有WAV、AIFF⑿CM和SWA扩展后缀名的文件才可直接导入到Authorware程序中,尽管Authorware 6.0开始支持MP3格式声音文件的播放和插入,但还是不支持MIDI文件的直接使用。我们知道MIDI文件使用的是数字乐器,换句话说MIDI文件并没有真正地记录了音频信息,而是象乐谱一样记录了各种乐器的和声和音高节奏,具体的演奏任务由声卡所带的数字乐器完成。MIDI音乐有着体积信息小的特点,而且不会与WAV声音通道冲突,因此在进行多媒体开发时经常用来做背景音乐,但Authorware并不直接提供对MIDI声音文件格式的支持,怎么办呢?别急,Authorware提供了外部函数的接口可以解决这个问题:利用第三方的UCD外部函数,我们可以实现对MIDI声音文件的支持。下面我们就一起来制作两个关于MIDI背景音乐循环播放的范例吧!

3.1 循环播放MIDI背景音乐

在这里我们要实现的目的是让MIDI背景音乐循环的播放,具体思路是通过导入Authorware的外部函数MidiLoop.U32相关的两个扩展函数,实现对MIDI背景音乐的循环播放。

在介绍范例前我们简单介绍一下MidiLoop.U32的相关扩展函数:

Result:=LoopMidi(File)

这个函数的功能是对程序指定的MIDI音乐进行循环播放,直到用户中止为止。其中参数File就是用户自行指定的外部MIDI文件,当然,这里指定的MIDI声音文件并没有导入程序内部,只是存在一种相当于链接的关系。

Result:=StopMidi()

这个函数的功能是停止当前正在播放的MIDI音乐。参数为VOID型。

1、 执行界面预览,如图3.1

图3.1 范例程序执行效果

2、 程序的流程图如图3.2

图3.2 范例程序流程图

3、 操作步骤:

1) 新建一个文件,并调入外部函数MidiLoop.U32的相关扩展函数,如图3.3

图 3.3 调入MidiLoop.U32的相关扩展函数

2) 加入一个计算机,设置运行窗口的大小,计算图标的内容为:

ResizeWindow(320,240) ------ResizeWindow是一个系统函数,设置窗口的大小

3) 设置背景图标“Background”。

4) 开始播放MIDI声音文件,在计算图标里写上:

stop:=0 -----stop为自定义变量,用来控制MIDI

LoopMidi(FileLocation^"midi.mid") -----程序开始播放MIDI背景音乐

5) 设置对MIDI音乐的开关控制以及程序的退出。分别建立三个Button按钮响应交互,返回类型设置如图3.2。

在“Stop Midi”按钮响应交互计算图标里输入代码:

stop:=1

StopMidi()

在“Replay Midi”按钮响应交互计算图标里输入代码:

if stop=1 then

LoopMidi(FileLocation^"midi.mid")

stop:=0

end if

在“Exit”按钮响应交互计算图标里输入代码:

StopMidi() ------停止MIDI背景音乐播放

Quit() ------退出程序

6) 存盘完成。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航