1 files changed, 61 insertions, 0 deletions
diff --git a/share/scripts/select_every_2nd_region.lua b/share/scripts/select_every_2nd_region.lua
new file mode 100644
index 0000000000..30ad519483
--- /dev/null
+++ b/share/scripts/select_every_2nd_region.lua
@@ -0,0 +1,61 @@
+ardour {
+	["type"]    = "EditorAction",
+	name        = "Region Select/2",
+	license     = "MIT",
+	author      = "Ardour Team",
+	description = [[select every 2nd region on all selected tracks]]
+}
+
+-- select every 2nd region on all selected tracks
+function factory () return function ()
+
+	local sl = ArdourUI.SelectionList () -- empty selection list
+
+	local sel = Editor:get_selection () -- get current selection
+	-- for each selected track/bus..
+	for route in sel.tracks:routelist ():iter () do
+		-- consider only tracks
+		local track = route:to_track ()
+		if track:isnil() then
+			goto continue
+		end
+
+		local skip = false;
+		-- iterate over all regions of the given track
+		for region in track:playlist():region_list():iter() do
+			if skip then
+				-- skip every 2nd region
+				skip = false;
+			else
+				skip = true;
+				-- get RegionView (GUI object to be selected)
+				local rv = Editor:regionview_from_region (region)
+				-- add it to the list of Objects to be selected
+				sl:push_back (rv);
+			end
+		end
+		::continue::
+	end
+
+	-- set/replace current selection in the editor
+	Editor:set_selection (sl, ArdourUI.SelectionOp.Set);
+end end
+
+function icon (params) return function (ctx, width, height, fg)
+	local wh = math.min (width, height) * .5
+	ctx:translate (math.floor (width * .5 - wh), math.floor (height * .5 - wh))
+
+	ctx:set_line_width (1)
+	ctx:rectangle (wh * .25, wh * .75, wh * 1.5 , .5 * wh)
+	ctx:set_source_rgba (0, 0, 0, 1)
+	ctx:stroke_preserve ()
+	ctx:set_source_rgba (.9, .9, .9, 1)
+	ctx:fill ()
+
+	ctx:set_source_rgba (1, 0, 0, 1)
+	ctx:rectangle (.5 + math.ceil(wh * 0.25), .5 + math.ceil(wh * .75), math.floor(wh * .5) - 1, math.floor(.5 * wh) - 1)
+	ctx:stroke_preserve ()
+
+	ctx:rectangle (.5 + math.ceil(wh * 1.25), .5 + math.ceil(wh * .75), math.floor(wh * .5) - 1, math.floor(.5 * wh) - 1)
+	ctx:stroke_preserve ()
+end end