precision highp float; uniform vec2 resolution; const vec3 X = vec3(1.,0.,0.); const vec3 Y = vec3(0.,1.,0.); const vec3 Z = vec3(0.,0.,1.); mat3 rotX(float q){return mat3(1.,0.,0.,0.,cos(q),-sin(q),0.,sin(q),cos(q));} mat3 rotY(float q){return mat3(cos(q),0.,sin(q),0.,1.,0.,-sin(q),0.,cos(q));} mat3 rotZ(float q){return mat3(cos(q),-sin(q),0.,sin(q),cos(q),0.,0.,0.,1.);} float random(vec2 p){return fract(sin(dot(p,vec2(12.9898,78.233)))*43758.5453);} float random4noise(vec3 v){ float seed=0., w=16.; return fract(sin(dot(vec2(mod(v.x+v.y*w+v.z*w*w,w*w*w),seed),vec2(12.9898,78.233)))*43758.5453); } float noise(vec3 v){ float total = 0., ampl = .5; for(int i=0; i<4; i++){ vec3 vi = floor(v), vf = fract(v); float r1 = random4noise(vi + vec3(0,0,0)); float r2 = random4noise(vi + vec3(1,0,0)); float r3 = random4noise(vi + vec3(0,1,0)); float r4 = random4noise(vi + vec3(1,1,0)); float r5 = random4noise(vi + vec3(0,0,1)); float r6 = random4noise(vi + vec3(1,0,1)); float r7 = random4noise(vi + vec3(0,1,1)); float r8 = random4noise(vi + vec3(1,1,1)); float r12 = r1 + .5*(1. - cos(vf.x*acos(-1.)))*(r2-r1); float r34 = r3 + .5*(1. - cos(vf.x*acos(-1.)))*(r4-r3); float r56 = r5 + .5*(1. - cos(vf.x*acos(-1.)))*(r6-r5); float r78 = r7 + .5*(1. - cos(vf.x*acos(-1.)))*(r8-r7); float r1234 = r12 + .5*(1. - cos(vf.y*acos(-1.)))*(r34-r12); float r5678 = r56 + .5*(1. - cos(vf.y*acos(-1.)))*(r78-r56); float r = r1234 + .5*(1. - cos(vf.z*acos(-1.)))*(r5678-r1234); total += ampl*r; ampl *= .5; v *= 2.; } return total; } vec3 hsb2rgb(vec3 hsb){ float r = min(1., max(0., abs(6.*(fract(hsb.x)-.5)) - 1.)); float g = min(1., max(0., abs(6.*(fract(hsb.x-.5)-1./3.)) - 1.)); float b = min(1., max(0., abs(6.*(fract(hsb.x-.5)-2./3.)) - 1.)); r += (1.-r)*(1.-hsb.y); g += (1.-g)*(1.-hsb.y); b += (1.-b)*(1.-hsb.y); return vec3(r, g, b) * hsb.z; } float f(vec2 v){ return abs(sin(v.x*1.) + log(v.y)*1.); } vec3 g(vec3 v){ return vec3(f(v.yz),f(v.zx),f(v.xy)); } float sdBox( vec3 p, vec3 b ) { vec3 q = abs(p) - b; return length(max(q,0.0)) + min(max(q.x,max(q.y,q.z)),0.0); } float dBase(vec3 p, float l){ float s = 4.; vec3 p0 = (p - mod(p, s))/s; float d = length(p) - length(g(g(g(p*.5)))) * 1.; return d; } float dGem(in vec3 p){ float l = 1.; float d = dBase(p, l); return d; } float dFloor(vec3 p){ float d; d = p.y + 5.; return d; } float dCore(vec3 p){ float d; float r = 2.95; d = length(p) - r; for(int i=0; i<20; i++){ float th = random(vec2(float(i)))*999.; float d0 = length(p) - r*mix(1.02, 1.04, fract(th)); d = min(d, max(d0, sdBox(rotZ(th)*rotY(th)*rotX(th)*p, vec3(.2,5,5)))); } d = min(d, length(p) - r*.98); d = max(d, -(length(p) - r)); return d; } float distFunc(in vec3 p){ float d; d = dGem(p); d = min(d, dFloor(p)); d = min(d, dCore(p)); return d; } vec3 colorFunc(vec3 p){ float dg = dGem(p); float df = dFloor(p); float dc = dCore(p); if (dc

Creature