aboutsummaryrefslogtreecommitdiff
path: root/engines/scumm/imuse/sysex_scumm.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'engines/scumm/imuse/sysex_scumm.cpp')
-rw-r--r--engines/scumm/imuse/sysex_scumm.cpp200
1 files changed, 200 insertions, 0 deletions
diff --git a/engines/scumm/imuse/sysex_scumm.cpp b/engines/scumm/imuse/sysex_scumm.cpp
new file mode 100644
index 0000000000..2b11878522
--- /dev/null
+++ b/engines/scumm/imuse/sysex_scumm.cpp
@@ -0,0 +1,200 @@
+/* ScummVM - Scumm Interpreter
+ * Copyright (C) 2001 Ludvig Strigeus
+ * Copyright (C) 2001-2006 The ScummVM project
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ *
+ * $URL$
+ * $Id$
+ */
+
+#include "common/stdafx.h"
+#include "common/util.h"
+
+/*
+ * SysEx command handlers must have full access to the
+ * internal IMuse implementation classes. Before including
+ * the relevant header file, two things must happen:
+ * 1. A function declaration must be made.
+ * 2. The following #define must be established:
+ * #define SYSEX_CALLBACK_FUNCTION functionName
+ */
+#define SYSEX_CALLBACK_FUNCTION sysexHandler_Scumm
+#include "scumm/imuse/imuse_internal.h"
+
+namespace Scumm {
+
+void sysexHandler_Scumm (Player *player, const byte *msg, uint16 len) {
+ Part *part;
+ byte a;
+ byte buf[128];
+
+ IMuseInternal *se = player->_se;
+ const byte *p = msg;
+
+ switch (byte code = *p++) {
+ case 0:
+ // Allocate new part.
+ // There are 17 bytes of useful information here.
+ // Here is what we know about them so far:
+ // BYTE 00: Channel #
+ // BYTE 02: BIT 01(0x01): Part on?(1 = yes)
+ // BIT 02(0x02): Reverb? (1 = yes) [bug #1088045]
+ // BYTE 04: Priority adjustment [guessing]
+ // BYTE 05: Volume(upper 4 bits) [guessing]
+ // BYTE 06: Volume(lower 4 bits) [guessing]
+ // BYTE 07: Pan(upper 4 bits) [bug #1088045]
+ // BYTE 08: Pan(lower 4 bits) [bug #1088045]
+ // BYTE 09: BIT 04(0x08): Percussion?(1 = yes)
+ // BYTE 13: Pitchbend range(upper 4 bits) [bug #1088045]
+ // BYTE 14: Pitchbend range(lower 4 bits) [bug #1088045]
+ // BYTE 15: Program(upper 4 bits)
+ // BYTE 16: Program(lower 4 bits)
+ part = player->getPart(p[0] & 0x0F);
+ if (part) {
+ part->set_onoff(p[2] & 0x01);
+ part->effectLevel ((p[2] & 0x02) ? 127 : 0);
+ part->set_pri(p[4]);
+ part->volume((p[5] & 0x0F) << 4 |(p[6] & 0x0F));
+ part->set_pan((p[7] & 0x0F) << 4 | (p[8] & 0x0F));
+ part->_percussion = player->_isMIDI ? ((p[9] & 0x08) > 0) : false;
+ part->pitchBendFactor ((p[13] & 0x0F) << 4 | (p[14] & 0x0F));
+ if (part->_percussion) {
+ if (part->_mc) {
+ part->off();
+ se->reallocateMidiChannels(player->_midi);
+ }
+ } else {
+ // Even in cases where a program does not seem to be specified,
+ // i.e. bytes 15 and 16 are 0, we send a program change because
+ // 0 is a valid program number. MI2 tests show that in such
+ // cases, a regular program change message always seems to follow
+ // anyway.
+ if (player->_isMIDI)
+ part->_instrument.program((p[15] & 0x0F) << 4 |(p[16] & 0x0F), player->_isMT32);
+ part->sendAll();
+ }
+ }
+ break;
+
+ case 1:
+ // Shut down a part. [Bug 1088045, comments]
+ part = player->getPart (p[0]);
+ if (part != NULL) part->uninit();
+ break;
+
+ case 2: // Start of song. Ignore for now.
+ break;
+
+ case 16: // Adlib instrument definition(Part)
+ a = *p++ & 0x0F;
+ ++p; // Skip hardware type
+ part = player->getPart(a);
+ if (part) {
+ if (len == 63) {
+ player->decode_sysex_bytes(p, buf, len - 3);
+ part->set_instrument((byte *)buf);
+ } else {
+ // SPK tracks have len == 49 here, and are not supported
+ part->programChange(254); // Must be invalid, but not 255 (which is reserved)
+ }
+ }
+ break;
+
+ case 17: // Adlib instrument definition(Global)
+ p += 2; // Skip hardware type and... whatever came right before it
+ a = *p++;
+ player->decode_sysex_bytes(p, buf, len - 4);
+ se->setGlobalAdlibInstrument(a, buf);
+ break;
+
+ case 33: // Parameter adjust
+ a = *p++ & 0x0F;
+ ++p; // Skip hardware type
+ player->decode_sysex_bytes(p, buf, len - 3);
+ part = player->getPart(a);
+ if (part)
+ part->set_param(READ_BE_UINT16(buf), READ_BE_UINT16(buf + 2));
+ break;
+
+ case 48: // Hook - jump
+ if (player->_scanning)
+ break;
+ player->decode_sysex_bytes(p + 1, buf, len - 2);
+ player->maybe_jump(buf[0], READ_BE_UINT16(buf + 1), READ_BE_UINT16(buf + 3), READ_BE_UINT16(buf + 5));
+ break;
+
+ case 49: // Hook - global transpose
+ player->decode_sysex_bytes(p + 1, buf, len - 2);
+ player->maybe_set_transpose(buf);
+ break;
+
+ case 50: // Hook - part on/off
+ buf[0] = *p++ & 0x0F;
+ player->decode_sysex_bytes(p, buf + 1, len - 2);
+ player->maybe_part_onoff(buf);
+ break;
+
+ case 51: // Hook - set volume
+ buf[0] = *p++ & 0x0F;
+ player->decode_sysex_bytes(p, buf + 1, len - 2);
+ player->maybe_set_volume(buf);
+ break;
+
+ case 52: // Hook - set program
+ buf[0] = *p++ & 0x0F;
+ player->decode_sysex_bytes(p, buf + 1, len - 2);
+ player->maybe_set_program(buf);
+ break;
+
+ case 53: // Hook - set transpose
+ buf[0] = *p++ & 0x0F;
+ player->decode_sysex_bytes(p, buf + 1, len - 2);
+ player->maybe_set_transpose_part(buf);
+ break;
+
+ case 64: // Marker
+ p++;
+ len -= 2;
+ while (len--) {
+ se->handle_marker(player->_id, *p++);
+ }
+ break;
+
+ case 80: // Loop
+ player->decode_sysex_bytes(p + 1, buf, len - 2);
+ player->setLoop
+ (READ_BE_UINT16(buf), READ_BE_UINT16(buf + 2),
+ READ_BE_UINT16(buf + 4), READ_BE_UINT16(buf + 6),
+ READ_BE_UINT16(buf + 8));
+ break;
+
+ case 81: // End loop
+ player->clearLoop();
+ break;
+
+ case 96: // Set instrument
+ part = player->getPart(p[0] & 0x0F);
+ a = (p[1] & 0x0F) << 12 |(p[2] & 0x0F) << 8 |(p[4] & 0x0F) << 4 |(p[4] & 0x0F);
+ if (part)
+ part->set_instrument(a);
+ break;
+
+ default:
+ error("Unknown SysEx command %d", (int)code);
+ }
+}
+
+} // End of namespace Scumm