// This shader generates a dynamic rock strata visual effect. It uses fractal noise to create layers and bands of colors, // mimicking geological strata with a pulsating and shifting pattern over time. Various color gradients and enhanced // details are employed to add depth and complexity. precision mediump float; varying vec2 uv; uniform float time, width, height; // Simple random function based on positional coordinates float rand(vec2 co) { return fract(sin(dot(co.xy,vec2(12.9898,78.233))) * 43758.5453); } // 2D noise function based on positional coordinates float noise(vec2 pos) { vec2 i = floor(pos); vec2 f = fract(pos); f = f*f*(3.0-2.0*f); float a = rand(i); float b = rand(i + vec2(1.0, 0.0)); float c = rand(i + vec2(0.0, 1.0)); float d = rand(i + vec2(1.0, 1.0)); return mix(a, b, f.x) + (c - a) * f.y * (1.0 - f.x) + (d - b) * f.x * f.y; } // Fractal Brownian Motion (fbm) for layered noise float fbm(vec2 pos) { float result = 0.0; float scale = 0.5; for (int i = 0; i < 5; i++) { result += noise(pos) * scale; pos *= 2.0; scale *= 0.5; } return result; } // Function to generate strata-like bands of colors vec3 strataColor(float value) { value = fract(value * 20.0); if (value < 0.1) return vec3(0.8, 0.5, 0.4); // Reddish brown else if (value < 0.2) return vec3(0.6, 0.4, 0.3); // Darker brown else if (value < 0.3) return vec3(0.4, 0.3, 0.2); // Dark brown else if (value < 0.4) return vec3(0.2, 0.2, 0.2); // Near black else if (value < 0.5) return vec3(0.7, 0.7, 0.6); // Light gray else if (value < 0.6) return vec3(0.5, 0.45, 0.4); // Medium brown else if (value < 0.7) return vec3(0.6, 0.55, 0.4); // Golden brown else if (value < 0.8) return vec3(0.3, 0.3, 0.25); // Slate else if (value < 0.9) return vec3(0.1, 0.1, 0.1); // Dark slate else return vec3(0.9, 0.9, 0.8); // Nearly white } void main() { // Normalize UV coordinates for a square aspect ratio vec2 fragCoord = vec2((uv.x - 0.5) * max(width / height, 1.0) + 0.5, (uv.y - 0.5) * max(height / width, 1.0) + 0.5); // Calculate distance and relative coordinates for texture offsets vec2 center = vec2(0.5, 0.5); float len = length(fragCoord - center); // Dynamic movement for the noise position vec2 noisePos = fragCoord * 8.0 + vec2(time * 0.1, time * 0.1); // Generate fractal noise and use it to create stratified color bands float noiseValue = fbm(noisePos + vec2(0.0, sin(time * 0.5) * 5.0)); vec3 color = strataColor(noiseValue + len * 0.2); // Simulate lighting and depth effects float depth = smoothstep(0.0, 1.0, len * 1.5); // Apply a vignette effect based on distance with time variation float vignette = 1.0 - smoothstep(0.1, 0.4, len + sin(time * 2.0) * 0.1); // Combine effects to create the final color output vec3 finalColor = mix(vec3(0.0), color, vignette * 2.0) * (1.0 - depth); // Output the final color to the fragment gl_FragColor = vec4(finalColor, 1.0); }

edit

Fractal recursion Higher iterations

edit

dither Color Noise

edit

Dynamic Symmetry

edit

blue cheese Creamy texture

edit

edit

Ethereal Glow

edit

edit

Rock strata

edit

click to explore, then edit