图 表 制 作

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

vd;k;l www.it55.com rdfg

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

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

sflj www.it55.com kg^&fgd

45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

图7-83  设置舞台的属性 it55.com

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

图7-84  创建Cast演员1 vd;k;l www.it55.com rdfg

(3) 单击窗口左上角的“+”按钮，创建新的窗口，输入文本Tome，如图7-85所示。 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

图7-85  创建Cast演员2 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

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

www.it55.com在线教程

图7-86  创建Cast演员3 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

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

sflj www.it55.com kg^&fgd

图7-87  创建Cast演员4 vd;k;l www.it55.com rdfg

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

vd;k;l www.it55.com rdfg

图7-88  创建Cast演员5

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

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

global nameword IT资讯之家 www.it55.com

global bb

on findWord

IT资讯之家 www.it55.com

  nameword = member(1).text

www.it55.com

end

45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

图7-89  Movie脚本 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

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

www.it55.com

图7-90  设置精灵1的属性 sflj www.it55.com kg^&fgd

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

免费资源www.it55.com

图7-91  设置编辑区边框

免费资源www.it55.com

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

http://www.it55.com/

图7-92  添加边框效果

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

on exitFrame me

http://www.it55.com/

  go to the frame

it55.com

end

it55.com

http://www.it55.com/

图7-93  第1帧Lingo脚本 sflj www.it55.com kg^&fgd

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

http://www.it55.com/

on mouseUp me sflj www.it55.com kg^&fgd

  findword

  global nameword

www.it55.com在线教程

  global bb vd;k;l www.it55.com rdfg

  if nameWord = "" then http://www.it55.com/

    alert "Please enter a name"

IT资讯之家 www.it55.com

    exit

  end if www.it55.com在线教程

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

  set bb = member(2).text sflj www.it55.com kg^&fgd

  set member(1).text=""

http://www.it55.com/

end

vd;k;l www.it55.com rdfg

图7-94  精灵3的Lingo脚本 IT资讯之家 www.it55.com

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

on mouseUp me

  global bb www.it55.com

  alert "The Name List is:" &  QUOTE & return & bb & QUOTE 免费资源www.it55.com

end www.it55.com在线教程

免费资源www.it55.com

图7-95  精灵7的Lingo脚本

www.it55.com

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

on mouseUp me sflj www.it55.com kg^&fgd

  go to frame 28

end

sflj www.it55.com kg^&fgd

图7-96  精灵8的Lingo脚本 it55.com

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

on exitFrame me www.it55.com

  global bb vd;k;l www.it55.com rdfg

  set member(2).text = " "

  set bb = "" vd;k;l www.it55.com rdfg

  quit vd;k;l www.it55.com rdfg

end it55.com

免费资源www.it55.com

图7-97  第1帧Lingo脚本

(17) 至此，图表动画的制作完成了，播放效果如图7-98所示。 vd;k;l www.it55.com rdfg

www.it55.com

图7-98  播放效果

（编辑：IT资讯之家 www.it55.com）