"Caustics" in 146 chars of #GLSL vec2 p=FC.xy/r.y*2e1+t;for(float i;i++<8.;)p+=sin(p+t/.2+i)*.4,p*=mat2(6,-8,8,6)/9.;o=vec4(tanh(length(fwidth(sin(p*.3)/.1))),texture(b,FC.xy/r));

"Bokeh" vec2 p=FC.xy/r.y;for(float i,f,g;i++<9.;o+=(cos(p.y+p.x/.6+g+vec4(0,1,2,0))+1.)*smoothstep(-9.,9.,(.3-length(cos(p++/.3+t*.2)))*r.y/exp(f=sin(i)*i+i))/exp(f/3.+sin(i+g+t))*(g=cos(p/.4).x)*g)p*=mat2(8,-6,6,8)/9.;o=sqrt(tanh(.2*o));

Blackhole in 350 characters of #GLSL: vec2 p=(FC.xy*2.-r)/r.y/.7,d=vec2(-1,1),c=p*mat2(1,1,d/(.1+5./dot(5.*p-d,5.*p-d))),v=c;v*=mat2(cos(log(length(v))+t*.2+vec4(0,33,11,0)))*5.;for(float i;i++<9.;o+=sin(v.xyyx)+1.)v+=.7*sin(v.yx*i+t)/i+.5;o=1.-exp(-exp(c.x*vec4(.6,-.4,-1,0))/o/(.1+.1*pow(length(sin(v/.3)*.2+c*vec2(1,2))-1.,2.))/(1.+7.*exp(.3*c.y-dot(c,c)))/(.03+abs(length(p)-.7))*.2);

#つぶやきGLSL float T=754./60.;for(float i,h,s,v;i++&lt;70.;){s=3.+i*4.;v=floor((2.+sin(i))*1./i*s*T)/T;vec2 p=(FC.xy/r.x)*s+vec2(sin(t+i),t*v);h=fract(sin(dot(floor(p),floor(p)+i))*4e3);if(h&lt;.02)o+=smoothstep(.2,0.,length(fract(p)-.5+(h-.5)*.7));}o+=vec4(0,.25,.5,1)*(1.-FC.y/r.y);

#つぶやきGLSL #Jōmon vec2 p=(FC.xy*2.-r)/r.y*2.;p+=sin(p.yx*3.+t*.1)*.6;float v=0.,d=length(p);for(float k=1.;k&lt;4.;k++){vec2 q=fract(p*k*.7+k*2.)-.5;float a=atan(q.y,q.x),l=length(q);v+=smoothstep(.4,0.,abs(sin(a*4.+l*15.+t)));}o=exp(-d*5.)*vec4(2,1.5,.8,0)+v*vec4(.5,.7,1.05,1);

#つぶやきGLSL for(float i,g,e,s;i++&lt;80.;o+=.1/exp(e+3.+sin(vec4(1,1.5,2,0)-log(s)))){vec3 p=vec3((FC.xy*2.-r)/r.y*g,g);mat2 m=rotate2D(t*.2);p.xz*=m;p.yz*=m;p.z+=t/PI;p++;s=8.;for(int j;j++&lt;9;p/=e)p=mod(p-1.,2.)-1.,p.xz*=rotate2D(PI/4.),s/=e=exp(dot(p,p)-1.6);g+=e=length(p)/s;}

#つぶやきGLSL for(float i,g,e,s;i++&lt;1e2;){vec3 p=vec3((FC.xy-.5*r)/r.y*g,g);mat2 m=rotate2D(t*.2);p.xz*=m;p.yz*=m;p.z+=t/PI;p+=1.-i/2e4;s=4.;for(int j;j++&lt;9;p=abs(p)/e,p.y+=.2)p=mod(p-1.,2.)-1.,s/=e=length(p*p)*.8;g+=e=p.x/s;o+=.01/exp(e*1e4*(1.2-sin(vec4(0,1,3,0)+log(s)*.2)));}

"String Theory", 207 chars of #GLSL vec3 p;for(float i,z,d;i++&lt;1e2;o+=(sin(p.x+t+vec4(0,2,3,0))+1.)/d)p=z*normalize(FC.rgb*2.-r.xyy),p.z-=t,p.xy*=mat2(cos(z*.2+t*.1+vec4(0,33,11,0))),z+=d=length(cos(p+cos(p.yzx+p.z-t*.2)).xy)/6.;o=tanh(o/5e3);

"LED Cube 2" for(float i,z,d,s,c;i++&lt;5e1;){vec3 p=z*normalize(FC.rgb*2.-r.xyy);p.z+=8.;p.xz*=mat2(cos(t/4.+vec4(0,33,11,0)));z+=d=max(length(cos(p/.2))/8.,length(clamp(p,-3.,3.)-p));o+=(cos(dot(cos(p),sin(p/.6).yzx)+t+vec4(0,1,2,3))+1.1)/d/z;}o=tanh(o/7e1);

for(float i,g,e,s,a;i++&lt;50.;){vec3 c,p=vec3((FC.xy*2.-r)/r.y*g,g);mat2 m=rotate2D(t*.2);p.xz*=m;p.yz*=m;p.z+=t/PI;p++;a=s=9.;for(int j;j++&lt;16;p/=e)p=mod(--p,2.)-1.,p.yz*=rotate2D(PI/4.),a=min(a,length(p)),s/=e=dot(p,p)*.5;g+=e=1./s;o+=.01/exp(e*1e3+g)*(2.+sin(vec4(1,4,6,9)*a));}

