In case Flash no longer exists; a copy of this site is included in the Flashpoint archive's "ultimate" collection.

Dead Code Preservation :: Archived AS3 works from wonderfl.net

flash on 2011-11-10

変数を使った直線の描画:
@author shmdmoto
Get Adobe Flash player
by sss 10 Nov 2011
    Embed
/**
 * Copyright sss ( http://wonderfl.net/user/sss )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/r6r9
 */

package
{
    import frocessing.display.F5MovieClip2D;
    /**
     * 変数を使った直線の描画:
     * @author shmdmoto
     */
    public class GraphicExample extends F5MovieClip2D
    {
        public function draw() : void
        {
            // ここに描画命令を記述します.
            // (x,y) : 直線の始点
            var x:Number = 100;
            var y:Number = 100;
            var w:Number = 300;
            line(x,y,x+w,y);
            // 始点を50ピクセル移動
            y = y + 30;
            line(x,y,x+w,y);
            // 始点を50ピクセル移動
            y = y + 30;
            line(x,y,x+w,y);
            // 始点を50ピクセル移動
            y = y + 30;
            line(x,y,x+w,y);
            
            // 4本の縦線
            var x:Number = 100;
            var y:Number = 100;
            var w:Number = 300;
            line(x,y,x,y+w);
            x=x+50;
            line(x,y,x,y+w);
            x=x+50;
            line(x,y,x,y+w);
            x=x+50;
            line(x,y,x,y+w);
            
            // 斜めに移動
            var x:Number = 20;
            var y:Number = 20;
            var w:Number =100;
            line(x,y,x+w,y);
            x=x+10;
            y=y+10;
            line(x,y,x+w,y);
            x=x+10;
            y=y+10;
            line(x,y,x+w,y);
            x=x+10;
            y=y+10;
            line(x,y,x+w,y);
            
            //だんだん長く
            var x:Number=200;
            var y:Number=20;
            var w:Number=20;
            line(x,y,x+w,y);
            w=w+20;
            y=y+10;
            line(x,y,x+w,y);
            w=w+20;
            y=y+10;
            line(x,y,x+w,y);
            w=w+20;
            y=y+10;
            line(x,y,x+w,y);
        }
    }
 
}