1、flashactionscript30案例Flash 案例案例1：计算机打字效果步骤1 打开本案例的素材文件“素材.fla”，库里面有一张背景图，如图1所示。图1步骤2 将图层1重命名为“背景层”，并将图片背景图拖曳到舞台上，如图2所示。图2步骤3 新建一个图层，命名为“文本”，并选择工具栏内的“文本工具”，在属性面板中设置“文本工具”的属性，如图3所示。图3步骤4 使用“文本工具”在舞台上框选出一个文本区域，其大小正好覆盖显示器的内部，如图4所示。图4步骤5 单击属性栏内“字符”选项卡内的“嵌入”按钮，在弹出的对话框内将以下文字输入到如图5所示的位置，注意最后还添加一个符号“|”。贝尔纳是法
2、国著名的作家，一生创作了大量的小说和剧本，在法国影剧史上具重要的地位。有一次，法国一家报纸进行了一次有奖智力竞赛，其中这样一个题目：“如果法国最大的博物馆卢浮宫失火，情况只允许抢救出一幅画，你会抢哪一幅”结果，在该报纸收到的成千上万回答中，贝尔纳以最佳答案获得该题的奖金。他的答案是：“我抢离出口最近的那幅画。”图5步骤6 单击“确定”按钮后，使用“选择工具”选中该文本框，并在属性面板中将实例名称修改为txt，同时修改字符大小为点，段落里行为“多行”，如图6所示。图6步骤7 再次新建一个图层，并命名为“代码层”，如图7所示。图7步骤8 单击“代码层”的第1帧，并按快捷键F9打开动作面板，在动作面
3、板里输入以下的脚本，如图8所示。import 导入外部类/需要展示的文字var word:String = 贝尔纳是法国著名的作家，一生创作了大量的小说和剧本，在法国影剧史上具重要的地位。有一次，法国一家报纸进行了一次有奖智力竞赛，其中有这样一个题目：“如果法国最大的博物馆卢浮宫失火了，情况只允许抢救出一幅画，你会抢哪一幅”结果，在该报收到的成千上万回答中，贝尔纳以最佳答案获得该题的奖金。他的答案是：“我抢离出口最近的那幅画。”;/目前的序号var index:Number = 0;/设置timer计时器var timer:Timer = new Timer(200);/为计时器添加侦听,ti
4、ck);/开始计时();/计时函数function tick(e:TimerEvent):void = (0,index) + |; index +;图8步骤9 保存文件，按Ctrl+Enter测试影片，效果如图9所示。图9案例2：黑客帝国文字效果步骤1 新建空白Flash文档，并在属性面板中将舞台尺寸修改为250250，背景色为黑色。步骤2 按组合键Ctrl+F8新建一个影片剪辑元件，并命名为“单个效果”，并勾选下面的“为ActionScript导出”选项，之后在“类”的文本框内填入effect字样，如图10所示。图10步骤3 点击“确定”后，可能会弹出一个警告的对话框，点击“确定”继续，进
5、入影片剪辑内部。选择“文本工具”，并在属性面板中修改“文本工具”属性，如图11所示。图11步骤4 在舞台上使用“文本工具”绘制一个文本框，里面随意输入一个字母，例如x，并调节它的位置到舞台中间，如图12所示。图12步骤5 选中该文本框，在属性面板中为其输入实例名称txt。单击属性栏中的“字符”选项里的“嵌入”按钮，在弹出的对话框中进行如图13的设置。图13步骤6 新建一个图层，并命名为as，单击该图层的第1帧，按快捷键F9打开动作面板，在其中输入以下的脚本，如图14所示。图14步骤7 点击“场景1”返回主场景，选中图层1的第1帧，按快捷键F9打开动作面板，在其中输入以下脚本，如图15所示。/导
6、入外部类import 创建600个效果并添加到舞台上for (var i:Number =0; i“变形”“水平翻转”，并调整其位置，如图30所示。图30步骤8 选中左边的按钮，在属性面板中修改其实例名称为“btn1”，修改右边按钮的实例名称为“btn2”。步骤9 再次新建一个图层，并命名为“代码层”，选中上面的第1帧，并按快捷键F9打开动作面板，在其中输入如下脚本，如图31所示。/导入外部类import 停止播放stop();/为两个按钮添加侦听,clickF);,clickF);/添加可点击效果 = true;/初始化让左边的按钮不可见 = false; = true;/点击函数function clickF(e:MouseEvent):void if = btn1) /如果是左边的按钮则 回播一帧 prevFrame(); else /如果是左边的按钮则 回播一帧 nextFrame(); if(currentFrame = 1) /如果是第一帧 则上翻按钮不可见 = false; else if(currentFrame = totalFrames) /如果是最后一帧 则下翻按钮不可见 = false; else /否则 都可见 = true; = true; 图31步骤10保存文件，并按组合键Ctrl+Enter测试影片，最终效果如图32所示。图32
