当前位置：首页 -> 网络媒体 -> FLASH -> Flash5任意两点间随机画线（五）

Flash5任意两点间随机画线（五）

时间： 2021-07-31 作者：daque

5.3 actions for mainmovie// 主步调// 重心1：鼠标场所属性（_xmouse,_ymouse）// 重心2：math objects// 日子：2000-09-02// 作家：kanaka// email：kanaka@yeah.net　　　　 onclipevent (mouseup) {　　　　　　if (_root.firstpointdrew == 0) {// 读取开始的坐标　　　　　　　 x1 = _xmouse;　　　　　　　 y1 = _ymouse;// 即使仍旧画过一条线，则将线和两个点都简略，以维持场景纯洁　　　　　　　 if (_root.linedrew == 1) {　　　　　　　　　removemovieclip (point1);　　　　　　　　　removemovieclip (point2);　　　　　　　　　removemovieclip (line1);　　　　　　　 }// 在开始坐标上画一个点　　　　　　　 duplicatemovieclip (point, "point1", 1);　　　　　　　 setproperty (point1, _x, x1);　　　　　　　 setproperty (point1, _y, y1);// 开始仍旧画出　　　　　　　 _root.firstpointdrew = 1;　　　　　　} else {// 读取尽头的坐标　　　　　　　 x2 = _xmouse;　　　　　　　 y2 = _ymouse;// 在尽头坐标上画一个点　　　　　　　 duplicatemovieclip (point, "point2", 2);　　　　　　　 setproperty (point2, _x, x2);　　　　　　　 setproperty (point2, _y, y2);// 尽头仍旧画出，置 firstpointdrew 为 0　　　　　　　 _root.firstpointdrew = 0;// 计划三角三条边的长度　　　　　　　 x = math.abs(x1-x2);　　　　　　　 y = math.abs(y1-y2);　　　　　　　 z = math.sqrt(x*x+y*y);// 计划画线的回旋观点　　　　　　　 if ((x1$#@60;x2) and (y1$#@62;y2)) {　　　　　　　　　angel = math.atan(y/x)/math.pi*180;　　　　　　　 } else if ((x1>=x2) and (y1$#@60;y2)){　　　　　　　　 angel = math.atan(x/y)/math.pi*180+90;　　　　　　　 } else if ((x1>x2) and (y1$#@62;=y2)){　　　　　　　　　angel = math.atan(y/x)/math.pi*180+180;　　　　　　　 } else {　　　　　　　　　angel = 360-math.atan(y/x)/math.pi*180;　　　　　　　 }// 树立画线动画的开始坐标醴疟壤?托??嵌?br> 　　　　　　　 duplicatemovieclip (line, "line1", 0);　　　　　　　 setproperty (line1, _x, x1);　　　　　　　 setproperty (line1, _y, y1);　　　　　　　 setproperty (line1, _xscale, z/_root.linewide*100);　　　　　　　 setproperty (line1, _rotation, angel);// 画线实行　　　　　　　 _root.linedrew = 1;　　　　　　}　　　　 }

Flash5任意两点间随机画线（五）

相关推荐

推荐下载

热门阅览

最新排行