Initial commit

engines/agos/vga_ww.cpp

@@ -0,0 +1,262 @@
+/* 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/>.
+ *
+ */
+
+// Video script opcodes for Simon1/Simon2
+
+
+#include "agos/agos.h"
+#include "agos/intern.h"
+#include "agos/midi.h"
+
+#include "common/system.h"
+
+#include "graphics/surface.h"
+#include "graphics/paletteman.h"
+
+namespace AGOS {
+
+void AGOSEngine_Waxworks::setupVideoOpcodes(VgaOpcodeProc *op) {
+	AGOSEngine_Elvira2::setupVideoOpcodes(op);
+
+	op[58] = &AGOSEngine::vc58_checkCodeWheel;
+	op[60] = &AGOSEngine::vc60_stopAnimation;
+	op[61] = &AGOSEngine::vc61;
+	op[62] = &AGOSEngine::vc62_fastFadeOut;
+	op[63] = &AGOSEngine::vc63_fastFadeIn;
+}
+
+void AGOSEngine::vcStopAnimation(uint16 zone, uint16 sprite) {
+	uint16 oldCurSpriteId, oldCurZoneNum;
+	VgaSprite *vsp;
+	VgaTimerEntry *vte;
+	const byte *vcPtrOrg;
+
+	oldCurSpriteId = _vgaCurSpriteId;
+	oldCurZoneNum = _vgaCurZoneNum;
+	vcPtrOrg = _vcPtr;
+
+	_vgaCurZoneNum = zone;
+	_vgaCurSpriteId = sprite;
+
+	vsp = findCurSprite();
+	if (vsp->id) {
+		vc25_halt_sprite();
+
+		vte = _vgaTimerList;
+		while (vte->delay) {
+			if (vte->id == _vgaCurSpriteId && vte->zoneNum == _vgaCurZoneNum) {
+				deleteVgaEvent(vte);
+				break;
+			}
+			vte++;
+		}
+	}
+
+	_vgaCurZoneNum = oldCurZoneNum;
+	_vgaCurSpriteId = oldCurSpriteId;
+	_vcPtr = vcPtrOrg;
+}
+
+void AGOSEngine_Simon1::vcStopAnimation(uint16 zone, uint16 sprite) {
+	uint16 oldCurSpriteId, oldCurZoneNum;
+	VgaSleepStruct *vfs;
+	VgaSprite *vsp;
+	VgaTimerEntry *vte;
+	const byte *vcPtrOrg;
+
+	oldCurSpriteId = _vgaCurSpriteId;
+	oldCurZoneNum = _vgaCurZoneNum;
+	vcPtrOrg = _vcPtr;
+
+	_vgaCurZoneNum = zone;
+	_vgaCurSpriteId = sprite;
+
+	vfs = _waitSyncTable;
+	while (vfs->ident != 0) {
+		if (vfs->id == _vgaCurSpriteId && vfs->zoneNum == _vgaCurZoneNum) {
+			while (vfs->ident != 0) {
+				memcpy(vfs, vfs + 1, sizeof(VgaSleepStruct));
+				vfs++;
+			}
+			break;
+		}
+		vfs++;
+	}
+
+	vsp = findCurSprite();
+	if (vsp->id) {
+		vc25_halt_sprite();
+
+		vte = _vgaTimerList;
+		while (vte->delay) {
+			if (vte->id == _vgaCurSpriteId && vte->zoneNum == _vgaCurZoneNum) {
+				deleteVgaEvent(vte);
+				break;
+			}
+			vte++;
+		}
+	}
+
+	_vgaCurZoneNum = oldCurZoneNum;
+	_vgaCurSpriteId = oldCurSpriteId;
+	_vcPtr = vcPtrOrg;
+}
+
+void AGOSEngine::vc60_stopAnimation() {
+	uint16 sprite, zoneNum;
+
+	if (getGameType() == GType_PP) {
+		zoneNum = vcReadNextWord();
+		sprite = vcReadVarOrWord();
+	} else if (getGameType() == GType_SIMON2 || getGameType() == GType_FF) {
+		zoneNum = vcReadNextWord();
+		sprite = vcReadNextWord();
+	} else {
+		sprite = vcReadNextWord();
+		zoneNum = sprite / 100;
+	}
+
+	vcStopAnimation(zoneNum, sprite);
+}
+
+void AGOSEngine::vc61() {
+	uint16 a = vcReadNextWord();
+	byte *src, *dst, *dstPtr;
+	uint h, tmp;
+
+	Graphics::Surface *screen = getBackendSurface();
+	dstPtr = (byte *)screen->getPixels();
+
+	if (a == 6) {
+		src = _curVgaFile2 + 800;
+		dst = dstPtr;
+
+		for (int i = 0; i < _screenHeight; i++) {
+			memcpy(dst, src, _screenWidth);
+			src += 320;
+			dst += screen->pitch;
+		}
+
+		tmp = 4 - 1;
+	} else {
+		tmp = a - 1;
+	}
+
+	src = _curVgaFile2 + 3840 * 16 + 3360;
+	while (tmp--)
+		src += 1536 * 16 + 1712;
+
+	src += 800;
+
+	if (a != 5) {
+		dst = dstPtr + 23 * screen->pitch + 88;
+		for (h = 0; h < 177; h++) {
+			memcpy(dst, src, 144);
+			src += 144;
+			dst += screen->pitch;
+		}
+
+		if (a != 6) {
+			updateBackendSurface();
+			return;
+		}
+
+		src = _curVgaFile2 + 9984 * 16 + 15344;
+	}
+
+	dst = dstPtr + 157 * screen->pitch + 56;
+	for (h = 0; h < 17; h++) {
+		memcpy(dst, src, 208);
+		src += 208;
+		dst += screen->pitch;
+	}
+
+	updateBackendSurface();
+
+	if (a == 6)
+		fullFade();
+}
+
+void AGOSEngine::vc62_fastFadeOut() {
+	vc29_stopAllSounds();
+
+	if (!_neverFade && !_fastFadeOutFlag) {
+		uint i, fadeSize, fadeCount;
+
+		_fastFadeCount = 256;
+		if (getGameType() == GType_SIMON1 || getGameType() == GType_SIMON2) {
+			if (_windowNum == 4)
+				_fastFadeCount = 208;
+		}
+
+		if (getGameType() == GType_FF || getGameType() == GType_PP) {
+			if (getGameType() == GType_FF && getBitFlag(75)) {
+				fadeCount = 4;
+				fadeSize = 64;
+			} else {
+				fadeCount = 32;
+				fadeSize = 8;
+			}
+		} else {
+			fadeCount = 64;
+			fadeSize = 4;
+		}
+
+		if (getGameType() == GType_SIMON2 && _nextMusicToPlay != -1)
+			// Music will be stopped after the screen fade, so fade out the
+			// music during the screen fade.
+			_midi->fadeOut();
+
+		for (i = fadeCount; i != 0; --i) {
+			paletteFadeOut(_currentPalette, _fastFadeCount, fadeSize);
+			_system->getPaletteManager()->setPalette(_currentPalette, 0, _fastFadeCount);
+			delay(5);
+		}
+	}
+
+	if (!_fastFadeOutFlag) {
+		if (getGameType() == GType_WW || getGameType() == GType_FF || getGameType() == GType_PP) {
+			clearSurfaces();
+		} else {
+			if (_windowNum != 4) {
+				clearSurfaces();
+			}
+		}
+	}
+	if (getGameType() == GType_SIMON2) {
+		if (_nextMusicToPlay != -1)
+			loadMusic(_nextMusicToPlay);
+	}
+}
+
+void AGOSEngine::vc63_fastFadeIn() {
+	if (getGameType() == GType_FF) {
+		_fastFadeInFlag = 256;
+	} else if (getGameType() == GType_SIMON1 || getGameType() == GType_SIMON2) {
+		_fastFadeInFlag = 208;
+		if (_windowNum != 4) {
+			_fastFadeInFlag = 256;
+		}
+	}
+	_fastFadeOutFlag = false;
+}
+
+} // End of namespace AGOS