summaryrefslogtreecommitdiff
path: root/share/scripts/_midigenerator2.lua
diff options
context:
space:
mode:
Diffstat (limited to 'share/scripts/_midigenerator2.lua')
-rw-r--r--share/scripts/_midigenerator2.lua34
1 files changed, 34 insertions, 0 deletions
diff --git a/share/scripts/_midigenerator2.lua b/share/scripts/_midigenerator2.lua
new file mode 100644
index 0000000000..6bd904b097
--- /dev/null
+++ b/share/scripts/_midigenerator2.lua
@@ -0,0 +1,34 @@
+ardour {
+ ["type"] = "dsp",
+ name = "MIDI Generator II",
+ category = "Example",
+ license = "MIT",
+ author = "Ardour Lua Task Force",
+ description = [[An Example Midi Generator for prototyping.]]
+}
+
+function dsp_ioconfig ()
+ return { { midi_in = 1, midi_out = 1, audio_in = -1, audio_out = -1}, }
+end
+
+function dsp_runmap (bufs, in_map, out_map, n_samples, offset)
+ local ob = out_map:get (ARDOUR.DataType ("midi"), 0)
+ if ob ~= ARDOUR.ChanMapping.Invalid then
+ local mb = bufs:get_midi (ob)
+
+ -- see _midigenerator.lua for
+ -- how to use a timed sequence
+
+ local ba = C.ByteVector () -- construct a byte vector
+ ba:add ({0x90, 64, 127}) -- add some data to the vector
+ -- send a message at cycle-start
+ mb:push_back (offset, ba:size (), ba:to_array());
+
+ ba:clear ()
+ ba:add ({0x80, 64, 127})
+ mb:push_back (n_samples - 1 - offset, ba:size (), ba:to_array());
+ end
+
+ -- passthrough audio, apply pin/channel mapping
+ ARDOUR.DSP.process_map (bufs, in_map, out_map, n_samples, offset, ARDOUR.DataType ("audio"))
+end