t=0,draw=o=>{for(t||(createCanvas(W=720,W),colorMode(HSB,TAU,1,1,1),noFill(H=W/2)),o||(background(0),o=.9),.1<o&&draw(o*o),i=0;i<=TAU;i+=.01)stroke(i,.6,1,o),circle(H+W*o*cos(i+o)*sin(i+t)*sin(i),H+W*o*sin(i+t)*sin(2*t+o),1);t+=.001};// #つぶやきProcessing