René Nyffenegger's collection of things on the web
René Nyffenegger on Oracle - Most wanted - Feedback -
 

Filtered Saw [CSound effect]

Filtered Saw is an instrument that I have seen (and only slightly modified) in Vestigeo by Matthew Mariano.
sr     = 44100
kr     = 4410
ksmps  = 10
nchnls = 2

instr 1 
  ilen             =        p3
  ifrq             = cpspch(p4)
  iamp             =        p5

  i_filt_frq_start =        p6  
  i_filt_frq_end   =        p7

  kenv  linen iamp,ilen/5,ilen,ilen/5
  kpan  phasor 1/ilen
  a1    oscil kenv,ifrq       ,9
  a2    oscil kenv,ifrq*0.999 ,9
  a3    oscil kenv,ifrq*1.001 ,9
  k_flt_freq    line i_filt_frq_start,ilen,i_filt_frq_end
  a4=(a1+a2+a3)/3
  aout  reson a4,k_flt_freq,100, 2
  outs aout*kpan , aout*(1-kpan)
endin
f9 0 4096 10 1 .5 .333 .25 .2 .167 .1428 .125 .111 .1 .0909 .0833 .0769 .0714 .0667 .0625  ; SAW

i1   0  10 8.04 4000   5000   500
i1   0  10 8.07 4000   5000   500
i1   0  10 8.11 4000   5000   500
i1   0  10 9.02 4000   5000   500