Split code into more specific files and cleanup

svn-id: r24394

1 files changed, 437 insertions, 0 deletions

diff --git a/engines/agos/vga_ff.cpp b/engines/agos/vga_ff.cpp
new file mode 100644
index 0000000000..dce9506684
--- /dev/null
+++ b/engines/agos/vga_ff.cpp
@@ -0,0 +1,437 @@
+/* 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 "agos/agos.h"
+#include "agos/intern.h"
+#include "agos/vga.h"
+
+namespace AGOS {
+
+void AGOSEngine::setupFeebleVideoOpcodes(VgaOpcodeProc *op) {
+	setupSimon2VideoOpcodes(op);
+
+	op[53] = &AGOSEngine::vc53_panSFX;
+	op[75] = &AGOSEngine::vc75_setScale;
+	op[76] = &AGOSEngine::vc76_setScaleXOffs;
+	op[77] = &AGOSEngine::vc77_setScaleYOffs;
+	op[78] = &AGOSEngine::vc78_computeXY;
+	op[79] = &AGOSEngine::vc79_computePosNum;
+	op[80] = &AGOSEngine::vc80_setOverlayImage;
+	op[81] = &AGOSEngine::vc81_setRandom;
+	op[82] = &AGOSEngine::vc82_getPathValue;
+	op[83] = &AGOSEngine::vc83_playSoundLoop;
+	op[84] = &AGOSEngine::vc84_stopSoundLoop;
+}
+
+void AGOSEngine::vc53_panSFX() {
+	VgaSprite *vsp = findCurSprite();
+	int pan;
+
+	uint16 sound = vcReadNextWord();
+	int16 xoffs = vcReadNextWord();
+	int16 vol = vcReadNextWord();
+
+	pan = (vsp->x - _scrollX + xoffs) * 8 - 2560;
+	if (pan < -10000)
+		pan = -10000;
+	if (pan > 10000)
+		pan = 10000;
+
+	loadSound(sound, 0, vol, 1);
+
+	if (xoffs != 2)
+		xoffs |= 0x10;
+
+	addVgaEvent(10, NULL, _vgaCurSpriteId, _vgaCurZoneNum, xoffs); /* pan event */
+	debug(0, "vc53_panSFX: snd %d xoffs %d vol %d", sound, xoffs, vol);
+}
+
+int AGOSEngine::getScale(int16 y, int16 x) {
+	int16 z;
+
+	if (y > _baseY) {
+		return((int16)(x * (1 + ((y - _baseY) * _scale))));
+	} else {	
+		if (x == 0)
+			return(0);
+		if (x < 0) {
+			z = ((int16)((x * (1 - ((_baseY - y)* _scale))) - 0.5));
+			if (z >- 2)
+				return(-2);
+			return(z);
+		}
+
+		z = ((int16)((x * (1 - ((_baseY - y) * _scale))) + 0.5));
+		if (z < 2)
+			return(2);
+
+		return(z);
+	}
+}
+
+void AGOSEngine::vc75_setScale() {
+	_baseY = vcReadNextWord();
+	_scale = (float)vcReadNextWord() / 1000000.;
+}
+
+void AGOSEngine::vc76_setScaleXOffs() {
+	if (getGameType() == GType_PP && getBitFlag(120)) {
+		VgaSprite *vsp1, *vsp2;
+		uint16 old_file_1, tmp1, tmp2;
+
+		old_file_1 = _vgaCurSpriteId;
+
+		_vgaCurSpriteId = vcReadVar(vcReadNextWord());
+		 vsp1 = findCurSprite();
+		_vgaCurSpriteId = vcReadVar(vcReadNextWord());
+		 vsp2 = findCurSprite();
+
+		tmp1 = vsp1->x;
+		tmp2 = vsp2->x;
+		vsp1->x = tmp2;
+		vsp2->x = tmp1;
+		tmp1 = vsp1->y;
+		tmp2 = vsp2->y;
+		vsp1->y = tmp2;
+		vsp2->y = tmp1;
+
+		_vgaCurSpriteId = old_file_1;
+		_vcPtr += 2;
+	} else {
+		VgaSprite *vsp = findCurSprite();
+
+		vsp->image = vcReadNextWord();
+		int16 x = vcReadNextWord();
+		uint16 var = vcReadNextWord();
+
+		vsp->x += getScale(vsp->y, x);
+		_variableArrayPtr[var] = vsp->x;
+
+		checkScrollX(x, vsp->x);
+
+		vsp->flags = kDFScaled;
+	}
+}
+
+void AGOSEngine::vc77_setScaleYOffs() {
+	VgaSprite *vsp = findCurSprite();
+
+	vsp->image = vcReadNextWord();
+	int16 y = vcReadNextWord();
+	uint16 var = vcReadNextWord();
+
+	vsp->y += getScale(vsp->y, y);
+	_variableArrayPtr[var] = vsp->y;
+
+	if (y != 0) 
+		checkScrollY(y, vsp->y);
+
+	vsp->flags = kDFScaled;
+}
+
+void AGOSEngine::vc78_computeXY() {
+	VgaSprite *vsp = findCurSprite();
+
+	uint16 a = (uint16)_variableArrayPtr[12];
+	uint16 b = (uint16)_variableArrayPtr[13];
+
+	const uint16 *p = _pathFindArray[a - 1];
+	p += b * 2;
+
+	uint16 posx = readUint16Wrapper(p);
+	_variableArrayPtr[15] = posx;
+	vsp->x = posx;
+
+	uint16 posy = readUint16Wrapper(p + 1);
+	_variableArrayPtr[16] = posy;
+	vsp->y = posy;
+
+	if (getGameType() == GType_FF) {
+		setBitFlag(85, false);
+		if (getBitFlag(74)) {
+			centreScroll();
+		}
+	}
+}
+
+void AGOSEngine::vc79_computePosNum() {
+	uint a = (uint16)_variableArrayPtr[12];
+	const uint16 *p = _pathFindArray[a - 1];
+	uint pos = 0;
+
+	int16 y = _variableArrayPtr[16];
+	while (y >= (int16)readUint16Wrapper(p + 1)) {
+		p += 2;
+		pos++;
+	}
+
+	_variableArrayPtr[13] = pos;
+}
+
+void AGOSEngine::vc80_setOverlayImage() {
+	VgaSprite *vsp = findCurSprite();
+
+	vsp->image = vcReadVarOrWord();
+
+	vsp->x += vcReadNextWord();
+	vsp->y += vcReadNextWord();
+	vsp->flags = kDFOverlayed;
+
+	_vgaSpriteChanged++;
+}
+
+void AGOSEngine::vc81_setRandom() {
+	uint16 var = vcReadNextWord();
+	uint16 value = vcReadNextWord();
+
+	_variableArray[var] = _rnd.getRandomNumber(value - 1);
+}
+
+void AGOSEngine::vc82_getPathValue() {
+	uint8 val;
+
+	uint16 var = vcReadNextWord();
+
+	if (getGameType() == GType_FF && getBitFlag(82)) {
+		val = _pathValues1[_GPVCount1++];
+	} else {
+		val = _pathValues[_GPVCount++];
+	}
+
+	vcWriteVar(var, val);
+}
+
+void AGOSEngine::vc83_playSoundLoop() {
+	uint16 sound = vcReadNextWord();
+	int16 vol = vcReadNextWord();
+	int16 pan = vcReadNextWord();
+
+	loadSound(sound, pan, vol, 3);
+}
+
+void AGOSEngine::vc84_stopSoundLoop() {
+	_sound->stopSfx5();
+}
+
+// Scrolling functions for Feeble Files
+void AGOSEngine::checkScrollX(int16 x, int16 xpos) {
+	if (_scrollXMax == 0 || x == 0)
+		return;
+
+	if ((getGameType() == GType_FF) && (getBitFlag(80) || getBitFlag(82)))
+		return;
+
+	int16 tmp;
+	if (x > 0) {
+		if (_scrollCount != 0) {
+			if (_scrollCount >= 0)
+				return;
+			_scrollCount = 0;
+		} else {
+			if (_scrollFlag != 0)
+				return;
+		}
+
+		if (xpos - _scrollX >= 480) {
+			_scrollCount = 320;
+			tmp = _scrollXMax - _scrollX;
+			if (tmp < 320)
+				_scrollCount = tmp;
+		}
+	} else {
+		if (_scrollCount != 0) {
+			if (_scrollCount < 0)
+				return;
+			_scrollCount = 0;
+		} else {
+			if (_scrollFlag != 0)
+				return;
+		}
+
+		if (xpos - _scrollX < 161) {
+			_scrollCount = -320;
+			if (_scrollX < 320)
+				_scrollCount = -_scrollX;
+		}
+	}
+}
+
+void AGOSEngine::checkScrollY(int16 y, int16 ypos) {
+	if (_scrollYMax == 0)
+		return;
+
+	if (getGameType() == GType_FF && getBitFlag(80))
+		return;
+
+	int16 tmp;
+	if (y >= 0) {
+		if (_scrollCount != 0) {
+			if (_scrollCount >= 0)
+				return;
+		} else {
+			if (_scrollFlag != 0)
+				return;
+		}
+
+		if (ypos - _scrollY >= 440) {
+			_scrollCount = 240;
+			tmp = _scrollYMax - _scrollY;
+			if (tmp < 240)
+				_scrollCount = tmp;
+		}
+	} else {
+		if (_scrollCount != 0) {
+			if (_scrollCount < 0)
+				return;
+		} else {
+			if (_scrollFlag != 0)
+				return;
+		}
+
+		if (ypos - _scrollY < 100) {
+			_scrollCount = -240;
+			if (_scrollY < 240)
+				_scrollCount = -_scrollY;
+		}
+	}
+}
+
+void AGOSEngine::centreScroll() {
+	int16 x, y, tmp;
+
+	if (_scrollXMax != 0) {
+		_scrollCount = 0;
+		x = _variableArray[15] - _scrollX;
+		if (x < 17 || (getBitFlag(85) && x < 320)) {
+			x -= 320;
+			if (_scrollX < -x)
+				x = -_scrollX;
+			_scrollCount = x;
+		} else if ((getBitFlag(85) && x >= 320) || x >= 624) {
+			x -= 320;
+			tmp = _scrollXMax - _scrollX;
+			if (tmp < x)
+				x = tmp;
+			_scrollCount = x;
+		}
+	} else if (_scrollYMax != 0) {
+		_scrollCount = 0;
+		y = _variableArray[16] - _scrollY;
+		if (y < 30) {
+			y -= 240;
+			if (_scrollY < -y)
+				y = -_scrollY;
+			_scrollCount = y;
+		} else if (y >= 460) {
+			y -= 240;
+			tmp = _scrollYMax - _scrollY;
+			if (tmp < y)
+				y = tmp;
+			_scrollCount = y;
+		}
+	}
+}
+
+void AGOSEngine::startOverlayAnims() {
+	VgaSprite *vsp = _vgaSprites;
+	uint16 zoneNum;
+	int i;
+
+	zoneNum = _variableArray[999];
+	
+	for (i = 0; i < 600; i++) {
+		if (_variableArray[1000 + i] < 100)
+			continue;
+
+		while (vsp->id)
+			vsp++;
+
+		vsp->windowNum = 4;
+		vsp->priority = 4;
+		vsp->flags = 0;
+		vsp->palette = 0;
+		vsp->image = _variableArray[1000 + i];
+		if (i >= 300) {
+			vsp->y = ((i - 300) / 20) * 32;
+			vsp->x = ((i - 300) % 20) * 32;
+		} else {
+			vsp->y = (i / 20) * 32;
+			vsp->x = (i % 20) * 32;
+		}
+		vsp->id = 1000 + i;
+		vsp->zoneNum = zoneNum;
+	}
+}
+
+void AGOSEngine::startAnOverlayAnim() {
+	VgaSprite *vsp = _vgaSprites;
+	const byte *vcPtrOrg;
+	uint16 a, sprite, file, tmp, zoneNum;
+	int16 x;
+
+	zoneNum = _variableArray[999];
+
+	_vcPtr += 4;
+	a = vcReadNextWord();
+	_vcPtr += 6;
+
+	while (vsp->id)
+		vsp++;
+
+	vsp->windowNum = 4;
+	vsp->priority = 20;
+	vsp->flags = 0;
+	vsp->palette = 0;
+	vsp->image = vcReadVar(vcReadVar(a));
+
+	x = vcReadVar(a) - 1300;
+	if (x < 0) {
+		x += 300;
+		vsp->priority = 10;
+	}
+
+	vsp->y = x / 20 * 32;
+	vsp->x = x % 20 * 32;;
+	vsp->id = vcReadVar(a);
+	vsp->zoneNum = zoneNum;
+
+	sprite = _vgaCurSpriteId;
+	file = _vgaCurZoneNum;
+
+	_vgaCurZoneNum = vsp->zoneNum;
+	_vgaCurSpriteId = vsp->id;
+
+	tmp = to16Wrapper(vsp->priority);
+
+	vcPtrOrg = _vcPtr;
+	_vcPtr = (byte *)&tmp;
+	vc23_setPriority();
+
+	_vcPtr = vcPtrOrg;
+	_vgaCurSpriteId = sprite;
+	_vgaCurZoneNum = file;
+}
+
+} // End of namespace AGOS