for(t=[],W=400,c=N=0;N<41;N++)t[N]=[Math.random()*W,0,9*N];draw=a=>{c||createCanvas(W,W),background(W),t.find(a=>{[q,r,s]=t[++c%N],b=a[1]+=atan2(q,s)*mag(q,s),u=a[0]+=cos(b),v=a[2]+=sin(b),t.find(a=>{stroke(0,W-5*dist(u,v,x=a[0],y=a[2])),line(u,v,x,y)})})};//#つぶやきProcessing