Naoto
Naoto Naoto Hieda

Tweet P5 Particle Study 55

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

comments powered by Disqus