CMLS_2025/SC/2b_rgb_synthdefs.scd

(
// RGB-controlled synthesizer with amplitude envelope
SynthDef(\rgbSynth, { |out=0, freq=440, amp=0.5, ampAttack=0.01, ampRelease=1,
	filterAttack=0, filterRelease=0, filterMin=200, filterMax=5000,
	pitchAttack=0, pitchRelease=0, pitchRatio=2,
	redAmt=0.5, greenAmt=0.5, blueAmt=0.5|

    var env, gate, filterEnv, pitchEnv, red, green, blue, sig;

	gate = \gate.kr(1);

    // Amplitude envelope
    env = EnvGen.kr(Env.adsr(ampAttack, 0, 1, ampRelease), gate, doneAction: 2);

    // Filter envelope
    filterEnv = EnvGen.kr(Env.adsr(filterAttack, 0, 1, filterRelease), gate);

    // Pitch envelope
    pitchEnv = EnvGen.kr(Env.adsr(pitchAttack, 0, 1, pitchRelease), gate);

    // Calculate modulated frequency
    freq = freq * (1 + (pitchEnv * (pitchRatio - 1)));

    // Different waveforms for RGB components
    red = SinOsc.ar(freq) * redAmt;
    green = Saw.ar(freq) * greenAmt;
    blue = Pulse.ar(freq, 0.5) * blueAmt;

    // Mix the waveforms
    sig = (red + green + blue) / 3;

    // Apply filter with envelope control
    sig = RLPF.ar(sig, filterEnv.linexp(0, 1, filterMin, filterMax), 0.8);

    // Apply envelope and output
    sig = sig * env * amp;
    Out.ar(out, sig!2);
}).add;



"RGB-controlled synthesizer loaded".postln;
)