两点间随机折线效果
作者 佚名技术
来源 服务器技术
浏览
发布时间 2012-07-08
Flash.rar 映象中以前还是菜鸟时看的一个闪电特效的模式,因为没有看过源文件,一直没去琢磨算法,今天数学课复习三角函数的时候突然想到了这个思路,于是就操起笔在本子上写了一下面的AS. 回家打开Flash, 测试通过. 源文件中有图解. *折线效果 * *Codeby木頭(13tds.com) * *Flash8.0ActionScript2.0 * ***/ Stage.scaleMode="noScale"; Stage.showMenu=false; importflash.geom.Point;//注册Point類,如果不用此类可以使用其它方式代替点的位置 varFlash:Function=function(A:Point,B:Point,Q:Number,P:Number){ _root.clear();//清屏 _root.moveTo(A.x,A.y);//移動到A點 _root.lineStyle(1);//初始化綫條樣式 len=Math.sqrt(Math.pow(B.x-A.x,2)+Math.pow(B.y-A.y,2));//長度 qlen=len/Q;//平均每段長度 angle=Math.atan2(B.y-A.y,B.x-A.x);//弧度 deg=angle*180/Math.PI;//角度 for(i=1;i<Q;i++){ temp={x:A.x+qlen*Math.cos(angle)*i,y:A.y+qlen*Math.sin(angle)*i};//尋找第i點位置 tempangle=(deg-90)*Math.PI/180;//垂綫的角度 templen=P-random(P*2);//幅度(長度)P~-P lineTo(temp.x+Math.cos(tempangle)*templen,temp.y+Math.sin(tempangle)*templen);//移動到temp點 } _root.lineTo(B.x,B.y);//到B點 }; varA:Point=newPoint(0,0);//初始A點 varB:Point=newPoint(400,300);//初始B點 varC:Number=2;//初始段數 setInterval(Flash,50,A,B,10,25) 关键词:折线 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢! |
你可能对下面的文章感兴趣
关于两点间随机折线效果的所有评论