aboutsummaryrefslogtreecommitdiff
path: root/engines/scumm/players/player_v3a.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'engines/scumm/players/player_v3a.cpp')
-rw-r--r--engines/scumm/players/player_v3a.cpp357
1 files changed, 357 insertions, 0 deletions
diff --git a/engines/scumm/players/player_v3a.cpp b/engines/scumm/players/player_v3a.cpp
new file mode 100644
index 0000000000..ca0eedc90a
--- /dev/null
+++ b/engines/scumm/players/player_v3a.cpp
@@ -0,0 +1,357 @@
+/* ScummVM - Graphic Adventure Engine
+ *
+ * ScummVM is the legal property of its developers, whose names
+ * are too numerous to list here. Please refer to the COPYRIGHT
+ * file distributed with this source distribution.
+ *
+ * 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.
+ *
+ */
+
+
+#include "engines/engine.h"
+#include "scumm/players/player_v3a.h"
+#include "scumm/scumm.h"
+
+namespace Scumm {
+
+static const uint16 note_freqs[4][12] = {
+ {0x06B0, 0x0650, 0x05F4, 0x05A0, 0x054C, 0x0500, 0x04B8, 0x0474, 0x0434, 0x03F8, 0x03C0, 0x0388},
+ {0x0358, 0x0328, 0x02FA, 0x02D0, 0x02A6, 0x0280, 0x025C, 0x023A, 0x021A, 0x01FC, 0x01E0, 0x01C4},
+ {0x01AC, 0x0194, 0x017D, 0x0168, 0x0153, 0x0140, 0x012E, 0x011D, 0x010D, 0x00FE, 0x00F0, 0x00E2},
+ {0x00D6, 0x00CA, 0x00BE, 0x00B4, 0x00A9, 0x00A0, 0x0097, 0x008E, 0x0086, 0x007F, 0x00F0, 0x00E2}
+};
+
+Player_V3A::Player_V3A(ScummEngine *scumm, Audio::Mixer *mixer) {
+ int i;
+ _vm = scumm;
+ for (i = 0; i < V3A_MAXMUS; i++) {
+ _mus[i].id = 0;
+ _mus[i].dur = 0;
+ }
+ for (i = 0; i < V3A_MAXSFX; i++) {
+ _sfx[i].id = 0;
+ _sfx[i].dur = 0;
+ }
+
+ _curSong = 0;
+ _songData = NULL;
+ _songPtr = 0;
+ _songDelay = 0;
+
+ _music_timer = 0;
+
+ _isinit = false;
+
+ _mod = new Player_MOD(mixer);
+ _mod->setUpdateProc(update_proc, this, 60);
+}
+
+Player_V3A::~Player_V3A() {
+ int i;
+ delete _mod;
+ if (_isinit) {
+ for (i = 0; _wavetable[i] != NULL; i++) {
+ for (int j = 0; j < 6; j++) {
+ free(_wavetable[i]->_idat[j]);
+ free(_wavetable[i]->_ldat[j]);
+ }
+ free(_wavetable[i]);
+ }
+ free(_wavetable);
+ }
+}
+
+void Player_V3A::setMusicVolume (int vol) {
+ _mod->setMusicVolume(vol);
+}
+
+int Player_V3A::getMusChan (int id) const {
+ int i;
+ for (i = 0; i < V3A_MAXMUS; i++) {
+ if (_mus[i].id == id)
+ break;
+ }
+ if (i == V3A_MAXMUS) {
+ if (id == 0)
+ warning("player_v3a - out of music channels");
+ return -1;
+ }
+ return i;
+}
+int Player_V3A::getSfxChan (int id) const {
+ int i;
+ for (i = 0; i < V3A_MAXSFX; i++) {
+ if (_sfx[i].id == id)
+ break;
+ }
+ if (i == V3A_MAXSFX) {
+ if (id == 0)
+ warning("player_v3a - out of sfx channels");
+ return -1;
+ }
+ return i;
+}
+
+void Player_V3A::stopAllSounds() {
+ int i;
+ for (i = 0; i < V3A_MAXMUS; i++) {
+ if (_mus[i].id)
+ _mod->stopChannel(_mus[i].id);
+ _mus[i].id = 0;
+ _mus[i].dur = 0;
+ }
+ _curSong = 0;
+ _songPtr = 0;
+ _songDelay = 0;
+ _songData = NULL;
+ for (i = 0; i < V3A_MAXSFX; i++) {
+ if (_sfx[i].id)
+ _mod->stopChannel(_sfx[i].id | 0x100);
+ _sfx[i].id = 0;
+ _sfx[i].dur = 0;
+ }
+}
+
+void Player_V3A::stopSound(int nr) {
+ int i;
+ if (nr == 0) { // Amiga Loom does this near the end, when Chaos casts SILENCE on Hetchel
+ stopAllSounds();
+ return;
+ }
+ if (nr == _curSong) {
+ for (i = 0; i < V3A_MAXMUS; i++) {
+ if (_mus[i].id)
+ _mod->stopChannel(_mus[i].id);
+ _mus[i].id = 0;
+ _mus[i].dur = 0;
+ }
+ _curSong = 0;
+ _songPtr = 0;
+ _songDelay = 0;
+ _songData = NULL;
+ } else {
+ i = getSfxChan(nr);
+ if (i != -1) {
+ _mod->stopChannel(nr | 0x100);
+ _sfx[i].id = 0;
+ _sfx[i].dur = 0;
+ }
+ }
+}
+
+void Player_V3A::startSound(int nr) {
+ assert(_vm);
+ byte *data = _vm->getResourceAddress(rtSound, nr);
+ assert(data);
+
+ if ((_vm->_game.id != GID_INDY3) && (_vm->_game.id != GID_LOOM))
+ error("player_v3a - unknown game");
+
+ if (!_isinit) {
+ int i;
+ unsigned char *ptr;
+ int offset = 4;
+ int numInstruments;
+
+ if (_vm->_game.id == GID_INDY3) {
+ ptr = _vm->getResourceAddress(rtSound, 83);
+ numInstruments = 12;
+ } else {
+ ptr = _vm->getResourceAddress(rtSound, 79);
+ numInstruments = 9;
+ }
+ assert(ptr);
+ _wavetable = (instData **)malloc((numInstruments + 1) * sizeof(void *));
+ for (i = 0; i < numInstruments; i++) {
+ _wavetable[i] = (instData *)malloc(sizeof(instData));
+ for (int j = 0; j < 6; j++) {
+ int off, len;
+ off = READ_BE_UINT16(ptr + offset + 0);
+ _wavetable[i]->_ilen[j] = len = READ_BE_UINT16(ptr + offset + 2);
+ if (len) {
+ _wavetable[i]->_idat[j] = (char *)malloc(len);
+ memcpy(_wavetable[i]->_idat[j],ptr + off,len);
+ } else _wavetable[i]->_idat[j] = NULL;
+ off = READ_BE_UINT16(ptr + offset + 4);
+ _wavetable[i]->_llen[j] = len = READ_BE_UINT16(ptr + offset + 6);
+ if (len) {
+ _wavetable[i]->_ldat[j] = (char *)malloc(len);
+ memcpy(_wavetable[i]->_ldat[j],ptr + off,len);
+ } else _wavetable[i]->_ldat[j] = NULL;
+ _wavetable[i]->_oct[j] = READ_BE_UINT16(ptr + offset + 8);
+ offset += 10;
+ }
+ if (_vm->_game.id == GID_INDY3) {
+ _wavetable[i]->_pitadjust = 0;
+ offset += 2;
+ } else {
+ _wavetable[i]->_pitadjust = READ_BE_UINT16(ptr + offset + 2);
+ offset += 4;
+ }
+ }
+ _wavetable[i] = NULL;
+ _isinit = true;
+ }
+
+ if (getSoundStatus(nr))
+ stopSound(nr); // if a sound is playing, restart it
+
+ if (data[26]) {
+ if (_curSong)
+ stopSound(_curSong);
+ _curSong = nr;
+ _songData = data;
+ _songPtr = 0x1C;
+ _songDelay = 1;
+ _music_timer = 0;
+ } else {
+ int size = READ_BE_UINT16(data + 12);
+ int rate = 3579545 / READ_BE_UINT16(data + 20);
+ char *sound = (char *)malloc(size);
+ int vol = (data[24] << 1) | (data[24] >> 5); // if I boost this to 0-255, it gets too loud and starts to clip
+ memcpy(sound, data + READ_BE_UINT16(data + 8), size);
+ int loopStart = 0, loopEnd = 0;
+ int loopcount = data[27];
+ if (loopcount > 1) {
+ loopStart = READ_BE_UINT16(data + 10) - READ_BE_UINT16(data + 8);
+ loopEnd = READ_BE_UINT16(data + 14);
+ }
+ int i = getSfxChan();
+ if (i == -1) {
+ free(sound);
+ return;
+ }
+ _sfx[i].id = nr;
+ _sfx[i].dur = 1 + loopcount * 60 * size / rate;
+ if (READ_BE_UINT16(data + 16)) {
+ _sfx[i].rate = READ_BE_UINT16(data + 20) << 16;
+ _sfx[i].delta = (int32)READ_BE_UINT32(data + 32);
+ _sfx[i].dur = READ_BE_UINT32(data + 40);
+ } else {
+ _sfx[i].delta = 0;
+ }
+ _mod->startChannel(nr | 0x100, sound, size, rate, vol, loopStart, loopEnd);
+ }
+}
+
+void Player_V3A::update_proc(void *param) {
+ ((Player_V3A *)param)->playMusic();
+}
+
+void Player_V3A::playMusic() {
+ int i;
+ for (i = 0; i < V3A_MAXMUS; i++) {
+ if (_mus[i].id) {
+ _mus[i].dur--;
+ if (_mus[i].dur)
+ continue;
+ _mod->stopChannel(_mus[i].id);
+ _mus[i].id = 0;
+ }
+ }
+ for (i = 0; i < V3A_MAXSFX; i++) {
+ if (_sfx[i].id) {
+ if (_sfx[i].delta) {
+ uint16 oldrate = _sfx[i].rate >> 16;
+ _sfx[i].rate += _sfx[i].delta;
+ if (_sfx[i].rate < (55 << 16))
+ _sfx[i].rate = 55 << 16; // at rates below 55, frequency
+ uint16 newrate = _sfx[i].rate >> 16; // exceeds 65536, which is bad
+ if (oldrate != newrate)
+ _mod->setChannelFreq(_sfx[i].id | 0x100, 3579545 / newrate);
+ }
+ _sfx[i].dur--;
+ if (_sfx[i].dur)
+ continue;
+ _mod->stopChannel(_sfx[i].id | 0x100);
+ _sfx[i].id = 0;
+ }
+ }
+
+ _music_timer++;
+ if (!_curSong)
+ return;
+ if (_songDelay && --_songDelay)
+ return;
+ if (_songPtr == 0) {
+ // at the end of the song, and it wasn't looped - kill it
+ _curSong = 0;
+ return;
+ }
+ while (1) {
+ int inst, pit, vol, dur, oct;
+ inst = _songData[_songPtr++];
+ if ((inst & 0xF0) != 0x80) {
+ // tune is at the end - figure out what's still playing
+ // and see how long we have to wait until we stop/restart
+ for (i = 0; i < V3A_MAXMUS; i++) {
+ if (_songDelay < _mus[i].dur)
+ _songDelay = _mus[i].dur;
+ }
+ if (inst == 0xFB) // it's a looped song, restart it afterwards
+ _songPtr = 0x1C;
+ else _songPtr = 0; // otherwise, terminate it
+ break;
+ }
+ inst &= 0xF;
+ pit = _songData[_songPtr++];
+ vol = _songData[_songPtr++] & 0x7F; // if I boost this to 0-255, it gets too loud and starts to clip
+ dur = _songData[_songPtr++];
+ if (pit == 0) {
+ _songDelay = dur;
+ break;
+ }
+ pit += _wavetable[inst]->_pitadjust;
+ oct = (pit / 12) - 2;
+ pit = pit % 12;
+ if (oct < 0)
+ oct = 0;
+ if (oct > 5)
+ oct = 5;
+ int rate = 3579545 / note_freqs[_wavetable[inst]->_oct[oct]][pit];
+ if (!_wavetable[inst]->_llen[oct])
+ dur = _wavetable[inst]->_ilen[oct] * 60 / rate;
+ char *data = (char *)malloc(_wavetable[inst]->_ilen[oct] + _wavetable[inst]->_llen[oct]);
+ if (_wavetable[inst]->_idat[oct])
+ memcpy(data, _wavetable[inst]->_idat[oct], _wavetable[inst]->_ilen[oct]);
+ if (_wavetable[inst]->_ldat[oct])
+ memcpy(data + _wavetable[inst]->_ilen[oct], _wavetable[inst]->_ldat[oct], _wavetable[inst]->_llen[oct]);
+
+ i = getMusChan();
+ if (i == -1) {
+ free(data);
+ return;
+ }
+ _mus[i].id = i + 1;
+ _mus[i].dur = dur + 1;
+ _mod->startChannel(_mus[i].id, data, _wavetable[inst]->_ilen[oct] + _wavetable[inst]->_llen[oct], rate, vol,
+ _wavetable[inst]->_ilen[oct], _wavetable[inst]->_ilen[oct] + _wavetable[inst]->_llen[oct]);
+ }
+}
+
+int Player_V3A::getMusicTimer() {
+ return _music_timer / 30;
+}
+
+int Player_V3A::getSoundStatus(int nr) const {
+ if (nr == _curSong)
+ return 1;
+ if (getSfxChan(nr) != -1)
+ return 1;
+ return 0;
+}
+
+} // End of namespace Scumm