forked from: flash on 2009-10-20

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

// forked from dfrm's flash on 2009-10-20
package {
    import flash.geom.Point;
    import flash.geom.Rectangle;
    import flash.display.Sprite;
    import flash.display.BitmapDataChannel;
    import flash.display.BitmapData;
    import flash.display.Bitmap;
    public class FlashTest extends Sprite {
        private const WIDTH:Number = stage.stageWidth;
        private const HEIGH:Number = stage.stageHeight;
        
        private var perlin:BitmapData;
        
        public function FlashTest() {
            // write as3 code here..
            Init();
        }
        
        private function Init():void{
            perlin = new BitmapData(WIDTH,HEIGH);
            
            var seed:Number = Math.floor(Math.random() * 10);
            var channels:uint = BitmapDataChannel.RED | BitmapDataChannel.BLUE;

            var pt:Point = new Point(0,0);
            perlin.perlinNoise(100, 80, 6, seed, false, true, channels, true, null);
            var rect:Rectangle = new Rectangle(0, 0, perlin.width, perlin.height);
            perlin.threshold(perlin, rect, pt, ">=", 0x111111, 0x000000, 0xFFFFFF, false);  

            addChild(new Bitmap(perlin)) as Bitmap;
        }
    }
}