PC World 2007 July & August/PCWorld_2007-07-08_cd.bin/audio-video/reaper/reaper1861-install.exe/Effects/Guitar/distort-fuzz

Text File | 2007-02-12 | 589b | 30 lines

desc:distortion, fuzzy

slider1:20<1,300>shape
slider2:-25<-60,60,1>hard limit (dB)
slider3:0<-120,0,1>wet mix (dB)
slider4:-60<-120,0,1>dry mix (dB)
slider5:0<0,2,1{Left,Right,Stereo}>channel mode

@init
@slider
maxv=2 ^ (slider2/6);
s11=slider1-1;
wet=2^(slider3/6);
dry=2^(slider4/6);

@block
@sample

slider5 != 1 ? (
as=abs(spl0);
s0=spl0 * (as + slider1) / (as*(as + s11) + 1);
spl0=max(min(s0,maxv),-maxv)*wet + spl0*dry;
);

slider5 != 0 ? (
as=abs(spl1);
s0=spl1 * (as + slider1) / (as*(as + s11) + 1);
spl1=max(min(s0,maxv),-maxv)*wet + spl1*dry;
);