Screen Saver: Apobiosis

Apobiosis (preview)

スクリーンセーバーを作ってみました。スクリプトを触るのは久しぶりで楽しかったです。下記アドレスよりダウンロードできますので、よろしければお試しください。

【zipファイル版】

Windowsインストーラー版】

【ソースファイル】

下記の関数を再起処理させることで動いています。位置・角度・サイズを以前のオブジェクトのプロパティから算出し、円運動を描くよう単体のオブジェクトを生成し続けています。外縁の一部を除いて、古くなったオブジェクトから削除されていきます。

function duplicateObj() {
  max = 200;
  limit = 4;
  a++;
  i++;
  _root.attachMovie("unit","unit"+a,i);
  _root["unit"+a]._y = Math.cos(a)*(200-Math.sqrt(a)*30)+Math.cos(a)+Stage.height/2;
  _root["unit"+a]._x = Math.sin(a)*(200-Math.sqrt(a)*30)+Math.sin(a)+Stage.width/2;
  _root["unit"+a]._rotation = i;
  _root["unit"+a]._yscale = i/2;
  _root["unit"+a]._xscale = i/2;
  _root["unit"+(a-max)].removeMovieClip();
  if (a>max*times) {
   a = i=0;
   times<limit ? times++ : times=0;
   duplicateObj();
  }
 }

【細胞死の科学 細胞の寿命死──アポビオーシス:日経サイエンス