tw_spiralVolcano

f=0

draw=_=>{

  T=translate

  f||createCanvas(W=400, W, WEBGL)

  rotateX(39)

  noStroke()

  for(i=0;i<TAU;i+=PI/256){

    push(pointLight([99],0,-W,-250))

    rotate(i+f)

    T(0,0,-i*55)

    scale(1,1,.23)

    torus(I=i*22,I,4,W)

    lights()

    T(sin(R=(i+f)/9)*I,cos(R)*I,i*W)

    pop(sphere(i,W))

  }

  box(1000)

  f-=.04

}

​

// ----------------------------------------

// Minimized

// ----------------------------------------

// #つぶやきProcessing

// f=0,draw=t=>{for(f||createCanvas(W=400,W,WEBGL,T=translate),rotateX(39),i=0;i<TAU;i+=PI/256)push(pointLight([99],0,-W,-250)),rotate(i+f),T(0,0,55*-i),scale(1,1,.23),torus(I=22*i,I,4,W),lights(),T(sin(R=(i+f)/9)*I,cos(R)*I,i*W),pop(sphere(i,W));box(1e3),f-=.04}