1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
ardour {
["type"] = "EditorAction",
name = "Channel Strip Setup",
license = "MIT",
author = "Ardour Team",
description = [[Add Compressor and EQ plugin to every selected track and if a bus name 'Reverb' exists post-fader reverb send]]
}
function factory (params)
return function ()
-- helper functions
function plugin_uri (proc)
return proc:to_plugininsert():plugin(0):get_info().unique_id
end
function add_lv2_plugin (route, pluginname, position)
local p = ARDOUR.LuaAPI.new_plugin (Session, pluginname, ARDOUR.PluginType.LV2, "")
if not p:isnil () then
route:add_processor_by_index (p, position, nil, true)
end
end
function test_send_dest (send, route)
local intsend = send:to_internalsend()
if intsend:isnil () then return false end
return intsend:target_route () == route
end
-- Test if there is a Bus named "Reverb"
local reverb_bus = Session:route_by_name ("Reverb")
if reverb_bus:isnil () or not reverb_bus:to_track ():isnil () then
reverb_bus = nil;
end
-- Iterate over all selected Track/Bus
-- http://manual.ardour.org/lua-scripting/class_reference/#ArdourUI:TrackSelection
local sel = Editor:get_selection ()
for route in sel.tracks:routelist ():iter () do
local have_eq = false
local comp_pos = 0
local add_send = false
-- skip master-bus
if route:is_master() then goto next end
-- iterate over all plugins on the route,
-- check if a a-eq or a-comp is already present
local i = 0;
repeat
local proc = route:nth_plugin (i) -- get Nth Ardour::Processor
if (not proc:isnil()) and plugin_uri (proc) == "urn:ardour:a-eq" then
have_eq = true;
end
if (not proc:isnil()) and (plugin_uri (proc) == "urn:ardour:a-comp" or plugin_uri (proc) == "urn:ardour:a-comp#stereo") then
comp_pos = i + 1; -- remember position of compressor
end
i = i + 1
until proc:isnil()
-- check if there is a send to the reverb bus
if reverb_bus then
add_send = true;
i = 0;
repeat
local send = route:nth_send (i) -- get Nth Ardour::Send
if not send:isnil() and test_send_dest (send, reverb_bus) then
add_send = false
end
i = i + 1
until send:isnil()
end
-- plugins are inserted at the top (pos = 0).
-- So they have to be added in reverse order:
-- If the compressor is not yet present (comp_pos == 0),
-- first add the EQ, and then the compressor before the EQ.
-- Otherwise add the EQ after the compressor.
if not have_eq then
add_lv2_plugin (route, "urn:ardour:a-eq", comp_pos)
end
if comp_pos == 0 then
if route:n_inputs ():n_audio () == 2 then
add_lv2_plugin (route, "urn:ardour:a-comp#stereo", 0)
else
add_lv2_plugin (route, "urn:ardour:a-comp", 0)
end
end
--add send to reverb bus, post-fader, just before the track's mains output.
if add_send then
Session:add_internal_send (reverb_bus, route:main_outs (), route)
end
::next::
end
end
end
function icon (params) return function (ctx, width, height, fg)
function rnd (x) return math.floor (x + 0.5) end
local wc = rnd (width * 0.5) - 0.5
local wl = wc - math.floor (width * .25)
local wr = wc + math.floor (width * .25)
local h0 = height * 0.2
local h1 = height * 0.8
local fw = math.floor (width * .1)
local fl = rnd (height * .35) - 1
local fc = rnd (height * .65) - 1
local fr = rnd (height * .45) - 1
ctx:set_source_rgba (ARDOUR.LuaAPI.color_to_rgba (fg))
ctx:set_line_width (1)
ctx:move_to (wl, h0)
ctx:line_to (wl, h1)
ctx:move_to (wc, h0)
ctx:line_to (wc, h1)
ctx:move_to (wr, h0)
ctx:line_to (wr, h1)
ctx:stroke ()
ctx:set_line_width (2)
ctx:move_to (wl - fw, fl)
ctx:line_to (wl + fw, fl)
ctx:move_to (wc - fw, fc)
ctx:line_to (wc + fw, fc)
ctx:move_to (wr - fw, fr)
ctx:line_to (wr + fw, fr)
ctx:stroke ()
end end
|
