用Flash的AS脚本生成动态统计饼图

　　本例中我们用Flash的Action Script脚本来生成漂亮的动态统计饼图。 
　　先发效果，这个效果参考了一下国外的饼图，不过他的代码、注释我也看不懂，所以我就写个中文的好了。大家完全可以根据我的代码改出更多的效果来。
　　编程水平有限，大家谅解一下，不过保证能正常运行。

　　http://www.blueidea.com/articleimg/2007/03/4540/http://www.zzzyk.com/html/soft/ok.swf

　　数据来源于xml配置文件，可以直接修改xml文件以达到直接使用的目的。默认数据来源为piedata.xml但是可以在页面中修改这个数据来源。如下：

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/
flash/swflash.cab#version=7,0,19,0" width="600" height="600">
  <param name="movie" value="http://www.zzzyk.com/html/soft/ok.swf?piedata=piedata.asp" />
  <param name="quality" value="high" />
  <embed src="http://www.zzzyk.com/html/soft/ok.swf?piedata=piedata.asp" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="600" height="600"></embed>
</object>
　　在代码中swf文件名后加上参数?piedata=piedata.asp则可以修改数据来源为piedata.asp。
　　其实原理也不难，先画个圆（扇形）做上表面，然后分别画出两个侧面和一个曲面，最后画底下的圆（扇形）。一个立体的小扇形就出来了。让他们一起拼在一起就成了饼图嘛。只有一点比较烦就是确定每一个扇形的深度，好让他们在视学上看起来处于正常的前后关系位置。在这儿，我想了一个法子。
先算出当前扇形的中间度数，看这个度数是否在水平线以下，是的话就看这个度数与垂直方向的角度，角度最小的在最前面，最大的在最后面，如果中间度数在水平线以上，那么则与中间度数在水平线以下的相反。这儿要注意的是必须要从正上方作为0度，开始计算。

