forked from: Interesting Texture Animated

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

// forked from shapevent's Interesting Texture Animated
package {

    import flash.display.*;
    import flash.geom.*;
    import flash.events.*;
        import flash.filters.*;


    [SWF(frameRate=60, backgroundColor=0x000000)]

       public class InterestingTex extends MovieClip {
        
        private var canvas:BitmapData;
        private var clone:BitmapData;
        private var canvasRect:Rectangle;
        private var w:int;
        private var w2:Number;
        private var w10:Number;
        private var convert:Number;
        private var size:int;
        private var pix:Vector.<uint>;
        private var gray:ColorMatrixFilter;
        private var m:Matrix;
        private var sin:Number;
        private var cos:Number;
        private var dx:Number;
        private var dy:Number;
        private var pnt:Point;
        private var blur:BlurFilter;


               public function InterestingTex(){
                  // init
            canvas = new BitmapData(500,500,false, 0x000000);
            addChild(new Bitmap(canvas));
            clone = new BitmapData(500,500,false, 0xff0000);
            canvasRect = canvas.rect;
            w = canvas.width;
            w2 = 1/w;
            w10 = 1/(w * 80);
            convert = Math.PI/90;
            size = canvas.width * canvas.height;
            pix = new Vector.<uint>(size, true);
            gray = new ColorMatrixFilter([1, 0.55, 0.55, 0,0,0.55, 0.9, 0.55, 0,0,0.55, 0.55, 0.550,0, 0,0,0,1,0]);
            m = new Matrix();
            m.scale(1,-1);
            m.translate(0,canvas.height);
            sin = 0, cos = 0;
            dx = 0, dy = 0;
            pnt = new Point();
            blur = new BlurFilter(10,10,1);
            addEventListener(Event.ENTER_FRAME, onLoop);
            
            
            
            

               }
               // private methods

        private function onLoop(evt:Event):void {
            canvas.lock();
            dx += (mouseX * 10 - 3000 - dx) / 8;
           dy += (Math.floor((Math.random() * 410)) / 8);
            for (var i:int = 0; i<size; i++){
                var xp:int = i % w;
                var yp:int = int(i * w2);
                var xp2:int = xp << 1;
                var t:Number = (yp * (xp2 + dx) * w10) % 3.14687
                //compute sine
                // technique from http://lab.polygonal.de/2007/07/18/fast-and-accurate-sinecosine-approximation/
                // by Michael Baczynski
                if (t<0) {
                    sin=1.27323954*t+.405284735*t*t;
                } else {
                    sin=1.27323954*t-0.405284735*t*t;
                }
                // compute cosine
                t = (xp2 + dy) * convert % 6.28;
                t+=1.57079632;
                if (t>3.14159265) {
                    t-=6.28318531;
                }
                if (t<0) {
                    cos=1.27323954*t+0.405284735*t*t;
                } else {
                    cos=1.27323954*t-0.405284735*t*t;
                }
                var c1:int = 31 * (cos - sin);
                if (c1 <0) c1 = 256 - c1;
                c1 = (c1 <<2 | c1) ;
                pix[i] = c1 <<15 | c1 <<9 | c1 ;
            }
            canvas.setVector(canvasRect, pix);
            clone.copyPixels(canvas, canvasRect, pnt);
            canvas.draw(clone, m, null, BlendMode.SUBTRACT);
            clone.copyPixels(canvas, canvasRect, pnt);
            clone.applyFilter(clone, canvasRect, pnt, blur);
            canvas.draw(clone, null, null, BlendMode.ADD);
            canvas.applyFilter(canvas, canvas.rect, new Point(0,0), gray);
            canvas.unlock();
        }
        

       }

}