連続する円
拡大する円をカーソル位置から発生。
トンネルを進んでいるように見えないかなと試してみたが、いまいち。
隠面消去すればもうちょっとましになるか?
♥0 |
Line 43 |
Modified 2010-11-13 00:12:05 |
MIT License
archived:2017-03-20 15:44:52
ActionScript3 source code
/**
* Copyright toburau ( http://wonderfl.net/user/toburau )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/kb2R
*/
package {
import flash.display.*;
import flash.events.*;
[SWF(width="465", height="465", backgroundColor="0x0", frameRate="60")]
public class test extends Sprite {
private var count:int = 0;
public function test() {
addEventListener(Event.ENTER_FRAME, onEnterFrame);
stage.addEventListener(MouseEvent.CLICK, onClick);
count = 0;
}
public function onEnterFrame(e:Event):void {
count++;
if(count > 10) {
count = 0;
addChild(new circle(mouseX,mouseY));
}
}
public function onClick(e:MouseEvent):void {
}
}
}
import flash.display.Sprite;
import flash.events.Event;
import flash.filters.GlowFilter;
class circle extends Sprite {
private var radius:int = 10;
public function circle(_x:int, _y:int) {
x = _x;
y = _y;
addEventListener(Event.ENTER_FRAME, onEnterFrame);
}
public function onEnterFrame(e:Event):void {
graphics.clear();
graphics.lineStyle(2,0xffffff);
graphics.drawCircle(0,0,radius);
radius++;
if(radius > 465) {
removeEventListener(Event.ENTER_FRAME, onEnterFrame);
parent.removeChild(this);
}
}
}