　　下面是源代码，所有代码放到影片的时间轴上的一帧中就可以了。
代码拷贝框
//缩放舞台并不缩放内容，将内容定位于舞台的左上角;Stage.align  = "TL";Stage.scaleMode = "noScale";_quality = "BEST";import mx.transitions.Tween;import mx.transitions.easing.*;//全局//所有数据var pie_num:String = "20,15,8,50,55,100,100,190";//所有数据名称var pie_name:String = "四川,重庆,云南,贵州,山西,湖南,上海,北京,广州";//是否显示数据名称与百分比值var show_name:String = "true,false,false,true,false,true,true,true"//所有颜色var colorstr:String = "0xFF0F00,0xFF6600,0xFF9E01,0xFCD202,0xF8FF01,0xB0DE09,0x04D215,0x0D8ECF,0xFF1F11";//所有开始位置var defaultsate:String = "false,false,false,false,false,false,false,true";//公共变量x0 = 210;//圆点坐标x(数字)y0 = 135;//圆点坐标y(数字)z = 150;//圆长轴(>0)d = 90;//圆短轴(>0)w = 150;//环宽(>0,<长轴)h = 20;//饼高(>=0)movew = 15;//移动距离(>0)alpha = 100;//点击之后的透明度(0-100)mcalpha = 100;//默认所有开始透明度(0-100)showorder = true;//是否显示竖向排列表(true,false)orderx = 400;//竖向排列表起始x(数字)ordery = 70;//竖向排列表起始y(数字)orderxy = 6;//竖向排列表竖向间隔(>0)linecolor = 0xcccccc;//指示线颜色(十六进制颜色)linealpha = 100;//指示线透明度(0-100)titleline = 20; //指示线长度(>0 || 0<)fontcolor = 0xFF0000;//文字颜色(十六进制颜色)percentshow = "font";//是否显示百分值四个值（font文字,num百分值,all都显示,none不显）orderfontcolor = 0x222222;//左边竖向排列文字颜色(十六进制颜色)dark = 1.43;//深色系数（>1如1.43默认）//以下为三个饼图示例//第一个参数为影片名，第二个为深度群drawpie("amu",1,        pie_num,pie_name,titleline,linecolor,linealpha,orderfontcolor,percentshow,fontcolor,colorstr,defaultsate,show_name,        x0,y0,z,d,w,h,movew,alpha,mcalpha,dark,        showorder,orderx,ordery,orderxy);drawpie("vapr",2,        "15,30,60,90","<b>好</b>,不好,一般,差,太差了",0,0xcccccc, 0,0x000000,"all",0x666666,"0x0D8ECF,0x04D215,0xB0DE09,0xF8FF01,0xFF9E01,0xFF6600,0xFF1F11","true,true,false,false","true,true,true,false",        160,380,70,70,50,2,15,100,100,1.5,        true,20,340,13);drawpie("kiss",3,        "30,50,290,70,50,10","Flash,Html,Javascript,Asp,PHP,C#",10,0x999999,100,0x000000,"none",0xff6600,"0x0D8ECF,0x04D215,0xB0DE09,0xF8FF01,0xFF9E01,0xFF6600,0xFF1F11","false,false,false,false,false,false,false","false,false,false,false,false,false,false",        470,300,100,60,60,20,15,50,100,1.15,        false,280,250,28);drawpie("kisss",4,        "242,332,171,116,106,224","Flash,Html,Javascript,Asp,PHP,C#",10,0x999999,100,0x000000,"all",0xff6600,"0x0D8ECF,0x04D215,0xB0DE09,0xF8FF01,0xFF9E01,0xFF6600,0xFF1F11","false,false,false,false,false,false,false","true,true,true,true,true,true,true",        370,520,60,40,40,10,15,50,100,1.15,        true,515,480,3);function drawpie(mcname:String, depth:Number,                 pie_num:String, pie_name:String, titleline:Number, linecolor:Number,linealpha:Number, orderfontcolor:Number,percentshow:String, fontcolor:Number, colorstr:String, defaultsate:String, show_name:String,                 x0:Number, y0:Number, z:Number, d:Number, w:Number, h:Number, movew:Number, alpha:Number, mcalpha:Number, dark:Number,                 showorder:Boolean, orderx:Number, ordery:Number, orderxy:Number):Void{arr_n = pie_num.split(",");arr_total=0;for(m=0;m<arr_n.length;m++){    arr_total+=Number(arr_n[m]);}var arr_name = new Array();arr_name = pie_name.split(",");var arr_showname = new Array();arr_showname = show_name.split(",");var arr_num = new Array();var arr_percent = new Array();duof = 0;for(m=0;m<arr_n.length;m++){    if(m==arr_n.length-1){        duo = 360-duof;        arr_num[m]= duo.toString();    }else{        duo = Math.round((Number(arr_n[m])*360)/arr_total);        duof = duof+duo;        arr_num[m]= duo.toString();    }    arr_percent[m] = Math.round((Number(arr_n[m])*100)/arr_total*100)/100;}//分割数据var arr_color = colorstr.split(",");var arr_defaultstate = defaultsate.split(",");//所有扇环的中间度var arr_middle:Array = new Array();//生成所有的扇环的中间度，用来确定深度var xx:Number=-90;var arr_a:Array = new Array();//记录每一扇环的开始度与结束度for(m=0; m<arr_num.length;m++){            a0=xx;    a=Number(a0)+Number(arr_num[m]);        arr_a.push([a0,a]);        xx=a;    if(a-a0>180){        arr_middle[m] = 0.001;    }else{        if((a-a0)/2+a0<=180 && (a-a0)/2+a0>=0){            //本mc的中间角度与90度的差值（这儿我们确定谁与90度差值的绝对值最小就排在最前面）            arr_middle[m] = Math.abs(90-((a-a0)/2+a0));        }else if((a-a0)/2+a0>180 && (a-a0)/2+a0<=270){            arr_middle[m] = (Math.abs((a-a0)/2+a0-180)+500);            //本mc的中间角度与180度的差值（这儿我们确定谁与90度差值的绝对值最大就排在最前面）        }else if((a-a0)/2+a0>=-90 && (a-a0)/2+a0<0){            arr_middle[m] = (Math.abs((a-a0)/2+a0-360)+500);            //本mc的中间角度与270度的差值（这儿我们确定谁与90度差值的绝对值最大就排在最前面）        }    }    //trace(m+":"+arr_middle[m]);}//trace(arr_a[0][0]);//扇环排序arr_middle = arr_middle.sort(Array.NUMERIC|Array.RETURNINDEXEDARRAY);//重排序，让原来的数组值从小到大排列，但数组的索引不变。//arr_middle.reverse();//for(m = 0; m<arr_middle.length; m++){    //绘出竖向方块链接------------------------------------------------------------------------    if(showorder){    _root.createEmptyMovieClip(mcname+arr_middle[m]+"icon_mc",(5-m)*22+depth*10+1);        mc = this[mcname+arr_middle[m]+"icon_mc"];    color = parseInt(arr_color[arr_middle[m]]);    beginx = orderx;    beginy = ordery;    jianxy = orderxy+12;        mc.beginFill(color, 100);    mc.lineStyle(1, darkcolor(color,dark), 100, true, "none");    mc.moveTo(beginx,arr_middle[m]*jianxy+beginy);    mc.lineTo(beginx+12,arr_middle[m]*jianxy+beginy);    mc.lineTo(beginx+12,arr_middle[m]*jianxy+beginy+12);    mc.lineTo(beginx,arr_middle</pre></div><div class="zykmore"><script type="text/javascript" src="/js/s3.js"></script></div><div class="content"><p>上一个：<a href="/show/9123ac526c5e31e9.htm">Flash AS代码实现小球沿路径移动</a><br/>下一个：<a href="/show/86018721d82e03b0.htm">用Flash的beginBitmapFill平铺背景</a></p><div class="piclist">更多图片编程知识:<ul><li><a href="/show/3531fc415e65cbbd.htm"><img src='/upload/2006-3/200631331424355.jpg' width=105 height=105><br/>快速获取Flash课件中的素材</a></li><li><a href="/show/e836da4d2737d0a8.htm"><img src='/upload/2006-3/200631331543284.gif' width=105 height=105><br/>Flash MX 2004 体验之旅 8</a></li><li><a href="/show/897d2b63171c8e8d.htm"><img src='/upload/2007/11/30/2007113020457679.gif' width=105 height=105><br/>Moho神奇骨骼动画之旅:骨骼</a></li><li><a href="/show/e5a45bfbf12ba8b5.htm"><img src='/upload/2007/11/30/20071130205110218.gif' width=105 height=105><br/>Flash超酷3D伴侣--Swift3D</a></li><li><a href="/show/078bf2d51fdbdebd.htm"><img src='/upload/2007/11/30/20071130205438285.jpg' width=105 height=105><br/>用Flash5轻松制下拉菜单（二）</a></li><li><a href="/show/698eca5197903241.htm"><img src='/upload/2007/11/30/20071130201650193.gif' width=105 height=105><br/>用Flash 8滤镜打造视觉冲击特效</a></li></ul></div></div>
  <div class="zykmore"><script type="text/javascript" src="/js/s4.js"></script></div><div class="more"><dl><dt>更多<a href="/list/31_1.htm">Flash</a>疑问解答：</dt><dd><a target="_blank" href="/show/1c2310e883786e7f.htm">今天教大家学会用U5制作成翻页相册</a></dd><dd><a target="_blank" href="/show/1a13284408fbff08.htm">Flash MX 2004 ActionScript图文教程(九)</a></dd><dd><a target="_blank" href="/show/f3515758cddc3660.htm">Flash MX 2004 ActionScript图文教程(八)</a></dd><dd><a target="_blank" href="/show/89f14c8b8e78c7cb.htm">Flash MX 2004 ActionScript图文教程(七)</a></dd><dd><a target="_blank" href="/show/0cf1cfc2084d67c6.htm">Flash MX 视频导入功能详解</a></dd><dd><a target="_blank" href="/show/84533fa29aa49f9c.htm">Flash5 画任意直线教程</a></dd><dd><a target="_blank" href="/show/2e0ba5cda8f4755f.htm">FLASH -- 关于变量的问题FLASH -- 关于变量的问题</a></dd><dd><a target="_blank" href="/show/a8004027c3bad6db.htm">Flash本地加密</a></dd><dd><a target="_blank" href="/show/6a708ed2b76b03b1.htm">flash场景之间相互跳转的实现方法</a></dd><dd><a target="_blank" href="/show/33813e7304913cc2.htm">Flash那样动感十足制作PPT按钮跟我来</a></dd><dd><a target="_blank" href="/show/f3c99c51914aeb72.htm">Flash Mx使用技巧十二则</a></dd><dd><a target="_blank" href="/show/c461b1e7b3d48150.htm">使用Flash mx制作旋转的时钟效果</a></dd><dd><a target="_blank" href="/show/a0fcccf307c41532.htm">PowerPoint中插入Flas易做图的方法</a></dd><dd><a target="_blank" href="/show/6d0a45d5b0f96aa7.htm">用FlashMX制作拖动悬浮窗口</a></dd><dd><a target="_blank" href="/show/fcc5e9415bb9a107.htm">在Flash中巧妙替换字体</a></dd></dl></div>
