for(float e,i,a,w,x,g,h;i++<90.;o+=.01-.02/exp(max(s,e)*3e3)/h){vec3 p=vec3((FC.xy-.5*r)/r.y*g+2.,g);p.zy*=rotate2D(.5);e=p.y;h=e+p.x*.3;p.z+=t;for(a=.6;a>.001;a*=.7)p.xz*=rotate2D(5.),x=(p.x+p.z)/a+t+t,e-=w=exp(sin(x)-3.)*a,h+=abs(dot(sin(p.xz/a*.3)*a,r/r));g+=e=min(e,h*.5-1.);}

o++;vec3 p,c=vec3(8,6,7)/6e2;for(float q=2.,e,i,a,g,h,k;i++<2e2;g+=a=min(e,h-q)/3.,o-=mix(c.ggbr,c.rgrr+h/7e2,h-q)/exp(a*a*1e7)/h)for(p=vec3((FC.xy-r/q)/r.y*g,g),e=p.y-g*.7+q,p.z+=t,h=e+p.x*.4,a=q;a<5e2;a/=.8)p.xz*=rotate2D(q),h-=exp(sin(k=p.z*a)/a-1.)-.44,e-=exp(sin(k+t+t)-q)/a;

for(float i,g,e,s,a;i++<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++<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));}

#つぶやきGLSL for(float i,g,e,s;i++<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++<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++<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++<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)));}

#つぶやきGLSL for(float i,g,e,s;++i<99.;){vec3 p=vec3((FC.xy-.5*r)/r.y*5.+vec2(-1,1),g-6.)*rotate3D(2.,vec3(6,0,6));p.xz*=rotate2D(t*.3);s=3.;for(int i;i++<19;p=vec3(0,4.03,-1)-abs(abs(p)*e-vec3(3,4,3)))s*=e=7.5/dot(p,p*.47);g+=p.y*p.y/s*.3;s=log2(s)-g;o.rgb+=hsv(.5*e,.4,s/7e2);}

252 chars in #つぶやきGLSL for(float i,g,e,s;++i<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++<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);}

#つぶやきGLSL float i,e,R,s;vec3 q,p,d=vec3((FC.xy-.5*r)/r.y,1);for(q.z--;i++<99.;){o.rgb+=hsv(R/i,-e,e/2e1);p=q+=d*max(e,.01)*R*.27;p.zx*=rotate2D(.6);p=vec3(log(R=length(p))-t*.3,e=-p.z/R-1.,atan(p.x,p.y)-t*.3);for(s=1.;s<6e3;s+=s)e+=abs(dot(sin(p.yzx*s),cos(p.zxy*s)))/s*.9;}

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

for(float i,g,k,e,s,q;i++<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++<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

float i,e,R,s;vec3 q,p,d=vec3(FC.xy/r-.2,.4);for(q.yz--;i++<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<1e3;s+=s)e+=-abs(dot(cos(p.zxy*s),.2-sin(t*.3-p*s)))/s*.24;}#つぶやきGLSL

for(float i,g,e,s;++i<99.;o.rgb+=.01-hsv(.1,g*.016-e*.3,s/2e2)){vec3 p=vec3((FC.xy-.5*r)/r.y*5.+vec2(0,9),g)*rotate3D(-1.1-cos(t*.15)*.1,vec3(1,11.+sin(t)*.15,-1.5));s=2.;for(int i;i++<19;p=vec3(.08,4,-1)-abs(abs(p)*e-vec3(3,4,3)))s*=e=7.1/dot(p,p*.51);g+=p.y/s;s=log2(s)/exp(e);}

vec4 x=vec4(9,8,7,1);float i,e,a,y;vec3 p,q,d=FC.bgr/r.y-.5;q-=8.;for(d.xz*=rotate2D(.4);i++<2e2;e=max(-e,y))for(o+=i>175.?d/=d+d,tanh(log(e+=.01))/x/x:x/2e3/exp(e*1e3),p=q+=d*e,y=p.y,p.y=mod(y+t,40.)-20.,a=6.;a>.1;a*=.6)p=abs(p)-a-a,e=min(e,max(max(p.x,p.z),p.y+.5+.5*sin(y+a)));

