13
0
livetrax/share/scripts/send_to_bus.lua

43 lines
1.4 KiB
Lua
Raw Normal View History

ardour { ["type"] = "EditorAction", name = "Send Tracks to Bus",
license = "MIT",
author = "Ardour Team",
description = [[Create a Bus and add aux-sends from all selected tracks]]
}
function factory () return function ()
-- find number of channels to use for the new bus, follow master-bus' inputs
local chn = 2
local mst = Session:master_out ();
if not mst:isnil () then
chn = mst:n_inputs ():n_audio ()
end
mst = nil -- explicitly drop reference
if chn == 0 then chn = 2; end
local sel = Editor:get_selection () -- get selection
local tracks = ARDOUR.RouteListPtr () -- create a new list
-- find selected *tracks*, add to tracks list
for r in sel.tracks:routelist ():iter () do
if not r:to_track ():isnil () then
tracks:push_back (r)
end
end
if tracks:size () > 0 then
local bus = Session:new_audio_route (chn, chn, nil, 1, "", ARDOUR.PresentationInfo.Flag.AudioBus, ARDOUR.PresentationInfo.max_order)
if bus:size () > 0 then
Session:add_internal_sends (bus:front (), ARDOUR.Placement.PostFader, tracks);
end
end
end end
function icon (params) return function (ctx, width, height, fg)
local txt = Cairo.PangoLayout (ctx, "ArdourMono ".. math.ceil (math.min (width, height) * .5) .. "px")
txt:set_text ("\u{2192}B") -- "->B"
local tw, th = txt:get_pixel_size ()
ctx:move_to (.5 * (width - tw), .5 * (height - th))
ctx:set_source_rgba (ARDOUR.LuaAPI.color_to_rgba (fg))
txt:show_in_cairo_context (ctx)
end end