Files
forge-steel/default/inc_fx.glsl
T

563 lines
17 KiB
GLSL

#include inc_res.glsl
#include inc_magic.glsl
#include inc_functions.glsl
#ifndef INC_FX
#define INC_FX
vec4 fx_master(vec3 c0, vec3 c, int seed, vec3 m0) {
float fx = magic(m0.xy, vec3(1,0,0), seed);
bool invert = magic_trigger(vec3(m0.z, 0, 0), seed);
vec3 c_out = mix(c0, c, fx);
c_out = mix(c_out, 1 - c_out, invert ? 1 : 0);
return vec4(c_out, 1.0);
}
subroutine vec4 fx_stage_sub(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0);
subroutine uniform fx_stage_sub fx_stage;
// FX 1 : thru
subroutine(fx_stage_sub) vec4 fx_1(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
// controls
float hue = magic(f1, b1, seed + 10);
float saturation = magic(f2, b2, seed + 20);
float light = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec3 c = c0;
c = shift3(c, hue);
c *= 1 + saturation;
c = mix(c + light * 2.0, c - (1 - light) * 2.0, step(0.5, light));
return fx_master(c0, c, seed, m0);
}
// FX 2 : feedback + shift
vec4 fx_shift(vec2 vUV, sampler2D src0, sampler2D src1, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float zoom = magic(f1, b1, seed + 10);
float x_shift = magic(f2, b2, seed + 20);
float y_shift = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(src0, uv0).xyz;
vec2 uv2 = uv1;
uv2 = mix(uv2 * (1 + zoom * 2), uv2 * (zoom), step(0.5, zoom));
uv2 += vec2(x_shift * ratio, y_shift) * 2;
vec3 c = reframe(src1, uv2).xyz;
return fx_master(c0, c, seed, m0);
}
subroutine(fx_stage_sub) vec4 fx_2(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
return fx_shift(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
}
// FX 3 : shift
subroutine(fx_stage_sub) vec4 fx_3(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
return fx_shift(vUV, previous, previous, seed, b1, f1, b2, f2, b3, f3, m0);
}
// FX 4 : colorize
subroutine(fx_stage_sub) vec4 fx_4(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
// controls
float c_black = magic(f1, b1, seed + 10);
bool c_black_trigger = magic_trigger(b1, seed + 10);
float c_white = magic(f2, b2, seed + 20);
bool c_white_trigger = magic_trigger(b2, seed + 20);
float delta = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
float f = mean(c0);
float c_mix = mix(c_black, c_white, f) + delta;
vec3 c = mix(c_black_trigger ? col(c_mix) : vec3(0), c_white_trigger ? col(c_mix) : vec3(1), f);
return fx_master(c0, c, seed, m0);
}
// FX 5 : quantize
subroutine(fx_stage_sub) vec4 fx_5(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float pixel_size = magic(f1, b1, seed + 10);
float quantize = magic(f2, b2, seed + 20);
bool quantize_trigger = magic_trigger(b2, seed + 20);
float blur = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec2 uv2 = uv1;
float pixel = (1 - pixel_size) * 250 + 25;
uv2 = round(uv2 * pixel) / pixel;
vec3 c = gauss(previous, uv2 * vec2(1 / ratio, 1) + .5, 3, 0.005 * blur).xyz;
float colors = (1 - quantize) * 10 + 1;
if (quantize_trigger) {
c = round(c * colors) / colors;
}
// c = mix(c, 1 - c, step(noise_f(uv0 * 10 + vec2(iTime * 0.1, 0), 5), 0.5));
return fx_master(c0, c, seed, m0);
}
// FX 6 : dithering
subroutine(fx_stage_sub) vec4 fx_6(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float pixel_size = magic(f1, b1, seed + 10);
bool pixel_size_trigger = magic_trigger(b1, seed + 10);
float quantize = magic(f2, b2, seed + 20);
bool quantize_trigger = magic_trigger(b2, seed + 20);
float blur = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec2 uv2 = uv1;
float k1 = pow(2, 10 - floor(pixel_size * 5));
float pixel = (1 - pixel_size) * 250 + 25;
if (pixel_size_trigger) {
uv2 = floor(uv2 * k1) / k1;
}
vec3 c = gauss(previous, uv2 * vec2(1 / ratio, 1) + .5, 3, 0.005 * blur).xyz;
float k3 = pow(2, 5 - floor(quantize * 5));
if (quantize_trigger) {
c *= k3;
c = vec3(
mix(floor(c.x), ceil(c.x), dither(uv2 * k1, c.x - floor(c.x))),
mix(floor(c.y), ceil(c.y), dither(uv2 * k1, c.y - floor(c.y))),
mix(floor(c.z), ceil(c.z), dither(uv2 * k1, c.z - floor(c.z)))
);
c /= k3;
}
return fx_master(c0, c, seed, m0);
}
// FX 7 : tv
subroutine(fx_stage_sub) vec4 fx_7(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float lens_v = magic(f1, b1, seed + 10);
float horizontal_noise = magic(f2, b2, seed + 20);
float zoom = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec2 uv2 = uv1;
float k1 = lens_v * 0.5;
uv2 *= 1 + zoom * 2;
uv2 = lens(uv2, -k1, k1);
float k = horizontal_noise;
vec3 c = vec3(
reframe_b(previous, uv2 + vec2((rand(uv0.y * 1000 + iTime) - 0.5) * k * 0.1)).x,
reframe_b(previous, uv2 + vec2((rand(uv0.y * 1100 + iTime) - 0.5) * k * 0.1)).y,
reframe_b(previous, uv2).z
);
return fx_master(c0, c, seed, m0);
}
// FX 8 : kaleidoscope
subroutine(fx_stage_sub) vec4 fx_8(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float axes = magic(f1, b1, seed + 10);
float axes_trigger = magic_b(b1, seed + 10).x;
float rotation = magic(f2, b2, seed + 20);
float h_scroll = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec2 uv2 = uv1;
uv2 = mix(uv2, kal2(uv2 * rot(0.25), floor(axes * 9 + 1)) * vec2(1, -2) + vec2(0, -0.5), axes_trigger);
uv2 *= rot(rotation);
uv2.x = (saw(uv2.x / ratio + 0.5 + h_scroll * 2) - 0.5) * ratio;
vec3 c = reframe(previous, uv2).xyz;
return fx_master(c0, c, seed, m0);
}
#include inc_cp437.glsl
// FX 9 : cp437
subroutine(fx_stage_sub) vec4 fx_9(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float zoom = magic(f1, b1, seed + 10);
vec2 charset = magic_f(f2, b2, seed + 20);
vec3 charset_ctrl = magic_b(b2, seed + 20);
float char_delta = magic(f3, b3, seed + 30);
float t = magic(seed + 40);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec2 uv2 = uv1;
float k1 = 100 * (1 - zoom) + 10;
float inv_k = 1 / k1;
uv2 = floor(uv2 * k1) * inv_k;
int start_char = charset_ctrl.x > 0 ? charsets[int(charset.x * CHARSETS) * 2] : 0x01;
int char_span = int((charset_ctrl.x > 0 ? charsets[int(charset.x * CHARSETS) * 2 + 1] : 255));
char_span = int(char_span * max(1 - charset.y, 1 / (char_span * 0.75)));
ivec2 uv2i = ivec2(uv2 * k1);
int code = ((charset_ctrl.y < 1 || (uv2i.x % 2 ^ uv2i.y % 2) > 0) ? 1 : 0) * (start_char + int((rand(uv2i) + char_delta) * char_span) % char_span);
vec3 c = reframe(previous, uv2 + vec2(0, 0) * inv_k * 0.125).xyz * 0.2
+ reframe(previous, uv2 + vec2(1, 0) * inv_k * 0.125).xyz * 0.2
+ reframe(previous, uv2 + vec2(1, 1) * inv_k * 0.125).xyz * 0.2
+ reframe(previous, uv2 + vec2(0, 1) * inv_k * 0.125).xyz * 0.2
+ reframe(previous, uv2 + vec2(0.5, 0.5) * inv_k * 0.125).xyz * 0.2;
c = char(mod(uv1 * k1, 1), code) ? c : vec3(0);
return fx_master(c0, c, seed, m0);
}
// FX 10 : lens
subroutine(fx_stage_sub) vec4 fx_10(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float lens_v1 = magic(f1, b1, seed + 10);
float lens_v2 = magic(f2, b2, seed + 20);
float zoom = magic(f3, b3, seed + 30);
float k = magic(seed + 40);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec2 uv2 = uv1;
uv2 *= 1 + zoom * 2;
uv2 = lens(uv2, -lens_v2 * 10, lens_v1 * 10);
vec3 c = reframe(previous, uv2).xyz;
return fx_master(c0, c, seed, m0);
}
// FX 11 : spill
subroutine(fx_stage_sub) vec4 fx_11(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float wall1 = magic(f1, b1, seed + 10);
float wall2 = magic(f2, b2, seed + 20);
float angle = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec2 uv2 = uv1;
uv2 *= rot(angle);
uv2.y = min(uv2.y, 1 - wall1);
uv2.y = -min(-uv2.y, 1 - wall2);
uv2 *= rot(-angle);
vec3 c = reframe(previous, uv2).xyz;
return fx_master(c0, c, seed, m0);
}
// FX 12 : Game Of Life
subroutine(fx_stage_sub) vec4 fx_12(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - 0.5) * vec2(ratio, 1);
// controls
float pixel_size = magic(f1, b1, seed + 10);
bool pixel_size_trigger = magic_trigger(b1, seed + 10);
f2 = magic_f(f2, b2, seed + 20);
int rule = int(f2.x * 12);
float threshold = f2.y * 0.9 + 0.05;
float fb = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec2 uv2 = uv1;
float k1 = pow(2, 9 - floor(pixel_size * 5));
float p = 1 / k1;
uv2 = round(uv2 * k1) / k1;
vec3 c1 = mix(
reframe(previous, uv2 + vec2(0.5, 0.5) * p).xyz,
reframe(feedback, uv2 + vec2(0.5, 0.5) * p).xyz,
fb
);
vec3 c2 = mix(
reframe(previous, uv2 + vec2(1.5, 0.5) * p).xyz,
reframe(feedback, uv2 + vec2(1.5, 0.5) * p).xyz,
fb
);
vec3 c3 = mix(
reframe(previous, uv2 + vec2(1.5, 1.5) * p).xyz,
reframe(feedback, uv2 + vec2(1.5, 1.5) * p).xyz,
fb
);
vec3 c4 = mix(
reframe(previous, uv2 + vec2(0.5, 1.5) * p).xyz,
reframe(feedback, uv2 + vec2(0.5, 1.5) * p).xyz,
fb
);
vec3 c5 = mix(
reframe(previous, uv2 + vec2(-0.5, 1.5) * p).xyz,
reframe(feedback, uv2 + vec2(-0.5, 1.5) * p).xyz,
fb
);
vec3 c6 = mix(
reframe(previous, uv2 + vec2(-0.5, 0.5) * p).xyz,
reframe(feedback, uv2 + vec2(-0.5, 0.5) * p).xyz,
fb
);
vec3 c7 = mix(
reframe(previous, uv2 + vec2(-0.5, -0.5) * p).xyz,
reframe(feedback, uv2 + vec2(-0.5, -0.5) * p).xyz,
fb
);
vec3 c8 = mix(
reframe(previous, uv2 + vec2(0.5, -0.5) * p).xyz,
reframe(feedback, uv2 + vec2(0.5, -0.5) * p).xyz,
fb
);
vec3 c9 = mix(
reframe(previous, uv2 + vec2(-0.5, -0.5) * p).xyz,
reframe(feedback, uv2 + vec2(-0.5, -0.5) * p).xyz,
fb
);
bool alive = mean(c1) >= threshold;
int n = 0
+ (mean(c2) >= threshold ? 1 : 0)
+ (mean(c3) >= threshold ? 1 : 0)
+ (mean(c4) >= threshold ? 1 : 0)
+ (mean(c5) >= threshold ? 1 : 0)
+ (mean(c6) >= threshold ? 1 : 0)
+ (mean(c7) >= threshold ? 1 : 0)
+ (mean(c8) >= threshold ? 1 : 0)
+ (mean(c9) >= threshold ? 1 : 0)
;
if (rule == 0) { // B3/S23 (life)
alive = alive && n == 2 || n == 3;
} else if (rule == 1) { // B1357/S1357 (replicator)
alive = n == 2 || n == 3 || n == 5 || n == 7;
} else if (rule == 2) { // B2/S (seeds)
alive = !alive && n == 2;
} else if (rule == 3) { // B25/S4
alive = !alive && (n == 2 || n == 5) || alive && n == 4;
} else if (rule == 4) { // B3/S012345678 (life without death)
alive = alive || n == 3;
} else if (rule == 5) { // B34/S34 (34 life)
alive = n == 3 || n ==4;
} else if (rule == 6) { // B35678/S5678 (Diamoeba)
alive = n >= 5 || !alive && n == 3;
} else if (rule == 7) { // B36/S125 (2x2)
alive = !alive && (n == 3 || n == 6) || alive && (n == 1 || n == 2 || n == 5);
} else if (rule == 8) { // B36/S23 (HighLife)
alive = !alive && n == 6 || alive && n == 2 || n == 3;
} else if (rule == 9) { // B3678/S34678 (Day & Night)
alive = n == 3 || n >= 6 || alive && n == 4;
} else if (rule == 10) { // B368/S245 (Morley)
alive = !alive && (n == 3 || n == 6 || n == 8) || alive && (n == 2 || n == 4 || n == 5);
} else if (rule == 11) { // B4678/S35678 (Anneal)
alive = n >= 6 || !alive && n == 4 || alive && (n == 3 || n == 5);
}
vec3 cout = vec3(alive ? 1 : 0);
return fx_master(c0, cout, seed, m0);
}
// FX 13 : Sobel
subroutine(fx_stage_sub) vec4 fx_13(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float sx = magic(f1, b1, seed + 10) * 2;
float sy = magic(f2, b2, seed + 20) * 2;
float disp = 0.005 * magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
const mat3x3 sobelx = {{-1, -2, -1}, {0, 0, 0}, {1, 2, 1}};
const mat3x3 sobely = {{-1, 0, 1}, {-2, 0, 2}, {-1, 0, 1}};
mat3x3 sobel = sobelx * sx + sobely * sy;
vec3 c = abs(kernel(previous, uv0, sobel, disp).xyz);
return fx_master(c0, c, seed, m0);
}
// FX 14 : Isometric
subroutine(fx_stage_sub) vec4 fx_14(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
// start
vec2 uv0 = vUV.st;
float ratio = iResolution.x / iResolution.y;
vec2 uv1 = (uv0 - .5) * vec2(ratio, 1);
// controls
float zoom = 1 + magic(f1, b1, seed + 10) * 9;
float h_scroll = magic(f2, b2, seed + 20);
float angle = magic(f3, b3, seed + 30);
// logic
vec3 c0 = texture(previous, uv0).xyz;
vec2 uv2 = uv1;
vec2 uv3 = iso(uv2);
uv3 *= rot(angle);
uv3 += vec2(h_scroll, 0);
uv3 *= round(zoom);
vec2 umax = vec2(round(zoom), 300);
vec3 c = reframe(previous, mod(uv3, umax)).xyz;
return fx_master(c0, c, seed, m0);
}
// FX 15 : Random
subroutine(fx_stage_sub) vec4 fx_15(vec2 vUV, sampler2D previous, sampler2D feedback, int seed, vec3 b1, vec2 f1, vec3 b2, vec2 f2, vec3 b3, vec2 f3, vec3 m0)
{
int fx = int(randTime(seed + 100) * 14);
if (fx == 0) {
return fx_1(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 1) {
return fx_2(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 2) {
return fx_3(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 3) {
return fx_4(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 4) {
return fx_5(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 5) {
return fx_6(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 6) {
return fx_7(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 7) {
return fx_8(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 8) {
return fx_9(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 9) {
return fx_10(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 10) {
return fx_11(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 11) {
return fx_12(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else if (fx == 12) {
return fx_13(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
} else {
return fx_14(vUV, previous, feedback, seed, b1, f1, b2, f2, b3, f3, m0);
}
}
#endif