Xor about 2 months ago
"IGNITE"
for(float i,z,d,f;i++<1e2;o+=(3.+vec4(9,4,f,0))*d/z/f){vec3 p=z*normalize(FC.rgb*2.-r.xyy),c;p.z+=7.;c=p;for(f=1.;f++<9.;c+=sin(c.zxy*f+f+t)/f);z+=d=min(f=.1+length(c)+c.y,min(length(p.xz)+tanh(.6*p.y-2.),length(max(c=sin(p*5.),c.yzx)-1.2+p.x/8.)))/6.;}o=tanh(o*o/2e2);