diff options
Diffstat (limited to 'engines/scumm/imuse/sysex_scumm.cpp')
-rw-r--r-- | engines/scumm/imuse/sysex_scumm.cpp | 200 |
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 |