<script>
t=0//#つぶやきProcessing
draw=_=>{t||createCanvas(W=600,W)
background(m=20)
strokeWeight(2)
n=noise
w=W/2
fill(0)
for(j=2;j--;)for(r=10;r--;)for(s=r+t%1,i=m;i--;stroke(W,j*W),circle(cos(p=TAU/m*i+n(i,s/9)*5)*R+w,sin(p)*R+w,n(i,s)*s*m))R=(a=W*.1-n(i,s)*m)*r+t%1*a
t+=.01}
</script>
Show on Twitter