Fluxy true 2 2 if (<FluxyON> == 1) then kwet = <Fluxy_positionY> ;mix wet/dry kdry = 1 - kwet ;=========================equalize============================================== ain = (ain1 + ain2)*.5 if <Fluxy_colorON> == 1 then ainL eqfil ain, 125,60, <Fluxy_color> ainL eqfil -(ainL), 200,50, 1-<Fluxy_color> ainL eqfil ainL, 250,60, <Fluxy_color> ainL eqfil -(ainL), 300,75, 1-<Fluxy_color> ainL eqfil ainL, 375,125, <Fluxy_color> ainL eqfil -(ainL), 500,200, 1-<Fluxy_color> ainL eqfil ainL, 750,250, <Fluxy_color> ainL eqfil -(ainL), 1000,250, 1-<Fluxy_color> ainL eqfil ainL, 1500,500, <Fluxy_color> ainL eqfil -(ainL), 2000,500, 1-<Fluxy_color> ainL eqfil ainL, 3000,700, <Fluxy_color> ainL eqfil -(ainL), 4000,2000, 1-<Fluxy_color> ainL eqfil ainL, 8000,4000, <Fluxy_color> ainL eqfil -(ainL), 16000,8000, 1-<Fluxy_color> ainR eqfil ain, 125,60, 1-<Fluxy_color> ainR eqfil ainR, 200,50, <Fluxy_color> ainR eqfil -(ainR), 250,60, 1-<Fluxy_color> ainR eqfil ainR, 300,75, <Fluxy_color> ainR eqfil -(ainR), 375,125, 1-<Fluxy_color> ainR eqfil ainR, 500,200, <Fluxy_color> ainR eqfil -(ainR), 750,250, 1-<Fluxy_color> ainR eqfil ainR, 1000,250, <Fluxy_color> ainR eqfil -(ainR), 1500,500, 1-<Fluxy_color> ainR eqfil ainR, 2000,500, <Fluxy_color> ainR eqfil -(ainR), 3000,700, 1-<Fluxy_color> ainR eqfil ainR, 4000,2000, <Fluxy_color> ainR eqfil -(ainR), 8000,4000, 1-<Fluxy_color> ainR eqfil ainR, 16000,8000, <Fluxy_color> ainLL eqfil ainL, 5000,5000, <Fluxy_treble> ainRR eqfil ainR, 5000,5000, <Fluxy_treble> asubL = ainL + ainLL asubR = ainR + ainRR else asubL = ain asubR = asubL endif kpan scale <Fluxy_positionX>, 0.2, .8 awetL, awetR pan2 asubL, 1 - kpan awetL, awetR pan2 asubR, kpan ;================================================================== if <Fluxy_preset impulse> == 0 then strset 10000, "/media/menno/datae/csounddata/Impulses/preset1.wav" ; assign number 1000 to IR elseif <Fluxy_preset impulse> == 1 then strset 10000, "/media/menno/datae/csounddata/Impulses/preset2.wav" elseif <Fluxy_preset impulse> == 2 then strset 10000, "/media/menno/datae/csounddata/Impulses/preset3.wav" else strset 10000, "<Fluxy_impulseResponse>" endif ivld filevalid 10000 ; check if valid impilse is imported if ivld > 0 then iNrChannels filenchnls 10000 ipartitionsize = <Fluxy_paritionSize> ;for best performance, this parameter needs to be tweaked idel = (ksmps < ipartitionsize ? ipartitionsize + ksmps : ipartitionsize)/sr ;calculate latency of pconvolve opcode if (<Fluxy_check delay> == 1) then prints "\nConvolving with a latency of %f seconds%\n", idel endif awetl1, awetrx1 pconvolve awetL, 10000, ipartitionsize awetlx2, awetr2 pconvolve awetR, 10000, ipartitionsize adry delay kdry * ain, idel ;delay dry signal, to align it with the convoled sig kdrysource = 1-<Fluxy_positionY> adryl, adryr pan2 adry * 1.7 * kdrysource, <Fluxy_positionX> ; compensate for fron <--> rear amplitude aout1 ntrpol adryl, awetl1, <Fluxy_positionY> aout2 ntrpol adryr, awetr2, <Fluxy_positionY> else prints "\n\n\nNO OR INVALID IMPULSE. PLEASE ENTER ONE!!\nEFFECT IS NOT WORKING, YOU HEAR THE DIRECT SIGNAL ONLY.\n\n\n" aout1 = ain1 aout2 = ain2 endif else aout1 = ain1 aout2 = ain2 endif DESCRIPTION: This effect is meant for mono signal input only!! The goal of this effect is to give a mono sound some width and ambiance. (if the source is stereo, switch it to mono using the Xpan effect, available from BlueShare) This effect needs some extra impulses to work correctly. As it is, at the moment, impossible to append extra files to effects or instruments and upload these as a package to BlueShare, you have to download them seperately: https://github.com/tjingboem/impulses. Preset1, preset2 and preset3. Download, unzip and change the path in the Fluxy code so that Fluxy will find those files. Normal usage: 1 or more Mixerstrips, each producing a mono output, must get copies of the same Fluxy effect with the same ambiance but with different pan settings on each effect. Result: several mono signals appear to be playing together in the same room, instead of staying alone in their respective corners. CONTROLLERS: ON/OFF - bypass Impulse - 3 presets and 1 impulse of choice. (The 3 preset impulses are included) paritionSize - tweak for balance in speed and CPU load treble - boosts the treble. Compensates for sounds that are positioned in the rear. position mono signal - left/right panning and front/rear positioning --- version 1.1, January 2022 - changed panorama and distance sliders to XY position version 1.02, July 2020 - added BSB information comments version 1.01, May 2020 - added comments on controllers version 1.0, June 2019 - initial version by Menno Knevel 2 2 LINE true 0 0 Group 0x00000033 0x000000ff 0xffffffff true 20 20 Roboto 12.0 10 10 Group 0x4d8080ff 0x000000ff 0xffffffff false 20 20 Roboto 12.0 10 10 impulse 0x4d8080ff 0x000000ff 0xffffffff true 20 146 Roboto 12.0 Fluxy_treble 238 70 boosts the treble. Compensates for sounds that are positioned in the rear. true 1.0 5.0 0.1 1.0 150 true false 248 12 Roboto 12.0 Fluxy_colorON 12 75 activate filter true Fluxy_paritionSize 325 10 tweak for balance in speed and CPU load false 10 12 true 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 12 105 position mono signal 0x4d8080ff 0x1a4d4dff 0xffffffff true 382 20 Roboto 12.0 170 2 Roboto 12.0 166 94 Roboto 12.0 Fluxy_position 34 17 choose stereo placement true 298 90 0.0 1.0 0.01 0.2 0.5637583892617449 0.11857142857142856 true false 2 46 Roboto 12.0 338 50 Roboto 12.0 Fluxy_impulseResponse 10 35 use short stereo impulse file without much coloration 350 false 298 70 Roboto 12.0 106 70 Roboto 12.0 Fluxy_check delay 138 12 true false true Fluxy_preset impulse 10 10 3 presets and 1 impulse of choice. (The 3 preset impulses are included) false 2 12 true ambiance 1 0 ambiance 2 1 ambiance 3 2 your impulse 3 Fluxy_color 36 70 add filter true 0.1 0.7 0.1 0.30000000000000004 180 true false FluxyON 0 0 bypass true