/* ScummVM - Scumm Interpreter * Copyright (C) 2004 Ivan Dubrov * Copyright (C) 2004-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/endian.h" #include "common/stream.h" #include "gob/gob.h" #include "gob/game.h" #include "gob/global.h" #include "gob/util.h" #include "gob/dataio.h" #include "gob/draw.h" #include "gob/goblin.h" #include "gob/imd.h" #include "gob/inter.h" #include "gob/mult.h" #include "gob/parse.h" #include "gob/scenery.h" #include "gob/sound.h" #include "gob/video.h" namespace Gob { Game_v2::Game_v2(GobEngine *vm) : Game_v1(vm) { } void Game_v2::playTot(int16 skipPlay) { char savedTotName[20]; int16 *oldCaptureCounter; int16 *oldBreakFrom; int16 *oldNestLevel; int16 _captureCounter; int16 breakFrom; int16 nestLevel; int32 variablesCount; int32 totSize; char *filePtr; char *savedIP; bool totTextLoc; oldNestLevel = _vm->_inter->_nestLevel; oldBreakFrom = _vm->_inter->_breakFromLevel; oldCaptureCounter = _vm->_scenery->_pCaptureCounter; savedIP = _vm->_global->_inter_execPtr; _vm->_inter->_nestLevel = &nestLevel; _vm->_inter->_breakFromLevel = &breakFrom; _vm->_scenery->_pCaptureCounter = &_captureCounter; strcpy(savedTotName, _curTotFile); if (skipPlay <= 0) { while (!_vm->_quitRequested) { if (_vm->_global->_inter_variables != 0) _vm->_draw->animateCursor(4); if (skipPlay != -1) { _vm->_inter->initControlVars(1); for (int i = 0; i < 4; i++) { _vm->_draw->_fontToSprite[i].sprite = -1; _vm->_draw->_fontToSprite[i].base = -1; _vm->_draw->_fontToSprite[i].width = -1; _vm->_draw->_fontToSprite[i].height = -1; } _vm->_mult->initAll(); _vm->_mult->zeroMultData(); _vm->_draw->_spritesArray[20] = _vm->_draw->_frontSurface; _vm->_draw->_spritesArray[21] = _vm->_draw->_backSurface; _vm->_draw->_cursorSpritesBack = _vm->_draw->_cursorSprites; } else _vm->_inter->initControlVars(0); _totTextData = 0; _totResourceTable = 0; _imFileData = 0; _extTable = 0; _extHandle = -1; _totToLoad[0] = 0; if ((_curTotFile[0] == 0) && (_totFileData == 0)) break; totSize = loadTotFile(_curTotFile); if (_totFileData == 0) { _vm->_draw->blitCursor(); _vm->_inter->_terminate = 2; break; } if (skipPlay == -2) skipPlay = 0; strcpy(_curImaFile, _curTotFile); strcpy(_curExtFile, _curTotFile); _curImaFile[strlen(_curImaFile) - 4] = 0; strcat(_curImaFile, ".ima"); _curExtFile[strlen(_curExtFile) - 4] = 0; strcat(_curExtFile, ".ext"); debugC(4, kDebugFileIO, "IMA: %s", _curImaFile); debugC(4, kDebugFileIO, "EXT: %s", _curExtFile); filePtr = (char *) _totFileData + 0x30; _totTextData = 0; totTextLoc = false; if (READ_LE_UINT32(filePtr) != (uint32) -1) { _totTextData = new TotTextTable; if (READ_LE_UINT32(filePtr) == 0) { _totTextData->dataPtr = loadLocTexts(); totTextLoc = true; } else { _totTextData->dataPtr = (_totFileData + READ_LE_UINT32((char *) _totFileData + 0x30)); _vm->_global->_language = _vm->_global->_languageWanted; } _totTextData->items = 0; if (_totTextData->dataPtr != 0) { Common::MemoryReadStream totTextData((byte *) _totTextData->dataPtr, 4294967295U); _totTextData->itemsCount = totTextData.readSint16LE(); _totTextData->items = new TotTextItem[_totTextData->itemsCount]; for (int i = 0; i < _totTextData->itemsCount; ++i) { _totTextData->items[i].offset = totTextData.readSint16LE(); _totTextData->items[i].size = totTextData.readSint16LE(); } } } filePtr = (char *) _totFileData + 0x34; _totResourceTable = 0; int32 resSize; if (READ_LE_UINT32(filePtr) != (uint32) -1) { _totResourceTable = new TotResTable; _totResourceTable->dataPtr = _totFileData + READ_LE_UINT32((char *) _totFileData + 0x34); Common::MemoryReadStream totResTable((byte *) _totResourceTable->dataPtr, 4294967295U); _totResourceTable->itemsCount = totResTable.readSint16LE(); resSize = _totResourceTable->itemsCount * szGame_TotResItem + szGame_TotResTable; if (totSize > (resSize + 0x34)) { _totResourceTable->unknown = totResTable.readByte(); _totResourceTable->items = new TotResItem[_totResourceTable->itemsCount]; for (int i = 0; i < _totResourceTable->itemsCount; ++i) { _totResourceTable->items[i].offset = totResTable.readSint32LE(); _totResourceTable->items[i].size = totResTable.readSint16LE(); _totResourceTable->items[i].width = totResTable.readSint16LE(); _totResourceTable->items[i].height = totResTable.readSint16LE(); } } else { // WORKAROUND: In the original asm, _totResourceTable is // only assigned in playTot and evaluated later, right // before using it. In the Gobliins 2 demo, there is a // dummy tot that loads another tot, overwriting the dummy // pointer with the real one. debugC(1, kDebugFileIO, "Attempted to load invalid resource table (size = %d, totSize = %d)", resSize, totSize); delete _totResourceTable; _totResourceTable = 0; } } loadImFile(); loadExtTable(); _vm->_global->_inter_animDataSize = READ_LE_UINT16((char *) _totFileData + 0x38); if (_vm->_global->_inter_variables == 0) { variablesCount = READ_LE_UINT16((char *) _totFileData + 0x2C); _vm->_global->_inter_variables = new char[variablesCount * 4]; _vm->_global->_inter_variablesSizes = new byte[variablesCount * 4]; _vm->_global->clearVars(variablesCount); } _vm->_global->_inter_execPtr = (char *) _totFileData; _vm->_global->_inter_execPtr += READ_LE_UINT32((char *) _totFileData + 0x64); _vm->_inter->renewTimeInVars(); WRITE_VAR(13, _vm->_global->_useMouse); WRITE_VAR(14, _vm->_global->_soundFlags); WRITE_VAR(15, _vm->_global->_fakeVideoMode); WRITE_VAR(16, _vm->_global->_language); _vm->_inter->callSub(2); if (_totToLoad[0] != 0) _vm->_inter->_terminate = 0; variablesCount = READ_LE_UINT32((char *) _totFileData + 0x2C); _vm->_draw->blitInvalidated(); delete[] _totFileData; _totFileData = 0; if (_totTextData) { delete[] _totTextData->items; if (totTextLoc) delete[] _totTextData->dataPtr; delete _totTextData; } _totTextData = 0; if (_totResourceTable) { delete[] _totResourceTable->items; delete _totResourceTable; } _totResourceTable = 0; delete[] _imFileData; _imFileData = 0; if (_extTable) delete[] _extTable->items; delete _extTable; _extTable = 0; if (_extHandle >= 0) _vm->_dataIO->closeData(_extHandle); _extHandle = -1; for (int i = 0; i < *_vm->_scenery->_pCaptureCounter; i++) capturePop(0); if (skipPlay != -1) { _vm->_goblin->freeObjects(); _vm->_snd->stopSound(0); for (int i = 0; i < 60; i++) if (_soundSamples[i].getType() == SOUND_SND) _vm->_snd->freeSample(_soundSamples[i]); } _vm->_imdPlayer->closeImd(); if (_totToLoad[0] == 0) break; strcpy(_curTotFile, _totToLoad); } } else { _vm->_inter->initControlVars(0); _vm->_scenery->_pCaptureCounter = oldCaptureCounter; _vm->_global->_inter_execPtr = (char *) _totFileData; _vm->_global->_inter_execPtr += READ_LE_UINT16(_totFileData + (skipPlay << 1) + 0x66); _vm->_inter->callSub(2); if (_vm->_inter->_terminate != 0) _vm->_inter->_terminate = 2; } strcpy(_curTotFile, savedTotName); _vm->_inter->_nestLevel = oldNestLevel; _vm->_inter->_breakFromLevel = oldBreakFrom; _vm->_scenery->_pCaptureCounter = oldCaptureCounter; _vm->_global->_inter_execPtr = savedIP; } void Game_v2::clearCollisions() { _lastCollKey = 0; for (int i = 0; i < 150; i++) _collisionAreas[i].left = -1; } int16 Game_v2::addNewCollision(int16 id, int16 left, int16 top, int16 right, int16 bottom, int16 flags, int16 key, uint16 funcEnter, uint16 funcLeave) { Collision *ptr; debugC(5, kDebugCollisions, "addNewCollision"); debugC(5, kDebugCollisions, "id = %X", id); debugC(5, kDebugCollisions, "left = %d, top = %d, right = %d, bottom = %d", left, top, right, bottom); debugC(5, kDebugCollisions, "flags = %X, key = %X", flags, key); debugC(5, kDebugCollisions, "funcEnter = %d, funcLeave = %d", funcEnter, funcLeave); for (int i = 0; i < 150; i++) { if ((_collisionAreas[i].left != -1) && (_collisionAreas[i].id != id)) continue; ptr = &_collisionAreas[i]; ptr->id = id; ptr->left = left; ptr->top = top; ptr->right = right; ptr->bottom = bottom; ptr->flags = flags; ptr->key = key; ptr->funcEnter = funcEnter; ptr->funcLeave = funcLeave; ptr->funcSub = 0; return i; } error("addNewCollision: Collision array full!\n"); return 0; } void Game_v2::pushCollisions(char all) { Collision *srcPtr; Collision *destPtr; int16 size; debugC(1, kDebugCollisions, "pushCollisions"); for (size = 0, srcPtr = _collisionAreas; srcPtr->left != -1; srcPtr++) if (all || (((uint16) srcPtr->id) >= 20)) size++; destPtr = new Collision[size]; _collStack[_collStackSize] = destPtr; if (_vm->_inter->_terminate) return; _collStackElemSizes[_collStackSize] = size; if (_shouldPushColls != 0) _collStackElemSizes[_collStackSize] |= 0x8000; _shouldPushColls = 0; _collLasts[_collStackSize].key = _lastCollKey; _collLasts[_collStackSize].id = _lastCollId; _collLasts[_collStackSize].areaIndex = _lastCollAreaIndex; _lastCollKey = 0; _lastCollId = 0; _lastCollAreaIndex = 0; _collStackSize++; for (srcPtr = _collisionAreas; srcPtr->left != -1; srcPtr++) { if (all || (((uint16) srcPtr->id) >= 20)) { memcpy(destPtr, srcPtr, sizeof(Collision)); srcPtr->left = -1; destPtr++; } } } void Game_v2::popCollisions(void) { Collision *destPtr; Collision *srcPtr; debugC(1, kDebugCollisions, "popCollision"); _collStackSize--; _shouldPushColls = _collStackElemSizes[_collStackSize] & 0x8000 ? 1 : 0; _collStackElemSizes[_collStackSize] &= 0x7FFF; _lastCollKey = _collLasts[_collStackSize].key; _lastCollId = _collLasts[_collStackSize].id; _lastCollAreaIndex = _collLasts[_collStackSize].areaIndex; for (destPtr = _collisionAreas; destPtr->left != -1; destPtr++); srcPtr = _collStack[_collStackSize]; memcpy(destPtr, srcPtr, _collStackElemSizes[_collStackSize] * sizeof(Collision)); delete[] _collStack[_collStackSize]; } int16 Game_v2::checkCollisions(char handleMouse, int16 deltaTime, int16 *pResId, int16 *pResIndex) { int16 resIndex; int16 key; int16 oldIndex; int16 oldId; int16 newkey; uint32 timeKey; if (deltaTime >= -1) { _lastCollKey = 0; _lastCollAreaIndex = 0; _lastCollId = 0; } if (pResId != 0) *pResId = 0; resIndex = 0; if ((_vm->_draw->_cursorIndex == -1) && (handleMouse != 0) && (_lastCollKey == 0)) { _lastCollKey = checkMousePoint(1, &_lastCollId, &_lastCollAreaIndex); if ((_lastCollKey != 0) && (_lastCollId & 0x8000)) collAreaSub(_lastCollAreaIndex, 1); } if (handleMouse != 0) _vm->_draw->animateCursor(-1); timeKey = _vm->_util->getTimeKey(); while (1) { if (_vm->_inter->_terminate || _vm->_quitRequested) { if (handleMouse) _vm->_draw->blitCursor(); return 0; } if (!_vm->_draw->_noInvalidated) { if (handleMouse != 0) _vm->_draw->animateCursor(-1); else _vm->_draw->blitInvalidated(); _vm->_video->waitRetrace(); } key = checkKeys(&_vm->_global->_inter_mouseX, &_vm->_global->_inter_mouseY, &_mouseButtons, handleMouse); if ((handleMouse == 0) && (_mouseButtons != 0)) { _vm->_util->waitMouseRelease(0); key = 3; } if (key != 0) { if (handleMouse & 1) _vm->_draw->blitCursor(); if (pResId != 0) *pResId = 0; if (pResIndex != 0) *pResIndex = 0; if (_lastCollKey != 0) collAreaSub(_lastCollAreaIndex, 0); _lastCollKey = 0; if (key != 0) return key; } if (handleMouse != 0) { if (_mouseButtons != 0) { if (deltaTime > 0) { _vm->_draw->animateCursor(2); _vm->_util->delay(deltaTime); } else if (handleMouse & 1) _vm->_util->waitMouseRelease(1); _vm->_draw->animateCursor(-1); if (pResId != 0) *pResId = 0; key = checkMousePoint(0, pResId, &resIndex); if (pResIndex != 0) *pResIndex = resIndex; if ((key != 0) || ((pResId != 0) && (*pResId != 0))) { if ((handleMouse & 1) && ((deltaTime <= 0) || (_mouseButtons == 0))) _vm->_draw->blitCursor(); if ((_lastCollKey != 0) && (key != _lastCollKey)) collAreaSub(_lastCollAreaIndex, 0); _lastCollKey = 0; return key; } if (handleMouse & 4) return 0; if (_lastCollKey != 0) collAreaSub(_lastCollAreaIndex, 0); _lastCollKey = checkMousePoint(1, &_lastCollId, &_lastCollAreaIndex); if ((_lastCollKey != 0) && (_lastCollId & 0x8000)) collAreaSub(_lastCollAreaIndex, 1); } else if ((_vm->_global->_inter_mouseX != _vm->_draw->_cursorX) || (_vm->_global->_inter_mouseY != _vm->_draw->_cursorY)) { oldIndex = _lastCollAreaIndex; oldId = _lastCollId; newkey = checkMousePoint(1, &_lastCollId, &_lastCollAreaIndex); if (newkey != _lastCollKey) { if ((_lastCollKey != 0) && (oldId & 0x8000)) collAreaSub(oldIndex, 0); _lastCollKey = newkey; if ((newkey != 0) && (_lastCollId & 0x8000)) collAreaSub(_lastCollAreaIndex, 1); } } } if ((deltaTime < 0) && (key == 0) && (_mouseButtons == 0)) { uint32 curtime = _vm->_util->getTimeKey(); if ((curtime + deltaTime) > timeKey) { if (pResId != 0) *pResId = 0; if (pResIndex != 0) *pResIndex = 0; return 0; } } if (handleMouse != 0) _vm->_draw->animateCursor(-1); _vm->_util->delay(10); } } void Game_v2::prepareStart(void) { clearCollisions(); _vm->_global->_pPaletteDesc->unused2 = _vm->_draw->_unusedPalette2; _vm->_global->_pPaletteDesc->unused1 = _vm->_draw->_unusedPalette1; _vm->_global->_pPaletteDesc->vgaPal = _vm->_draw->_vgaPalette; _vm->_video->setFullPalette(_vm->_global->_pPaletteDesc); _vm->_draw->initScreen(); _vm->_video->fillRect(_vm->_draw->_frontSurface, 0, 0, _vm->_video->_surfWidth - 1, _vm->_video->_surfHeight - 1, 1); _vm->_util->setMousePos(152, 92); _vm->_draw->_cursorX = _vm->_global->_inter_mouseX = 152; _vm->_draw->_cursorY = _vm->_global->_inter_mouseY = 92; _vm->_draw->_invalidatedCount = 0; _vm->_draw->_noInvalidated = true; _vm->_draw->_applyPal = false; _vm->_draw->_paletteCleared = false; _vm->_draw->_cursorWidth = 16; _vm->_draw->_cursorHeight = 16; _vm->_draw->_transparentCursor = 1; for (int i = 0; i < 40; i++) { _vm->_draw->_cursorAnimLow[i] = -1; _vm->_draw->_cursorAnimDelays[i] = 0; _vm->_draw->_cursorAnimHigh[i] = 0; } _vm->_draw->_renderFlags = 0; _vm->_draw->_backDeltaX = 0; _vm->_draw->_backDeltaY = 0; _startTimeKey = _vm->_util->getTimeKey(); } void Game_v2::collisionsBlock(void) { InputDesc descArray[20]; int16 array[250]; byte count; int16 collResId; char *startIP; int16 curCmd; int16 cmd; int16 cmdHigh; int16 key; int16 flags; int16 left; int16 top; int16 width; int16 height; int16 var_1C; int16 index; int16 curEditIndex; int16 deltaTime; int16 stackPos2; int16 descIndex; int16 timeVal; int16 offsetIP; int16 collId; char *str; int16 i; int16 counter; int16 var_24; int16 var_26; int16 collStackPos; Collision *collPtr; Collision *collArea; int16 timeKey; char *savedIP; if (_shouldPushColls) pushCollisions(0); collArea = _collisionAreas; while (collArea->left != -1) collArea++; _shouldPushColls = 0; collResId = -1; _vm->_global->_inter_execPtr++; count = *_vm->_global->_inter_execPtr++; _handleMouse = _vm->_global->_inter_execPtr[0]; deltaTime = 1000 * (byte) _vm->_global->_inter_execPtr[1]; stackPos2 = (byte) _vm->_global->_inter_execPtr[3]; descIndex = (byte) _vm->_global->_inter_execPtr[4]; if ((stackPos2 != 0) || (descIndex != 0)) deltaTime /= 100; timeVal = deltaTime; _vm->_global->_inter_execPtr += 6; startIP = _vm->_global->_inter_execPtr; WRITE_VAR(16, 0); var_1C = 0; index = 0; curEditIndex = 0; for (curCmd = 0; curCmd < count; curCmd++) { array[curCmd] = 0; cmd = (byte) *_vm->_global->_inter_execPtr++; if ((cmd & 0x40) != 0) { cmd -= 0x40; cmdHigh = (byte) *_vm->_global->_inter_execPtr; _vm->_global->_inter_execPtr++; cmdHigh <<= 8; } else cmdHigh = 0; if ((cmd & 0x80) != 0) { offsetIP = _vm->_global->_inter_execPtr - (char *) _totFileData; left = _vm->_parse->parseValExpr(); top = _vm->_parse->parseValExpr(); width = _vm->_parse->parseValExpr(); height = _vm->_parse->parseValExpr(); } else { offsetIP = 0; left = _vm->_inter->load16(); top = _vm->_inter->load16(); width = _vm->_inter->load16(); height = _vm->_inter->load16(); } if ((_vm->_draw->_renderFlags & RENDERFLAG_CAPTUREPOP) && (left != -1)) { left += _vm->_draw->_backDeltaX; top += _vm->_draw->_backDeltaY; } if (left != -1) { _vm->_draw->adjustCoords(0, &left, &top); if (((cmd & 0x3F) < 20) && ((cmd & 0x3F) >= 3)) { if (_vm->_draw->_needAdjust != 2) height &= 0xFFFE; _vm->_draw->adjustCoords(0, 0, &width); } else _vm->_draw->adjustCoords(0, &height, &width); } cmd &= 0x7F; debugC(1, kDebugCollisions, "collisionsBlock(%d)", cmd); switch (cmd) { case 0: _vm->_global->_inter_execPtr += 6; startIP = _vm->_global->_inter_execPtr; _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); key = curCmd + 0xA000; collId = addNewCollision(curCmd + 0x8000, left, top, left + width - 1, top + height - 1, cmd + cmdHigh, key, startIP - (char *) _totFileData, _vm->_global->_inter_execPtr - (char *) _totFileData); _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); _collisionAreas[collId].funcSub = offsetIP; break; case 1: key = _vm->_inter->load16(); array[curCmd] = _vm->_inter->load16(); flags = _vm->_inter->load16(); startIP = _vm->_global->_inter_execPtr; _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); if (key == 0) key = curCmd + 0xA000; collId = addNewCollision(curCmd + 0x8000, left, top, left + width - 1, top + height - 1, (flags << 4) + cmd + cmdHigh, key, startIP - (char *) _totFileData, _vm->_global->_inter_execPtr - (char *) _totFileData); _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); _collisionAreas[collId].funcSub = offsetIP; break; case 3: case 4: case 5: case 6: case 7: case 8: case 9: case 10: _vm->_util->clearKeyBuf(); var_1C = 1; key = _vm->_parse->parseVarIndex(); descArray[index].fontIndex = _vm->_inter->load16(); descArray[index].backColor = *_vm->_global->_inter_execPtr++; descArray[index].frontColor = *_vm->_global->_inter_execPtr++; if ((cmd >= 5) && (cmd <= 8)) { descArray[index].ptr = _vm->_global->_inter_execPtr + 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr) + 2; } else descArray[index].ptr = 0; if (left == -1) { if ((cmd & 1) == 0) { _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); } break; } if ((cmd & 1) == 0) { addNewCollision(curCmd + 0x8000, left, top, left + width * _vm->_draw->_fonts[descArray[index].fontIndex]-> itemWidth - 1, top + height - 1, cmd, key, 0, _vm->_global->_inter_execPtr - (char *) _totFileData); _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); } else addNewCollision(curCmd + 0x8000, left, top, left + width * _vm->_draw->_fonts[descArray[index].fontIndex]-> itemWidth - 1, top + height - 1, cmd, key, 0, 0); index++; break; case 11: _vm->_global->_inter_execPtr += 6; for (i = 0; i < 150; i++) { if ((_collisionAreas[i].id & 0xF000) == 0xE000) { _collisionAreas[i].id &= 0xBFFF; _collisionAreas[i].funcEnter = _vm->_global->_inter_execPtr - (char *) _totFileData; _collisionAreas[i].funcLeave = _vm->_global->_inter_execPtr - (char *) _totFileData; } } _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); break; case 12: _vm->_global->_inter_execPtr += 6; for (i = 0; i < 150; i++) { if ((_collisionAreas[i].id & 0xF000) == 0xD000) { _collisionAreas[i].id &= 0xBFFF; _collisionAreas[i].funcEnter = _vm->_global->_inter_execPtr - (char *) _totFileData; _collisionAreas[i].funcLeave = _vm->_global->_inter_execPtr - (char *) _totFileData; } } _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); break; case 20: collResId = curCmd; // Fall through to case 2 case 2: key = _vm->_inter->load16(); array[curCmd] = _vm->_inter->load16(); flags = _vm->_inter->load16(); collId = addNewCollision(curCmd + 0x8000, left, top, left + width - 1, top + height - 1, (flags << 4) + cmdHigh + 2, key, 0, _vm->_global->_inter_execPtr - (char *) _totFileData); _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); _collisionAreas[collId].funcSub = offsetIP; break; case 21: key = _vm->_inter->load16(); array[curCmd] = _vm->_inter->load16(); flags = _vm->_inter->load16() & 3; collId = addNewCollision(curCmd + 0x8000, left, top, left + width - 1, top + height - 1, (flags << 4) + cmdHigh + 2, key, _vm->_global->_inter_execPtr - (char *) _totFileData, 0); _vm->_global->_inter_execPtr += 2; _vm->_global->_inter_execPtr += READ_LE_UINT16(_vm->_global->_inter_execPtr); _collisionAreas[collId].funcSub = offsetIP; break; } } _forceHandleMouse = 0; _vm->_util->clearKeyBuf(); do { if (var_1C != 0) { key = multiEdit(deltaTime, index, &curEditIndex, descArray, &_activeCollResId, &_activeCollIndex); WRITE_VAR(55, curEditIndex); if (key == 0x1C0D) { for (i = 0; i < 150; i++) { if (_collisionAreas[i].left == -1) break; if ((_collisionAreas[i].id & 0xC000) != 0x8000) continue; if ((_collisionAreas[i].flags & 1) != 0) continue; if ((_collisionAreas[i].flags & 0x0F) <= 2) continue; _activeCollResId = _collisionAreas[i].id; collResId = _collisionAreas[i].id & 0x7FFF; _activeCollIndex = i; break; } break; } } else key = checkCollisions(_handleMouse, -deltaTime, &_activeCollResId, &_activeCollIndex); if (((key & 0xFF) >= ' ') && ((key & 0xFF) <= 0xFF) && ((key >> 8) > 1) && ((key >> 8) < 12)) key = '0' + (((key >> 8) - 1) % 10) + (key & 0xFF00); if (_activeCollResId == 0) { if (key != 0) { for (i = 0; i < 150; i++) { if (_collisionAreas[i].left == -1) break; if ((_collisionAreas[i].id & 0xC000) != 0x8000) continue; if ((_collisionAreas[i].key == key) || (_collisionAreas[i].key == 0x7FFF)) { _activeCollResId = _collisionAreas[i].id; _activeCollIndex = i; break; } } if (_activeCollResId == 0) { for (i = 0; i < 150; i++) { if (_collisionAreas[i].left == -1) break; if ((_collisionAreas[i].id & 0xC000) != 0x8000) continue; if ((_collisionAreas[i].key & 0xFF00) != 0) continue; if (_collisionAreas[i].key == 0) continue; if ((adjustKey(key & 0xFF) == adjustKey(_collisionAreas[i].key)) || (_collisionAreas[i].key == 0x7FFF)) { _activeCollResId = _collisionAreas[i].id; _activeCollIndex = i; break; } } } } else if (deltaTime != 0) { if (stackPos2 != 0) { collStackPos = 0; for (i = 0, collPtr = collArea; collPtr->left != -1; i++, collPtr++) { if ((collPtr->id & 0xF000) != 0x8000) continue; collStackPos++; if (collStackPos != stackPos2) continue; _activeCollResId = collPtr->id; _activeCollIndex = i; _vm->_inter->storeMouse(); if (VAR(16) != 0) break; if ((_activeCollResId & 0xF000) == 0x8000) WRITE_VAR(16, array[_activeCollResId & 0xFFF]); else WRITE_VAR(16, _activeCollResId & 0xFFF); if (collPtr->funcLeave != 0) { int16 collResIdBak = _activeCollResId; int16 collIndexBak = _activeCollIndex; timeKey = _vm->_util->getTimeKey(); collSub(collPtr->funcLeave); _activeCollResId = collResIdBak; _activeCollIndex = collIndexBak; _vm->_inter->animPalette(); deltaTime = timeVal - (_vm->_util->getTimeKey() - timeKey); if (deltaTime < 2) deltaTime = 2; if (deltaTime > timeVal) deltaTime = timeVal; } if (VAR(16) == 0) _activeCollResId = 0; break; } } else { if (descIndex != 0) { counter = 0; for (i = 0, collPtr = collArea; collPtr->left != -1; i++, collPtr++) { if ((collPtr->id & 0xF000) == 0x8000) if (++counter == descIndex) { _activeCollResId = collPtr->id; _activeCollIndex = i; break; } } } else { for (i = 0, collPtr = _collisionAreas; collPtr->left != -1; i++, collPtr++) { if ((collPtr->id & 0xF000) == 0x8000) { _activeCollResId = collPtr->id; _activeCollIndex = i; break; } } if ((_lastCollKey != 0) && (_collisionAreas[_lastCollAreaIndex].funcLeave != 0)) collSub(_collisionAreas[_lastCollAreaIndex].funcLeave); _lastCollKey = 0; } } } } if ((_activeCollResId == 0) || (_collisionAreas[_activeCollIndex].funcLeave != 0)) continue; _vm->_inter->storeMouse(); if ((_activeCollResId & 0xF000) == 0x8000) WRITE_VAR(16, array[_activeCollResId & 0xFFF]); else WRITE_VAR(16, _activeCollResId & 0xFFF); if (_collisionAreas[_activeCollIndex].funcEnter != 0) collSub(_collisionAreas[_activeCollIndex].funcEnter); WRITE_VAR(16, 0); _activeCollResId = 0; } while ((_activeCollResId == 0) && !_vm->_inter->_terminate && !_vm->_quitRequested); if ((_activeCollResId & 0xFFF) == collResId) { collStackPos = 0; var_24 = 0; var_26 = 1; for (i = 0; i < 150; i++) { if (_collisionAreas[i].left == -1) continue; if ((_collisionAreas[i].id & 0xC000) == 0x8000) continue; if ((_collisionAreas[i].flags & 0x0F) < 3) continue; if ((_collisionAreas[i].flags & 0x0F) > 10) continue; if ((_collisionAreas[i].flags & 0x0F) > 8) { char *ptr; strncpy0(_tempStr, GET_VARO_STR(_collisionAreas[i].key), 255); while ((ptr = strchr(_tempStr, ' '))) _vm->_util->cutFromStr(_tempStr, (ptr - _tempStr), 1); if (_vm->_language == 2) while ((ptr = strchr(_tempStr, '.'))) *ptr = ','; WRITE_VARO_STR(_collisionAreas[i].key, _tempStr); } if (((_collisionAreas[i].flags & 0x0F) >= 5) && ((_collisionAreas[i].flags & 0x0F) <= 8)) { str = descArray[var_24].ptr; strncpy0(_tempStr, GET_VARO_STR(_collisionAreas[i].key), 255); if ((_collisionAreas[i].flags & 0x0F) < 7) _vm->_util->prepareStr(_tempStr); int16 pos = 0; do { strncpy0(_collStr, str, 255); pos += strlen(str) + 1; str += strlen(str) + 1; if ((_collisionAreas[i].flags & 0x0F) < 7) _vm->_util->prepareStr(_collStr); if (strcmp(_tempStr, _collStr) == 0) { VAR(17)++; WRITE_VAR(17 + var_26, 1); break; } } while (READ_LE_UINT16(descArray[var_24].ptr - 2) > pos); collStackPos++; } else { VAR(17 + var_26) = 2; } var_24++; var_26++; } if (collStackPos != (int16) VAR(17)) WRITE_VAR(17, 0); else WRITE_VAR(17, 1); } if (_handleMouse == 1) _vm->_draw->blitCursor(); savedIP = 0; if (!_vm->_inter->_terminate) { savedIP = (char *) _totFileData + _collisionAreas[_activeCollIndex].funcLeave; _vm->_inter->storeMouse(); if (VAR(16) == 0) { if ((_activeCollResId & 0xF000) == 0x8000) WRITE_VAR(16, array[_activeCollResId & 0xFFF]); else WRITE_VAR(16, _activeCollResId & 0xFFF); } } for (curCmd = 0; curCmd < count; curCmd++) freeCollision(curCmd + 0x8000); for (i = 0; i < 150; i++) { if (((_collisionAreas[i].id & 0xF000) == 0xA000) || ((_collisionAreas[i].id & 0xF000) == 0x9000)) _collisionAreas[i].id |= 0x4000; } _vm->_global->_inter_execPtr = savedIP; } int16 Game_v2::multiEdit(int16 time, int16 index, int16 *pCurPos, InputDesc * inpDesc, int16 *collResId, int16 *collIndex) { Collision *collArea; int16 descInd; int16 key; int16 found = -1; int16 i; void *fontExtraBak; int16 needAdjust; descInd = 0; for (i = 0; i < 150; i++) { collArea = &_collisionAreas[i]; if (collArea->left == -1) continue; if ((collArea->id & 0xC000) != 0x8000) continue; if ((collArea->flags & 0x0F) < 3) continue; if ((collArea->flags & 0x0F) > 10) continue; strncpy0(_tempStr, GET_VARO_STR(collArea->key), 255); _vm->_draw->_destSpriteX = collArea->left; _vm->_draw->_destSpriteY = collArea->top; _vm->_draw->_spriteRight = collArea->right - collArea->left + 1; _vm->_draw->_spriteBottom = collArea->bottom - collArea->top + 1; _vm->_draw->_destSurface = 21; _vm->_draw->_backColor = inpDesc[descInd].backColor; _vm->_draw->_frontColor = inpDesc[descInd].frontColor; _vm->_draw->_textToPrint = _tempStr; _vm->_draw->_transparency = 1; _vm->_draw->_fontIndex = inpDesc[descInd].fontIndex; fontExtraBak = _vm->_draw->_fonts[_vm->_draw->_fontIndex]->extraData; needAdjust = _vm->_draw->_needAdjust; _vm->_draw->_needAdjust = 2; _vm->_draw->_fonts[_vm->_draw->_fontIndex]->extraData = 0; _vm->_draw->spriteOperation(DRAW_FILLRECT | 0x10); _vm->_draw->_destSpriteY += ((collArea->bottom - collArea->top + 1) - _vm->_draw->_fonts[_vm->_draw->_fontIndex]->itemHeight) / 2; _vm->_draw->spriteOperation(DRAW_PRINTTEXT | 0x10); _vm->_draw->_needAdjust = needAdjust; _vm->_draw->_fonts[_vm->_draw->_fontIndex]->extraData = fontExtraBak; descInd++; } for (i = 0; i < 40; i++) WRITE_VAR_OFFSET(i * 4 + 0x44, 0); while (1) { descInd = 0; for (i = 0; i < 150; i++) { collArea = &_collisionAreas[i]; if (collArea->left == -1) continue; if ((collArea->id & 0xC000) != 0x8000) continue; if ((collArea->flags & 0x0F) < 3) continue; if ((collArea->flags & 0x0F) > 10) continue; if (descInd == *pCurPos) { found = i; break; } descInd++; } assert(found != -1); collArea = &_collisionAreas[found]; key = inputArea(collArea->left, collArea->top, collArea->right - collArea->left + 1, collArea->bottom - collArea->top + 1, inpDesc[*pCurPos].backColor, inpDesc[*pCurPos].frontColor, GET_VARO_STR(collArea->key), inpDesc[*pCurPos].fontIndex, collArea->flags, &time, collResId, collIndex); if (_vm->_inter->_terminate) return 0; switch (key) { case 0: if (*collResId == 0) return 0; if (_mouseButtons != 0) { for (collArea = _collisionAreas, i = 0; collArea->left != -1; collArea++, i++) { if ((collArea->flags & 0xF00)) continue; if ((collArea->id & 0x4000)) continue; if ((collArea->left > _vm->_global->_inter_mouseX) || (collArea->right < _vm->_global->_inter_mouseX) || (collArea->top > _vm->_global->_inter_mouseY) || (collArea->bottom < _vm->_global->_inter_mouseY)); continue; if ((collArea->id & 0xF000)) continue; if ((collArea->flags & 0x0F) < 3) continue; if ((collArea->flags & 0x0F) > 10) continue; *collIndex = i; } } if ((_collisionAreas[*collIndex].flags & 0x0F) < 3) return 0; if ((_collisionAreas[*collIndex].flags & 0x0F) > 10) return 0; *pCurPos = 0; for (i = 0; i < 150; i++) { collArea = &_collisionAreas[i]; if (collArea->left == -1) continue; if ((collArea->id & 0xC000) != 0x8000) continue; if ((collArea->flags & 0x0F) < 3) continue; if ((collArea->flags & 0x0F) > 10) continue; if (i != *collIndex) pCurPos[0]++; } break; case 0x3B00: case 0x3C00: case 0x3D00: case 0x3E00: case 0x3F00: case 0x4000: case 0x4100: case 0x4200: case 0x4300: case 0x4400: return key; case 0x1C0D: if (index == 1) return key; if (*pCurPos == index - 1) { *pCurPos = 0; break; } pCurPos[0]++; break; case 0x5000: if (index - 1 > *pCurPos) pCurPos[0]++; break; case 0x4800: if (*pCurPos > 0) pCurPos[0]--; break; } } } int16 Game_v2::inputArea(int16 xPos, int16 yPos, int16 width, int16 height, int16 backColor, int16 frontColor, char *str, int16 fontIndex, char inpType, int16 *pTotTime, int16 *collResId, int16 *collIndex) { int16 handleMouse; uint32 editSize; Video::FontDesc *pFont; char curSym; int16 key; const char *str1; const char *str2; int16 i; uint32 pos; int16 flag; int16 savedKey; void *fontExtraBak; int16 needAdjust; if ((_handleMouse != 0) && ((_vm->_global->_useMouse != 0) || (_forceHandleMouse != 0))) handleMouse = 1; else handleMouse = 0; pos = strlen(str); pFont = _vm->_draw->_fonts[fontIndex]; editSize = width / pFont->itemWidth; while (1) { strncpy0(_tempStr, str, 254); strcat(_tempStr, " "); if (strlen(_tempStr) > editSize) strncpy0(_tempStr, str, 255); fontExtraBak = _vm->_draw->_fonts[fontIndex]->extraData; needAdjust = _vm->_draw->_needAdjust; _vm->_draw->_needAdjust = 2; _vm->_draw->_fonts[fontIndex]->extraData = 0; _vm->_draw->_destSpriteX = xPos; _vm->_draw->_destSpriteY = yPos; _vm->_draw->_spriteRight = editSize * pFont->itemWidth; _vm->_draw->_spriteBottom = height; _vm->_draw->_destSurface = 21; _vm->_draw->_backColor = backColor; _vm->_draw->_frontColor = frontColor; _vm->_draw->_textToPrint = _tempStr; _vm->_draw->_transparency = 1; _vm->_draw->_fontIndex = fontIndex; _vm->_draw->spriteOperation(DRAW_FILLRECT | 0x10 ); _vm->_draw->_destSpriteY = yPos + (height - pFont->itemHeight) / 2; _vm->_draw->spriteOperation(DRAW_PRINTTEXT | 0x10); _vm->_draw->_needAdjust = needAdjust; _vm->_draw->_fonts[fontIndex]->extraData = fontExtraBak; if (pos == editSize) pos--; curSym = _tempStr[pos]; flag = 1; if (_vm->_global->_inter_variables != 0) WRITE_VAR(56, pos); while (1) { fontExtraBak = _vm->_draw->_fonts[fontIndex]->extraData; needAdjust = _vm->_draw->_needAdjust; _vm->_draw->_needAdjust = 2; _vm->_draw->_fonts[fontIndex]->extraData = 0; _tempStr[0] = curSym; _tempStr[1] = 0; _vm->_draw->_destSpriteX = xPos + pFont->itemWidth * pos; _vm->_draw->_destSpriteY = yPos + height - 1; _vm->_draw->_spriteRight = pFont->itemWidth; _vm->_draw->_spriteBottom = 1; _vm->_draw->_destSurface = 21; _vm->_draw->_backColor = frontColor; _vm->_draw->spriteOperation(DRAW_FILLRECT | 0x10); _vm->_draw->_needAdjust = needAdjust; _vm->_draw->_fonts[fontIndex]->extraData = fontExtraBak; if (flag != 0) { key = checkCollisions(handleMouse, -1, collResId, collIndex); if (key == 0) key = checkCollisions(handleMouse, -300, collResId, collIndex); flag = 0; } else key = checkCollisions(handleMouse, -300, collResId, collIndex); fontExtraBak = _vm->_draw->_fonts[fontIndex]->extraData; needAdjust = _vm->_draw->_needAdjust; _vm->_draw->_needAdjust = 2; _vm->_draw->_fonts[fontIndex]->extraData = 0; _tempStr[0] = curSym; _tempStr[1] = 0; _vm->_draw->_destSpriteX = xPos + pFont->itemWidth * pos; _vm->_draw->_destSpriteY = yPos + height - 1; _vm->_draw->_spriteRight = pFont->itemWidth; _vm->_draw->_spriteBottom = 1; _vm->_draw->_destSurface = 21; _vm->_draw->_backColor = backColor; _vm->_draw->_frontColor = frontColor; _vm->_draw->_textToPrint = _tempStr; _vm->_draw->_transparency = 1; _vm->_draw->_fontIndex = fontIndex; _vm->_draw->spriteOperation(DRAW_FILLRECT | 0x10); _vm->_draw->_destSpriteY = yPos + (height - pFont->itemHeight) / 2; _vm->_draw->spriteOperation(DRAW_PRINTTEXT | 0x10); _vm->_draw->_needAdjust = needAdjust; _vm->_draw->_fonts[fontIndex]->extraData = fontExtraBak; if ((key != 0) || (*collResId != 0)) break; key = checkCollisions(handleMouse, -300, collResId, collIndex); if ((key != 0) || (*collResId != 0) || _vm->_inter->_terminate || _vm->_quitRequested) break; if (*pTotTime > 0) { *pTotTime -= 600; if (*pTotTime <= 1) { key = 0; *collResId = 0; break; } } } if ((key == 0) || (*collResId != 0) || _vm->_inter->_terminate || _vm->_quitRequested) return 0; switch (key) { case 0x4D00: // Right Arrow if ((pos < strlen(str)) && (pos < (editSize - 1))) { pos++; continue; } return 0x5000; case 0x4B00: // Left Arrow if (pos > 0) { pos--; continue; } return 0x4800; case 0xE08: // Backspace if (pos > 0) { _vm->_util->cutFromStr(str, pos - 1, 1); pos--; continue; } case 0x5300: // Del if (pos >= strlen(str)) continue; _vm->_util->cutFromStr(str, pos, 1); continue; case 0x1C0D: // Enter case 0x3B00: // F1 case 0x3C00: // F2 case 0x3D00: // F3 case 0x3E00: // F4 case 0x3F00: // F5 case 0x4000: // F6 case 0x4100: // F7 case 0x4200: // F8 case 0x4300: // F9 case 0x4400: // F10 case 0x4800: // Up arrow case 0x5000: // Down arrow return key; case 0x11B: // Escape if (_vm->_global->_useMouse != 0) continue; _forceHandleMouse = !_forceHandleMouse; if ((_handleMouse != 0) && ((_vm->_global->_useMouse != 0) || (_forceHandleMouse != 0))) handleMouse = 1; else handleMouse = 0; while (_vm->_global->_pressedKeys[1] != 0); continue; default: savedKey = key; key &= 0xFF; if (((inpType == 9) || (inpType == 10)) && (key >= ' ') && (key <= 0xFF)) { str1 = "0123456789-.,+ "; str2 = "0123456789-,,+ "; if ((((savedKey >> 8) > 1) && ((savedKey >> 8) < 12)) && ((_vm->_global->_pressedKeys[42] != 0) || (_vm->_global->_pressedKeys[56] != 0))) key = ((savedKey >> 8) - 1) % 10 + '0'; for (i = 0; str1[i] != 0; i++) { if (key == str1[i]) { key = str2[i]; break; } } if (i == (int16) strlen(str1)) key = 0; } if ((key >= ' ') && (key <= 0xFF)) { if (editSize == strlen(str)) _vm->_util->cutFromStr(str, strlen(str) - 1, 1); pos++; _tempStr[0] = key; _tempStr[1] = 0; _vm->_util->insertStr(_tempStr, str, pos - 1); } } } } int16 Game_v2::checkMousePoint(int16 all, int16 *resId, int16 *resIndex) { Collision *ptr; int16 i; if (resId != 0) *resId = 0; *resIndex = 0; ptr = _collisionAreas; for (i = 0; ptr->left != -1; ptr++, i++) { if (ptr->id & 0x4000) continue; if (all) { if ((ptr->flags & 0xF) > 1) continue; if ((ptr->flags & 0xF00) != 0) continue; if ((_vm->_global->_inter_mouseX < ptr->left) || (_vm->_global->_inter_mouseX > ptr->right) || (_vm->_global->_inter_mouseY < ptr->top) || (_vm->_global->_inter_mouseY > ptr->bottom)) continue; if (resId != 0) *resId = ptr->id; *resIndex = i; return ptr->key; } else { if ((ptr->flags & 0xF00) != 0) continue; if ((ptr->flags & 0xF) < 1) continue; if ((((ptr->flags & 0xF0) >> 4) != (_mouseButtons - 1)) && (((ptr->flags & 0xF0) >> 4) != 2)) continue; if ((_vm->_global->_inter_mouseX < ptr->left) || (_vm->_global->_inter_mouseX > ptr->right) || (_vm->_global->_inter_mouseY < ptr->top) || (_vm->_global->_inter_mouseY > ptr->bottom)) continue; if (resId != 0) *resId = ptr->id; *resIndex = i; if (((ptr->flags & 0xF) == 1) || ((ptr->flags & 0xF) == 2)) return ptr->key; return 0; } } if ((_mouseButtons != 1) && (all == 0)) return 0x11B; return 0; } } // End of namespace Gob