単線で図形を動(ry

by Nowloading_
正方形を描画し、書き終わった際に中を塗りつぶす。
♥0 | Line 41 | Modified 2011-08-10 14:59:21 | MIT License
play

ActionScript3 source code

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

package {
    import flash.display.Sprite;
    import flash.events.Event;
    public class FlashTest extends Sprite {
        private var a:int = 100;
        private var b:int = 100;
        private var va:Array = [4,0,-4,0];
        private var vb:Array = [0,4,0,-4];
        private var i:int = 0;
        public function FlashTest() {
            init();
        }
        private function init():void{
            graphics.lineStyle(1);
            addEventListener(Event.ENTER_FRAME,oEF);            
        }
        private function oEF(e:Event):void{
            if(i <= 24){
                move(va[0],vb[0]);
            } else if ((i > 24) && (i <= 49)) {
                move(va[1],vb[1]);
            } else if((i > 49) && (i <= 74)) {
                move(va[2],vb[2]);
            } else{
                move(va[3],vb[3]);
                if(b <= 100){
                    removeEventListener(Event.ENTER_FRAME,oEF);
                    graphics.beginFill(0xff9999);
                    graphics.lineStyle(0);
                    graphics.drawRect(100,100,100,100);
                }

            }
            i++;
        }
        private function move(vx:int,vy:int):void{           
            graphics.moveTo(a,b)
            graphics.lineTo(a+vx,b+vy);
            a+=vx;b+=vy;
        }

    }
}