Initial revision

svn-id: r4785

1 files changed, 161 insertions, 0 deletions

diff --git a/scumm/resource_v3.cpp b/scumm/resource_v3.cpp
new file mode 100644
index 0000000000..c3af1c9ef2
--- /dev/null
+++ b/scumm/resource_v3.cpp
@@ -0,0 +1,161 @@
+/* ScummVM - Scumm Interpreter
+ * Copyright (C) 2001  Ludvig Strigeus
+ * Copyright (C) 2001/2002 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., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
+ *
+ * $Header$
+ *
+ */
+
+#include "stdafx.h"
+#include "scumm.h"
+#include "resource.h"
+
+
+void Scumm_v3::readIndexFile()
+{
+	uint16 blocktype;
+	uint32 itemsize;
+	int numblock = 0;
+	int num, i;
+
+	debug(9, "readIndexFile()");
+
+	openRoom(-1);
+	openRoom(0);
+
+	while (!fileEof(_fileHandle)) {
+		itemsize = fileReadDwordLE();
+		blocktype = fileReadWordLE();
+		if (fileReadFailed(_fileHandle))
+			break;
+
+		switch (blocktype) {
+		case 0x4E52:	// 'NR'
+			fileReadWordLE();
+			break;
+		case 0x5230:	// 'R0'
+			_numRooms = fileReadWordLE();
+			break;
+		case 0x5330:	// 'S0'
+			_numScripts = fileReadWordLE();
+			break;
+		case 0x4E30:	// 'N0'
+			_numSounds = fileReadWordLE();
+			break;
+		case 0x4330:	// 'C0'
+			_numCostumes = fileReadWordLE();
+			break;
+		case 0x4F30:	// 'O0'
+			_numGlobalObjects = fileReadWordLE();
+			break;
+		}
+		fileSeek(_fileHandle, itemsize - 8, SEEK_CUR);
+	}
+
+	clearFileReadFailed(_fileHandle);
+	fileSeek(_fileHandle, 0, SEEK_SET);
+
+	/* I'm not sure for those values yet, they will have to be rechecked */
+
+	_numVariables = 800;				/* 800 */
+	_numBitVariables = 4096;			/* 2048 */
+	_numLocalObjects = 200;				/* 200 */
+	_numArray = 50;
+	_numVerbs = 100;
+	_numNewNames = 0;
+	_objectRoomTable = NULL;
+	_numCharsets = 9;					/* 9 */
+	_numInventory = 80;					/* 80 */
+	_numGlobalScripts = 200;
+
+	_shadowPaletteSize = 256;
+	_shadowPalette = (byte *) calloc(_shadowPaletteSize, 1);	// stupid for now. Need to be removed later
+	_numFlObject = 50;
+	allocateArrays();
+
+	while (1) {
+		itemsize = fileReadDwordLE();
+
+		if (fileReadFailed(_fileHandle))
+			break;
+
+		blocktype = fileReadWordLE();
+
+		numblock++;
+
+		switch (blocktype) {
+
+		case 0x4E52:	// 'NR'
+			fileSeek(_fileHandle, itemsize - 6, SEEK_CUR);
+			break;
+
+		case 0x5230:	// 'R0'
+			readResTypeList(rtRoom, MKID('ROOM'), "room");
+			break;
+
+		case 0x5330:	// 'S0'
+			readResTypeList(rtScript, MKID('SCRP'), "script");
+			break;
+
+		case 0x4E30:	// 'N0'
+			readResTypeList(rtSound, MKID('SOUN'), "sound");
+			break;
+
+		case 0x4330:	// 'C0'
+			readResTypeList(rtCostume, MKID('COST'), "costume");
+			break;
+
+		case 0x4F30:	// 'O0'
+			num = fileReadWordLE();
+			assert(num == _numGlobalObjects);
+			for (i = 0; i != num; i++) {
+				uint32 bits = fileReadByte();
+				byte tmp;
+				bits |= fileReadByte() << 8;
+				bits |= fileReadByte() << 16;
+				_classData[i] = bits;
+				tmp = fileReadByte();
+				_objectOwnerTable[i] = tmp & OF_OWNER_MASK;
+				_objectStateTable[i] = tmp >> OF_STATE_SHL;
+			}
+
+			break;
+
+		default:
+			error("Bad ID %c%c found in directory!", blocktype & 0xFF, blocktype >> 8);
+			return;
+		}
+	}
+
+	openRoom(-1);
+}
+
+void Scumm_v3::loadCharset(int no)
+{
+	uint32 size;
+	memset(_charsetData, 0, sizeof(_charsetData));
+
+	checkRange(4, 0, no, "Loading illegal charset %d");
+	openRoom(-1);
+
+	openRoom(98 + no);
+
+	size = fileReadWordLE();
+
+	fileRead(_fileHandle, createResource(6, no, size), size);
+	openRoom(-1);
+}