94 lines
1.9 KiB
Lua
94 lines
1.9 KiB
Lua
|
ardour {
|
||
|
|
["type"] = "dsp",
|
||
|
|
name = "SinGen",
|
||
|
|
category = "Instrument",
|
||
|
|
license = "MIT",
|
||
|
|
author = "Ardour Team",
|
||
|
|
description = [[Sine Wave Generator (v1.2)]]
|
||
|
|
}
|
||
|
|
|
||
|
|
local lpf = 0
|
||
|
|
|
||
|
|
function dsp_params ()
|
||
|
|
return
|
||
|
|
{
|
||
|
|
{ ["type"] = "input", name = "Frequency", min = 20, max = 20000, default = 1000, unit="Hz", logarithmic = true },
|
||
|
|
{ ["type"] = "input", name = "Gain", min = -90, max = 0, default = -18, unit="dB" },
|
||
|
|
}
|
||
|
|
end
|
||
|
|
|
||
|
|
function dsp_ioconfig ()
|
||
|
|
return { [1] = { audio_in = -1, audio_out = -1}, }
|
||
|
|
end
|
||
|
|
|
||
|
|
function dsp_init (rate)
|
||
|
|
r = rate
|
||
|
|
lpf = 2048 / rate
|
||
|
|
end
|
||
|
|
|
||
|
|
function low_pass_filter_param(old, new, limit)
|
||
|
|
if math.abs (old - new) < limit then
|
||
|
|
return new
|
||
|
|
else
|
||
|
|
return old + lpf * (new - old)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
local p = 0
|
||
|
|
local fo = 0
|
||
|
|
local ao = 0
|
||
|
|
|
||
|
|
function dsp_run (ins, outs, n_samples)
|
||
|
|
local ctrl = CtrlPorts:array() --call parameters
|
||
|
|
|
||
|
|
local a = {} --init array
|
||
|
|
local f = ctrl[1] or 1000
|
||
|
|
local amp = low_pass_filter_param(ao, ARDOUR.DSP.dB_to_coefficient(ctrl[2]), 0.02)
|
||
|
|
local inc = f / r
|
||
|
|
|
||
|
|
for s = 1, n_samples do --fill table with fragments of a sine wave
|
||
|
|
p = p + inc
|
||
|
|
a[s] = amp * math.sin(p * (2 * math.pi))
|
||
|
|
end
|
||
|
|
|
||
|
|
for c = 1,#outs do
|
||
|
|
outs[c]:set_table(a, n_samples) --passes array into buffer
|
||
|
|
end
|
||
|
|
|
||
|
|
if (f ~= fo) or (a ~= ao) then
|
||
|
|
self:queue_draw()
|
||
|
|
end
|
||
|
|
fo = f
|
||
|
|
ao = amp
|
||
|
|
end
|
||
|
|
|
||
|
|
function render_inline (ctx, w, max_h) --inline display
|
||
|
|
local ctrl = CtrlPorts:array()
|
||
|
|
h = 30
|
||
|
|
p = 0
|
||
|
|
inc = 1/w
|
||
|
|
f = ctrl[1] / 1000
|
||
|
|
if f < 0.5 then f = 0.5 end
|
||
|
|
if f > 8 then f = 8 end
|
||
|
|
|
||
|
|
--draw rectangle
|
||
|
|
ctx:rectangle(0, 0, w, h)
|
||
|
|
ctx:set_source_rgba(0, 0, 0, 1.0)
|
||
|
|
ctx:fill()
|
||
|
|
ctx:set_line_width(1.5)
|
||
|
|
ctx:set_source_rgba(0.8, 0.8, 0.8, 1.0)
|
||
|
|
|
||
|
|
l_x = 0
|
||
|
|
l_y = 0
|
||
|
|
for x = 0,w do
|
||
|
|
y = ARDOUR.DSP.dB_to_coefficient(ctrl[2]) * math.sin(f * (2 * math.pi * (p)))
|
||
|
|
yc = 0.5 * h + ((-0.5 * h) * y)
|
||
|
|
ctx:move_to (x, yc + 3)
|
||
|
|
ctx:line_to (l_x, l_y + 3)
|
||
|
|
l_x = x
|
||
|
|
l_y = yc
|
||
|
|
ctx:stroke()
|
||
|
|
p = p + inc
|
||
|
|
end
|
||
|
|
return {w, h + 6}
|
||
|
|
end
|