2002-03-25 08:51:34 +00:00
|
|
|
/* 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$
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
2002-03-25 08:46:24 +00:00
|
|
|
#include "stdafx.h"
|
|
|
|
#include "scumm.h"
|
2002-03-25 01:20:05 +00:00
|
|
|
|
|
|
|
|
|
|
|
void Scumm_v3::readIndexFile() {
|
2002-03-25 01:31:16 +00:00
|
|
|
uint16 blocktype;
|
|
|
|
uint32 itemsize;
|
|
|
|
int numblock = 0;
|
|
|
|
int num, i;
|
2002-03-25 01:20:05 +00:00
|
|
|
|
2002-03-25 01:31:16 +00:00
|
|
|
debug(9, "readIndexFile()");
|
2002-03-25 01:20:05 +00:00
|
|
|
|
2002-03-25 01:31:16 +00:00
|
|
|
openRoom(-1);
|
|
|
|
openRoom(0);
|
2002-03-25 01:20:05 +00:00
|
|
|
|
2002-03-25 01:31:16 +00:00
|
|
|
while (!fileEof(_fileHandle)) {
|
|
|
|
itemsize = fileReadDwordLE();
|
|
|
|
blocktype = fileReadWordLE();
|
|
|
|
if (fileReadFailed(_fileHandle))
|
|
|
|
break;
|
2002-03-25 01:20:05 +00:00
|
|
|
|
2002-03-25 01:31:16 +00:00
|
|
|
switch(blocktype) {
|
|
|
|
case 0x4E52:
|
|
|
|
fileReadWordLE();
|
|
|
|
break;
|
|
|
|
case 0x5230:
|
|
|
|
_numRooms = fileReadWordLE();
|
|
|
|
break;
|
|
|
|
case 0x5330:
|
|
|
|
_numScripts = fileReadWordLE();
|
|
|
|
break;
|
|
|
|
case 0x4E30:
|
|
|
|
_numSounds = fileReadWordLE();
|
|
|
|
break;
|
|
|
|
case 0x4330:
|
|
|
|
_numCostumes = fileReadWordLE();
|
|
|
|
break;
|
|
|
|
case 0x4F30:
|
|
|
|
_numGlobalObjects = fileReadWordLE();
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
fileSeek(_fileHandle, itemsize-8,SEEK_CUR);
|
|
|
|
}
|
|
|
|
|
|
|
|
clearFileReadFailed(_fileHandle);
|
|
|
|
fileSeek(_fileHandle, 0, SEEK_SET);
|
2002-03-25 01:20:05 +00:00
|
|
|
|
|
|
|
/* 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*)alloc(_shadowPaletteSize); // 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:
|
|
|
|
fileSeek(_fileHandle, itemsize-6,SEEK_CUR);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 0x5230:
|
|
|
|
readResTypeList(rtRoom,MKID('ROOM'),"room");
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 0x5330:
|
|
|
|
readResTypeList(rtScript,MKID('SCRP'),"script");
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 0x4E30:
|
|
|
|
readResTypeList(rtSound,MKID('SOUN'),"sound");
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 0x4330:
|
|
|
|
readResTypeList(rtCostume,MKID('COST'),"costume");
|
|
|
|
break;
|
|
|
|
|
|
|
|
case 0x4F30:
|
|
|
|
num = fileReadWordLE();
|
|
|
|
assert(num == _numGlobalObjects);
|
2002-04-11 15:22:02 +00:00
|
|
|
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;
|
2002-03-25 01:20:05 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
error("Bad ID %c%c found in directory!", blocktype&0xFF, blocktype>>8);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
openRoom(-1);
|
|
|
|
}
|
2002-03-25 02:09:05 +00:00
|
|
|
|
|
|
|
void Scumm_v3::loadCharset(int no){
|
2002-04-11 15:22:02 +00:00
|
|
|
uint32 size;
|
|
|
|
memset(_charsetData, 0, sizeof(_charsetData));
|
2002-04-04 23:02:02 +00:00
|
|
|
|
2002-03-25 02:09:05 +00:00
|
|
|
checkRange(4 ,0 ,no , "Loading illegal charset %d");
|
|
|
|
openRoom(-1);
|
|
|
|
|
|
|
|
openRoom(98+no);
|
|
|
|
|
|
|
|
size = fileReadWordLE();
|
|
|
|
|
|
|
|
fileRead(_fileHandle, createResource(6, no, size), size);
|
|
|
|
openRoom(-1);
|
|
|
|
}
|