// My Psychedelic Fractal Dream // YouTube - Infinity SI // // This is my animation with 10 different fractal shapes that // all melt and morph into each other. The colors are always // changing and swirling around. It's a fun, trippy visualizer! precision highp float; #define DETAIL 12 #define SHAPE_TIME 8.0 #define FADE_SPEED 0.8 uniform float time; uniform vec2 resolution; mat2 turny(float angle) { float s = sin(angle); float c = cos(angle); return mat2(c, -s, s, c); } vec3 getColor( float t ) { vec3 valA = vec3(0.5, 0.5, 0.5); vec3 valB = vec3(0.5, 0.5, 0.5); vec3 valC = vec3(1.0, 1.0, 1.0); vec3 valD = vec3(0.263,0.416,0.557); return valA + valB*cos( 6.28318*(valC*t+valD) ); } float makeCarpet(vec2 spot) { spot = abs(spot); float bigFactor = 3.0; for (int i = 0; i < DETAIL/2+2; i++) { spot = abs(spot); spot = spot * bigFactor - (bigFactor - 1.0); spot.x = abs(spot.x); spot.y = abs(spot.y); if (spot.x < spot.y) spot.xy = spot.yx; } return (max(spot.x, spot.y) - 1.0) / pow(bigFactor, float(DETAIL/2+2)); } float makeSnowflake(vec2 spot) { spot.x = abs(spot.x); vec2 vec = vec2(0.866025, 0.5); float d = dot(spot, vec); spot -= vec * max(0.0, d); d = dot(spot, vec.yx * vec2(-1,1)); spot -= vec.yx * vec2(-1,1) * max(0.0, d); float bigFactor = 3.0; float len = 0.0; for( int i=0; i 1.0) { spot.x = spot.x - spot.y; spot.y = spot.y - spot.x; spot.x = -spot.x; spot.y = spot.y + 1.0; } spot = spot * bigFactor; } return length(spot) / pow(bigFactor, float(DETAIL)); } float makeFern(vec2 spot) { spot *= turny(-1.57); spot.y += 0.4; spot *= 0.5; float howFar = 1e10; float bigFactor = 2.0; for (int i=0; i 1.0) spot = spot - vec2(1,0); else spot = spot / dot(spot, spot) - vec2(1,0); } return (length(spot) - 1.0) / pow(bigFactor, float(DETAIL-2)); } float makeDots(vec2 spot) { spot = abs(spot); for (int i=0; i < DETAIL/2; i++) { spot = spot * 3.0 - 2.0; spot = abs(spot); } return max(spot.x,spot.y) / pow(3.0, float(DETAIL/2)); } float makeCross(vec2 spot) { spot = abs(spot); for (int i=0; i

#mathart