frag.frag

#define MAXITER 100
#define M_PI 3.14159265358979323846
#define MIN_PACE 0.00000000000000001

precision highp float;

#pragma glslify: ease1 = require(glsl-easings/sine-in-out)
#pragma glslify: ease2 = require(glsl-easings/bounce-in-out)
#pragma glslify: ease3 = require(glsl-easings/cubic-in-out)
#pragma glslify: ease4 = require(glsl-easings/elastic-in-out)
#pragma glslify: ease5 = require(glsl-easings/exponential-in-out)
#pragma glslify: ease6 = require(glsl-easings/sine-out)
#pragma glslify: ease7 = require(glsl-easings/sine-in)
#pragma glslify: ease8 = require(glsl-easings/bounce-in)
#pragma glslify: blend = require(glsl-blend-overlay)


uniform vec4 uFractalBounds;
uniform vec2 uResolution;
uniform float uTime;
uniform vec3 uEasings;
uniform vec3 uLocalPosition;
uniform vec3 uIntervals;

varying lowp vec4 newPos;

varying vec4 colorV;

vec3 rgb2hsv(vec3 c)
{
    vec4 K = vec4(0.0, -1.0 / 3.0, 2.0 / 3.0, -1.0);
    vec4 p = mix(vec4(c.bg, K.wz), vec4(c.gb, K.xy), step(c.b, c.g));
    vec4 q = mix(vec4(p.xyw, c.r), vec4(c.r, p.yzx), step(p.x, c.r));

    float d = q.x - min(q.w, q.y);
    float e = 1.0e-10;
    return vec3(abs(q.z + (q.w - q.y) / (6.0 * d + e)), d / (q.x + e), q.x);
}

vec3 hsv2rgb(vec3 c)
{
    vec4 K = vec4(1.0, 2.0 / 3.0, 1.0 / 3.0, 3.0);
    vec3 p = abs(fract(c.xxx + K.xyz) * 6.0 - K.www);
    return c.z * mix(K.xxx, clamp(p - K.xxx, 0.0, 1.0), c.y);
}

vec2 cmul(vec2 i1, vec2 i2)
{
    return vec2(i1.x*i2.x - i1.y*i2.y, i1.y*i2.x + i1.x*i2.y);
}


vec3 julia(vec2 z, vec2 c)
{
    int i = 0;
    vec2 zi = z + vec2(uLocalPosition.x, uLocalPosition.y);
    zi = zi * uLocalPosition.z;

    float trap1 = 10e-1;
    float trap2 = 10e-1;

    for(int n=0; n < MAXITER; ++n)
    {
        if(dot(zi,zi) > 4.0)
            break;
        i++;
        zi = cmul(zi,zi) + c;

        // Orbit trap
        trap1 = min(trap1, sqrt(zi.x*zi.x));
        trap2 = min(trap2, 0.0001+sqrt(zi.y*zi.y));
    }

    return vec3(i,trap1,trap2);
}


vec4 gen_color(vec3 iter)
{
    float t1 = 1.0+log(iter.y)/8.0;
    float t2 = 1.0+log(iter.z)/16.0;
    float t3 = t1/t2;

    //vec3 comp = vec3(t1,t1,t1);
    vec3 red = vec3(0.9,0.2,0.1);
    vec3 black = vec3(1.0,1.0,1.0);
    vec3 blue = vec3(0.1,0.2,0.9);
    vec3 comp = mix(blue,black,vec3(t2));
    comp = mix(red,comp,vec3(t1));
    return vec4(comp, 1.0);
}

float getEasing(int easer, float pace) {
  pace += MIN_PACE;
  if(easer == 0) {
    return ease1(sin(uTime * pace));
  } else if(easer == 1) {
    return ease2(sin(uTime * pace));
  } else if(easer == 2) {
    return ease3(sin(uTime * pace));
  } else if(easer == 3) {
    return ease4(sin(uTime * pace));
  } else if(easer == 4) {
    return ease5(sin(uTime * pace));
  } else if(easer == 5) {
    return ease6(sin(uTime * pace));
  } else if(easer == 6) {
    return ease7(sin(uTime * pace));
  }
  return ease8(sin(uTime * pace));
}

void main() {
  vec2 uv = gl_FragCoord.xy/uResolution*0.5;
  float fromCenter = distance(uv, vec2(uLocalPosition.x, uLocalPosition.y));
  vec2 myZ = 2.*(2.*gl_FragCoord.xy - uResolution) / uResolution.x;
  float easing = getEasing(int(uEasings.y), uIntervals.x * 3.);
  vec2 myC = vec2(mix(uFractalBounds.x, uFractalBounds.y,easing), mix(uFractalBounds.z, uFractalBounds.w,easing));
  vec2 myC2 = vec2(mix(uFractalBounds.x, uFractalBounds.y,easing), mix(uFractalBounds.z, uFractalBounds.w,easing));
  vec3 iter = julia(myZ, myC);
  vec3 iter2 = julia(myZ, myC2);
  vec4 color = gen_color(iter);
  vec4 color2 = gen_color(iter2);
  vec3 newColor = normalize(vec3(1.1-blend(color.rgb,color2.rgb)));
  vec3 hsvColor = rgb2hsv(newColor);
  hsvColor.x = hsvColor.x * easing;
  hsvColor.y = hsvColor.y + 1.0;
  hsvColor.z = hsvColor.z - fromCenter;
  newColor = hsv2rgb(hsvColor);

  vec3 newColor2 = rgb2hsv(color2.rgb);



  // gl_FragColor = vec4(mix(hsvColor, newColor, easing), 0.);

  // gl_FragColor = vec4(newColor.r, newColor.g, newColor.b, 1.0);
  //gl_FragColor = vec4(color2.r, color2.g, color2.b, 1.0);
  gl_FragColor = vec4(vec3(newColor.r, sin(uTime), newColor.b), sin(uTime*5.)) + vec4(mix(hsvColor, newColor, 1.-easing), 0.);
  // gl_FragColor = texture2D(u_texture, v_texcoord);

  //gl_FragColor = vec4(v_texcoord.x, v_texcoord.y, 1.0, 1.0);
  // gl_FragColor = vec4(newPos.x, color.g, color.b, 1.0);
  //if(length(newColor.xyz) > 0.9) {
  //  gl_FragColor = vec4(newColor.r, 0., , 1.);
  //}
  //gl_FragColor = vec4(newColor, 1.);

    // gl_FragColor = vec4(newColor, 1.);
}