a=(y,d=mag(k=(4 sin(y*7-t)*3)*cos(i/78),e=y/8-13))=>point((q=2*sin(k*2) .3/k y/8*k*(2 sin(y-d*3 t*2))) 40*cos(c=d-t (i&2)*2) 200,q*sin(c) d*46-300)
t=0,draw=$=>{t||createCanvas(w=400,w);background(9).stroke(w,96);for(t =PI/120,i=2e4;i--;)a(i/470)}//
#つぶやきProcessing