Schroeder Reverb true 2 2 irvt = <reverbTime> ilptcmb = <combLoop> ilptap1 = <loopDel1> ilptap2 = <loopDel2> idrymix = <dryMix> icutoff = <cutoff> ;comb filters adel delayr ilptcmb*2 acomb1 deltapi ilptcmb afilt1 tone acomb1, icutoff afilt1 balance afilt1, acomb1 igain1 pow .001, ilptcmb/irvt acomb2 deltapi ilptcmb*1.7 afilt2 tone acomb2, icutoff afilt2 balance afilt2, acomb2 igain2 pow .001, (ilptcmb*1.7)/irvt acomb3 deltapi ilptcmb*.333 afilt3 tone acomb3, icutoff afilt3 balance afilt3, acomb3 igain3 pow .001, (ilptcmb*.333)/irvt acomb4 deltapi ilptcmb*1.666 afilt4 tone acomb4, icutoff afilt4 balance afilt4, acomb4 igain4 pow .001, (ilptcmb*1.666)/irvt delayw (((afilt1*igain1)+(afilt2*igain2)+(afilt3*igain3)+(afilt4*igain4))/4)+ain1+ain2 acombL = (acomb1+acomb2)/2 acombR = (acomb3+acomb4)/2 ;all-pass filters aap1L alpass acombL, irvt, ilptap1 aap2L alpass aap1L, irvt, ilptap2 aap1R alpass acombR, irvt, ilptap1 aap2R alpass aap1R, irvt, ilptap2 arvbL = aap2L arvbR = aap2R ;mix wet and dry aout1 dcblock (ain1*idrymix)+(arvbL*(1-idrymix)) aout2 dcblock (ain2*idrymix)+(arvbR*(1-idrymix)) combLoop 173 27 0.0 0.2 0.070382446 60 159 107 Comb Loop Time reverbTime 18 11 0.0 4.0 2.0332127 120 44 150 Reverb Time loopDel1 34 187 0.0 0.1 0.049102403 60 loopDel2 125 188 0.0 0.1 0.1 60 28 267 Loop Delay 1 118 269 Loop Delay 2 dryMix 211 187 0.0 1.0 0.3375869 60 226 267 Dry Mix cutoff 37 294 0.0 10000.0 1.0 2097.0 200 95 320 LP Filter Cutoff