Initial commit

engines/sky/music/adlibmusic.cpp

@@ -0,0 +1,98 @@
+/* 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 3 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, see <http://www.gnu.org/licenses/>.
+ *
+ */
+
+
+#include "common/endian.h"
+#include "common/textconsole.h"
+
+#include "sky/music/adlibmusic.h"
+#include "sky/music/adlibchannel.h"
+#include "audio/fmopl.h"
+#include "sky/sky.h"
+
+namespace Audio {
+class Mixer;
+}
+
+namespace Sky {
+
+AdLibMusic::AdLibMusic(Audio::Mixer *pMixer, Disk *pDisk) : MusicBase(pMixer, pDisk) {
+	_driverFileBase = 60202;
+
+	_opl = OPL::Config::create();
+	if (!_opl || !_opl->init())
+		error("Failed to create OPL");
+
+	_opl->start(new Common::Functor0Mem<void, AdLibMusic>(this, &AdLibMusic::onTimer), 50);
+}
+
+AdLibMusic::~AdLibMusic() {
+	delete _opl;
+}
+
+void AdLibMusic::onTimer() {
+	if (_musicData != NULL)
+		pollMusic();
+}
+
+void AdLibMusic::setupPointers() {
+	if (SkyEngine::_systemVars->gameVersion == 109) {
+		// disk demo uses a different AdLib driver version, some offsets have changed
+		//_musicDataLoc = (_musicData[0x11CC] << 8) | _musicData[0x11CB];
+		//_initSequence = _musicData + 0xEC8;
+
+		_musicDataLoc = READ_LE_UINT16(_musicData + 0x1200);
+		_initSequence = _musicData + 0xEFB;
+	} else if (SkyEngine::_systemVars->gameVersion == 267) {
+		_musicDataLoc = READ_LE_UINT16(_musicData + 0x11F7);
+		_initSequence = _musicData + 0xE87;
+	} else {
+		_musicDataLoc = READ_LE_UINT16(_musicData + 0x1201);
+		_initSequence = _musicData + 0xE91;
+	}
+}
+
+void AdLibMusic::setupChannels(uint8 *channelData) {
+	_numberOfChannels = channelData[0];
+	channelData++;
+	for (uint8 cnt = 0; cnt < _numberOfChannels; cnt++) {
+		uint16 chDataStart = READ_LE_UINT16((uint16 *)channelData + cnt) + _musicDataLoc;
+		_channels[cnt] = new AdLibChannel(_opl, _musicData, chDataStart);
+		// also set proper volume - Fixes bug where intro music plays at full volume
+		_channels[cnt]->updateVolume(_musicVolume);
+	}
+}
+
+void AdLibMusic::startDriver() {
+	uint16 cnt = 0;
+	while (_initSequence[cnt] || _initSequence[cnt + 1]) {
+		_opl->writeReg(_initSequence[cnt], _initSequence[cnt + 1]);
+		cnt += 2;
+	}
+}
+
+void AdLibMusic::setVolume(uint16 param) {
+	_musicVolume = param;
+	for (uint8 cnt = 0; cnt < _numberOfChannels; cnt++)
+		_channels[cnt]->updateVolume(_musicVolume);
+}
+
+} // End of namespace Sky