summaryrefslogtreecommitdiff
path: root/scripts/s_thin_automation.lua
blob: a86b6c71d0a9b488d3e6c049df613e560c95c6f9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
ardour { ["type"] = "Snippet", name = "Thin Fader Automation" }

-- --TODO--
-- For a fully fledged EditorAction this script should
-- offer a dropdown to select automation of all paramaters
-- (not just the fader)
-- see scripts/midi_cc_to_automation.lua and
-- scripts/mixer_settings_store.lua
-- Thinning Area should also be a numeric-entry or slider

function factory () return function ()
	-- get selected tracks
	rl = Editor:get_selection ().tracks:routelist ()

	-- prepare undo operation
	Session:begin_reversible_command ("Thin Automation")
	local add_undo = false -- keep track if something has changed

	-- iterate over selected tracks
	for r in rl:iter () do

		-- get the Fader (aka "amp") control
		local ac = r:amp ():gain_control () -- ARDOUR:AutomationControl
		local al = ac:alist () -- ARDOUR:AutomationList

		-- get state for undo
		local before = al:get_state ()

		-- remove dense events
		al:thin (50) -- threashold of area below curve

		-- save undo
		local after = al:get_state ()
		Session:add_command (al:memento_command (before, after))
		add_undo = true

		::out::
	end

	-- all done, commit the combined Undo Operation
	if add_undo then
		-- the 'nil' Commend here mean to use the collected diffs added above
		Session:commit_reversible_command (nil)
	else
		Session:abort_reversible_command ()
	end
end end