radiance 0.7.1

Video art software designed for live performance
Documentation
1
2
3
4
5
6
7
8
9
10
11
#property description Full black strobe
#property frequency 1

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

    let darkness = select(smoothstep(0., 0.2, iIntensity), pow(iIntensity, 2.), iFrequency == 0.);
    let darkness2 = vec4(0., 0., 0., 1.) * pow(defaultPulse, (iIntensity + 0.5) * 2.) * darkness;

    return composite(c, darkness2);
}