From de06b2454dd62907bddad0f67cd5effb6b4bd8d3 Mon Sep 17 00:00:00 2001 From: Julian Hurst Date: Thu, 21 Nov 2024 14:56:36 +0100 Subject: midi: Add playnote --- midi/midi.ha | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/midi/midi.ha b/midi/midi.ha index 68a3078..5e99f0d 100644 --- a/midi/midi.ha +++ b/midi/midi.ha @@ -85,7 +85,12 @@ export fn addevent(c: *trchunk, e: event) void = { append(c.ev, e); }; -export fn noteon(c: *trchunk, d: vlen, n: note, vel: u8 = 0x40, oct: uint = 0) void = { +export fn playnote(d: vlen, n: note, vel: u8 = 0x40, oct: uint = 0) (event, event) = { + const eon = noteon(0, n, vel, oct); + const eoff = noteoff(d, n, vel, oct); + return (eon, eoff); +}; + const np = n + (oct * 12): u8; const e = event { deltatime = d, -- cgit v1.2.3