内積のテスト

/**
 * Copyright tepe ( http://wonderfl.net/user/tepe )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/dPBK
 */

package {
    import flash.display.Sprite;
    import flash.events.*;
    import flash.text.*;
    import flash.geom.*;
    public class FlashTest extends Sprite {
        private var s:Sprite = new Sprite();
        private var tf:TextField = new TextField();
        private var pos2:Point = new Point(300,300);
        private var pos1:Point = new Point(200,200);
        public function FlashTest() {
            // write as3 code here..
            addChild(s);
            addChild(tf);
            addEventListener(Event.ENTER_FRAME,onFrame);
            
        }
        private function onFrame(e:Event):void{
            s.graphics.clear();
            s.graphics.lineStyle(1,0x000000);
            s.graphics.moveTo(pos1.x,pos1.y);
            s.graphics.lineTo(pos2.x,pos2.y);
            s.graphics.moveTo(pos1.x,pos1.y);
            s.graphics.lineTo(mouseX,mouseY);
            
            var n:Number = inp(pos2.x-pos1.x, pos2.y-pos1.y,mouseX-pos1.x,mouseY-pos1.y);
            tf.text = n.toString();
        }
        //内積
        private function inp(ax:Number,ay:Number,bx:Number,by:Number):Number{
            //var tmp:Number = ax;
            //ay = -ax;
            //ax = ay;
            var n1:Number = (ax*bx)+(ay*by);
            var n2:Number = (bx*bx)+(by*by);
            var result:Number = n1;
            return result;
        }


    }
}