Frocessing練習1

by Renowan 07 Jul 2009

Tags

frocessing
Embed

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

package {
    import frocessing.display.F5MovieClip2D;
    import flash.display.*;
	
    [SWF(width="465", height="465", frameRate="60")]
    public class FlashTest extends F5MovieClip2D {
	    private var ppw:Number = 0.5;
		private var ppft:Boolean = false;
		
	    public function FlashTest() {
			stage.frameRate = 30;
			stage.align = StageAlign.TOP_LEFT;
			stage.scaleMode = StageScaleMode.NO_SCALE;
			
			super();
	    }
			
	
		public function draw():void {
			size(500, 500);
			background(0,0,0,100);
			noStroke();
		
			if(ppw>=0.9){
				ppft = false;
				}else if(ppw<=0.2){
				ppft = true;
			}
			
			
			if(ppft){
				ppw+=0.1;
			}else{
				ppw-=0.1;
			}
			
			for( var i:int = 0 ; i < 10 ; i++ ){
				var ttw:Number = (ppw + i)/5;
				fill( 255 , 255 , 255 , (ppw + i)/5 );
				circle( mouseX, mouseY, 200 - 10*i );
			}
		}
	}
}