黒狐さん
()が以前書かれていたつぶやきprocessing作品(https://t.co/sBR2DpS5Cb)と、Manohar Vangaさん
()のChaikin Curves(https://t.co/764739k72p)を組み合わせてみた。面白い感じになって素敵。

4 18

setup=_=>{createCanvas(W=720,W)
colorMode(HSB)
background(0)
noStroke()
for(r=0;r<13+!(X=Y=H=360);r+=.05)for(i=0;i++<H;)fill((F=r<6)?120:i,70+(S=sin(i/(A=F?38:60))**3*40),60-S)+circle(X+=cos(R=r+(noise(r*9,i/99)-.5)*i/A)*(D=i/(F?240:H)),Y+=sin(R)*D,S*i/W*D)}

5 29

function setup(){createCanvas(s=600,s,WEBGL)}function draw(){background(0),rotateX(a),rotateY(1*a),rotateZ(2*a);for(let $=-5;$<5;$++)for(let t=-5;t<5;t++)for(let f=-5;f<5;f++)push(),translate(300*$,300*t,300*f),fill(0,s,0,31),box(100),pop();a+=.005}a=0;//#つぶやきProcessing

9 56

t=0
A=[]
draw=_=>{t++||createCanvas(W=720,W)
background(0,2)
noStroke()
A[t%999]={x:noise(t/99)*W,y:noise(t/99,9)*W,l:6}
A.forEach(e=>circle(X=e.x+cos(e.y*.1)+(noise(B=e.x/99,C=e.y/99,t/W)-.5)*4,e.y+=sin(e.x*.1)+(noise(B,e.C,t/W+9)-.5)*4,e.l*=.999)+(e.x=X))}

12 58

t=0
a=[]
draw=_=>{t||createCanvas(W=720,W)
colorMode(HSB)
B=blendMode
R=random
a[t%W]={x:R(W),y:R(W),l:0,c:R(A=360)}
t++
B(BLEND)
background(0,.02)
B(ADD)
a.forEach(e=>fill(e.c,70,W,T=tan(e.l++/W))+circle(e.x+=cos(R=noise(e.x/A,e.y/A,t/W)*9),e.y+=sin(R),2/T))}

6 43

let angle=0,a=100,b=130;function setup(){createCanvas(600,600,WEBGL),noStroke()}function draw(){background(255);for(let $=0;$<360;$++){let e=sin($)*(a+b*sin($*angle)),n=cos($)*(a+b*sin($*angle));fill(255,e,n,63),ellipse(e,n,e/2)}angle+=1e-4}//

16 128



f=0
draw=_=>{
f++?background(0):createCanvas(W=500,W)
noFill()
stroke(W)
for(r=-f%50;r<W;r+=50){
beginShape()
for(i=0;i<TAU;i+=PI/30){
R=max(0,r+50*cos(f*noise(r+f,9)/30+i*int(5*noise(r+f)+1)))
vertex(250+R*cos(i),250+R*sin(i))
}
endShape(CLOSE)
}
}

5 36

「ロスト・イン・ザ・シー」

f=0
draw=_=>{
f++?background(0):createCanvas(W=500,W)
fill(0,0,W,99)
stroke(W)
for(x=-99;x<600;x+=40)
for(y=-99-x/2;y<600;y+=40){
i=atan2(y-250+200*cos(f/30),x-250+200*sin(f/50))
arc(x,y,200,200,i-PI/8,i+PI/8,PIE)
}
}

15 79

タンポポ (dandelion)
f=0;draw=_=>{f||createCanvas(w=400,w)&background(0,n=200,0);stroke(g=n+w-f,g,0);for(i=0;i<TAU;i+=1/w){r=max((abs(cos(i*6))-cos(i*12)+.85)*f*w/n/8,0);point(n+r*cos(k=i+noise(i)/5+f%1),n+r*sin(k))}if(f>w)w*=f-w,f=f%1+.85;f++}

2 16

「球形の葉層」

f=0
draw=_=>{
f++?background(0):createCanvas(W=500,W)
noStroke()
for(r=0;r<300;r+=50)
for(i=I=r%100?-f/80:f/80;i<I+7;i+=PI/6)
for(n=0;n<(N=r/2);n+=3){
circle(250+(r+n)*cos(i),250+(r+n)*sin(i),N/3*sin(n/N*PI))
}
}

5 16

setup=_=>{createCanvas(W=800,W)
background`#つぶやきProcessing`
F=fill
F`#f73`
C=circle
strokeWeight(8)
translate(400,0)
C(0,W,W)
E=_=>{F``
C(150,550,120)
F(0)
noFill(C(150,539,99))
arc(50,640,99,99,-1,PI)}
E()
E(scale(-1,1))
shearY(5)
stroke(33)
F``
arc(0,520,140,240,4.7,PI/2)}

2 29

「六角スロット」

f=0
draw=_=>{
f++?background(0):createCanvas(W=500,W)
noStroke()
for(r=f%50;r<500;r+=50)
for(i=0;i<TAU;i+=PI/30){
fill((f-r)%100*W)
circle(250+r*cos(I=i+f*(noise(r-f)-.5)/10),250+r*sin(I),r/2*cos(i*3))
}
}

3 15

t=0
draw=_=>{t||createCanvas(W=720,W)
t+=.04
background(0,9)
noFill()
for(H=i=360;i--;){stroke(W,i/2)
X=cos(I=i/99-t)*(L=250*sin(noise(I/2)*9))+H
Y=sin(I)*L+H
beginShape()
for(d=40;d--;)vertex(X+=cos(R=noise(I,d)*99)*(D=(9-i/40)**4/H),Y+=sin(R)*D)
endShape()}}

7 30

size(720,720)
translate(360,360)
clear()
noStroke()
fill(-1)
for j in range(3):
for i in range(1920):
with push():
rotate(TAU/3*j-.001*i)
r=100-i*.052 if i else 150
circle(0,r-340,2*r)
巴紋

1 14


float a=0,b;void setup(){size(2000,2000);for(;a<2;a+=.002){for(b=0;b<2;b+=.002){stroke((sin(log(f(0,0,22)))+1)*128);rect(a*1e3,b*1e3,1,1);}}}int f(float x,float y,int n){if(n<0||x*x+y*y>9){return 1;}else{return f(x*x-y*y+a-1.5,2*x*y+b-1,n-1)+f(2*x,2*y,n-1);}}

8 43

add_library("PixelFlow")
N=400
size(400,400,P2D)
F=DwFluid2D(DwPixelFlow(this),N,N,2)
for _ in "#つぶやきProcessing"*9:F.update();[F.addTemperature(i,1,4,2+(i%3.9)*i/N)for i in range(N)]
F.renderFluidTextures(g,1)
for i in range(N*N):set(i/N,i%N,[-6**3,-23**6][get(i/N,i%N)>-1e5])

2 17

f=0
draw=_=>{f++||createCanvas(W=360,W)
colorMode(HSB)
background`#つぶやきProcessing`
fill(0),B(15),B(-15)
fill(f%W,70,W),B(11),B(-11)}
B=a=>{beginShape(),[7,7,51,128,145,131,136,40,24,105,123,93,95,79,61,28,9,9].map(p=>curveVertex((p>>4)*a+180,(p%16-7)*abs(a)+180)),endShape()}

3 22

M,N=720,360
F=lambda x,y:abs(sin(y)+log(x))
G=lambda x,y:(F(x,y),F(y,x))
def H(i,j):r,q=dist(i,j,N,N)/65,abs((atan2(j-N,i-N)*3.82)%4-2);return G(*G(*G(r,q+r)))[0]
size(720,720)
for i in range(M*M):c=N*(H(i%M+2,i/M+3)-H(i%M,i/M));stroke(3*c,2*c,c);point(i%M,i/M)#つぶやきProcessing

6 29

setup=_=>{noStroke(createCanvas(W=800,W,WEBGL))
background`#つぶやきProcessing`
rotateY(.8)
for(j=99;j--;){beginShape(5)
i=0
for(c of`,f55,fd5,ff5,5d5,5ff,55f,b5b,`.split`,`)r=640-i*20,fill(`#${c}`),V=I=>vertex(300+cos(a=I*.032+PI)*r,230+sin(a)*r),V(j),V(j-1),i++
endShape()}}

4 6

var X=300,Y=300;function setup(){createCanvas(s=600,s),background(255)}function draw(){for(var b=0;b<=0;b++){var a=int(random(5));1==a?Y-=20:2==a?X+=20:3==a?Y+=20:4==a&&(X-=20),X>s&&(X=0),X<0&&(X=s),Y<0&&(Y=s),Y>s&&(Y=0),fill(60*a,0,90*a,10),ellipse(X,Y,70)}}//#つぶやきProcessing

3 27