Logo Search packages:      
Sourcecode: scummvm version File versions  Download package

inter_v3.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: https://scummvm.svn.sourceforge.net/svnroot/scummvm/scummvm/tags/release-0-11-1/engines/gob/inter_v3.cpp $
 * $Id: inter_v3.cpp 30944 2008-02-23 22:50:18Z sev $
 *
 */

#include "common/endian.h"
#include "common/file.h"

#include "gob/gob.h"
#include "gob/inter.h"
#include "gob/global.h"
#include "gob/dataio.h"
#include "gob/draw.h"
#include "gob/game.h"
#include "gob/parse.h"

namespace Gob {

#define OPCODE(x) _OPCODE(Inter_v3, x)

const int Inter_v3::_goblinFuncLookUp[][2] = {
      {0, 0},
      {1, 1},
      {2, 2},
      {4, 3},
      {5, 4},
      {6, 5},
      {7, 6},
      {8, 7},
      {9, 8},
      {10, 9},
      {12, 10},
      {13, 11},
      {14, 12},
      {15, 13},
      {16, 14},
      {21, 15},
      {22, 16},
      {23, 17},
      {24, 18},
      {25, 19},
      {26, 20},
      {27, 21},
      {28, 22},
      {29, 23},
      {30, 24},
      {32, 25},
      {33, 26},
      {34, 27},
      {35, 28},
      {36, 29},
      {37, 30},
      {40, 31},
      {41, 32},
      {42, 33},
      {43, 34},
      {44, 35},
      {50, 36},
      {52, 37},
      {53, 38},
      {100, 39},
      {152, 40},
      {200, 41},
      {201, 42},
      {202, 43},
      {203, 44},
      {204, 45},
      {250, 46},
      {251, 47},
      {252, 48},
      {500, 49},
      {502, 50},
      {503, 51},
      {600, 52},
      {601, 53},
      {602, 54},
      {603, 55},
      {604, 56},
      {605, 57},
      {1000, 58},
      {1001, 59},
      {1002, 60},
      {1003, 61},
      {1004, 62},
      {1005, 63},
      {1006, 64},
      {1008, 65},
      {1009, 66},
      {1010, 67},
      {1011, 68},
      {1015, 69},
      {2005, 70}
};

Inter_v3::Inter_v3(GobEngine *vm) : Inter_v2(vm) {
      setupOpcodes();
}

void Inter_v3::setupOpcodes() {
      static const OpcodeDrawEntryV3 opcodesDraw[256] = {
            /* 00 */
            OPCODE(o1_loadMult),
            OPCODE(o2_playMult),
            OPCODE(o2_freeMultKeys),
            {NULL, ""},
            /* 04 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            OPCODE(o1_initCursor),
            /* 08 */
            OPCODE(o1_initCursorAnim),
            OPCODE(o1_clearCursorAnim),
            OPCODE(o2_setRenderFlags),
            {NULL, ""},
            /* 0C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 10 */
            OPCODE(o1_loadAnim),
            OPCODE(o1_freeAnim),
            OPCODE(o1_updateAnim),
            OPCODE(o2_multSub),
            /* 14 */
            OPCODE(o2_initMult),
            OPCODE(o1_freeMult),
            OPCODE(o1_animate),
            OPCODE(o2_loadMultObject),
            /* 18 */
            OPCODE(o1_getAnimLayerInfo),
            OPCODE(o1_getObjAnimSize),
            OPCODE(o1_loadStatic),
            OPCODE(o1_freeStatic),
            /* 1C */
            OPCODE(o2_renderStatic),
            OPCODE(o2_loadCurLayer),
            {NULL, ""},
            {NULL, ""},
            /* 20 */
            OPCODE(o2_playCDTrack),
            OPCODE(o2_waitCDTrackEnd),
            OPCODE(o2_stopCD),
            OPCODE(o2_readLIC),
            /* 24 */
            OPCODE(o2_freeLIC),
            OPCODE(o2_getCDTrackPos),
            {NULL, ""},
            {NULL, ""},
            /* 28 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 2C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 30 */
            OPCODE(o2_loadFontToSprite),
            OPCODE(o1_freeFontToSprite),
            {NULL, ""},
            {NULL, ""},
            /* 34 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 38 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 3C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 40 */
            OPCODE(o2_totSub),
            OPCODE(o2_switchTotSub),
            OPCODE(o2_copyVars),
            OPCODE(o2_pasteVars),
            /* 44 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 48 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 4C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 50 */
            OPCODE(o2_loadMapObjects),
            OPCODE(o2_freeGoblins),
            OPCODE(o2_moveGoblin),
            OPCODE(o2_writeGoblinPos),
            /* 54 */
            OPCODE(o2_stopGoblin),
            OPCODE(o2_setGoblinState),
            OPCODE(o2_placeGoblin),
            {NULL, ""},
            /* 58 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 5C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 60 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 64 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 68 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 6C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 70 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 74 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 78 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 7C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 80 */
            OPCODE(o2_initScreen),
            OPCODE(o2_scroll),
            OPCODE(o2_setScrollOffset),
            OPCODE(o2_playImd),
            /* 84 */
            OPCODE(o2_getImdInfo),
            OPCODE(o2_openItk),
            OPCODE(o2_closeItk),
            OPCODE(o2_setImdFrontSurf),
            /* 88 */
            OPCODE(o2_resetImdFrontSurf),
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 8C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 90 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 94 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 98 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 9C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* A0 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* A4 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* A8 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* AC */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* B0 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* B4 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* B8 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* BC */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* C0 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* C4 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* C8 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* CC */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* D0 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* D4 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* D8 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* DC */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* E0 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* E4 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* E8 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* EC */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* F0 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* F4 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* F8 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* FC */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""}
      };

