flash on 2010-11-23
http://blog.alt-scape.com/archives/138
♥0 |
Line 39 |
Modified 2010-11-23 11:52:30 |
MIT License
archived:2017-03-20 16:59:06
ActionScript3 source code
/**
* Copyright aruerula ( http://wonderfl.net/user/aruerula )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/7SOa
*/
package
{
//http://blog.alt-scape.com/archives/138
import flash.display.*;
import frocessing.display.F5MovieClip2D;
public class frocessing1 extends F5MovieClip2D
{
private var count:int = 50;
private var addNum:int = 1;
public function frocessing1()
{
stage.frameRate = 30;
stage.align = StageAlign.TOP_LEFT;
stage.scaleMode = StageScaleMode.NO_SCALE;
super();
QBest();
}
public function draw():void
{
clear();
size(550, 400);
colorMode(HSB, 360, 100, 100, 100);
background(0,0,0,100);
noStroke();
fill(210,100,100,10);
translate(0, 0);
var ellipse_size:int = 400;
var left:int = 270;
var top:int = 200;
//同心円を描いて行く
for(var i:int = 0; i < 16; i++)
{
ellipse(left, top, ellipse_size, ellipse_size);
ellipse_size = ellipse_size - count + mouseX/10;
}
if (count > 100) addNum = -2;
else if (count < 50) addNum = 2;
count += addNum;
}
}
}