ardour/livetrax
13
0
Fork 0
Code

cleanup High/Low Pass

Browse Source 
* shorten Name
* fix typo in Time Constant
* remove some local variables
This commit is contained in:
Robin Gareus 2016-07-17 14:10:13 +02:00
parent dd9c99026d
commit 3458844878
1 changed files with 8 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
scripts/HiAndLowPass.lua
View File

@ -1,6 +1,6 @@
ardour { ardour {
["type"] = "dsp", ["type"] = "dsp",
name = "a-High and Low Pass Filter", name = "a-High/Low Pass Filter",
category = "Filter", category = "Filter",
license = "GPLv2", license = "GPLv2",
author = "Ardour Team", author = "Ardour Team",
@ -65,7 +65,7 @@ function dsp_init (rate)
self:table ():set (tbl) self:table ():set (tbl)
-- interpolation time constant, 64fpp -- interpolation time constant, 64fpp
lpf = 15000 / rate lpf = 5000 / rate
end end
function dsp_configure (ins, outs) function dsp_configure (ins, outs)
@ -156,19 +156,17 @@ function dsp_run (ins, outs, n_samples)
local ho = math.floor(cur[1]) local ho = math.floor(cur[1])
local lo = math.floor(cur[4]) local lo = math.floor(cur[4])
local hox = cur[1]
local lox = cur[4]
-- process all channels -- process all channels
for c = 1, #ins do for c = 1, #ins do
local xfade = hox - ho local xfade = cur[1] - ho
assert (xfade >= 0 and xfade < 1) assert (xfade >= 0 and xfade < 1)
ARDOUR.DSP.copy_vector (mem:to_float (off), ins[c]:offset (off), siz) ARDOUR.DSP.copy_vector (mem:to_float (off), ins[c]:offset (off), siz)
-- initialize output -- initialize output
if hox == 0 then if cur[1] == 0 then
-- high pass is disabled, just copy data. -- high pass is disabled, just copy data.
ARDOUR.DSP.copy_vector (outs[c]:offset (off), mem:to_float (off), siz) ARDOUR.DSP.copy_vector (outs[c]:offset (off), mem:to_float (off), siz)
else else
@ -179,7 +177,7 @@ function dsp_run (ins, outs, n_samples)
-- high pass -- high pass
-- allways run all filters so that we can interplate as needed. -- allways run all filters so that we can interplate as needed.
for k = 1,4 do for k = 1,4 do
if xfade > 0 and k > ho and k <= ho + 1 then if xfade > 0 and k == ho + 1 then
ARDOUR.DSP.mix_buffers_with_gain (outs[c]:offset (off), mem:to_float (off), siz, 1 - xfade) ARDOUR.DSP.mix_buffers_with_gain (outs[c]:offset (off), mem:to_float (off), siz, 1 - xfade)
end end
@ -187,19 +185,19 @@ function dsp_run (ins, outs, n_samples)
if k == ho and xfade == 0 then if k == ho and xfade == 0 then
ARDOUR.DSP.copy_vector (outs[c]:offset (off), mem:to_float (off), siz) ARDOUR.DSP.copy_vector (outs[c]:offset (off), mem:to_float (off), siz)
elseif k > ho and k <= ho + 1 then elseif k == ho + 1 then
ARDOUR.DSP.mix_buffers_with_gain (outs[c]:offset (off), mem:to_float (off), siz, xfade) ARDOUR.DSP.mix_buffers_with_gain (outs[c]:offset (off), mem:to_float (off), siz, xfade)
end end
end end
-- low pass -- low pass
xfade = lox - lo xfade = cur[4] - lo
assert (xfade >= 0 and xfade < 1) assert (xfade >= 0 and xfade < 1)
-- copy output of high-pass into "processing memory" -- copy output of high-pass into "processing memory"
ARDOUR.DSP.copy_vector (mem:to_float (off), outs[c]:offset (off), siz) ARDOUR.DSP.copy_vector (mem:to_float (off), outs[c]:offset (off), siz)
if lox > 0 then if cur[4] > 0 then
-- clear output, Low-pass mixes interpolated data into output, -- clear output, Low-pass mixes interpolated data into output,
-- in which case we just keep the output -- in which case we just keep the output
ARDOUR.DSP.memset (outs[c]:offset (off), 0, siz) ARDOUR.DSP.memset (outs[c]:offset (off), 0, siz)