Csound Csound-dev Csound-tekno Search About

CHORUS & other FX

Date1998-02-17 14:05
FromDavid Schuyeteneer
SubjectCHORUS & other FX
Can anyone explain me why this chorus does not work ??

Chorus is (like flanger etc) basically mixing the original signal with one
or more detuned copies
of itself, right ? Detuning should vary over time also, right ?

The Csound manual claims VDELAY is useful for chorus, flanger etc..

I tried , but it doesn't work, you can hear the time-varying delay, but it
clicks and pops rather
than giving a smooth chorus. The changes in delaytime aren't that sudden
are they ?? So why
does it clicks ?


Also there exists a MULTIFX.ORC and MULTIFX.SCO, but does anyone know how
to use the
instruments from it ?? I mean how they can be used in own orcs and sco's ?
It works with
ZAK stuff...what exactly is ZAK ? I read the manual but it isn't clear...



David.

p.s The Csound maillist is...a home for sonic dropouts.


;-----------------------ORC----------------------------
sr = 44100      ;samplerate
kr = 44100      ;control samplerate
ksmps = 1       ;sr / kr
nchnls = 2      ;1=mono, 2=stereo

gareverb  init 0
gachorus  init 0




instr 13

kfx  line 0,p3,1
kfx2 line 1,p3,0
a1  rand 20
af1 reson a1,440,20
af2 reson a1,300,10


  ;outs af1,af2

 gareverb = gareverb+(af1*kfx)+(af2*kfx2)
 gachorus balance (gachorus+af1+af2),(af1+af2)	

endin






;-------------REVERB-----------------
instr 99

 asignal reverb2 gareverb,p5,0
 outs asignal,asignal
 gareverb = 0

endin

;--------------CHORUS----------------
instr 100
   imaxdel     = p4      ; maximum delay 
   adelfreq    = p5      ; chorus rate
   adelamount  = p6      ; chorus depth
   adeltime   oscil adelamount,adelfreq,1 

   adeltime = adeltime + (imaxdel/2) ; offset

   asignal vdelay gachorus,adeltime,imaxdel
   outs asignal, asignal
   gachorus = 0

endin





;----------------------------SCO--------------------------------

;  P1        P2         P3       P4     
;  tablenum  starttime  size     GEN    
f   1         0          256      10     1         
;                                        a, n1, b, n2, c, n3, d 
f   2         0          256       7     0  128 1  0   -1 128 0  


; REVERB    start    duration          revtime 
;i  99        0           300       0      6

; CHORUS                           maxdel    rate      depth
i  100       0           5         1000       1         20 

;  instrnum  starttime  duration    amp   
;  P1        P2         P3          P4           

i  13        0          5











e