// forked from nutsu's forked from: FrocessingSample // forked from nutsu's FrocessingSample // see http://gihyo.jp/design/feature/01/frocessing/0001 package { import frocessing.display.*; [SWF(width="465", height="465", frameRate="60")] public class FrocessingSample extends F5MovieClip2D { private var stage_width:Number = 465; private var stage_height:Number = 465; private var n:int = 255; private var t:Number = 0; public function FrocessingSample () { super(); } public function setup():void { size( stage_width, stage_height ); background( 0 ); noFill(); colorMode( HSV, 2, 1, 1 ); } public function draw():void { background( 0 ); translate( 0, stage_height/2 ); stroke( t, 2, 2.75, 1.2 ); beginShape(); curveVertex( 100, 0 ); for( var i:int=0; i<=n; i++ ) { var xx:Number = i * stage_width / n; var yy:Number = noise( i * 0.25, t ) * 300 - 150; curveVertex( xx, yy ); } curveVertex( stage_width+100, 0 ); endShape(); t+=0.02; } } }