float i,e,R,s;vec3 q,p,d=vec3((FC.xy-.5*r)/r,.7);for(q.z--;i++<99.;){o.rgb+=hsv(.6,e*.4+p.y,e/3e1);p=q+=d*max(e,.01)*R*.14;p.xy*=rotate2D(.8);p=vec3(log2(R=length(p))-t,e=-p.z/R-.8,atan(p.x*.08,p.y)-t*.2);for(s=1.;s<1e3;s+=s)e+=abs(dot(sin(p.yzx*s),cos(p.yyz*s)))/s;}#つぶやきGLSL

#つぶやきGLSL float i,e,R,s;vec3 q,p,d=vec3(FC.xy/r*.8+vec2(-.4,.6),1);for(q.zy--;i++<99.;){o.rgb+=.02-hsv(s*s+R*4.,.4,min(e,R)/6.);s=12.,p=q+=d*e*R*.1;p=vec3(log2(R=length(p))-t*.4,exp(R-p.z*.5),atan(p.y*.6,p.x)+t*.2);for(e=--p.y;s<3e2;s+=s)e+=dot(sin(p.yzy*s),sin(p.xxz*s))/s;}

for(float i,g,e,s;++i<139.;){vec3 p=vec3((FC.xy-.5*r)/r*.1+vec2(0,1.18),g-1.4);p.zx*=rotate2D(t*.3-9.);s=1.;for(int i;i++<26;p=vec3(.33,4,-.64)-abs(abs(p)*e-vec3(2.7,3.95+e*.15,3.5-g)))s*=e=5./dot(p,p*.5);g+=p.y/s;s=log(s)*g+g;o.rgb+=.01-hsv(e/i-.38,p.y*.4,s/1e3);}s;#つぶやきGLSL

for(float i,k,j,g,e,s,n=15.;i++<1e2;o.rgb+=hsv(s=log(s)/n,.5,s/2e2*k)+FC.zww*g*k/6e4){vec3 q,p=vec3((FC.xy-.5*r)/r.y*g-9.,g)+n;p.zx*=rotate2D(t/n);s=j=3.;k=s+snoise3D(vec3(p.xz*.1,t));for(q=p;j++<23.;p=vec3(0,4,-1)-abs(abs(p)*e-vec3(3,4,3)))s*=e=n/dot(p,p);g+=min(30.-q.y,p.y/s);}

#つぶやきGLSL float i,e,R,s;vec3 q,p,d=vec3(FC.xy/r*.6-vec2(.4,-.6),.5);for(q.zy--;i++<67.;){o.rgb+=hsv(.1,e,min(e*s,1.)/64.);s=3.;p=q+=d*e*R*.5+1e-4;p=vec3(log(R=length(p))-t*.3,exp(-p.z/R)+.2,atan(p.y,p.x));for(e=--p.y;s<1e3;s+=s)e+=sin(dot(cos(p.zyy*s),.5+cos(p.xxz*s)))/s*.3;}

for(float i,g,e,s;++i<139.;){vec3 p=vec3((FC.xy-.5*r)/r*.1+vec2(0,1.24),g-1.5);p.zx*=rotate2D(t*.3-2.);s=1.;for(int i;i++<23;p=vec3(.2,3.96,-.65)-abs(abs(p)*e-vec3(2.7,3.95+e*.15,3.5-g)))s*=e=5./dot(p,p*.47);g+=p.y/s;s=log(s)*g;o.rgb+=.01-hsv(e/i-.4,p.y*.4,s/1e3);}s;#つぶやきGLSL

float i,e,R,s;vec3 q,p,d=vec3(FC.xy/r*.6-vec2(.4,-.6),.5);for(q.zy--;i++<67.;){o.rgb+=hsv(.6,e-q.z,min(e*s,1.)/64.);s=3.;p=q+=d*e*R*.5+1e-4;p=vec3(log(R=length(p))-t*.2,exp(-p.z/R)+.23,atan(p.y,p.x));for(e=--p.y;s<1e3;s+=s)e+=dot(sin(p.zxx*s),.4-cos(p.yzy*s))/s*.25;}#つぶやきGLSL

vec3 f=vec3(.2,.4,1.5),p;for(float i,e,g,S,u;i++<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++<20;p/=u)S/=u=dot(p=2.*clamp(p,-f,f)-p,p);g-=e=p.z/S;} #つぶやきGLSL