flash on 2011-7-21

by snaf
♥0 | Line 39 | Modified 2011-08-13 08:35:58 | MIT License
play

ActionScript3 source code

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

package  {
    import frocessing.display.*;
    import flash.geom.ColorTransform;;

    [SWF(width="600",height="600",frameRate="30")]
    
    public class Wave extends F5MovieClip2DBmp{
    
      private var cr:int=12;
      private var ty:Number=0;
      private var ii:Number=0; 
      //private var ct:ColorTransform=new ColorTransform(0.98,0.98,0.98);
    
        public function Wave() {
          super();
        }
        
        public function setup():void {
          background(0);
          noFill();
        }
        
        public function draw():void {
          stroke( random(100,200),random(100,200),random(100,200), 0.5);
          strokeWeight(random(3));
          translate( 0, 500);
          beginShape();
          curveVertex( -100, 0 );
          
          for ( var i:int=0; i <= cr; i++ ){
            var numX:Number = i * 50;
            var numY:Number = noise( i * 0.5, ty,i*0.5 ) * 300 -300;
            curveVertex( numX, numY );
          }
        
          curveVertex(700, 0 );
          endShape();
          bitmapData.colorTransform(bitmapData.rect,ct)
          if(ii<5){
           ty+=0.01;
           i--;
          }else{
           ty-=0.01;
           i++;
          }
    }
  }
}

Forked