当前位置: 首页 > 图文教程 > Flash动画 > Flash动画制作 > Flash5任意两点间随机画线(五)

Flash动画制作
相册类
Actionscript优化教程
用as来控制图片的曝光效果
如何将角度和坐标标准化
数组排序方法介绍
setInterval全面的介绍
attachMovie 函数的使用方法教程
flash action 详解(8)
AS的基本代码解释(3)
简单的检测鼠标是否有移动的类
FSCommand 用法详解
图片放大缩小移动类
flash中数组的妙用
如何使用Flash连接资料库
关于setInterval的应用
AS的基本代码解释(4)
动感地带学习专题(3)
动感地带学习专题(4)
动感地带学习专题(1)
动感地带学习专题(5)

Flash动画制作 中的 Flash5任意两点间随机画线(五)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-22   浏览: 91 ::
收藏到网摘: n/a

5.3 Actions for MainMovie
// 主程序
// 要点1:鼠标位置属性(_xmouse,_ymouse)
// 要点2:Math Objects
// 日期:2000-09-02
// 作者:kanaka
// Email:[email protected]
     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;
        }
// 设置画线动画的起始坐标 醴疟壤