| 图形面板制作
运用Lingo语句可以控制Cast演员的生成，并能生成新的精灵，还可以设置精灵的通道和位置。
 图形面板制作操作步骤如下：
(1) 进入Director 8.5。执行Modify→Movie→Properties命令，在弹出的舞台属性检查器对话框中将电影舞台的大小设置为400×400，将背景颜色设置为白色，如图7-55所示。
图7-55 Movie的属性
(2) 按Ctrl+6组合键，打开Text窗口，设置字体为方正琥珀简体，字体大小为24，输入文本“椭圆”。创建一个文本“椭圆”后，形成Cast演员，如图7-56所示。
图7-56 第1个Cast演员
(3) 单击窗口左上角的“+”按钮，创建新的窗口，输入文本“矩形”，如图7-57所示。
图7-57 第2个Cast演员
(4) 单击窗口左上角的“+”按钮，创建新的窗口，输入文本“圆角矩形”，如图7-58所示。
图7-58 第3个Cast演员
(5) 按照步骤(4)，分别再创建2个窗口，并分别输入文本“直线”、“显示图形区，请单击按钮”。此时共生成5个Cast演员，如图7-59所示。
图7-59 生成5个Cast演员
(6) 将所有演员拖动到舞台适当位置上，生成5个精灵。并将它们的背景颜色设置为苹果绿色，如图7-60所示。
图7-60 精灵的位置
(7) 双击Script通道的第1帧，在弹出的Script窗口中，输入以下Lingo语句，如图7-61所示。
on exitFrame me
go to the frame
end
图7-61 第1帧的Lingo脚本
(8) 选中舞台上的精灵1，单击右键，在快捷菜单中选择Script命令，打开Script窗口，为其添加以下的Lingo语句，如图7-62所示。
on mouseUp me
set rectxy = the rect of sprite 5
new(#shape, member 15)
member(15).shapeType = #oval
member(15).filled = TRUE
member(15).pattern = 1
sprite(5).rect= rectxy
sprite(5).lineSize = 3
set the member of sprite 5 to member 15 of castLib "Internal"
end
图7-62 精灵1的Lingo脚本
(9) 选中舞台上的精灵2，在Script窗口为其添加以下的Lingo语句，如图7-63所示。
on mouseUp me
set rectxy = the rect of sprite 5
new(#shape, member 15)
member(15).shapeType = #rect
member(15).filled = TRUE
member(15).pattern = 2
sprite(5).rect= rectxy
sprite(5).lineSize = 3
set the member of sprite 5 to member 15 of castLib "Internal"
end
图7-63 精灵2的Lingo脚本
(10) 选中舞台上的精灵3，在Script窗口为其添加以下的Lingo语句，如图7-64所示。
on mouseUp me
set rectxy = the rect of sprite 5
new(#shape, member 15)
member(15).shapeType = #roundrect
member(15).filled = TRUE
member(15).pattern = 3
sprite(5).rect= rectxy
sprite(5).lineSize = 3
set the member of sprite 5 to member 15 of castLib "Internal"
end
图7-64 精灵3的脚本
(11) 选中舞台上的精灵4，在Script窗口为其添加以下的Lingo语句，如图7-65所示。
on mouseUp me
set rectxy = the rect of sprite 5
new(#shape, member 15)
member(15).shapeType = #line
sprite(5).rect= rectxy
sprite(5).lineSize = 3
member(15).filled = TRUE
member(15).pattern = 1
set the member of sprite 5 to member 15 of castLib "Internal"
end
图7-65 精灵4的Lingo脚本
(12) 至此，图形面板的动画制作完成了，播放效果如图7-66所示。
图7-66 播放效果 |
