#つぶやきProcessing 「光の機織り」

f=0
draw=_=&gt;{
  f++||createCanvas(W=500,W)
  background(0)
  stroke(W)
  for(r=50;r&lt;W;r+=50)
  for(c=0;c&lt;r/20;c++){
    line(150,150,x=150+r*cos(i=(f+9e3+c*3)*r/3e4),y=150+r*sin(i))
    circle(x,y,9)
  }
}
#つぶやきProcessing