Authorware基础教程:authorware7地ActiveX控件(3)

动画精灵制作实例介绍如下。

一、我们根据前面讲过的内容做一个控制精灵的实例，程序的效果图如图5-7所示。

图5-7  精灵实例效果图

二、程序的流程图如图5-8所示，交互有8个交互按钮，分别实现对精灵的各种控制。

图5-8  精灵实例流程图（一）

三、“setup”和“装载精灵”计算图标的内容如下。

1）在“setup”计算图标中输入：

string:="第一次运行此程序需要安装msagent2.0服

务驱动程序和语音驱动程序,确认吗?"

result:=messagebox( windowhandle, string, "三石工

作室", 49)

if result=1 then

 jumpoutreturn(filelocation^"msagent2.0.exe" , "" , "")

    jumpoutreturn(filelocation^"speak.exe","","")

else

    goto(iconid@"装载精灵")

end if

要求用户在第一次运行程序是询问是否要安装动画精灵的驱动程序。

2）在“装载精灵”计算图标中输入：

maremove(id)

id:=maload(filelocation^"genie.acs")

卸载掉之前出现的动画精灵，再装载新的精灵“genie.acs”。

四、八个交互计算图标内容的设置。

1）在“显示精灵”计算图标内输入：

mashow(id,100,100,1,0)

2）在“隐藏精灵”计算图标内输入：

mahide(id)

3）在“移动精灵”计算图标内输入：

mamove(id,50,60)

4）在“朗读英文”计算图标内输入：

maspeak(id,"how are you","")

5）在“招手动作”计算图标内输入：

magesture(id,120,130)

6）在“施展魔法”计算图标内输入：

maplay(id,"domagic2")

7）在“停止动作”计算图标内输入：

mastopall(id)

8）在“清除精灵”计算图标内输入：

maremove(id)

后面的几个按钮如图5-9所示。

图5-9  精灵实例流程图（二）