PConvolve 2 2 iwet = <wetDry> idry = 1 - iwet ; size of each convolution partion -- for best performance, this parameter needs to be tweaked ipartitionsize = <paritionSize> ; calculate latency of pconvolve opcode idel = (ksmps < ipartitionsize ? ipartitionsize + ksmps : ipartitionsize)/sr prints "Convolving with a latency of %f seconds%n", idel awetl, awetr pconvolve iwet*(ain1+ain2), "<impulseResponse>", ipartitionsize ; Delay dry signal, to align it with the convoled sig adryl delay idry * ain1, idel adryr delay idry * ain2, idel aout1 = adryl+awetl aout2 = adryr+awetr Convolution Effect using pconvolve opcode by Matt Ingalls The code for this effect is based on code by Matt Ingalls found in the Csound Manual; please see the manual for more information regarding pconvolve. 3 6 <html><font size="+1">PConvolve</font></html> 13 43 Impulse Response 43 76 Partition Size impulseResponse 130 32 300 paritionSize 130 73 1 1 2 2 4 4 8 8 16 16 32 32 64 64 128 128 256 256 512 512 1024 1024 2048 2048 4096 4096 8192 8192 16384 16384 32768 32768 65536 65536 10 46 110 Wet/Dry Mix wetDry 129 105 0.0 1.0 0.01 0.5 280 380 130 Wet 136 130 Dry