Flash AS3制作火苗跳动的gif动画教程

这个例子做了有段时间了.但是也跟那时候发的AS2的纯代码火效果是一样的,也是残次品.

本次例子没能做到减少系统资源的能力.刚做完这个效果以后.也查找了一些粒子方面的资料.看到了很多高人写的粒子可以使用上千个粒子却不占用更多的系统资源,高人.但是,如果能把那算法公布我会更感谢你.

其实,FLASH AS的作品无非具备两点就可以.
1.对AS函数的了解.
2.肯专研的精神.
FLASH世界里没有做不到的东西.只有你想不到.你不想做的东西.这次的代码发出来.非常希望有更多的朋友去完善.共享精神的目的就是这个.共同进步.一个人的努力只能局限在自己的世界里.当把所有人的努力聚集起来的时候才是FLASH繁荣时期.这就是为什么多年前的AS程序员各各都强悍的原因.那时候的FLASH8还是很热闹的.

希望这个帖子能让更多的朋友发表自己的看法.我以后要回到FLASH世界,希望更多的朋友能帮我.欢迎FLASH 爱好者加我QQ共同成长

废话不说了.拿出东西.
本次程序同入门级下雪效果一样,使用了2个AS文件以及一个FLA文件,两个AS文件分别是mack_fire.as 火花粒子制作文件,fire.as 火花移动控制文件,以及fire.fla场景文件.

代码如下：
mack_fire.as：

fire.as：

复制代码代码如下:
/***************Ant QQ:305033389******************/
/*************请支持原创，请开源代码****************/
/**********请让更多的AS爱好者有资料学习*************/
/********本作品是我学习作品，并非完善作品***********/
package {
import flash.display.MovieClip;
import flash.events.EventDispatcher;
import flash.events.Event;
import flash.display.BlendMode;
import flash.filters.GlowFilter;
import flash.geom.ColorTransform;
public class fire extends MovieClip {
private var fires:mack_fire;
private const maxBalls:int = 60;//火花数量
private const Mc_x:int = stage.stageHeight/2;//起火开始X坐标
private const Mc_y:int = stage.stageHeight/2;//+stage.stageHeight/4;//起火开始Y坐标
private const Mc_more:int = 1;//顶点，移动和透明度的顶点，1为完全不透明或没有缩放比例，AS3中以1做为顶点，AS2中是100
private const McY:int = 1;//向上移动速度
private var i=1;//记数变量

private var obj_scal:Array=new Array();//缩放变量保存数组
private var obj_fast:Array=new Array();//移动速度变量保存数组
private var obj_action:Array=new Array();//横向移动速度更改变量

private var obj_n:Array=new Array();//横向移动方向控制变量
private var obj_s:Array=new Array();//横向移动速度控制变量
private var obj_gs:Array=new Array();

private var obj_g:Array=new Array();//颜色控制变量

public function fire() {
addEventListener(Event.ENTER_FRAME,fire_mv);
}

public function fire_mv(event:Event):void{
var k = Math.random();//制造随即数字，这个变量决定火花的移动距离，已经移动范围
var scale:Number = k ? k : 1;//制造一个随即数字，这个数字要小于1，大于0
fires = new mack_fire();//新元件创建
fires.scaleX = fires.scaleY = fires.alpha = scale;//元件的缩放以及透明度设置，根据上面的随即数设置
obj_g[i] = 100;
obj_gs[i] = (1-scale+.2)*3;//定义一个新的数组元素，用处在更改元件颜色
obj_fast[i] = Math.floor(scale*2);//纵向移动速度主变量
obj_action[i]=(Math.random()>0.5)?1:-1;//纵向移动方向主变量
obj_scal[i] = 1 - obj_fast[i]/10;//对于进行中火花的缩放进行控制
obj_n[i] = obj_s[i] = 1;
fires.x= Mc_x;//定义火花产生的横坐标
fires.y= Mc_y;//定义火花产生的纵坐标
fires.blendMode = BlendMode.ADD;//这部分是纯代码火花的重点，颜色叠加。让火花和火花之间看起来更圆滑。没有这个部分，火的效果根本不成立
fires.name = "fire"+i;//定义一个火花的名字，在下面通过getChildByName来使用。这是笨方法。记得以前有朋友不用定义也可以使用的。
addChild(fires);
for (var n:int = 1; n var m=getChildByName("fire"+n);//使用上面定义的火花影片剪辑
if(m){
var colorInfo:ColorTransform = m.transform.colorTransform;//定义颜色控制器
var xx=obj_gs[n]*2;
obj_g[n] -= Math.ceil(xx);
if(obj_g[n] < 10) obj_g[n]="00";//更改颜色，这部分就是为什么黄色的影片剪辑变成红色的理由
var rgbs = "0xff"+obj_g[n]+"00";//转义为字符串，这部分我是用最傻的办法来做的，实在是不了解AS3。请高手多指导
colorInfo.color = rgbs;
m.transform.colorTransform = colorInfo;
m.y -= 1-obj_s[n]+.4;//向上移动
m.x += obj_fast[n]*obj_action[n]*obj_n[n]*obj_s[n];//进行横向移动
m.scaleX += (obj_scal[n])/20 * obj_n[n] * obj_s[n];//进行横向缩放
m.scaleY += (obj_scal[n])/20 * obj_n[n] * obj_s[n];//进行纵向缩放
m.alpha += .1 *obj_n[n]*obj_s[n];//进行透明度设置
if(m.scaleX >= Mc_more){;
obj_n[n] = -1;//横向反方向移动
obj_s[n] = .2;//横向移动速度减缓
};

if(m.alpha >= Mc_more){ m.alpha = Mc_more;}else if(m.alpha <= Math.random()*.1){ removeChildAt(m);}//如果透明度高于或者底于指定数值，进行操作
}
}
if(i>=maxBalls){i=0;}
++i;
}
}
}