7.10 图 表 制 作

运用Lingo语句可以很方便地控制Field窗口中的文字的动画，本节实例将创建一个控制Field窗口中文字的动画。

控制Field窗口中文字动画制作操作步骤如下：

(1) 进入Director 8.5。执行Modify→Movie→Properties命令，在弹出的舞台属性检查器对话框中将电影舞台的大小设置为400×400，将背景颜色设置为白色，如图7-83所示。

图7-83 设置舞台的属性

(2) 按Ctrl+8组合键，打开Field窗口，设置字体和大小，输入文本Jordan，如图7-84所示。

图7-84 创建Cast演员1

(3) 单击窗口左上角的“+”按钮，创建新的窗口，输入文本Tome，如图7-85所示。

图7-85 创建Cast演员2

(4) 按Ctrl+6组合键，弹出Text窗口，设置字体和大小，输入文本 “要添加的人名单”，如图7-86所示。

图7-86 创建Cast演员3

(5) 单击窗口左上角的“+”按钮，创建新的窗口，输入文本“添加后的人名单”，如图7-87所示。

图7-87 创建Cast演员4

(6) 单击窗口左上角的“+”按钮，创建新的窗口，输入文本“添加”，设置字体为“华文彩云”，如图7-88所示。

图7-88 创建Cast演员5

(7) 按照步骤(6)的方法，再新建两个文本“名单”和“退出”。

(8) 在工作窗口单击工具栏中的Script按钮，弹出Script窗口，Lingo脚本类型设置为Movie，在其中输入以下全局变量，如图7-89所示。

global nameword

global bb

on findWord

nameword = member(1).text

end

图7-89 Movie脚本

(9) 单击精灵1，在Property Inspector窗口中单击Editable按钮，使该编辑区在运行时为可编辑，如图7-90所示。

图7-90 设置精灵1的属性

(10) 打开Field选项卡，设置编辑区的线宽为One Pixel。如图7-91所示。

图7-91 设置编辑区边框

(11) 选中精灵2，使用与步骤(9)、(10)相同的方法为其添加边框。效果如图7-92所示。

图7-92 添加边框效果

(12) 双击Script通道的第1帧，打开Script窗口，输入以下Lingo语句，如图7-93所示。

on exitFrame me

go to the frame

end

图7-93 第1帧Lingo脚本

(13) 选中舞台上的精灵3 (添加)，单击右键，在快捷菜单中选择Script命令，打开Script窗口为其添加以下的Lingo语句，如图7-94所示。

on mouseUp me

findword

global nameword

global bb

if nameWord = "" then

alert "Please enter a name"

exit

end if

set member(2).text=nameword & return & bb

set bb = member(2).text

set member(1).text=""

end

图7-94 精灵3的Lingo脚本

(14) 选中舞台上的精灵7(名单)，单击右键，在快捷菜单中选择Script命令，打开Script窗口为其添加以下的Lingo语句，如图7-95所示。

on mouseUp me

global bb

alert "The Name List is:" & QUOTE & return & bb & QUOTE

end

图7-95 精灵7的Lingo脚本

(15) 选中舞台上的精灵8(退出)，单击右键，在快捷菜单中选择Script命令，打开Script窗口为其添加以下的Lingo语句，如图7-96所示。

on mouseUp me

go to frame 28

end

图7-96 精灵8的Lingo脚本

(16) 双击Script通道的第28帧，打开Script窗口，输入以下Lingo语句，如图7-97所示。

on exitFrame me

global bb

set member(2).text = " "

set bb = ""

quit

end

图7-97 第1帧Lingo脚本

(17) 至此，图表动画的制作完成了，播放效果如图7-98所示。

图7-98 播放效果