</div>
<div id="zykleft">
  <div class="leftm">
    <div id="logo"><a href="http://www.zzzyk.com/">站长资源库</a>
    	<div class="clear"></div><script type="text/javascript" src="/js/i7f.js"></script></div>
      <script type="text/javascript" src="/js/sharen.js"></script><div class="clear"></div>
    <dl class="list"><dd><a href="/list/28_1.htm">Dreamweaver</a></dd><dd><a href="/list/29_1.htm">Fireworks</a></dd><dd><a href="/list/30_1.htm">FrontPage</a></dd><dd><a href="/list/31_1.htm">Flash</a></dd><dd><a href="/list/32_1.htm">Photoshop</a></dd><dd><a href="/list/33_1.htm">Coreldraw</a></dd><dd><a href="/list/34_1.htm">Excel</a></dd><dd><a href="/list/35_1.htm">Word</a></dd><dd><a href="/list/36_1.htm">Powerpoint</a></dd><dd><a href="/list/37_1.htm">outlook</a></dd><dd><a href="/list/38_1.htm">wps</a></dd><dd><a href="/list/39_1.htm">AfterEffects</a></dd><dd><a href="/list/40_1.htm">3D MAX</a></dd><dd><a href="/list/41_1.htm">Director</a></dd><dd><a href="/list/42_1.htm">Authorware</a></dd><dd><a href="/list/43_1.htm">PremierePro</a></dd><dd><a href="/list/44_1.htm">Foxmail</a></dd><dd><a href="/list/45_1.htm">Maya</a></dd><dd><a href="/list/46_1.htm">ISA</a></dd><dd><a href="/list/47_1.htm">会声会影</a></dd><dd><a href="/list/48_1.htm">其它软件</a></dd><dd><a href="/list/62_1.htm">AutoCAD</a></dd></dl><dl class="notice">如果你遇到<a href="/soft.htm">软件学习</a>难题：<br/>访问www.zzzyk.com 试试</dl>
  </div>
  <div class="leftm"><dl><dt><script type="text/javascript" src="/js/s5.js"></script></dt></dl></div>
  <div class="leftm"><dl><dt><script type="text/javascript" src="/js/s6.js"></script></dt></dl></div>
</div></div>
<div class="clear"></div>
<div class="bdshare">
  <script type="text/javascript" src="/js/share.js"></script>
</div>
<div class="clear"></div>
<div class="foot">CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved<br/>部分文章来自网络，<script type="text/javascript" src="/images/my.js"></script>
</div>
</body>
</html>