13
0
livetrax/scripts/voice_activate.lua

58 lines
1.7 KiB
Lua

ardour {
["type"] = "dsp",
name = "Voice/Level Activate",
category = "Utility",
license = "MIT",
author = "Robin Gareus",
authoremail = "robin@gareus.org",
site = "http://gareus.org",
description = [[
An Example Audio Plugin that rolls the transport
when the signal level on the plugin's input exceeds a given threshold.]]
}
function dsp_ioconfig ()
return
{
-- support all in/out as long as input port count equals output port count
{ audio_in = -1, audio_out = -1},
}
end
function dsp_params ()
return
{
{ ["type"] = "input", name = "Threshold", min = -20, max = 0, default = -6, doc = "Threshold in dBFS for all channels" },
{ ["type"] = "output", name = "Level", min = -120, max = 0 },
}
end
function dsp_configure (ins, outs)
n_channels = ins:n_audio()
end
function dsp_runmap (bufs, in_map, out_map, n_samples, offset)
local ctrl = CtrlPorts:array() -- get control port array (read/write)
if Session:transport_rolling() then
-- don't do anything if the transport is already rolling
ctrl[2] = -math.huge -- set control output port value
return
end
local threshold = 10 ^ (.05 * ctrl[1]) -- dBFS to coefficient
local level = -math.huge
for c = 1,n_channels do
local b = in_map:get(ARDOUR.DataType("audio"), c - 1) -- get id of audio-buffer for the given channel
if b ~= ARDOUR.ChanMapping.Invalid then -- check if channel is mapped
local a = ARDOUR.DSP.compute_peak(bufs:get_audio(b):data(offset), n_samples, 0) -- compute digital peak
if a > threshold then
Session:request_transport_speed(1.0, true)
end
if a > level then level = a end -- max level of all channels
end
end
ctrl[2] = ARDOUR.DSP.accurate_coefficient_to_dB (level) -- set control output port value
end