forked from: BitmapData quirk

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

package {
    import flash.display.*;
    import flash.events.*;
    import flash.geom.*;
    import frocessing.color.ColorHSV;
    
    [SWF(frameRate=5)]
    public class FlashTest extends Sprite {
        private var bmd:BitmapData = new BitmapData(465, 465, true, 0);
        private var bmp:Bitmap = new Bitmap(bmd);
        private var mtx:Matrix = new Matrix;
        
        public function FlashTest() {
            addChild(bmp);
            var s:Number = 1;
            var e:Boolean = false;
            var f:Boolean = false;
            var c:ColorHSV = new ColorHSV(0, 0.75, 0.75);
            var r:Rectangle = new Rectangle(0, 0, 200, 200);
            addEventListener(Event.ENTER_FRAME, function():void
            {
                if (e) return;
                if (f = !f) {
                    c.h += 15;
                    bmd.fillRect(bmd.rect,0x00000000);
                    bmd.fillRect(r, 0xff000000 | c.value);
                } else {
                    mtx.a = mtx.d = s += 1/256;
                    bmd.draw(bmd, mtx);
                }
            });
            stage.addEventListener(KeyboardEvent.KEY_DOWN, function():void { e = !e });
        }
    }
}