Split game specific script opcodes into separate files

svn-id: r24389

1 files changed, 428 insertions, 0 deletions

diff --git a/engines/agos/script_ff.cpp b/engines/agos/script_ff.cpp
new file mode 100644
index 0000000000..36eb28c78b
--- /dev/null
+++ b/engines/agos/script_ff.cpp
@@ -0,0 +1,428 @@
+/* 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/system.h"
+
+#include "agos/animation.h"
+#include "agos/agos.h"
+
+namespace AGOS {
+
+void AGOSEngine::setupFeebleOpcodes(OpcodeProc *op) {
+	setupCommonOpcodes(op);
+
+	op[23] = &AGOSEngine::o3_chance;
+	op[37] = &AGOSEngine::o3_jumpOut;
+	op[65] = &AGOSEngine::o3_addTextBox;
+	op[70] = &AGOSEngine::o3_printLongText;
+	op[83] = &AGOSEngine::o2_rescan;
+	op[98] = &AGOSEngine::o2_animate;
+	op[99] = &AGOSEngine::o2_stopAnimate;
+	op[107] = &AGOSEngine::o3_addBox;
+	op[122] = &AGOSEngine::o3_oracleTextDown;
+	op[123] = &AGOSEngine::o3_oracleTextUp;
+	op[124] = &AGOSEngine::o3_ifTime;
+	op[127] = NULL;
+	op[131] = &AGOSEngine::o3_setTime;
+	op[132] = &AGOSEngine::o3_saveUserGame;
+	op[133] = &AGOSEngine::o3_loadUserGame;
+	op[134] = &AGOSEngine::o3_listSaveGames;
+	op[135] = &AGOSEngine::o3_checkCD;
+	op[161] = &AGOSEngine::o3_screenTextBox;
+	op[163] = NULL;
+	op[165] = &AGOSEngine::o3_isAdjNoun;
+	op[171] = &AGOSEngine::o3_hyperLinkOn;
+	op[172] = &AGOSEngine::o3_hyperLinkOff;
+	op[173] = &AGOSEngine::o3_checkPaths;
+	op[177] = &AGOSEngine::o3_screenTextPObj;
+	op[181] = &AGOSEngine::o3_mouseOff;
+	op[182] = &AGOSEngine::o3_loadVideo;
+	op[183] = &AGOSEngine::o3_playVideo;
+	op[187] = &AGOSEngine::o3_centreScroll;
+	op[188] = &AGOSEngine::o2_isShortText;
+	op[189] = &AGOSEngine::o2_clearMarks;
+	op[190] = &AGOSEngine::o2_waitMark;
+	op[191] = &AGOSEngine::o3_resetPVCount;
+	op[192] = &AGOSEngine::o3_setPathValues;
+	op[193] = &AGOSEngine::o3_stopClock;
+	op[194] = &AGOSEngine::o3_restartClock;
+	op[195] = &AGOSEngine::o3_setColour;
+	op[196] = &AGOSEngine::o3_b3Set;
+	op[197] = &AGOSEngine::o3_b3Clear;
+	op[198] = &AGOSEngine::o3_b3Zero;
+	op[199] = &AGOSEngine::o3_b3NotZero;
+}
+
+// -----------------------------------------------------------------------
+// Feeble Files Opcodes
+// -----------------------------------------------------------------------
+
+void AGOSEngine::o3_chance() {
+	// 23
+	uint a = getVarOrWord();
+
+	if (a == 0) {
+		setScriptCondition(false);
+		return;
+	}
+
+	if (a == 100) {
+		setScriptCondition(true);
+		return;
+	}
+
+	if ((uint)_rnd.getRandomNumber(99) < a)
+		setScriptCondition(true);
+	else
+		setScriptCondition(false);
+}
+
+void AGOSEngine::o3_jumpOut() {
+	// 37
+	getVarOrByte();
+	setScriptReturn(1);
+}
+
+void AGOSEngine::o3_addTextBox() {
+	// 65: add hit area
+	uint flags = kBFTextBox | kBFBoxItem;
+	uint id = getVarOrWord();
+	uint params = id / 1000;
+	uint x, y, w, h, num;
+
+	id %= 1000;
+
+	if (params & 1)
+		flags |= kBFInvertTouch;
+
+	x = getVarOrWord();
+	y = getVarOrWord();
+	w = getVarOrWord();
+	h = getVarOrWord();
+	num = getVarOrByte();
+	if (num < _numTextBoxes)
+		defineBox(id, x, y, w, h, flags + (num << 8), 208, _dummyItem2);
+}
+
+void AGOSEngine::o3_printLongText() {
+	// 70: show string from array
+	int num = getVarOrByte();
+	const char *str = (const char *)getStringPtrByID(_longText[num]);
+	sendInteractText(num, "%d. %s\n", num, str);
+}
+
+void AGOSEngine::o3_addBox() {
+	// 107: add item hitarea
+	uint flags = 0;
+	uint id = getVarOrWord();
+	uint params = id / 1000;
+	uint x, y, w, h, verb;
+	Item *item;
+
+	id = id % 1000;
+
+	if (params & 1)
+		flags |= kBFInvertTouch;
+	if (params & 2)
+		flags |= kBFNoTouchName;
+	if (params & 4)
+		flags |= kBFBoxItem;
+	if (params & 8)
+		flags |= kBFTextBox;
+	if (params & 16)
+		flags |= 0x10;
+
+	x = getVarOrWord();
+	y = getVarOrWord();
+	w = getVarOrWord();
+	h = getVarOrWord();
+	item = getNextItemPtrStrange();
+	verb = getVarOrWord();
+	defineBox(id, x, y, w, h, flags, verb, item);
+}
+
+void AGOSEngine::o3_oracleTextDown() {
+	// 122: oracle text down
+	oracleTextDown();
+}
+
+void AGOSEngine::o3_oracleTextUp() {
+	// 123: oracle text up
+	oracleTextUp();
+}
+
+void AGOSEngine::o3_ifTime() {
+	// 124: if time
+	time_t t;
+
+	uint a = getVarOrWord();
+	time(&t);
+	t -= _gameStoppedClock;
+	t -= a;
+	if (t >= _timeStore)
+		setScriptCondition(true);
+	else
+		setScriptCondition(false);
+}
+
+void AGOSEngine::o3_setTime() {
+	// 131
+	time(&_timeStore);
+	_timeStore -= _gameStoppedClock;
+}
+
+void AGOSEngine::o3_saveUserGame() {
+	// 132: save game
+	_noOracleScroll = 0;
+	_system->setFeatureState(OSystem::kFeatureVirtualKeyboard, true);
+	saveUserGame(countSaveGames() + 1 - readVariable(55));
+	_system->setFeatureState(OSystem::kFeatureVirtualKeyboard, false);
+}
+
+void AGOSEngine::o3_loadUserGame() {
+	// 133: load game
+	loadGame(readVariable(55));
+}
+
+void AGOSEngine::o3_listSaveGames() {
+	// 134: dummy opcode?
+	listSaveGames(1);
+}
+
+void AGOSEngine::o3_checkCD() {
+	// 135: switch CD
+	uint disc = readVariable(97);
+
+	if (!strcmp(_gameDescription->desc.extra, "4CD")) {
+		_sound->switchVoiceFile(gss, disc);
+	} else if (!strcmp(_gameDescription->desc.extra, "2CD")) {
+		if (disc == 1 || disc == 2)
+			_sound->switchVoiceFile(gss, 1);
+		else if (disc == 3 || disc == 4)
+			_sound->switchVoiceFile(gss, 2);
+	}
+
+	debug(0, "Switch to CD number %d", disc);
+}
+
+void AGOSEngine::o3_screenTextBox() {
+	// 161: setup text
+	TextLocation *tl = getTextLocation(getVarOrByte());
+
+	tl->x = getVarOrWord();
+	tl->y = getVarOrWord();
+	tl->width = getVarOrWord();
+}
+
+void AGOSEngine::o3_isAdjNoun() {
+	// 165: item unk1 unk2 is
+	Item *item = getNextItemPtr();
+	int16 a = getNextWord(), b = getNextWord();
+	if (item->adjective == a && item->noun == b)
+		setScriptCondition(true);
+	else if (a == -1 && item->noun == b)
+		setScriptCondition(true);
+	else
+		setScriptCondition(false);
+}
+
+void AGOSEngine::o3_hyperLinkOn() {
+	// 171: oracle hyperlink on
+	hyperLinkOn(getVarOrWord());
+}
+
+void AGOSEngine::o3_hyperLinkOff() {
+	// 172: oracle hyperlink off
+	hyperLinkOff();
+}
+
+void AGOSEngine::o3_checkPaths() {
+	// 173 check paths
+	int i, count;
+	const uint8 *pathVal1 = _pathValues1;
+	bool result = false;
+
+	count = _variableArray2[38];
+	for (i = 0; i < count; i++) {
+		uint8 val = pathVal1[2];
+		if (val == _variableArray2[50] ||
+			val == _variableArray2[51] ||
+			val == _variableArray2[201] ||
+			val == _variableArray2[203] ||
+			val == _variableArray2[205] ||
+			val == _variableArray2[207] ||
+			val == _variableArray2[209] ||
+			val == _variableArray2[211] ||
+			val == _variableArray2[213] ||
+			val == _variableArray2[215] ||
+			val == _variableArray2[219] ||
+			val == _variableArray2[220] ||
+			val == _variableArray2[221] ||
+			val == _variableArray2[222] ||
+			val == _variableArray2[223] ||
+			val == _variableArray2[224] ||
+			val == _variableArray2[225] ||
+			val == _variableArray2[226]) {
+				result = true;
+				break;
+		}
+		pathVal1 += 4;
+	}
+
+	_variableArray2[52] = result;
+}
+
+void AGOSEngine::o3_screenTextPObj() {
+	// 177: inventory descriptions
+	uint vgaSpriteId = getVarOrByte();
+	uint color = getVarOrByte();
+	const char *string_ptr = NULL;
+	TextLocation *tl = NULL;
+	char buf[256];
+
+	SubObject *subObject = (SubObject *)findChildOfType(getNextItemPtr(), 2);
+	if (subObject != NULL && subObject->objectFlags & kOFText) {
+		string_ptr = (const char *)getStringPtrByID(subObject->objectFlagValue[0]);
+		tl = getTextLocation(vgaSpriteId);
+	}
+
+	if (subObject != NULL && subObject->objectFlags & kOFVoice) {
+		uint offs = getOffsetOfChild2Param(subObject, kOFVoice);
+		playSpeech(subObject->objectFlagValue[offs], vgaSpriteId);
+	}
+
+	if (subObject != NULL && (subObject->objectFlags & kOFText) && _subtitles) {
+		if (subObject->objectFlags & kOFNumber) {
+			sprintf(buf, "%d%s", subObject->objectFlagValue[getOffsetOfChild2Param(subObject, kOFNumber)], string_ptr);
+			string_ptr = buf;
+		}
+		if (string_ptr != NULL)
+			printScreenText(vgaSpriteId, color, string_ptr, tl->x, tl->y, tl->width);
+	}
+}
+
+void AGOSEngine::o3_mouseOff() {
+	// 181: force mouseOff
+	scriptMouseOff();
+	clearName();
+}
+
+void AGOSEngine::o3_loadVideo() {
+	// 182: load video file
+	const byte *filename = getStringPtrByID(getNextStringID());
+	_moviePlay->load((const char *)filename);
+}
+
+void AGOSEngine::o3_playVideo() {
+	// 183: play video
+	_moviePlay->play();
+}
+
+void AGOSEngine::o3_centreScroll() {
+	// 187
+	centreScroll();
+}
+
+void AGOSEngine::o3_resetPVCount() {
+	// 191
+	if (getBitFlag(83)) {
+		_PVCount1 = 0;
+		_GPVCount1 = 0;
+	} else {
+		_PVCount = 0;
+		_GPVCount = 0;
+	}
+}
+
+void AGOSEngine::o3_setPathValues() {
+	// 192
+	uint8 a = getVarOrByte();
+	uint8 b = getVarOrByte();
+	uint8 c = getVarOrByte();
+	uint8 d = getVarOrByte();
+	if (getBitFlag(83)) {
+		_pathValues1[_PVCount1++] = a;
+		_pathValues1[_PVCount1++] = b;
+		_pathValues1[_PVCount1++] = c;
+		_pathValues1[_PVCount1++] = d;
+	} else {
+		_pathValues[_PVCount++] = a;
+		_pathValues[_PVCount++] = b;
+		_pathValues[_PVCount++] = c;
+		_pathValues[_PVCount++] = d;
+	}
+}
+
+void AGOSEngine::o3_stopClock() {
+	// 193: pause clock
+	_clockStopped = time(NULL);
+}
+
+void AGOSEngine::o3_restartClock() {
+	// 194: resume clock
+	if (_clockStopped != 0)
+		_gameStoppedClock += time(NULL) - _clockStopped;
+	_clockStopped = 0;
+}
+
+void AGOSEngine::o3_setColour() {
+	// 195: set palette colour
+	uint c = getVarOrByte() * 4;
+	uint r = getVarOrByte();
+	uint g = getVarOrByte();
+	uint b = getVarOrByte();
+
+	_displayPalette[c + 0] = r;
+	_displayPalette[c + 1] = g;
+	_displayPalette[c + 2] = b;
+
+	_paletteFlag = 2;
+}
+
+void AGOSEngine::o3_b3Set() {
+	// 196: set bit3
+	uint bit = getVarOrByte();
+	_bitArrayThree[bit / 16] |= (1 << (bit & 15));
+}
+
+void AGOSEngine::o3_b3Clear() {
+	// 197: clear bit3
+	uint bit = getVarOrByte();
+	_bitArrayThree[bit / 16] &= ~(1 << (bit & 15));
+}
+
+void AGOSEngine::o3_b3Zero() {
+	// 198: is bit3 clear
+	uint bit = getVarOrByte();
+	setScriptCondition((_bitArrayThree[bit / 16] & (1 << (bit & 15))) == 0);
+}
+
+void AGOSEngine::o3_b3NotZero() {
+	// 199: is bit3 set
+	uint bit = getVarOrByte();
+	setScriptCondition((_bitArrayThree[bit / 16] & (1 << (bit & 15))) != 0);
+}
+
+} // End of namespace AGOS