flash小游戏及flash片头等等的flash资源源码都是新丁flash资源网为大家提供娱乐和学习以及为相关flash工作者提供方面之门!
  首页 | 片头欣赏 | Banner 欣赏 | Flash 特效 | 网站欣赏 | 技术文档 | 视频教程 | 网页模板 | flash小游戏 | 源码下载 | 相关下载 | 声音下载 | 
  flash Action应用   您当前的位置是:首页 >> 技术文档 >> flash Action应用 >> 详细内容
Flash AS实例教程:制作铅笔动画
加入时间:2007-10-9  浏览:48   录入:启能Flash资源网   来源:网络

用一段简单的AS代码就可以实现简单的铅笔动画效果。

直接复制代码,导出就可以看到效果了:
_root.createEmptyMovieClip("pen", 1);
pen.lineStyle(2, 0x000000);
pen._x = 200;
pen._y = 200;
pen.beginFill(0x444444, 100);
pen.lineTo(30, -10);
pen.lineTo(200, -10);
pen.lineTo(200, 10);
pen.lineTo(30, 10);
pen.lineTo(30, -10);
pen.beginFill(0x333311, 100);
endFill(pen);
pen.beginFill(0xf9f999, 100);
pen.lineTo(0, 0);
pen.lineTo(30, 10);
pen.lineTo(30, -10);
endFill(pen);
pen._rotation = -50;
n = 0;
r = 100;
a = 1;
k = 10;
tt = 0;
lineStyle(2);
moveTo(Math.cos(0*Math.PI/180)*r+200, pen._y);
ss = setInterval(function () {
a++;
if (a>3) {
  a = 1;
}
if (a == 1) {
  lineStyle(2, 0xff0000);
}
if (a == 2) {
  lineStyle(2, 0x00ff00);
}
if (a == 3) {
  lineStyle(2, 0x0000ff);
}
n += 30
r -=0.3
if (n<20000) {
  pen._x = Math.cos(n*Math.PI/180)*r+200;
  pen._y = Math.sin(n*Math.PI/180)*r+200;
  lineTo(pen._x, pen._y);
}
updateAfterEvent();
if (n>=20000) {
  aa = setInterval(function () {
   updateAfterEvent();
   tt++;
   if (tt>5000) {
    clearInterval(aa);
    clearInterval(ss);
   }
   pen._rotation = Math.sin(n*Math.PI/180)*5+90;
  }, 5);
  _root.createTextField("t", 2, 300, 350, 150, 20);
  t.text = "By FLASH8菜鸟 kingofkofs";
  pen._x = 400;
  pen._y = 120;
}
}, 5);
sp = 0;
f = 20;
this.onEnterFrame = function() {
if (tt>5000) {
  pen._y -= sp;
  sp += 2;
}
if (sp>f) {
  sp = -f;
  if (f>=4) {
   f -= 4;
  }
}
};

关于我们 | 联系方式 | 广告赞助 | 免责声明 | 站点留言 | 友情链接 | 推荐站点
Copyright 2007-2008 新丁flash资源网 All Rights Reserved
本站版权所有 新丁flash资源网 保留所有权利 未经许可请勿任意转载或复制使用 
请使用1024*768分辨率浏览本站以达到浏览新丁flash资源网的最佳视觉效果
新丁flash资源网中所有的解压密码均为:www.qnflash.com
粤ICP备08010396号