Csound Csound-dev Csound-tekno Search About

RE: Comb Reverb (newbie question)

Date1998-04-08 07:28
FromDavid Boothe
SubjectRE: Comb Reverb (newbie question)
> -----Original Message-----
> From:	Wayne Freno [SMTP:wfreno@vcn.bc.ca]
> Sent:	April 07, 1998 23:36
> To:	Csound List
> Subject:	Comb Reverb (newbie question)
> 
> 
> When I turn on comb reverb, the first two seconds of it
> are always out of range, even if there are no other signals
> present. After the reverb is on and then I turn the notes on, 
> everything is in range.  
	[David Boothe]  
Sending ga1 back into itself:
   ga1 = ga1 + (asig3 * .2)
creates a feedback loop. Use separate paths for comb's input and output.
Clear both after each use.

;REVISED ORC--------------------------------------
sr = 44100
kr = 4410
ksmps = 10
nchnls = 2

ga1  init 0
ga2  init 0                            

instr     1                            
    iscale = .5
    ipan = p4

    k2      linseg  1, 2, 10, 2, 20, 2, 30, 2, 40
    k1      linseg  1000, 2, 800, 2, 600, 2, 400, 2, 200
    asig1   foscil  15000*iscale, k1, 2, k2, 2, 1
    asig2   foscil  15000*iscale, k1, 2, k2, 2, 1
    asig3 = asig1 + asig2
    outs asig3 * ipan, asig3 * (1 - ipan)
      
    ga1 = ga2 + (asig3 * .2)            ; reverb input signal (i.e. aux
send on mixer)
endin


instr     99                           
      ga2   comb      ga1, 2.5, .1    ;generate reverb 
           outs ga2, ga2                  ;output reverb
      ga2 = 0                                ;cleanliness is next to
godliness
      ga1 = 0                                ; (also get rid of pesky
feedback)
endin

> (If other newbies want to email me privately, perhaps we can help each
> 
> other out and not bother the big wigs around here ;-)
	[David Boothe]  
	That's one reason this list exists, although I don't qualify as
a big wig.

-dB