      static const OpcodeFuncEntryV3 opcodesFunc[80] = {
            /* 00 */
            OPCODE(o1_callSub),
            OPCODE(o1_callSub),
            OPCODE(o1_printTotText),
            OPCODE(o1_loadCursor),
            /* 04 */
            {NULL, ""},
            OPCODE(o1_switch),
            OPCODE(o1_repeatUntil),
            OPCODE(o1_whileDo),
            /* 08 */
            OPCODE(o1_if),
            OPCODE(o2_evaluateStore),
            OPCODE(o1_loadSpriteToPos),
            {NULL, ""},
            /* 0C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 10 */
            {NULL, ""},
            OPCODE(o2_printText),
            OPCODE(o1_loadTot),
            OPCODE(o1_palLoad),
            /* 14 */
            OPCODE(o1_keyFunc),
            OPCODE(o1_capturePush),
            OPCODE(o1_capturePop),
            OPCODE(o2_animPalInit),
            /* 18 */
            OPCODE(o2_addCollision),
            OPCODE(o2_freeCollision),
            OPCODE(o3_getTotTextItemPart),
            {NULL, ""},
            /* 1C */
            {NULL, ""},
            {NULL, ""},
            OPCODE(o1_drawOperations),
            OPCODE(o1_setcmdCount),
            /* 20 */
            OPCODE(o1_return),
            OPCODE(o1_renewTimeInVars),
            OPCODE(o1_speakerOn),
            OPCODE(o1_speakerOff),
            /* 24 */
            OPCODE(o1_putPixel),
            OPCODE(o2_goblinFunc),
            OPCODE(o2_createSprite),
            OPCODE(o1_freeSprite),
            /* 28 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 2C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 30 */
            OPCODE(o1_returnTo),
            OPCODE(o1_loadSpriteContent),
            OPCODE(o3_copySprite),
            OPCODE(o1_fillRect),
            /* 34 */
            OPCODE(o1_drawLine),
            OPCODE(o1_strToLong),
            OPCODE(o1_invalidate),
            OPCODE(o1_setBackDelta),
            /* 38 */
            OPCODE(o1_playSound),
            OPCODE(o2_stopSound),
            OPCODE(o2_loadSound),
            OPCODE(o1_freeSoundSlot),
            /* 3C */
            OPCODE(o1_waitEndPlay),
            OPCODE(o1_playComposition),
            OPCODE(o2_getFreeMem),
            OPCODE(o2_checkData),
            /* 40 */
            {NULL, ""},
            OPCODE(o1_prepareStr),
            OPCODE(o1_insertStr),
            OPCODE(o1_cutStr),
            /* 44 */
            OPCODE(o1_strstr),
            OPCODE(o1_istrlen),
            OPCODE(o1_setMousePos),
            OPCODE(o1_setFrameRate),
            /* 48 */
            OPCODE(o1_animatePalette),
            OPCODE(o1_animateCursor),
            OPCODE(o1_blitCursor),
            OPCODE(o1_loadFont),
            /* 4C */
            OPCODE(o1_freeFont),
            OPCODE(o2_readData),
            OPCODE(o2_writeData),
            OPCODE(o1_manageDataFile),
      };

