2 ["type"] = "EditorAction",
\r
3 name = "Create Drum Tracks",
\r
5 description = [[Creates 8 new tracks with representative names and colors.]]
\r
8 function factory () return function ()
\r
21 local color = 0xff8800ff --orange
\r
25 local tl = Session:new_audio_track (1, 2, nil, 1, names[i],
\r
26 ARDOUR.PresentationInfo.max_order,
\r
27 ARDOUR.TrackMode.Normal)
\r
29 for track in tl:iter () do
\r
30 track:presentation_info_ptr ():set_color (color)
\r
36 end end -- function factory
\r