大きさが周期的に変化する円によるゲシュタルトのサンプル
大きさが周期的に変化する円を，タイミングを徐々にずらして並べると，水平方向に動いているように感じられるサンプル．
/**
* Copyright shmdmoto ( http://wonderfl.net/user/shmdmoto )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/fzMv
*/
package
{
import frocessing.display.F5MovieClip2D;
/**
* リサージュ図形に沿った運動
* @author shmdmoto
*/
public class DynamicsSample1 extends F5MovieClip2D
{
public var lfo:Array;
public function setup() : void
{
Wonderfl.disable_capture();
lfo = new Array(15);
for( var i:int = 0 ; i < 15 ; i++) {
lfo[i] = new LFO(1, 10, 20, 1.0 * i / 15);
}
noStroke();
fill(0);
}
public function draw() : void
{
for( var i:int = 0 ; i < 15 ; i++ ) {
ellipse( 30*(i+1), 100, lfo[i].val(), lfo[i].val() );
}
}
}
}
// 以下は，動きを記述するためのクラスですので，編集しないでください．
import flash.utils.getTimer;
import frocessing.math.PerlinNoise;
/**
* Interpolate:指定した時間で，開始値から終値までの過渡的を
* 記述するクラス
*/
class Interpolate
{
private static const NOINIT :int = 1;
private static const RUNNING :int = 2;
private static const WAITING :int = 3;
private static const STOPPED :int = 3;
private var duration :Number;
private var begin :Number;
private var end :Number;
private var pow :Number;
private var tOffset :Number;
private var tElapsed :Number;
private var prevVal :Number;
private var tRestart :Number;
public var status :int = NOINIT;
public function Interpolate( t:Number, s:Number, f:Number,
p:Number = 1) {
begin = prevVal = s;
end = f;
duration = t;
pow = p;
}
public function val() :Number {
var t :Number;
if( status == NOINIT){
tOffset = getTimer()/1000;
prevVal = begin;
status = RUNNING;
} else if( status == RUNNING ) {
t = getTimer()/1000;
tElapsed = t -tOffset;
if( tElapsed < duration ) {
prevVal = begin + ( end - begin )*Math.pow(tElapsed/duration,pow);
} else {
prevVal = end;
status = STOPPED;
}
} else if( status == WAITING){
t = getTimer()/1000;
if( t >= tRestart) {
status = RUNNING;
tOffset = t - tElapsed;
}
}
return prevVal;
}
public function pause() :void
{
status = STOPPED;
}
public function cont() :void
{
status = RUNNING;
tOffset = getTimer()/1000-tElapsed;
}
public function start() :void
{
status = RUNNING;
tOffset = getTimer()/1000;
}
public function wait( waitTime :Number ) :void
{
status = WAITING;
tRestart = getTimer() + waitTime;
}
public function isRunning() :Boolean
{
if( status == RUNNING ) {
return true;
} else {
return false;
}
}
public function isStopped() :Boolean
{
if( status == STOPPED ) {
return true;
} else {
return false;
}
}
public function isEnd() :Boolean
{
if( prevVal >= end) {
return true;
} else {
return false;
}
}
}
/**
* LFO:指定した時間での周期的変動を記述するクラス
*/
class LFO {
public static const SIN :int = 1;
public static const COS :int = 2;
public static const SAW :int = 3;
public static const TRI :int = 4;
public static const SQR :int = 5;
public static const ABSSIN :int = 6;
public static const NOISE :int = 7;
private static const NOINIT :int = 1;
private static const RUNNING :int = 2;
private static const WAITING :int = 3;
private static const STOPPED :int = 4;
private var period :Number;
private var amplitude :Number;
private var phase :Number;
private var offset :Number;
private var type :int = SIN;
private var isStart :Boolean;
private var t_offset :Number;
private var status :int = NOINIT;
public function LFO( prd :Number, amp :Number,
of :Number = 0, ph :Number = 0)
{
period = prd;
amplitude = amp;
offset = of;
phase = ph;
}
public function setPeak( min :Number, max :Number) :void
{
offset = (min + max) / 2;
if( min < max ) {
amplitude = (max - min) / 2;
} else {
amplitude = (min - max) / 2;
}
}
public function setType( t :int ) :void
{
type = t;
}
public function val( mul :Number=1.0 ) :Number {
if(status == NOINIT) {
status = RUNNING;
t_offset = getTimer() / 1000.0;
return val();
} else if(status == RUNNING ) {
var t :Number = getTimer() / 1000.0 - t_offset;
var temp :Number;
switch(type) {
case SIN :
return offset + mul * amplitude *
Math.sin(2.0 * Math.PI *( t/period + phase) );
case COS :
return offset + mul * amplitude *
Math.cos(2.0 * Math.PI *( t/period + phase) );
case SAW :
temp = t / period + 0.5 + phase -
Math.floor( t / period + 0.5 + phase ) - 0.5;
return offset + 2.0 * mul * amplitude * temp;
case TRI :
temp = t / period + phase -
Math.floor (t / period + phase );
if( 0.0 <= temp && temp < 0.25 ) {
return offset + mul * amplitude * 4.0 * temp;
} else if( temp < 0.75 ) {
return offset + mul * amplitude * ( 2.0 - 4.0 * temp);
} else {
return offset + mul * amplitude * ( -4.0 + 4.0 * temp);
}
case SQR :
temp = t/period + phase -
Math.floor( t / period + phase);
if( temp < 0.5 ){
return offset + mul * amplitude;
} else {
return offset - mul * amplitude;
}
case ABSSIN :
return offset +
Math.abs(mul * amplitude * Math.sin(2.0*Math.PI *( t/period + phase)));
case NOISE :
var p :PerlinNoise = new PerlinNoise();
return offset -mul * amplitude + 2.0 * mul * amplitude * p.noise(t/period+phase,1);
default :
return 0.0;
}
} else {
return 0.0;
}
}
}