From 4c6b13faaabd6d2860e44732abe5c245acade1f8 Mon Sep 17 00:00:00 2001
From: Julian Hurst <julian.hurst@digdash.com>
Date: Wed, 20 Nov 2024 17:25:35 +0100
Subject: Initial commit

---
 cmd/example/simple.ha | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 cmd/example/simple.ha

(limited to 'cmd')

diff --git a/cmd/example/simple.ha b/cmd/example/simple.ha
new file mode 100644
index 0000000..3a2a32b
--- /dev/null
+++ b/cmd/example/simple.ha
@@ -0,0 +1,17 @@
+use midi;
+
+export fn main() void = {
+	const th = midi::hchunk {
+		chk = midi::HEADERCHUNK,
+		format = 0,
+		ntrks = 1,
+		division = 4,
+	};
+
+	let tc = midi::newtrack();
+	defer midi::finishtrack(tc);
+	midi::noteon(&tc, 0, midi::note::C);
+	midi::noteoff(&tc, 4, midi::note::C);
+	midi::writeheader(th);
+	midi::writechunk(tc);
+};
-- 
cgit v1.2.3