summaryrefslogtreecommitdiff
path: root/cmd/example/simple.ha
blob: 3a2a32b028807bd064e7013dd27eff1d3e1166f4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
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);
};