forked from: forked from: wonderfl KeyVisual V.4.ja

by Dochy 17 Jul 2009

Embed

// forked from ossan's forked from: wonderfl KeyVisual V.4.ja
package{
	import frocessing.display.*;
	
	[SWF(width="465", height="465", frameRate="60")]
	public class FrocessingSample extends F5MovieClip2DBmp
	{
		var stage_width:Number  = 465;
		var stage_height:Number = 465;
		var n:int = 5;
		var t:Number = 0;
		
		public function FrocessingSample() 
		{
			super();
		}
		
		public function setup():void
		{
			size( stage_width, stage_height );
			background( 0 );
			noFill();
			stroke( 255, 0.1 );
		}
		
		public function draw():void
		{
			if ( isMousePressed )
				background( 0, 1 );
			
			translate( 0, stage_height / 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.01;
		}
	}
}