res-sweep   scheme


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/examples/contrib/polysynth.xtm

Implementation

;; some event level modification to saw_synth
;; adjust res & cof of saw_synth_note_c (dsp kernel)
(define res-sweep
  (lambda (beat dur)
    (saw_synth_note_c.res (cosr .5 .44 1/37))
    (saw_synth_note_c.cof (cosr 5000.0 1500.0 1/19))
    (callback (*metro* (+ beat (* dur .5))) 'res-sweep
              (+ beat dur) dur)))


Back to Index