// Basic delay effect with a feedback loop

public class DelayPedal extends MyUGen {
    // Delay
    DelayL d;
    Gain fb;
    Gain lvl;
    1::second => d.max;
    300::ms => d.delay;
    
    // Feedback loop
    in => out;
    in => d => lvl => out;
    d => fb => d;
    
    0.5 => lvl.gain;
    0.2 => fb.gain;
    
    fun float level(float lev) {
        lev => lvl.gain;
        return lvl.gain();
    }
    
    fun float feedback(float fbGain) {
        fbGain => fb.gain;
        return fb.gain();
    }
    
    fun dur delay(dur delayDur) {
        delayDur => d.delay;
        return d.delay();
    }
}

/*

adc => Gain in;
Gain out => dac;

50.0 => in.gain;

DelayPedal d;
in => d.chuck => out;

1::day => now;

*/