t=[N=0],draw=a=>{N||createCanvas(W=400,W),t[N++%(n=200)]=[N,5,n-N,W,150*cos(N/30)+n,150*sin(N/30)+n],t.find(n=>{t.find(([,,,,a,t])=>{m=mag(x=n[4]-a,y=n[5]-t),m<20&&m>0&&(n[3]=W-25*m,stroke(n),line(n[4]+=cos(B=n[1]+=atan2(x,y)/m),n[5]+=sin(B),a,t))})})};//#つぶやきProcessing