a_dinosaur/TECHNO.COM
1
0
Fork 0
mirror of https://github.com/ScrelliCopter/TECHNO.COM.git synced 2025-02-21 01:59:25 +11:00
Code Issues Packages Projects Releases Wiki Activity

fix issues preventing midi from being loaded in players/some sequencers

Browse Source
This commit is contained in:
a dinosaur
2024-03-02 05:14:07 +11:00
parent 9061649890
commit 83c5843c82
1 changed files with 14 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
technomid.py
View File

@@ -76,6 +76,11 @@ class MIDIPitchWheel(MIDIEvent):
return struct.pack(">BBB", 0xE0 | self._channel, self._value & 0x7F, self._value >> 7) return struct.pack(">BBB", 0xE0 | self._channel, self._value & 0x7F, self._value >> 7)
class MIDIMetaTrackEnd(MIDIEvent):
def serialise(self) -> bytes:
return struct.pack(">BBB", 0xFF, 0x2F, 0x00)
class MIDIMetaTempo(MIDIEvent): class MIDIMetaTempo(MIDIEvent):
def __init__(self, quarter_us: int): def __init__(self, quarter_us: int):
if quarter_us < 0 or quarter_us >= 0x1000000: if quarter_us < 0 or quarter_us >= 0x1000000:
@@ -90,7 +95,10 @@ class MIDIWriter:
def __init__(self, file: BinaryIO): def __init__(self, file: BinaryIO):
self._file = file self._file = file
Format = IntEnum("Format", ["SINGLE", "MULTI", "SEQUENCE"]) class Format(IntEnum):
SINGLE = 0
MULTI = 1
SEQUENCE = 2
def write_header(self, division: int, fmt: Format = Format.SINGLE, track_count: int = 1): def write_header(self, division: int, fmt: Format = Format.SINGLE, track_count: int = 1):
self._file.write(b"MThd") self._file.write(b"MThd")
@@ -105,8 +113,9 @@ class MIDIWriter:
payload_len = 0 payload_len = 0
for event in events: for event in events:
data = event[1].serialise() data = event[1].serialise()
self._file.write(self.encode_varint(event[0]) + data) length = self.encode_varint(event[0])
payload_len += 4 + len(data) self._file.writelines([length, data])
payload_len += len(length) + len(data)
# Fill in track length field # Fill in track length field
self._file.seek(ofs) self._file.seek(ofs)
@@ -143,7 +152,7 @@ def generate(f: BinaryIO):
freq_tbl = [5424, 2712, 2416, 2280] freq_tbl = [5424, 2712, 2416, 2280]
mangler = 0x0404 mangler = 0x0404
yield 0, MIDIMetaTempo(int(round((1000000 * 0x80000) / timer))) # 16th note every PIC tick yield 0, MIDIMetaTempo(int(round((1000000 * 0x80000) / timer))) # 16th note every two PIC ticks
yield 0, MIDIProgramChange(0, 80) # Set GM patch to #81 "Lead 1 (Square)" yield 0, MIDIProgramChange(0, 80) # Set GM patch to #81 "Lead 1 (Square)"
i = 0 i = 0
@@ -158,6 +167,7 @@ def generate(f: BinaryIO):
yield 32, MIDINoteOff(0, note) yield 32, MIDINoteOff(0, note)
i += 2 i += 2
if i >= length: if i >= length:
yield 0, MIDIMetaTrackEnd()
return return
# Scramble pitch table at the end of each measure # Scramble pitch table at the end of each measure
mangler = (mangler + len(phrase) * 2) & 0xFFFF mangler = (mangler + len(phrase) * 2) & 0xFFFF