https://github.com/scummvm/scummvm
Tip revision: df7e13e84f3f9a3877afc0c07b3f00ceca6141eb authored by Robin Watts on 03 April 2010, 11:27:33 UTC
Updated README-WinCE.txt file. This is a late checkin, but can't affect
Updated README-WinCE.txt file. This is a late checkin, but can't affect
Tip revision: df7e13e
inter_playtoons.cpp
/* 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 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/endian.h"
#include "gui/message.h"
#include "gob/gob.h"
#include "gob/inter.h"
#include "gob/helper.h"
#include "gob/global.h"
#include "gob/util.h"
#include "gob/dataio.h"
#include "gob/draw.h"
#include "gob/game.h"
#include "gob/expression.h"
#include "gob/script.h"
#include "gob/hotspots.h"
#include "gob/palanim.h"
#include "gob/scenery.h"
#include "gob/video.h"
#include "gob/videoplayer.h"
#include "gob/save/saveload.h"
#include "gob/sound/sound.h"
namespace Gob {
#define OPCODEVER Inter_Playtoons
#define OPCODEDRAW(i, x) _opcodesDraw[i]._OPCODEDRAW(OPCODEVER, x)
#define OPCODEFUNC(i, x) _opcodesFunc[i]._OPCODEFUNC(OPCODEVER, x)
#define OPCODEGOB(i, x) _opcodesGob[i]._OPCODEGOB(OPCODEVER, x)
Inter_Playtoons::Inter_Playtoons(GobEngine *vm) : Inter_v6(vm) {
}
void Inter_Playtoons::setupOpcodesDraw() {
Inter_v6::setupOpcodesDraw();
// In the code, the Draw codes 0x00 to 0x06 and 0x13 are replaced by an engrish
// error message. As it's useless, they are simply cleared.
CLEAROPCODEDRAW(0x00);
CLEAROPCODEDRAW(0x01);
CLEAROPCODEDRAW(0x02);
CLEAROPCODEDRAW(0x03);
CLEAROPCODEDRAW(0x04);
CLEAROPCODEDRAW(0x05);
CLEAROPCODEDRAW(0x06);
CLEAROPCODEDRAW(0x13);
CLEAROPCODEDRAW(0x21);
CLEAROPCODEDRAW(0x22);
CLEAROPCODEDRAW(0x24);
OPCODEDRAW(0x19, oPlaytoons_getObjAnimSize);
OPCODEDRAW(0x20, oPlaytoons_CD_20_23);
OPCODEDRAW(0x23, oPlaytoons_CD_20_23);
OPCODEDRAW(0x25, oPlaytoons_CD_25);
OPCODEDRAW(0x60, oPlaytoons_copyFile);
OPCODEDRAW(0x85, oPlaytoons_openItk);
}
void Inter_Playtoons::setupOpcodesFunc() {
Inter_v6::setupOpcodesFunc();
CLEAROPCODEFUNC(0x3D);
OPCODEFUNC(0x0B, oPlaytoons_printText);
OPCODEFUNC(0x1B, oPlaytoons_F_1B);
OPCODEFUNC(0x24, oPlaytoons_putPixel);
OPCODEFUNC(0x27, oPlaytoons_freeSprite);
OPCODEFUNC(0x3F, oPlaytoons_checkData);
OPCODEFUNC(0x4D, oPlaytoons_readData);
}
void Inter_Playtoons::setupOpcodesGob() {
}
bool Inter_Playtoons::oPlaytoons_printText(OpFuncParams ¶ms) {
char buf[60];
int i;
int16 oldTransparency;
_vm->_draw->_destSpriteX = _vm->_game->_script->readValExpr();
_vm->_draw->_destSpriteY = _vm->_game->_script->readValExpr();
_vm->_draw->_backColor = _vm->_game->_script->readValExpr();
_vm->_draw->_frontColor = _vm->_game->_script->readValExpr();
_vm->_draw->_fontIndex = _vm->_game->_script->readValExpr();
_vm->_draw->_destSurface = 21;
_vm->_draw->_textToPrint = buf;
_vm->_draw->_transparency = 0;
if (_vm->_draw->_backColor == 16) {
_vm->_draw->_backColor = 0;
_vm->_draw->_transparency = 1;
}
// colMod is read from conf file (_off_=xxx).
// in Playtoons, it's not present in the conf file, thus always equal to the default value (0).
// Maybe used in ADIs...
// if (!_vm->_draw->_transparency)
// _vm->_draw->_backColor += colMod;
// _vm->_draw->_frontColor += colMod;
oldTransparency = _vm->_draw->_transparency;
do {
for (i = 0; (_vm->_game->_script->peekChar() != '.') &&
(_vm->_game->_script->peekByte() != 200); i++) {
buf[i] = _vm->_game->_script->readChar();
}
if (_vm->_game->_script->peekByte() != 200) {
_vm->_game->_script->skip(1);
switch (_vm->_game->_script->peekByte()) {
case TYPE_VAR_INT8:
case TYPE_ARRAY_INT8:
sprintf(buf + i, "%d",
(int8) READ_VARO_UINT8(_vm->_game->_script->readVarIndex()));
break;
case TYPE_VAR_INT16:
case TYPE_VAR_INT32_AS_INT16:
case TYPE_ARRAY_INT16:
sprintf(buf + i, "%d",
(int16) READ_VARO_UINT16(_vm->_game->_script->readVarIndex()));
break;
case TYPE_VAR_INT32:
case TYPE_ARRAY_INT32:
sprintf(buf + i, "%d",
VAR_OFFSET(_vm->_game->_script->readVarIndex()));
break;
case TYPE_VAR_STR:
case TYPE_ARRAY_STR:
sprintf(buf + i, "%s",
GET_VARO_STR(_vm->_game->_script->readVarIndex()));
break;
}
_vm->_game->_script->skip(1);
} else
buf[i] = 0;
if (_vm->_game->_script->peekByte() == 200) {
_vm->_draw->_spriteBottom = _vm->_draw->_fonts[_vm->_draw->_fontIndex]->getCharHeight();
_vm->_draw->_spriteRight = _vm->_draw->stringLength(_vm->_draw->_textToPrint, _vm->_draw->_fontIndex);
_vm->_draw->adjustCoords(1, &_vm->_draw->_spriteBottom, &_vm->_draw->_spriteRight);
if (_vm->_draw->_transparency == 0) {
_vm->_draw->spriteOperation(DRAW_FILLRECT);
_vm->_draw->_transparency = 1;
}
_vm->_draw->spriteOperation(DRAW_PRINTTEXT);
_vm->_draw->_transparency = oldTransparency;
i = 0;
} else
i = strlen(buf);
} while (_vm->_game->_script->peekByte() != 200);
_vm->_game->_script->skip(1);
return false;
}
bool Inter_Playtoons::oPlaytoons_F_1B(OpFuncParams ¶ms) {
_vm->_game->_hotspots->oPlaytoons_F_1B();
return false;
}
bool Inter_Playtoons::oPlaytoons_putPixel(OpFuncParams ¶ms) {
_vm->_draw->_destSurface = _vm->_game->_script->readInt16();
_vm->_draw->_destSpriteX = _vm->_game->_script->readValExpr();
_vm->_draw->_destSpriteY = _vm->_game->_script->readValExpr();
// _expression->printExpr(99);
_vm->_game->_script->readExpr(99, false);
//unk_var is always set to 0 in Playtoons
_vm->_draw->_frontColor = _vm->_game->_script->getResultInt() & 0xFFFF; // + unk_var;
_vm->_draw->_pattern = _vm->_game->_script->getResultInt()>>16;
_vm->_draw->spriteOperation(DRAW_PUTPIXEL);
return false;
}
bool Inter_Playtoons::oPlaytoons_freeSprite(OpFuncParams ¶ms) {
int16 index;
if (_vm->_game->_script->peekByte(1) == 0)
index = _vm->_game->_script->readInt16();
else
index = _vm->_game->_script->readValExpr();
_vm->_draw->freeSprite(index);
return false;
}
bool Inter_Playtoons::oPlaytoons_checkData(OpFuncParams ¶ms) {
int16 handle;
uint16 varOff;
int32 size;
char *backSlash;
SaveLoad::SaveMode mode;
_vm->_game->_script->evalExpr(0);
varOff = _vm->_game->_script->readVarIndex();
size = -1;
handle = 1;
char *file = _vm->_game->_script->getResultStr();
// WORKAROUND: In Playtoons games, some files are read on CD (and only on CD).
// In this case, "@:\" is replaced by the CD drive letter.
// As the files are copied on the HDD, those characters are skipped.
if (strncmp(file, "@:\\", 3) == 0) {
debugC(2, kDebugFileIO, "oPlaytoons_checkData: \"%s\" instead of \"%s\"", file + 3, file);
file += 3;
}
// WORKAROUND: In the Playtoons stick files found in german Addy 4, some paths are hardcoded
if ((backSlash = strrchr(file, '\\'))) {
debugC(2, kDebugFileIO, "oPlaytoons_checkData: \"%s\" instead of \"%s\"", backSlash + 1, file);
file = backSlash + 1;
}
mode = _vm->_saveLoad->getSaveMode(file);
if (mode == SaveLoad::kSaveModeNone) {
if (_vm->_dataIO->existData(file))
size = _vm->_dataIO->getDataSize(file);
else
warning("File \"%s\" not found", file);
} else if (mode == SaveLoad::kSaveModeSave)
size = _vm->_saveLoad->getSize(file);
else if (mode == SaveLoad::kSaveModeExists)
size = 23;
if (size == -1)
handle = -1;
debugC(2, kDebugFileIO, "Requested size of file \"%s\": %d",
file, size);
WRITE_VAR_OFFSET(varOff, handle);
WRITE_VAR(16, (uint32) size);
return false;
}
bool Inter_Playtoons::oPlaytoons_readData(OpFuncParams ¶ms) {
int32 retSize;
int32 size;
int32 offset;
uint16 dataVar;
int16 handle;
byte *buf;
SaveLoad::SaveMode mode;
_vm->_game->_script->evalExpr(0);
dataVar = _vm->_game->_script->readVarIndex();
size = _vm->_game->_script->readValExpr();
_vm->_game->_script->evalExpr(0);
offset = _vm->_game->_script->getResultInt();
retSize = 0;
char *file = _vm->_game->_script->getResultStr();
// WORKAROUND: In Playtoons games, some files are read on CD (and only on CD).
// In this case, "@:\" is replaced by the CD drive letter.
// As the files are copied on the HDD, those characters are skipped.
if (strncmp(file, "@:\\", 3) == 0) {
debugC(2, kDebugFileIO, "oPlaytoons_readData: \"%s\" instead of \"%s\"", file + 3, file);
file += 3;
}
debugC(2, kDebugFileIO, "Read from file \"%s\" (%d, %d bytes at %d)",
file, dataVar, size, offset);
mode = _vm->_saveLoad->getSaveMode(file);
if (mode == SaveLoad::kSaveModeSave) {
WRITE_VAR(1, 1);
if (!_vm->_saveLoad->load(file, dataVar, size, offset)) {
GUI::MessageDialog dialog("Failed to load game state from file.");
dialog.runModal();
} else
WRITE_VAR(1, 0);
return false;
} else if (mode == SaveLoad::kSaveModeIgnore)
return false;
if (size < 0) {
warning("Attempted to read a raw sprite from file \"%s\"",
file);
return false ;
} else if (size == 0) {
dataVar = 0;
size = _vm->_game->_script->getVariablesCount() * 4;
}
buf = _variables->getAddressOff8(dataVar);
if (file[0] == 0) {
WRITE_VAR(1, size);
return false;
}
WRITE_VAR(1, 1);
handle = _vm->_dataIO->openData(file);
if (handle < 0)
return false;
DataStream *stream = _vm->_dataIO->openAsStream(handle, true);
_vm->_draw->animateCursor(4);
if (offset < 0)
stream->seek(offset + 1, SEEK_END);
else
stream->seek(offset);
if (((dataVar >> 2) == 59) && (size == 4)) {
WRITE_VAR(59, stream->readUint32LE());
// The scripts in some versions divide through 256^3 then,
// effectively doing a LE->BE conversion
if ((_vm->getPlatform() != Common::kPlatformPC) && (VAR(59) < 256))
WRITE_VAR(59, SWAP_BYTES_32(VAR(59)));
} else
retSize = stream->read(buf, size);
if (retSize == size)
WRITE_VAR(1, 0);
delete stream;
return false;
}
void Inter_Playtoons::oPlaytoons_getObjAnimSize() {
int16 objIndex;
uint16 readVar[4];
uint8 i;
bool break_fl;
Mult::Mult_AnimData animData;
_vm->_game->_script->evalExpr(&objIndex);
for (i = 0; i < 4; i++)
readVar[i] = _vm->_game->_script->readVarIndex();
if (objIndex == -1) {
warning("oPlaytoons_getObjAnimSize case -1 not implemented");
return;
}
if (objIndex == -2) {
break_fl = false;
warning("oPlaytoons_getObjAnimSize case -2 not implemented");
return;
}
if ((objIndex < 0) || (objIndex >= _vm->_mult->_objCount)) {
warning("oPlaytoons_getObjAnimSize(): objIndex = %d (%d)", objIndex, _vm->_mult->_objCount);
_vm->_scenery->_toRedrawLeft = 0;
_vm->_scenery->_toRedrawTop = 0;
_vm->_scenery->_toRedrawRight = 0;
_vm->_scenery->_toRedrawBottom = 0;
} else {
animData = *(_vm->_mult->_objects[objIndex].pAnimData);
if (animData.isStatic == 0)
_vm->_scenery->updateAnim(animData.layer, animData.frame,
animData.animation, 0, *(_vm->_mult->_objects[objIndex].pPosX),
*(_vm->_mult->_objects[objIndex].pPosY), 0);
_vm->_scenery->_toRedrawLeft = MAX<int16>(_vm->_scenery->_toRedrawLeft, 0);
_vm->_scenery->_toRedrawTop = MAX<int16>(_vm->_scenery->_toRedrawTop , 0);
}
WRITE_VAR_OFFSET(readVar[0], _vm->_scenery->_toRedrawLeft);
WRITE_VAR_OFFSET(readVar[1], _vm->_scenery->_toRedrawTop);
WRITE_VAR_OFFSET(readVar[2], _vm->_scenery->_toRedrawRight);
WRITE_VAR_OFFSET(readVar[3], _vm->_scenery->_toRedrawBottom);
}
void Inter_Playtoons::oPlaytoons_CD_20_23() {
_vm->_game->_script->evalExpr(0);
}
void Inter_Playtoons::oPlaytoons_CD_25() {
_vm->_game->_script->readVarIndex();
_vm->_game->_script->readVarIndex();
}
void Inter_Playtoons::oPlaytoons_copyFile() {
char fileName1[128];
char fileName2[128];
_vm->_game->_script->evalExpr(0);
strncpy0(fileName1, _vm->_game->_script->getResultStr(), 127);
_vm->_game->_script->evalExpr(0);
strncpy0(fileName2, _vm->_game->_script->getResultStr(), 127);
warning("Playtoons Stub: copy file from \"%s\" to \"%s\"", fileName1, fileName2);
}
void Inter_Playtoons::oPlaytoons_openItk() {
char fileName[128];
char *backSlash;
_vm->_game->_script->evalExpr(0);
strncpy0(fileName, _vm->_game->_script->getResultStr(), 124);
if (!strchr(fileName, '.'))
strcat(fileName, ".ITK");
// Workaround for Bambou : In the script, the path is hardcoded (!!)
if ((backSlash = strrchr(fileName, '\\'))) {
debugC(2, kDebugFileIO, "Opening ITK file \"%s\" instead of \"%s\"", backSlash + 1, fileName);
_vm->_dataIO->openDataFile(backSlash + 1, true);
} else
_vm->_dataIO->openDataFile(fileName, true);
// All the other checks are meant to verify (if not found at the first try)
// if the file is present on the CD or not. As everything is supposed to
// be copied, those checks are skipped
}
} // End of namespace Gob