aboutsummaryrefslogtreecommitdiffstats
path: root/examples
diff options
context:
space:
mode:
Diffstat (limited to 'examples')
-rw-r--r--examples/midi.alv12
1 files changed, 12 insertions, 0 deletions
diff --git a/examples/midi.alv b/examples/midi.alv
new file mode 100644
index 0000000..91380a2
--- /dev/null
+++ b/examples/midi.alv
@@ -0,0 +1,12 @@
+([1]import midi)
+([2]import* time struct-)
+
+([3]def port ([4]midi/port 'system:midi_capture_2' 'system:midi_playback_2'))
+
+#(send a C4 note every 0.7s,
+ the velocity is set using CC 31)
+([5]midi/send-notes ([9]get port "out") ([7]every 0.7
+ ([6]struct
+ 'pitch' 36
+ 'vel' ([8]midi/cc ([10]get port "in") 31 'raw')
+ 'dur' 0.5)))