Quoted By:
>#version 130
>uniform float v;vec2 m=vec2(1920.,1080.);
>#define EPS 0.001
>#define MAX 25.0
>#define STEPS 128
>#define PI 3.14159
>#define LAYERS 8.0
>float y=60.*PI/180.,x=0.,s=1.;vec3 n(vec3 v){vec4 m=vec4(x,-s/3.,2./3.,-s),i=mix(vec4(v.zy,m.wz),vec4(v.yz,m.xy),step(v.z,v.y)),f=mix(vec4(i.xyw,v.x),vec4(v.x,i.yzx),step(i.x,v.x));float y=f.x-min(f.w,f.y),r=0.;return vec3(abs(f.z+(f.w-f.y)/(6.*y+r)),y/(f.x+r),f.x);}vec3 f(vec3 v){vec4 m=vec4(s,2./3.,s/3.,3.);vec3 i=abs(fract(v.xxx+m.xyz)*6.-m.www);return v.z*mix(m.xxx,clamp(i-m.xxx,x,s),v.y);}float t(vec2 v){return fract(sin(cos(dot(v,vec2(12.9898,12.1414))))*83758.5);}float h(vec2 v){vec2 m=vec2(x,s),y=floor(v),f=smoothstep(vec2(x),vec2(s),fract(v));return mix(mix(t(y),t(y+m.yx),f.x),mix(t(y+m.xy),t(y+m.yy),f.x),f.y);}float r(vec2 v){float y=x,m=s;for(int f=0;f<5;f++)y+=h(v)*m,v+=v*1.7,m*=.47;return y;}vec4 p(vec2 y){vec2 i=vec2(1.2,.1);float z=1.327+sin(v*2.)/2.4,t=s,g=3.5-sin(v*.4)/1.89;vec2 l=y.xy;l.x-=v/1.1;float c=r(l-v*.01+s*sin(v)/10.),d=r(l-v*.002+.1*cos(v)/5.),w=r(l-v*.44-5.*cos(v)/7.)-6.,P=r(l-v*.9-10.*cos(v)/30.)-4.,S=r(l-v*2.-20.*sin(v)/20.)+2.;c=(c+d-.4*w-2.*P+.6*S)/3.8;vec2 h=vec2(r(l+c/2.+v*i.x-l.x-l.y),r(l+c-v*i.y));vec3 E=mix(vec3(.5,x,.1),vec3(.9,.1,x),r(l+h))+mix(vec3(.2,.1,.7),vec3(s,.9,.1),h.x)-mix(.1,.9,h.y),e=vec3(E*cos(z*y.y/m.y));e+=.05;e.x*=.8;vec3 p=n(e);p.y*=p.z*1.1;p.z*=p.y*1.13;p.y=(2.2-p.z*.9)*1.2;e=f(p);return vec4(e.x,e.y,e.z,t);}mat2 i(float v){return mat2(cos(v),sin(v),-sin(v),cos(v));}float f(vec4 v,vec2 y){return length(max(vec4(x),vec4((i(v.x)*y).x,(i(v.y)*-y).x,length(y)-v.z,-length(y)+v.w)));}float g(in vec3 v){return v.y+(sin(sin(v.z*.123)-v.x*.311)*.71+cos(v.z*5.53+sin(v.x*2.127))*.12)*1.2+.4;}float e(in vec3 v){return g(v);}vec3 d(vec2 y){vec3 f=vec3(0);vec2 m=fract(y)-.5,x=floor(y);for(int r=-1;r<=1;r++){for(int i=-1;i<=1;i++){vec2 l=vec2(i,r);float z=t(x+l),c=fract(z*345.32),e=length(m-l-vec2(z,fract(z*34.))+.5),p=.005/e;p*=smoothstep(1.,.2,e);p*=sin(v*3.+z*6.2831)*.5+s;f+=p*c;}}return f;}vec4 l(vec2 m){vec3 f=vec3(x,1.3,-5.*v),l=normalize(vec3(sin(y)*m.x,sin(y)*m.y,-cos(y))),i=vec3(x);for(float z=x;z<s;z+=s/LAYERS){float r=fract(z+v/10.),c=mix(20.,.5,r),t=r*smoothstep(s,.9,r);i+=d(m*c+z*453.2)*t;}float z=x,r=s;for(int p=0;p<STEPS;p++){if(r<EPS)break;r=e(f+z*l);z+=r;}if(z<MAX){vec3 c=vec3(x,1.7,.4),p=f+z*l;float t=s-floor(mod(p.x,2.)),h=s-floor(mod(p.z,2.));vec3 E=normalize(c-l);vec2 S=vec2(EPS,x);vec3 w=vec3(g(p+S.xyy)-g(p-S.xyy),g(p+S.yxy)-g(p-S.yxy),g(p+S.yyx)-g(p-S.yyx)),P=normalize(w);float n=max(x,dot(P,c));i=vec3(x,.5,.7);if(ts&&h<s||hs&&t<s)i*=n*.2;i*=exp(z*.025);vec3 X=vec3(x,s,x);float a=max(x,dot(l,-X));a=pow(a,.7);i=mix(vec3(x),i,a);}return vec4(i,s);}void main(){vec2 y=gl_FragCoord.xy/m.xy-.5;y.x*=m.x/m.y;vec2 x=i(sin(v))*y*4;x.x+=cos(v);float r=.35,c=.35,z=min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(f(vec4(1.54,.53,.91,.72),x),f(vec4(.63,.78,.91,.72),x)),f(vec4(.61,1.675,.72,.64),x)),f(vec4(2.7,3.11,.72,.64),x)),f(vec4(3.45,3.65,.72,.64),x)),f(vec4(4.71,5.02,.72,.64),x)),f(vec4(5.3,5.51,.72,.64),x)),f(vec4(5.96,6.43,.72,.64),x)),f(vec4(3.2,1.27,.45,r),x)),f(vec4(1.3,2.3,.45,r),x)),f(vec4(2.58,4.2,.45,r),x)),f(vec4(3.2,3.95,r,c),x)),f(vec4(5.2,5.93,r,c),x)),f(vec4(7.9,8.15,r,c),x)),f(vec4(.2,1.16,.32,.17),x)),max(length(x)-.84,-length(x)+.72)),max(length(x)-.52,-length(x)+.45)),max(length(x)-.17,-length(x)+.08)),t=(mod(gl_FragCoord.y-.5,2.)+s)/2.;if(step(z,0.)>.1)gl_FragColor=p(x)*t;else gl_FragColor=l(y)*t;}
