MOOGVCF

p-fields:

/* MOOGVCF - a 24dB/octave resonant lowpass filter

   This is based on the design by Stilson and Smith (CCRMA), as modified
   by Paul Kellett  (described in the source
   code archives of the Music DSP site -- musicdsp.org).

   p0 = output start time
   p1 = input start time
   p2 = input duration
   p3 = amplitude multiplier
   p4 = input channel [optional, default is 0]
   p5 = percent of signal to left output channel [optional, default is .5]

   Assumes function table 1 is amplitude curve for the note. (Try gen 18.)
   Or you can just call setline. If no setline or function table 1, uses
   flat amplitude curve.

   Function table 2 is the cutoff frequency curve.

   Function table 3 is the resonance curve.  Should range between 0 and 1.
   Easiest to use gen 18, and make sure values are in that range.
*/

rtsetparams(44100, 2)
load("WAVETABLE")
load("MOOGVCF")

/* feed wavetable into filter */
bus_config("WAVETABLE", "aux 0 out")
bus_config("MOOGVCF", "aux 0 in", "out 0")

dur = 10.0
amp = 10000
pitch = 6.00
makegen(2, 10, 15000,
   1, 1/2, 1/3, 1/4, 1/5, 1/6, 1/7, 1/8, 1/9, 1/10, 1/11, 1/12,
   1/13, 1/14, 1/15, 1/16, 1/18, 1/19, 1/20, 1/21, 1/22, 1/23, 1/24)  /* saw */
reset(10000)
WAVETABLE(0, dur, amp, pitch)
WAVETABLE(0, dur, amp, pitch+.0005)

amp = 2.0
lowcf = 500
highcf = 1200
lowres = 0.1
highres = 0.9

setline(0,1, 7,1, 10,0)
makegen(2, 18, 2000, 0,lowcf, dur*.2,lowcf, dur*.5,highcf, dur,lowcf)
makegen(3, 18, 2000, 0,lowres, 1,highres, 2,lowres)

MOOGVCF(0, 0, dur, amp)