打ち上げ花火

説明

キーを押すと花火が下から上に打ち上がります。一定の高さまで行くと円になって広がっていきます。IchigoLatte ver 0.9で搭載されたsin8の機能を使っています。ver 0.8.1より高速になっているので、綺麗に花火が広がります。

[以下のJavaScriptプログラムをダウンロード]

// Hanabi-1
var data=new Array();
data[0]=16;
data[1]=-10;
data[2]=999;
var baseY=12;
function key(n){
  if (data[2]==999){
    baseY=6+rnd(12);
    data[0]=10+rnd(10); // x
    data[1]=-(23-baseY); // y
    data[2]=0; // r
  }
}
function main(){
  var t=60;
  if (data[2]!=999){
    if (data[1]<0){
       data[1]=data[1]+1;
       cls();
       lc(data[0],baseY-data[1]); log("O");
    }else{
      data[2]=data[2]+1;
      if(data[2]>16){ data[2]=999; }
      var d=0;
      t=1; // var t=1;
      cls();
      while(d<360){
        var x=data[0]+sin8(d+90)*data[2]/250;
        var y=baseY-data[1]+sin8(d)*data[2]/250;
        if((x>0)*(x<31)*(y>0)*(y<22)){
          lc(x,y); log("*");
        }
        d=d+18;
      }
    }
  }
  setTout(main,t);
  lc(0,0);log(t);
}
setKprs(key);
cls();
main();

目次に戻る