      static const OpcodeGoblinEntryV3 opcodesGoblin[71] = {
            /* 00 */
            OPCODE(o2_loadInfogramesIns),
            OPCODE(o2_startInfogrames),
            OPCODE(o2_stopInfogrames),
            {NULL, ""},
            /* 04 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 08 */
            {NULL, ""},
            OPCODE(o2_playInfogrames),
            {NULL, ""},
            {NULL, ""},
            /* 0C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 10 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 14 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 18 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 1C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 20 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 24 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            OPCODE(o3_wobble),
            /* 28 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 2C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 30 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 34 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 38 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 3C */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 40 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
            /* 44 */
            {NULL, ""},
            {NULL, ""},
            {NULL, ""},
      };

      _opcodesDrawV3 = opcodesDraw;
      _opcodesFuncV3 = opcodesFunc;
      _opcodesGoblinV3 = opcodesGoblin;
}

void Inter_v3::executeDrawOpcode(byte i) {
      debugC(1, kDebugDrawOp, "opcodeDraw %d [0x%X] (%s)",
            i, i, getOpcodeDrawDesc(i));

      OpcodeDrawProcV3 op = _opcodesDrawV3[i].proc;

      if (op == NULL)
            warning("unimplemented opcodeDraw: %d", i);
      else
            (this->*op) ();
}

bool Inter_v3::executeFuncOpcode(byte i, byte j, OpFuncParams &params) {
      debugC(1, kDebugFuncOp, "opcodeFunc %d.%d [0x%X.0x%X] (%s)",
            i, j, i, j, getOpcodeFuncDesc(i, j));

      if ((i > 4) || (j > 15)) {
            warning("unimplemented opcodeFunc: %d.%d", i, j);
            return false;
      }

      OpcodeFuncProcV3 op = _opcodesFuncV3[i*16 + j].proc;

      if (op == NULL)
            warning("unimplemented opcodeFunc: %d.%d", i, j);
      else
            return (this->*op) (params);

      return false;
}

void Inter_v3::executeGoblinOpcode(int i, OpGobParams &params) {
      debugC(1, kDebugGobOp, "opcodeGoblin %d [0x%X] (%s)",
            i, i, getOpcodeGoblinDesc(i));

      OpcodeGoblinProcV3 op = NULL;

      for (int j = 0; j < ARRAYSIZE(_goblinFuncLookUp); j++)
            if (_goblinFuncLookUp[j][0] == i) {
                  op = _opcodesGoblinV3[_goblinFuncLookUp[j][1]].proc;
                  break;
            }

      if (op == NULL) {
            int16 val;

            _vm->_global->_inter_execPtr -= 2;
            val = load16();
            _vm->_global->_inter_execPtr += val << 1;
      } else
            (this->*op) (params);
}

const char *Inter_v3::getOpcodeDrawDesc(byte i) {
      return _opcodesDrawV3[i].desc;
}

const char *Inter_v3::getOpcodeFuncDesc(byte i, byte j) {
      if ((i > 4) || (j > 15))
            return "";

      return _opcodesFuncV3[i*16 + j].desc;
}

const char *Inter_v3::getOpcodeGoblinDesc(int i) {
      for (int j = 0; j < ARRAYSIZE(_goblinFuncLookUp); j++)
            if (_goblinFuncLookUp[j][0] == i)
                  return _opcodesGoblinV3[_goblinFuncLookUp[j][1]].desc;
      return "";
}

