s=[m=0]
draw=_=>{
createCanvas(b=400,b)
a=m++%255
colorMode(HSB)
e=b*sin(m/200)/2
s[m%80]=[e*cos(c=e/10+PI*(m%2))+200,e*sin(c)+200,m,0]
s['map'](_=>(_[3]+=.1,y=_[1]+=_[3],x=_[0]+sin(_[3])*20)+strokeWeight(9-_[3])+stroke(_[2]*2%b,b,b)+point(x,y))}//#つぶやきProcessing