ref: 6fbd6eafb3dec01401a033eae2e2ec7a2d00ec1c
parent: a9e2d244a5a37fed344405e40698de2a2969c12a
author: Simon Howard <[email protected]>
date: Thu Jan 28 22:55:20 EST 2010
Fix indentation/style etc. in mus2mid.c. Subversion-branch: /trunk/chocolate-doom Subversion-revision: 1830
--- a/src/mus2mid.c
+++ b/src/mus2mid.c
@@ -1,4 +1,4 @@
-// Emacs style mode select -*- C++ -*-
+// Emacs style mode select -*- C++ -*-
//-----------------------------------------------------------------------------
//
// Copyright(C) 1993-1996 Id Software, Inc.
@@ -33,593 +33,600 @@
#include "mus2mid.h"
// MUS event codes
-typedef enum
+typedef enum
{- mus_releasekey = 0x00,
- mus_presskey = 0x10,
- mus_pitchwheel = 0x20,
- mus_systemevent = 0x30,
- mus_changecontroller = 0x40,
- mus_scoreend = 0x60
+ mus_releasekey = 0x00,
+ mus_presskey = 0x10,
+ mus_pitchwheel = 0x20,
+ mus_systemevent = 0x30,
+ mus_changecontroller = 0x40,
+ mus_scoreend = 0x60
} musevent;
// MIDI event codes
-typedef enum
+typedef enum
{- midi_releasekey = 0x80,
- midi_presskey = 0x90,
- midi_aftertouchkey = 0xA0,
- midi_changecontroller = 0xB0,
- midi_changepatch = 0xC0,
- midi_aftertouchchannel = 0xD0,
- midi_pitchwheel = 0xE0
+ midi_releasekey = 0x80,
+ midi_presskey = 0x90,
+ midi_aftertouchkey = 0xA0,
+ midi_changecontroller = 0xB0,
+ midi_changepatch = 0xC0,
+ midi_aftertouchchannel = 0xD0,
+ midi_pitchwheel = 0xE0
} midievent;
// Structure to hold MUS file header
-typedef struct
+typedef struct
{- byte id[4];
- unsigned short scorelength;
- unsigned short scorestart;
- unsigned short primarychannels;
- unsigned short secondarychannels;
- unsigned short instrumentcount;
+ byte id[4];
+ unsigned short scorelength;
+ unsigned short scorestart;
+ unsigned short primarychannels;
+ unsigned short secondarychannels;
+ unsigned short instrumentcount;
} PACKEDATTR musheader;
// Standard MIDI type 0 header + track header
-static byte midiheader[] =
+static byte midiheader[] =
{- 'M', 'T', 'h', 'd', // Main header
- 0x00, 0x00, 0x00, 0x06, // Header size
- 0x00, 0x00, // MIDI type (0)
- 0x00, 0x01, // Number of tracks
- 0x00, 0x46, // Resolution
- 'M', 'T', 'r', 'k', // Start of track
- 0x00, 0x00, 0x00, 0x00 // Placeholder for track length
+ 'M', 'T', 'h', 'd', // Main header
+ 0x00, 0x00, 0x00, 0x06, // Header size
+ 0x00, 0x00, // MIDI type (0)
+ 0x00, 0x01, // Number of tracks
+ 0x00, 0x46, // Resolution
+ 'M', 'T', 'r', 'k', // Start of track
+ 0x00, 0x00, 0x00, 0x00 // Placeholder for track length
};
// Cached channel velocities
-static byte channelvelocities[] =
-{ - 127, 127, 127, 127, 127, 127, 127, 127,
- 127, 127, 127, 127, 127, 127, 127, 127
+static byte channelvelocities[] =
+{+ 127, 127, 127, 127, 127, 127, 127, 127,
+ 127, 127, 127, 127, 127, 127, 127, 127
};
// Timestamps between sequences of MUS events
-static unsigned int queuedtime = 0;
+static unsigned int queuedtime = 0;
// Counter for the length of the track
static unsigned int tracksize;
-static byte mus2midi_translation[] =
-{ - 0x00, 0x20, 0x01, 0x07, 0x0A, 0x0B, 0x5B, 0x5D,
- 0x40, 0x43, 0x78, 0x7B, 0x7E, 0x7F, 0x79
+static byte mus2midi_translation[] =
+{+ 0x00, 0x20, 0x01, 0x07, 0x0A, 0x0B, 0x5B, 0x5D,
+ 0x40, 0x43, 0x78, 0x7B, 0x7E, 0x7F, 0x79
};
// Write timestamp to a MIDI file.
-static boolean midi_writetime(unsigned int time, MEMFILE *midioutput)
+static boolean midi_writetime(unsigned int time, MEMFILE *midioutput)
{- unsigned int buffer = time & 0x7F;
- byte writeval;
+ unsigned int buffer = time & 0x7F;
+ byte writeval;
- while ((time >>= 7) != 0)
- {- buffer <<= 8;
- buffer |= ((time & 0x7F) | 0x80);
- }
+ while ((time >>= 7) != 0)
+ {+ buffer <<= 8;
+ buffer |= ((time & 0x7F) | 0x80);
+ }
- for (;;)
- {- writeval = (byte)(buffer & 0xFF);
+ for (;;)
+ {+ writeval = (byte)(buffer & 0xFF);
- if (mem_fwrite(&writeval, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&writeval, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- ++tracksize;
+ ++tracksize;
- if ((buffer & 0x80) != 0)
- {- buffer >>= 8;
- }
- else
- {- queuedtime = 0;
- return false;
- }
- }
+ if ((buffer & 0x80) != 0)
+ {+ buffer >>= 8;
+ }
+ else
+ {+ queuedtime = 0;
+ return false;
+ }
+ }
}
// Write the end of track marker
-static boolean midi_writeendtrack(MEMFILE *midioutput)
+static boolean midi_writeendtrack(MEMFILE *midioutput)
{- byte endtrack[] = {0xFF, 0x2F, 0x00};+ byte endtrack[] = {0xFF, 0x2F, 0x00};- if (midi_writetime(queuedtime, midioutput))
- {- return true;
- }
+ if (midi_writetime(queuedtime, midioutput))
+ {+ return true;
+ }
- if (mem_fwrite(endtrack, 1, 3, midioutput) != 3)
- {- return true;
- }
+ if (mem_fwrite(endtrack, 1, 3, midioutput) != 3)
+ {+ return true;
+ }
- tracksize += 3;
- return false;
+ tracksize += 3;
+ return false;
}
// Write a key press event
-static boolean midi_writepresskey(byte channel, byte key,
- byte velocity, MEMFILE *midioutput)
+static boolean midi_writepresskey(byte channel, byte key,
+ byte velocity, MEMFILE *midioutput)
{- byte working = midi_presskey | channel;
+ byte working = midi_presskey | channel;
- if (midi_writetime(queuedtime, midioutput))
- {- return true;
- }
+ if (midi_writetime(queuedtime, midioutput))
+ {+ return true;
+ }
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- working = key & 0x7F;
+ working = key & 0x7F;
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
-
- working = velocity & 0x7F;
-
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- tracksize += 3;
+ working = velocity & 0x7F;
- return false;
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
+
+ tracksize += 3;
+
+ return false;
}
// Write a key release event
-static boolean midi_writereleasekey(byte channel, byte key,
- MEMFILE *midioutput)
+static boolean midi_writereleasekey(byte channel, byte key,
+ MEMFILE *midioutput)
{- byte working = midi_releasekey | channel;
+ byte working = midi_releasekey | channel;
- if (midi_writetime(queuedtime, midioutput))
- {- return true;
- }
+ if (midi_writetime(queuedtime, midioutput))
+ {+ return true;
+ }
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- working = key & 0x7F;
+ working = key & 0x7F;
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- working = 0;
+ working = 0;
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- tracksize += 3;
+ tracksize += 3;
- return false;
+ return false;
}
// Write a pitch wheel/bend event
-static boolean midi_writepitchwheel(byte channel, short wheel,
- MEMFILE *midioutput)
+static boolean midi_writepitchwheel(byte channel, short wheel,
+ MEMFILE *midioutput)
{- byte working = midi_pitchwheel | channel;
+ byte working = midi_pitchwheel | channel;
- if (midi_writetime(queuedtime, midioutput))
- {- return true;
- }
+ if (midi_writetime(queuedtime, midioutput))
+ {+ return true;
+ }
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- working = wheel & 0x7F;
+ working = wheel & 0x7F;
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- working = (wheel >> 7) & 0x7F;
+ working = (wheel >> 7) & 0x7F;
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- tracksize += 3;
- return false;
+ tracksize += 3;
+ return false;
}
// Write a patch change event
static boolean midi_writechangepatch(byte channel, byte patch,
- MEMFILE *midioutput)
+ MEMFILE *midioutput)
{- byte working = midi_changepatch | channel;
-
- if (midi_writetime(queuedtime, midioutput))
- {- return true;
- }
+ byte working = midi_changepatch | channel;
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (midi_writetime(queuedtime, midioutput))
+ {+ return true;
+ }
- working = patch & 0x7F;
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ working = patch & 0x7F;
- tracksize += 2;
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- return false;
+ tracksize += 2;
+
+ return false;
}
-
-
// Write a valued controller change event
-static boolean midi_writechangecontroller_valued(byte channel,
- byte control,
- byte value,
- MEMFILE *midioutput)
+
+static boolean midi_writechangecontroller_valued(byte channel,
+ byte control,
+ byte value,
+ MEMFILE *midioutput)
{- byte working = midi_changecontroller | channel;
+ byte working = midi_changecontroller | channel;
- if (midi_writetime(queuedtime, midioutput))
- {- return true;
- }
+ if (midi_writetime(queuedtime, midioutput))
+ {+ return true;
+ }
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- working = control & 0x7F;
+ working = control & 0x7F;
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
- // Quirk in vanilla DOOM? MUS controller values should be
- // 7-bit, not 8-bit.
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- working = value;// & 0x7F;
+ // Quirk in vanilla DOOM? MUS controller values should be
+ // 7-bit, not 8-bit.
- // Fix on said quirk to stop MIDI players from complaining that
- // the value is out of range:
+ working = value;// & 0x7F;
- if (working & 0x80)
- {- working = 0x7F;
- }
+ // Fix on said quirk to stop MIDI players from complaining that
+ // the value is out of range:
- if (mem_fwrite(&working, 1, 1, midioutput) != 1)
- {- return true;
- }
+ if (working & 0x80)
+ {+ working = 0x7F;
+ }
- tracksize += 3;
+ if (mem_fwrite(&working, 1, 1, midioutput) != 1)
+ {+ return true;
+ }
- return false;
+ tracksize += 3;
+
+ return false;
}
// Write a valueless controller change event
-static boolean midi_writechangecontroller_valueless(byte channel,
- byte control,
- MEMFILE *midioutput)
+static boolean midi_writechangecontroller_valueless(byte channel,
+ byte control,
+ MEMFILE *midioutput)
{- return midi_writechangecontroller_valued(channel, control, 0,
- midioutput);
+ return midi_writechangecontroller_valued(channel, control, 0,
+ midioutput);
}
static boolean read_musheader(MEMFILE *file, musheader *header)
{- boolean result;
+ boolean result;
- result = (mem_fread(&header->id, sizeof(byte), 4, file) == 4)
- && (mem_fread(&header->scorelength, sizeof(short), 1, file) == 1)
- && (mem_fread(&header->scorestart, sizeof(short), 1, file) == 1)
- && (mem_fread(&header->primarychannels, sizeof(short), 1, file) == 1)
- && (mem_fread(&header->secondarychannels, sizeof(short), 1, file) == 1)
- && (mem_fread(&header->instrumentcount, sizeof(short), 1, file) == 1);
+ result = mem_fread(&header->id, sizeof(byte), 4, file) == 4
+ && mem_fread(&header->scorelength, sizeof(short), 1, file) == 1
+ && mem_fread(&header->scorestart, sizeof(short), 1, file) == 1
+ && mem_fread(&header->primarychannels, sizeof(short), 1, file) == 1
+ && mem_fread(&header->secondarychannels, sizeof(short), 1, file) == 1
+ && mem_fread(&header->instrumentcount, sizeof(short), 1, file) == 1;
- if (result)
- {- header->scorelength = SHORT(header->scorelength);
- header->scorestart = SHORT(header->scorestart);
- header->primarychannels = SHORT(header->primarychannels);
- header->secondarychannels = SHORT(header->secondarychannels);
- header->instrumentcount = SHORT(header->instrumentcount);
- }
+ if (result)
+ {+ header->scorelength = SHORT(header->scorelength);
+ header->scorestart = SHORT(header->scorestart);
+ header->primarychannels = SHORT(header->primarychannels);
+ header->secondarychannels = SHORT(header->secondarychannels);
+ header->instrumentcount = SHORT(header->instrumentcount);
+ }
- return result;
+ return result;
}
-// Read a MUS file from a stream (musinput) and output a MIDI file to
+// Read a MUS file from a stream (musinput) and output a MIDI file to
// a stream (midioutput).
//
// Returns 0 on success or 1 on failure.
-boolean mus2mid(MEMFILE *musinput, MEMFILE *midioutput)
+boolean mus2mid(MEMFILE *musinput, MEMFILE *midioutput)
{- // Header for the MUS file
- musheader musfileheader;
+ // Header for the MUS file
+ musheader musfileheader;
- // Descriptor for the current MUS event
- byte eventdescriptor;
- int channel; // Channel number
- musevent event;
-
+ // Descriptor for the current MUS event
+ byte eventdescriptor;
+ int channel; // Channel number
+ musevent event;
- // Bunch of vars read from MUS lump
- byte key;
- byte controllernumber;
- byte controllervalue;
- // Buffer used for MIDI track size record
- byte tracksizebuffer[4];
+ // Bunch of vars read from MUS lump
+ byte key;
+ byte controllernumber;
+ byte controllervalue;
- // Flag for when the score end marker is hit.
- int hitscoreend = 0;
+ // Buffer used for MIDI track size record
+ byte tracksizebuffer[4];
- // Temp working byte
- byte working;
- // Used in building up time delays
- unsigned int timedelay;
+ // Flag for when the score end marker is hit.
+ int hitscoreend = 0;
- // Grab the header
+ // Temp working byte
+ byte working;
+ // Used in building up time delays
+ unsigned int timedelay;
- if (!read_musheader(musinput, &musfileheader))
- {- return true;
- }
+ // Grab the header
+ if (!read_musheader(musinput, &musfileheader))
+ {+ return true;
+ }
+
#ifdef CHECK_MUS_HEADER
- // Check MUS header
- if (musfileheader.id[0] != 'M'
- || musfileheader.id[1] != 'U'
- || musfileheader.id[2] != 'S'
- || musfileheader.id[3] != 0x1A)
- {- return true;
- }
+ // Check MUS header
+ if (musfileheader.id[0] != 'M'
+ || musfileheader.id[1] != 'U'
+ || musfileheader.id[2] != 'S'
+ || musfileheader.id[3] != 0x1A)
+ {+ return true;
+ }
#endif
- // Seek to where the data is held
- if (mem_fseek(musinput, (long)musfileheader.scorestart,
- MEM_SEEK_SET) != 0)
- {- return true;
- }
+ // Seek to where the data is held
+ if (mem_fseek(musinput, (long)musfileheader.scorestart,
+ MEM_SEEK_SET) != 0)
+ {+ return true;
+ }
- // So, we can assume the MUS file is faintly legit. Let's start
- // writing MIDI data...
+ // So, we can assume the MUS file is faintly legit. Let's start
+ // writing MIDI data...
- mem_fwrite(midiheader, 1, sizeof(midiheader), midioutput);
- tracksize = 0;
+ mem_fwrite(midiheader, 1, sizeof(midiheader), midioutput);
+ tracksize = 0;
- // Now, process the MUS file:
- while (!hitscoreend)
- {- // Handle a block of events:
+ // Now, process the MUS file:
+ while (!hitscoreend)
+ {+ // Handle a block of events:
- while (!hitscoreend)
- {- // Fetch channel number and event code:
+ while (!hitscoreend)
+ {+ // Fetch channel number and event code:
- if (mem_fread(&eventdescriptor, 1, 1, musinput) != 1)
- {- return true;
- }
+ if (mem_fread(&eventdescriptor, 1, 1, musinput) != 1)
+ {+ return true;
+ }
- channel = eventdescriptor & 0x0F;
- event = eventdescriptor & 0x70;
+ channel = eventdescriptor & 0x0F;
+ event = eventdescriptor & 0x70;
- // Swap channels 15 and 9.
- // MIDI channel 9 = percussion.
- // MUS channel 15 = percussion.
+ // Swap channels 15 and 9.
+ // MIDI channel 9 = percussion.
+ // MUS channel 15 = percussion.
- if (channel == 15)
- {- channel = 9;
- }
- else if (channel == 9)
- {- channel = 15;
- }
-
- switch (event)
- {- case mus_releasekey:
- if (mem_fread(&key, 1, 1, musinput) != 1)
- {- return true;
- }
+ if (channel == 15)
+ {+ channel = 9;
+ }
+ else if (channel == 9)
+ {+ channel = 15;
+ }
- if (midi_writereleasekey(channel, key, midioutput))
- {- return true;
- }
+ switch (event)
+ {+ case mus_releasekey:
+ if (mem_fread(&key, 1, 1, musinput) != 1)
+ {+ return true;
+ }
- break;
-
- case mus_presskey:
- if (mem_fread(&key, 1, 1, musinput) != 1)
- {- return true;
- }
+ if (midi_writereleasekey(channel, key, midioutput))
+ {+ return true;
+ }
- if (key & 0x80)
- {- if (mem_fread(&channelvelocities[channel], 1, 1, musinput) != 1)
- {- return true;
- }
+ break;
- channelvelocities[channel] &= 0x7F;
- }
+ case mus_presskey:
+ if (mem_fread(&key, 1, 1, musinput) != 1)
+ {+ return true;
+ }
- if (midi_writepresskey(channel, key, channelvelocities[channel], midioutput))
- {- return true;
- }
+ if (key & 0x80)
+ {+ if (mem_fread(&channelvelocities[channel], 1, 1, musinput) != 1)
+ {+ return true;
+ }
- break;
+ channelvelocities[channel] &= 0x7F;
+ }
- case mus_pitchwheel:
- if (mem_fread(&key, 1, 1, musinput) != 1)
- {- break;
- }
- if (midi_writepitchwheel(channel, (short)(key * 64), midioutput))
- {- return true;
- }
+ if (midi_writepresskey(channel, key,
+ channelvelocities[channel], midioutput))
+ {+ return true;
+ }
- break;
-
- case mus_systemevent:
- if (mem_fread(&controllernumber, 1, 1, musinput) != 1)
- {- return true;
- }
- if (controllernumber < 10 || controllernumber > 14)
- {- return true;
- }
+ break;
- if (midi_writechangecontroller_valueless(channel, mus2midi_translation[controllernumber], midioutput))
- {- return true;
- }
+ case mus_pitchwheel:
+ if (mem_fread(&key, 1, 1, musinput) != 1)
+ {+ break;
+ }
+ if (midi_writepitchwheel(channel, (short)(key * 64), midioutput))
+ {+ return true;
+ }
- break;
-
- case mus_changecontroller:
- if (mem_fread(&controllernumber, 1, 1, musinput) != 1)
- {- return true;
- }
+ break;
- if (mem_fread(&controllervalue, 1, 1, musinput) != 1)
- {- return true;
- }
+ case mus_systemevent:
+ if (mem_fread(&controllernumber, 1, 1, musinput) != 1)
+ {+ return true;
+ }
+ if (controllernumber < 10 || controllernumber > 14)
+ {+ return true;
+ }
- if (controllernumber == 0)
- {- if (midi_writechangepatch(channel, controllervalue, midioutput))
- {- return true;
- }
- }
- else
- {- if (controllernumber < 1 || controllernumber > 9)
- {- return true;
- }
+ if (midi_writechangecontroller_valueless(channel,
+ mus2midi_translation[controllernumber],
+ midioutput))
+ {+ return true;
+ }
- if (midi_writechangecontroller_valued(channel, mus2midi_translation[controllernumber], controllervalue, midioutput))
- {- return true;
- }
- }
+ break;
- break;
-
- case mus_scoreend:
- hitscoreend = 1;
- break;
+ case mus_changecontroller:
+ if (mem_fread(&controllernumber, 1, 1, musinput) != 1)
+ {+ return true;
+ }
- default:
- return true;
- break;
- }
+ if (mem_fread(&controllervalue, 1, 1, musinput) != 1)
+ {+ return true;
+ }
- if (eventdescriptor & 0x80)
- {- break;
- }
- }
- // Now we need to read the time code:
- if (!hitscoreend)
- {- timedelay = 0;
- for (;;)
- {- if (mem_fread(&working, 1, 1, musinput) != 1)
- {- return true;
- }
+ if (controllernumber == 0)
+ {+ if (midi_writechangepatch(channel, controllervalue,
+ midioutput))
+ {+ return true;
+ }
+ }
+ else
+ {+ if (controllernumber < 1 || controllernumber > 9)
+ {+ return true;
+ }
- timedelay = timedelay * 128 + (working & 0x7F);
- if ((working & 0x80) == 0)
- {- break;
- }
- }
- queuedtime += timedelay;
- }
- }
+ if (midi_writechangecontroller_valued(channel,
+ mus2midi_translation[controllernumber],
+ controllervalue,
+ midioutput))
+ {+ return true;
+ }
+ }
- // End of track
- if (midi_writeendtrack(midioutput))
- {- return true;
- }
+ break;
- // Write the track size into the stream
- if (mem_fseek(midioutput, 18, MEM_SEEK_SET))
- {- return true;
- }
+ case mus_scoreend:
+ hitscoreend = 1;
+ break;
- tracksizebuffer[0] = (tracksize >> 24) & 0xff;
- tracksizebuffer[1] = (tracksize >> 16) & 0xff;
- tracksizebuffer[2] = (tracksize >> 8) & 0xff;
- tracksizebuffer[3] = tracksize & 0xff;
+ default:
+ return true;
+ break;
+ }
- if (mem_fwrite(tracksizebuffer, 1, 4, midioutput) != 4)
- {- return true;
- }
+ if (eventdescriptor & 0x80)
+ {+ break;
+ }
+ }
+ // Now we need to read the time code:
+ if (!hitscoreend)
+ {+ timedelay = 0;
+ for (;;)
+ {+ if (mem_fread(&working, 1, 1, musinput) != 1)
+ {+ return true;
+ }
- return false;
+ timedelay = timedelay * 128 + (working & 0x7F);
+ if ((working & 0x80) == 0)
+ {+ break;
+ }
+ }
+ queuedtime += timedelay;
+ }
+ }
+
+ // End of track
+ if (midi_writeendtrack(midioutput))
+ {+ return true;
+ }
+
+ // Write the track size into the stream
+ if (mem_fseek(midioutput, 18, MEM_SEEK_SET))
+ {+ return true;
+ }
+
+ tracksizebuffer[0] = (tracksize >> 24) & 0xff;
+ tracksizebuffer[1] = (tracksize >> 16) & 0xff;
+ tracksizebuffer[2] = (tracksize >> 8) & 0xff;
+ tracksizebuffer[3] = tracksize & 0xff;
+
+ if (mem_fwrite(tracksizebuffer, 1, 4, midioutput) != 4)
+ {+ return true;
+ }
+
+ return false;
}