radiance 0.7.1

Video art software designed for live performance
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

#property description A green & red circle in the center

fn main(uv: vec2<f32>) -> vec4<f32> {
    let out_c = textureSample(iInputsTex[0], iSampler, uv);

    let normCoord = 2. * (uv - 0.5) * aspectCorrection;
    let r = iIntensity * (0.7 + 0.3 * pow(defaultPulse, 2.));

    // White outline
    let c = vec4<f32>(1.);
    let c2 = c * (1. - smoothstep(r - 0.1, r, length(normCoord)));
    let out_c2 = composite(out_c, c2);

    /// Red and green (sampled from buffer shader)
    let c3 = textureSample(iChannelsTex[1], iSampler, (uv - 0.5) / r + 0.5);
    let c4 = c3 * (1. - smoothstep(r - 0.2, r - 0.1, length(normCoord)));
    let out_c3 = composite(out_c2, c4);

    return out_c3;
}

#buffershader

fn main(uv: vec2<f32>) -> vec4<f32> {
    let normCoord = 2. * (uv - 0.5) * aspectCorrection;
    return vec4<f32>(abs(normCoord), 0., 1.);
}