X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=scripts%2Fselect_every_2nd_region.lua;h=b05efc1a46c7635d1a96358b6cc7e1d6b3916244;hb=4c2e801b5f24bd435f31a71183f89d26bf21838f;hp=0ffba5b826d8a01cdd5728dd0171bc25c6376fa8;hpb=9e543beb569f40edb3312c3c213d21b763b30d5a;p=ardour.git

diff --git a/scripts/select_every_2nd_region.lua b/scripts/select_every_2nd_region.lua
index 0ffba5b826..b05efc1a46 100644
--- a/scripts/select_every_2nd_region.lua
+++ b/scripts/select_every_2nd_region.lua
@@ -40,3 +40,21 @@ function factory () return function ()
 	-- 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: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