On Mon, 22 Dec 2008, Kjetil S. Matheussen wrote:
> > ;; Freeverb reverberation, using Faust: > > (define-stalin (freeverb get-sound) > (<faust> :in (vct (get-sound)) > (url > "http://faudiostream.cvs.sourceforge.net/viewvc/*checkout*/faudiostream/faust/examples/freeverb.dsp";))) > > > > ;; Put it together: > > (<rt-stalin> > (sound > (out (freeverb (lambda () > (in (midi-synth))))))) > Oops, that was weirdly verbosedly programmed. Shorter version: (define-stalin (freeverb sound) (<faust> :in (vct sound) (url "http://faudiostream.cvs.sourceforge.net/viewvc/*checkout*/faudiostream/faust/examples/freeverb.dsp";))) (<rt-stalin> (sound (out (freeverb (in (midi-synth)))))) _______________________________________________ Cmdist mailing list [email protected] http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist
