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