sam/sfizz
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Limit filter parameters to prevent over-modulation

Browse source
This commit is contained in:
Jean Pierre Cimalando 2021-03-12 17:20:56 +01:00
parent 38c02ec65f
commit c60bb04857
1 changed files with 8 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
src/sfizz/dsp/filters/sfz_filters.dsp
View file

@ -94,19 +94,17 @@ sfzPeq = fm.rbjPeakingEqSmooth(smoothCoefs,cutoff,pkShGain,Q);
// the SFZ equalizer band
sfzEqPeak = fm.rbjPeakingEqSmooth(smoothCoefs,cutoff,pkShGain,Q) with {
Q = 1./(2.*ma.sinh(0.5*log(2)*max(1e-3, bandwidth)*w0/sin(w0)));
w0 = 2*ma.PI*max(0,cutoff)/ma.SR;
Q = 1./(2.*ma.sinh(0.5*log(2)*bandwidth*w0/sin(w0)));
w0 = 2*ma.PI*cutoff/ma.SR;
};
// the SFZ low-shelf with EQ controls
sfzEqLshelf = fm.rbjLowShelfSmooth(smoothCoefs,cutoff,pkShGain,Q) with {
slope = bandwidth; // in this case eqN_bw meaning is not bandwith but slope
Q = sfzGetQFromSlope(slope);
};
// the SFZ high-shelf with EQ controls
sfzEqHshelf = fm.rbjHighShelfSmooth(smoothCoefs,cutoff,pkShGain,Q) with {
slope = bandwidth; // in this case eqN_bw meaning is not bandwith but slope
Q = sfzGetQFromSlope(slope);
};
@ -155,10 +153,12 @@ sfz2chEqHshelf = par(i,2,sfzEqHshelf);
//==============================================================================
// Filter parameters
cutoff = hslider("[01] Cutoff [unit:Hz] [scale:log]", 440.0, 50.0, 10000.0, 1.0);
Q = vslider("[02] Resonance [unit:dB]", 0.0, 0.0, 40.0, 0.1) : ba.db2linear;
pkShGain = vslider("[03] Peak/shelf gain [unit:dB]", 0.0, 0.0, 40.0, 0.1);
bandwidth = vslider("[04] Bandwidth [unit:octave]", 1.0, 0.1, 10.0, 0.01);
cutoff = hslider("[01] Cutoff [unit:Hz] [scale:log]", 440.0, 50.0, 10000.0, 1.0) : max(1.0) : min(20000.0);
Q = vslider("[02] Resonance [unit:dB]", 0.0, 0.0, 40.0, 0.1) : max(0.0) : min(60.0) : ba.db2linear;
pkShGain = vslider("[03] Peak/shelf gain [unit:dB]", 0.0, 0.0, 40.0, 0.1) : max(-120.0) : min(60.0);
bandwidthOrSlope = vslider("[04] Bandwidth [unit:octave]", 1.0, 0.1, 10.0, 0.01);
bandwidth = bandwidthOrSlope : max(1e-2) : min(12.0);
slope = bandwidthOrSlope; // limited further down in code
// smoothing function to prevent fast changes of filter coefficients
// The basic si.smoo is a bit longish and creates strange modulation sounds