vec3 f=vec3(.2,.4,1.5),p;for(float i,e,g,S,u;i++&lt;50.;o+=exp(e*5e3-sin(vec4(4,3,2,0)*p.z-log(S)))/50.){p=vec3((FC.xy-.5*r)/r.y*g,g)-i/3e4;mat2 M=rotate2D(t/8.);p.yz*=M*M;p--;p.yx*=M;S=5.;for(int j;j++&lt;20;p/=u)S/=u=dot(p=2.*clamp(p,-f,f)-p,p);g-=e=p.z/S;} #つぶやきGLSL

float i,e,R,s;vec3 q,p,d=vec3((FC.xy*9.)/r-vec2(1.5),7.);for(q.yz--;i++&lt;99.;){e+=i/1e5;o+=i*e*i/15.*vec4(.9,.63,.47,1)/d.y;s=2.;p=q+=d*e*R*.1;p=vec3(log2(R=length(p))-p.z,exp2(mod(p.y,p.z)/R),t*.1+p.x);for(e=--p.y;s&lt;2e3;s+=s)e+=abs(dot(cos(p.yzx*s),sin(p*s))/s*.11);}#つぶやきGLSL

#つぶやきGLSL for(float i,g,e,s;++i&lt;99.;o.rgb+=hsv(.506,g*6./s,s/6e2)){vec3 p=vec3((FC.xy-.5*r)/r.y*3.6+vec2(0,3),g+.9)*rotate3D(8.9-sin(t*.3)*.3,vec3(0,9,cos(t*.3)*.1-1.2));s=3.;for(int i;i++&lt;17;p=vec3(0,4,-1)-abs(abs(p)*e-vec3(3,4,3)))s*=e=7.5/dot(p,p*.5);g+=p.y/s;s=log(s);}

#つぶやきGLSL float i,e,R,s;vec3 q,p,d=vec3(FC.xy/r*.8-vec2(.4,-.6),1);for(q.zy--;i++&lt;80.;){o.rgb+=hsv(q.z,.5,min(e*s-.3,1.)/35.);s=5.;p=q+=d*e*R*.3;p=vec3(log(R=length(p*1.3)),exp2(-p.z/R),atan(p.y,p.x)-t*.3);for(e=--p.y;s&lt;1e3;s+=s)e+=cos(dot(sin(p*s),cos(p.yyz*s+t*.9)))/s*.45;}

"Watch" for(float z,d,i;i++&lt;1e2;o+=(cos(.1*i+vec4(0,1,4,0))+1.1)/d){vec3 p=z*normalize(FC.rgb*2.-r.xyx);p.xy*=mat2(cos(.2*z-i*.3+vec4(0,33,11,0)));p.z+=t;for(d=1.;d&lt;9.;d++)p+=cos(p*d).yzx/d;z+=d=.1*length(cos(p)+1.);}o=tanh(o*o/1e6);

252 chars in #つぶやきGLSL for(float i,g,e,s;++i&lt;90.;){vec3 p=vec3(((FC.xy*2.-r)/r.x)*.7+vec2(0,1),g+.1);p.zx*=rotate2D(t*.3);s=2.;for(int i;i++&lt;17;p=vec3(2,5,2)-abs(abs(p)*e-vec3(4)))s*=e=max(1.01,13./dot(p,p));g+=mod(length(p.xz),p.y*5.)/s;s=log(s*.1);o.rgb+=hsv(g,p.z,s/6e2);}

float i,e,R,s;vec3 q,p,d=vec3(FC.xy/r-.2,.4);for(q.yz--;i++&lt;99.;){o.rgb+=hsv(.6+e,.3,min(e*s*e/.01,.4-e)/9.);s=1.;p=q+=d*e*R*.3;p=vec3(log2(R=length(p))-t*.6,exp(-p.z/R+.5),atan(p.x,p.y)-t*.3);for(e=--p.y;s&lt;1e3;s+=s)e+=-abs(dot(cos(p.zxy*s),.2-sin(t*.3-p*s)))/s*.24;}#つぶやきGLSL

float i,s,R,e;vec3 q,p,d=vec3((FC.xy-.5*r)/r+vec2(0,1),1);for(q.yz--;i++&lt;50.;){e+=i/5e3;i&gt;35.?d/=-d:d;o.rgb+=hsv(.1,e-.4,e/17.);s=1.;p=q+=d*e*R*.18;p=vec3(log(R=length(p))-t*.2,-p.z/R,p.yz-1.*p.xx-t*.2);for(e=--p.y;s&lt;5e2;s+=s)e+=cos(dot(cos(p*s),sin(p.zxy*s)))/s*.8;}#つぶやきGLSL

"Balatro" in 345 chars #define M max(0.,1. float i,l,a,b;vec2... v=ceil(FC.xy/r.y*3e2)/18.-8.*r/r.y,u=v*mat2(cos(vec4(4,37,15,4)+.1*t-length(v)/6.));for(v=u+u.yx;i++<5.;l=length(u-=cos(u+u.yx)-sin(u.x*.7-u.y))/7.)v+=sin(max(u,u.yx))+u, u+=.5*sin(v/vec2(3,1)+.2*t).yx;a=M-abs(l-2.))+.1,b=M-l);o=a/vec4(1,4,4,1)+vec4(0,.4,.7,1)*b+M-a-b)/vec4(17,8,7,1)+M+a-2.)+M+b+b-2.6);show more

for(float i,g,k,e,s,q;i++&lt;1e2;o+=.01/exp(q*i)){vec3 p=vec3((FC.xy-r*.5)/r.y*g,g-4.);p.zy*=rotate2D(cos(k=t*.3));p=vec3(log(q=s=length(p))-k,p.y/s,atan(p.x,p.z)+k)/PI*9.;k=p.y--;for(int j;j++&lt;9;p/=e)p-=sign(p=mod(++p,2.)-1.)*.02*k*k*log(8./s),q*=e=dot(p,p);g+=q*.05;} #つぶやきGLSL