bool Inter_v3::o3_getTotTextItemPart(OpFuncParams &params) {
      byte *totData;
      int16 totTextItem;
      int16 part, curPart = 0;
      int16 offX = 0, offY = 0;
      int16 collId = 0, collCmd;
      uint32 stringStartVar, stringVar;
      bool end;

      totTextItem = load16();
      stringStartVar = _vm->_parse->parseVarIndex();
      part = _vm->_parse->parseValExpr();

      stringVar = stringStartVar;
      WRITE_VARO_UINT8(stringVar, 0);

      if (!_vm->_game->_totTextData)
            return false;

      totData = _vm->_game->_totTextData->dataPtr +
            _vm->_game->_totTextData->items[totTextItem].offset;

      // Skip background rectangles
      while (((int16) READ_LE_UINT16(totData)) != -1)
            totData += 9;
      totData += 2;

      while (*totData != 1) {
            switch (*totData) {
            case 2:
            case 5:
                  totData++;
                  offX = READ_LE_UINT16(totData);
                  offY = READ_LE_UINT16(totData + 2);
                  totData += 4;
                  break;

            case 3:
            case 4:
                  totData += 2;
                  break;

            case 6:
                  totData++;

                  collCmd = *totData++;
                  if (collCmd & 0x80) {
                        collId = READ_LE_UINT16(totData);
                        totData += 2;
                  }

                  // Skip collision coordinates
                  if (collCmd & 0x40)
                        totData += 8;

                  if ((collCmd & 0x8F) && ((-collId - 1) == part)) {
                        int n = 0;

                        while (1) {
                              if ((*totData < 1) || (*totData > 7)) {
                                    if (*totData >= 32) {
                                          WRITE_VARO_UINT8(stringVar++, *totData++);
                                          n++;
                                    } else
                                          totData++;
                                    continue;
                              }

                              if ((n != 0) || (*totData == 1) ||
                                          (*totData == 6) || (*totData == 7)) {
                                    WRITE_VARO_UINT8(stringVar, 0);
                                    return false;
                              }

                              switch (*totData) {
                              case 2:
                              case 5:
                                    totData += 5;
                                    break;

                              case 3:
                              case 4:
                                    totData += 2;
                                    break;
                              }
                        }

                  }
                  break;

            case 7:
            case 8:
            case 9:
                  totData++;
                  break;

            case 10:
                  if (curPart == part) {
                        WRITE_VARO_UINT8(stringVar++, 0xFF);
                        WRITE_VARO_UINT16(stringVar, offX);
                        WRITE_VARO_UINT16(stringVar + 2, offY);
                        WRITE_VARO_UINT16(stringVar + 4,
                                    totData - _vm->_game->_totTextData->dataPtr);
                        WRITE_VARO_UINT8(stringVar + 6, 0);
                        return false;
                  }

                  end = false;
                  while (!end) {
                        switch (*totData) {
                        case 2:
                        case 5:
                              if (ABS(offY - READ_LE_UINT16(totData + 3)) > 1)
                                    end = true;
                              else
                                    totData += 5;
                              break;

                        case 3:
                              totData += 2;
                              break;

                        case 10:
                              totData += totData[1] * 2 + 2;
                              break;

                        default:
                              if (*totData < 32)
                                    end = true;
                              while (*totData >= 32)
                                    totData++;
                              break;
                        }
                  }

                  if (part >= 0)
                        curPart++;
                  break;

            default:
                  while (1) {

                        while (*totData >= 32)
                              WRITE_VARO_UINT8(stringVar++, *totData++);
                        WRITE_VARO_UINT8(stringVar, 0);

                        if (((*totData != 2) && (*totData != 5)) ||
                                    (ABS(offY - READ_LE_UINT16(totData + 3)) > 1)) {

                              if (curPart == part)
                                    return false;

                              stringVar = stringStartVar;
                              WRITE_VARO_UINT8(stringVar, 0);

                              while (*totData >= 32)
                                    totData++;

                              if (part >= 0)
                                    curPart++;
                              break;

                        } else
                              totData += 5;

                  }
                  break;
            }
      }

      return false;
}

bool Inter_v3::o3_copySprite(OpFuncParams &params) {
      o1_copySprite(params);

      // For the close-up "fading" in the CD version
      if (_vm->_draw->_destSurface == 20)
            _vm->_video->sparseRetrace(20);
      return false;
}

void Inter_v3::o3_wobble(OpGobParams &params) {
      _vm->_draw->wobble(_vm->_draw->_backSurface);
}

} // End of namespace Gob

Generated by  Doxygen 1.6.0   Back to index