3rdDimension true 2 2 if (<3rdDimensionON> == 1) then aSource= (ain1 + ain2)*.5 ; Set up the dry and wet signal levels kWet = <3rdDimension_wet> kDry = <3rdDimension_dry> ; The triangular table for the LFO shape iTri = ftgenonce(0, 0, 32768, 7, 0, 16384, 1, 16384, 0) ; Calculate depth and rate of the LFOs from amount kDepth = <3rdDimension_depth> kRate = <3rdDimension_rate> ; Create the LFOs (at a-rate, because flanger varies delay at a-rate) aLFO1 = poscil(kDepth, kRate, iTri) aLFO2 = kDepth - aLFO1 ; Create the two chorused versions aChorus1 = flanger(aSource, aLFO1+.01, 0, .6) aChorus2 = flanger(aSource, aLFO2+.01, 0, .6) ; Create the left and right outputs and output them aout1 = (aSource)*kDry + butterhp((aChorus1 - aChorus2)*kWet, 300) aout2 = (aSource)*kDry + butterhp((aChorus2 - aChorus1)*kWet, 300) else aout1 = ain1 aout2 = ain2 endif DESCRIPTION: A mono to stereo chorus inspired by the Dimension C Chorus. This is a simple chorus, which is known for its lack of abrasive pitch alteration. CONTROLLERS: depth & rate - The intensity of the effect, both rate and depth wet - The wet gain dry - The dry gain --- version 1.0, September 2020 - new GUI and small code adaptations by Menno Knevel - added BSB information comments - original UDO by Author: Jeanette C., 2020 5 5 DOT true 0 0 Group 0x00000033 0x000000ff 0xffffffff true 20 20 3rdDimensionON 0 0 bypass true true true 10 10 ReverbSC 0x4d8080ff 0x000000ff 0xffffffff false 159 20 130 10 dry System Regular 12.0 3rdDimension_wet 100 20 true 0.0 1.0 0.01 0.5 50 true false 3rdDimension_rate 55 10 true 0.0 3.0 0.8999999999999999 40 true false rate true System Regular 12.0 105 10 wet System Regular 12.0 3rdDimension_depth 10 10 true 0.001 0.012 0.00408 40 true false depth true System Regular 12.0 3rdDimension_dry 125 20 true 0.0 1.0 0.01 0.52 50 true false