From abd65cfc70c72115bbe35aac86ff3721ef9131ef Mon Sep 17 00:00:00 2001
From: Robin Gareus <robin@gareus.org>
Date: Fri, 18 Mar 2016 22:57:53 +0100
Subject: Add a Lua Action Script to add scopes to all tracks

---
 scripts/addscopes.lua | 55 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 55 insertions(+)
 create mode 100644 scripts/addscopes.lua

(limited to 'scripts')

diff --git a/scripts/addscopes.lua b/scripts/addscopes.lua
new file mode 100644
index 0000000000..341773483c
--- /dev/null
+++ b/scripts/addscopes.lua
@@ -0,0 +1,55 @@
+ardour {
+	["type"]    = "EditorAction",
+	name        = "Add Scopes",
+	license     = "MIT",
+	author      = "Robin Gareus",
+	email       = "robin@gareus.org",
+	site        = "http://gareus.org",
+	description = [[Add 'Inline Scope' Lua Processor to all Tracks]]
+}
+
+function action_params ()
+	return
+	{
+		["unique"]   = { title = "Only add Scope if non is present already (yes/no)", default = "yes"},
+		["position"] = { title = "Insert Position from top (0,..)",                   default = "0"},
+	}
+end
+
+
+function factory (params)
+	return function ()
+		-- get configuration
+		local uniq = params["unique"] or "yes"
+		local pos = params["position"] or 0
+
+		-- loop over all tracks
+		for t in Session:get_tracks():iter() do
+			local insert = true;
+
+			-- check if a scope is already present
+			if uniq ~= "no" then
+				local proc;
+				local i = 0;
+				repeat
+					-- get Nth Ardour::Processor
+					proc = t:nth_plugin (i)
+					-- check if it's a scope
+					if (not proc:isnil() and proc:display_name () == "Inline Scope") then
+						insert = false;
+					end
+					i = i + 1
+				until proc:isnil() or insert == false
+			end
+
+			-- create a new processor and insert it
+			if insert then
+				local a = ARDOUR.LuaAPI.new_luaproc(Session, "Inline Scope");
+				if (not a:isnil()) then
+					t:add_processor_by_index(a, pos, nil, true)
+					a = nil
+				end
+			end
+		end
+	end
+end
-- 
cgit v1.2.3