From 22ee496d5ea40acf6faeff5b2d1dfea1acc8d2f2 Mon Sep 17 00:00:00 2001 From: s-ol Date: Sat, 13 Nov 2021 18:38:15 +0100 Subject: add MIDI example --- examples/midi.alv | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 examples/midi.alv (limited to 'examples') 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))) -- cgit v1.2.3