flash on 2009-9-29

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

package {
    import flash.text.TextField;
    import frocessing.display.F5MovieClip2D;
    import flash.display.Stage;
	import flash.display.*;
	import flash.events.*;
    
    public class FrocessingTest extends F5MovieClip2D {
        private var n:int = 960;
		private var s:Number = stage.stageHeight / 30;
        private var q:Number = 0;
		private var child:Sprite;
		private var myTextField:TextField;
        //描画プログラムの初期化(ADDED_TO_STAGE)
        public function setup():void {
            colorMode(HSV, n, 1, 1);
            rectMode(CENTER);
            noStroke();
        }
        //一定間隔で描画を実行する(ENTER_FRAME)
        public function draw():void {
            //キャンバスをステージの中心へ移動
            translate(stage.stageWidth / 2, 0);          
            //描画
            for (var i:int = 0; i < 30; i++) {
				if (i + q > n) {
					q -= n;
				}
                fill(i+q, 1, 1);
                rect(0, i*s, stage.stageWidth, 30);
            }
			q++;
         }
    }
}