slider1:127<0,127,1>frequency
slider2:0<0,127,1>resonance
slider3:64<0,127,1>output

in_pin:L in
in_pin:R in
out_pin:L out
out_pin:R out

@slider
c = pow(0.5, (128-slider1) / 16);
r = pow(0.5, (slider2*0.256+12.8) / 16);
gain = slider3/64;

@sample
inA = spl0;
inB = spl1;

v0A = (1-r*c)*v0A - (c)*v1A + (c)*inA;
v1A = (1-r*c)*v1A + (c)*v0A;

v0B = (1-r*c)*v0B - (c)*v1B + (c)*inB;
v1B = (1-r*c)*v1B + (c)*v0B;

spl0 = v1A*gain;
spl1 = v1B*gain;
