diff options
author | Robin Gareus <robin@gareus.org> | 2020-02-23 20:48:02 +0100 |
---|---|---|
committer | Robin Gareus <robin@gareus.org> | 2020-02-23 20:48:02 +0100 |
commit | 180843f9bd28b191c7404245ba0a121107992511 (patch) | |
tree | c60312dc09f76c2f55ba2383245c427e15c38dea /share/scripts/_dump_midiregion.lua | |
parent | bf649cd68ad46c34a656700aa6cb89416d648c64 (diff) |
Also move Lua scripts to share subfolder
Diffstat (limited to 'share/scripts/_dump_midiregion.lua')
-rw-r--r-- | share/scripts/_dump_midiregion.lua | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/share/scripts/_dump_midiregion.lua b/share/scripts/_dump_midiregion.lua new file mode 100644 index 0000000000..0c62a56479 --- /dev/null +++ b/share/scripts/_dump_midiregion.lua @@ -0,0 +1,20 @@ +ardour { ["type"] = "Snippet", name = "Dump MIDI Region" } + +function factory () return function () + local sel = Editor:get_selection () + for r in sel.regions:regionlist ():iter () do + local mr = r:to_midiregion () + if mr:isnil () then goto next end + + print (r:name (), "Pos:", r:position (), "Start:", r:start ()) + local bfc = ARDOUR.BeatsSamplesConverter (Session:tempo_map (), r:position ()) + local nl = ARDOUR.LuaAPI.note_list (mr:model ()) + for n in nl:iter () do + print (" Note @", bfc:to (n:time ()), + ARDOUR.ParameterDescriptor.midi_note_name (n:note ()), + "Vel:", n:velocity ()) + end + print ("----") + ::next:: + end +end end |