smokephil/ardour
1
0
Fork 0
mirror of https://github.com/Ardour/ardour.git synced 2025-12-07 23:35:03 +01:00
Code Issues Projects Releases Wiki Activity

Add 2 more action-script icons

Browse source
This commit is contained in:
Robin Gareus 2017-02-20 00:53:09 +01:00
parent 8d8666d041
commit 83aac1ce88
2 changed files with 59 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

36
scripts/bounce_replace.lua
View file

@ -62,3 +62,39 @@ function factory (params) return function ()
end
end end
function icon (params) return function (ctx, width, height, fg)
local wh = math.min (width, height) * .5
local ar = wh * .2
ctx:set_line_width (1)
function stroke_outline (c)
ctx:set_source_rgba (0, 0, 0, 1)
ctx:stroke_preserve ()
ctx:set_source_rgba (c, c, c, 1)
ctx:fill ()
end
ctx:rectangle (wh - wh * .6, wh - .7 * wh, wh * 1.2, .5 * wh)
stroke_outline (.7)
ctx:rectangle (wh - wh * .6, wh + .1 * wh, wh * 1.2, .5 * wh)
stroke_outline (.9)
-- arrow
ctx:set_source_rgba (0, 1, 0, 1)
ctx:set_line_width (ar * .7)
ctx:move_to (wh, wh - .5 * wh)
ctx:rel_line_to (0, wh)
ctx:stroke ()
ctx:move_to (wh, wh + .5 * wh)
ctx:rel_line_to (-ar, -ar)
ctx:rel_line_to (2 * ar, 0)
ctx:close_path ()
ctx:stroke ()
end end