aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--engines/toltecs/TODO.txt2
-rw-r--r--engines/toltecs/script.cpp937
-rw-r--r--engines/toltecs/script.h73
3 files changed, 474 insertions, 538 deletions
diff --git a/engines/toltecs/TODO.txt b/engines/toltecs/TODO.txt
index 62df586d8d..6cf06a4f2a 100644
--- a/engines/toltecs/TODO.txt
+++ b/engines/toltecs/TODO.txt
@@ -11,7 +11,6 @@ TODO
- each resource type gets its own class, the resource cache manages the resource instances
- generic resource class which has a method that creates a MemoryReadStream
- rewrite parts of the engine to use the new resource system
-- Add sound support (after rewrite of the resource system)
- Add music support (game seems to use XMIDI, MIDI and headerless music...figure out more)
- Add game menu
- Rewrite from scratch with only minor stuff from the disasm since the original menu is one huge
@@ -32,3 +31,4 @@ DONE
- Implement dirty rectangles (low priority)
- Optimize segment mask redrawing (only redraw what's neccessary)
- Add movie playback functionality (movie format is known, needs implementing)
+- Add sound support (after rewrite of the resource system)
diff --git a/engines/toltecs/script.cpp b/engines/toltecs/script.cpp
index 059640246e..6d4976d75a 100644
--- a/engines/toltecs/script.cpp
+++ b/engines/toltecs/script.cpp
@@ -57,12 +57,95 @@ ScriptInterpreter::ScriptInterpreter(ToltecsEngine *vm) : _vm(vm) {
_slots[kMaxScriptSlots - 1].size = 1024;
_slots[kMaxScriptSlots - 1].data = new byte[_slots[kMaxScriptSlots - 1].size];
+ setupScriptFunctions();
+
}
ScriptInterpreter::~ScriptInterpreter() {
delete[] _stack;
for (int i = 0; i < kMaxScriptSlots; i++)
delete[] _slots[i].data;
+ for (uint i = 0; i < _scriptFuncs.size(); ++i)
+ delete _scriptFuncs[i];
+}
+
+typedef Common::Functor0Mem<void, ScriptInterpreter> ScriptFunctionF;
+#define RegisterScriptFunction(x) \
+ _scriptFuncs.push_back(new ScriptFunctionF(this, &ScriptInterpreter::x)); \
+ _scriptFuncNames.push_back(#x);
+void ScriptInterpreter::setupScriptFunctions() {
+
+ RegisterScriptFunction(sfNop);
+ RegisterScriptFunction(sfNop);
+ RegisterScriptFunction(sfGetGameVar);
+ RegisterScriptFunction(sfSetGameVar);
+ RegisterScriptFunction(sfUpdateScreen);
+ RegisterScriptFunction(sfGetRandomNumber);
+ RegisterScriptFunction(sfDrawGuiTextMulti);
+ RegisterScriptFunction(sfUpdateVerbLine);
+ RegisterScriptFunction(sfSetFontColor);
+ RegisterScriptFunction(sfGetTalkTextDuration);
+ RegisterScriptFunction(sfTalk);
+ RegisterScriptFunction(sfFindPaletteFragment);
+ RegisterScriptFunction(sfClearPaletteFragments);
+ RegisterScriptFunction(sfAddPaletteFragment);
+ RegisterScriptFunction(sfSetDeltaAnimPalette);
+ RegisterScriptFunction(sfNop); // TODO
+ RegisterScriptFunction(sfBuildColorTransTable);
+ RegisterScriptFunction(sfSetDeltaMainPalette);
+ RegisterScriptFunction(sfLoadScript);
+ RegisterScriptFunction(sfRegisterFont);
+ RegisterScriptFunction(sfLoadAddPalette);
+ RegisterScriptFunction(sfLoadScene);
+ RegisterScriptFunction(sfSetGuiHeight);
+ RegisterScriptFunction(sfFindMouseInRectIndex1);
+ RegisterScriptFunction(sfFindMouseInRectIndex2);
+ RegisterScriptFunction(sfDrawGuiImage);
+ RegisterScriptFunction(sfAddAnimatedSpriteNoLoop);
+ RegisterScriptFunction(sfAddAnimatedSprite);
+ RegisterScriptFunction(sfAddStaticSprite);
+ RegisterScriptFunction(sfAddAnimatedSpriteScaled);
+ RegisterScriptFunction(sfFindPath);
+ RegisterScriptFunction(sfWalk);
+ RegisterScriptFunction(sfScrollCameraUp);
+ RegisterScriptFunction(sfScrollCameraDown);
+ RegisterScriptFunction(sfScrollCameraLeft);
+ RegisterScriptFunction(sfScrollCameraRight);
+ RegisterScriptFunction(sfScrollCameraUpEx);
+ RegisterScriptFunction(sfScrollCameraDownEx);
+ RegisterScriptFunction(sfScrollCameraLeftEx);
+ RegisterScriptFunction(sfScrollCameraRightEx);
+ RegisterScriptFunction(sfSetCamera);
+ RegisterScriptFunction(sfNop); // TODO
+ RegisterScriptFunction(sfGetRgbModifiertAtPoint);
+ RegisterScriptFunction(sfStartAnim);
+ RegisterScriptFunction(sfAnimNextFrame);
+ RegisterScriptFunction(sfNop);
+ RegisterScriptFunction(sfGetAnimFrameNumber);
+ RegisterScriptFunction(sfGetAnimStatus);
+ RegisterScriptFunction(sfStartShakeScreen);
+ RegisterScriptFunction(sfStopShakeScreen);
+ RegisterScriptFunction(sfStartSequence);
+ RegisterScriptFunction(sfEndSequence);
+ RegisterScriptFunction(sfSequenceVolumeStuff);
+ RegisterScriptFunction(sfPlaySound1);
+ RegisterScriptFunction(sfPlaySound2);
+ RegisterScriptFunction(sfClearScreen);
+ RegisterScriptFunction(sfNop);
+ RegisterScriptFunction(sfHandleInput);
+ RegisterScriptFunction(sfRunOptionsScreen);
+ RegisterScriptFunction(sfPrecacheSprites);
+ RegisterScriptFunction(sfPrecacheSounds1);
+ RegisterScriptFunction(sfDeleteAllPbfFilesByExternalArray);
+ RegisterScriptFunction(sfPrecacheSounds2);
+ RegisterScriptFunction(sfRestoreStackPtr);
+ RegisterScriptFunction(sfSaveStackPtr);
+ RegisterScriptFunction(sfPlayMovie);
+ RegisterScriptFunction(sfNop);
+
+
+
+
}
void ScriptInterpreter::loadScript(uint resIndex, uint slotIndex) {
@@ -141,13 +224,6 @@ int16 ScriptInterpreter::readInt16() {
void ScriptInterpreter::execOpcode(byte opcode) {
-#if 0
- char ln[256];
- snprintf(ln, 256, "\t\t\t%02X %02X %02X %02X %02X %02X %02X %02X",
- _code[0], _code[1], _code[2], _code[3], _code[4], _code[5], _code[6], _code[7]);
- debug(1, "%s", ln);
-#endif
-
int16 ofs;
debug(1, "opcode = %d", opcode);
@@ -159,9 +235,9 @@ void ScriptInterpreter::execOpcode(byte opcode) {
_subCode = _code;
byte length = readByte();
debug(1, "length = %d", length);
- uint16 kernelOpcode = readInt16();
- debug(1, "callKernel %d", kernelOpcode);
- execKernelOpcode(kernelOpcode);
+ uint16 index = readInt16();
+ debug(1, "callScriptFunction %d", index);
+ execScriptFunction(index);
_code += length - 2;
break;
}
@@ -386,520 +462,12 @@ void ScriptInterpreter::execOpcode(byte opcode) {
}
-void ScriptInterpreter::execKernelOpcode(uint16 kernelOpcode) {
-
- switch (kernelOpcode) {
-
- case 0:
- case 1:
- // ok, NOPs
- break;
-
- case 2:// ok
- {
- debug(0, "o2_getGameVar(%d, %d)", arg16(3), arg16(5));
- int16 value = getGameVar(arg16(3));
- localWrite16(arg16(5), value);
- break;
- }
-
- case 3:// ok
- {
- debug(0, "o2_setGameVar(%d, %d)", arg16(3), arg16(5));
- VarType varType = getGameVarType(arg16(3));
- int16 value = 0;
- if (varType == vtByte)
- value = arg8(5);
- else if (varType == vtWord)
- value = arg16(5);
- setGameVar(arg16(3), value);
- break;
- }
-
- case 4:
- {
-
- debug(0, "o2_updateScreen()");
-
- _vm->_sound->updateSpeech();
-
- _vm->_screen->updateShakeScreen();
-
- if (_vm->shouldQuit())
- return;
-
- if (!_vm->_movieSceneFlag)
- _vm->updateInput();
- else
- _vm->_mouseButton = 0;
-
- // TODO? Check keyb
-
- _vm->_counter01--;
- if (_vm->_counter01 <= 0) {
- _vm->_counter01 = MIN(_vm->_counter02, 30);
- _vm->_counter02 = 0;
- _vm->updateScreen();
- _vm->_flag01 = 1;
- _vm->_system->delayMillis(5);
- _vm->_counter02 = 1; // ?
- } else {
- _vm->_screen->clearSprites();
- _vm->_flag01 = 0;
- //_vm->_system->updateScreen();
- }
-
- // TODO
- break;
-
- }
-
- case 5:// ok
- {
- debug(0, "o2_getRandomNumber(%d)", arg16(3));
- localWrite16(arg16(5), _vm->_rnd->getRandomNumber(arg16(3) - 1));
- break;
- }
-
- case 6:// ok
- {
- debug(0, "o2_drawGuiTextMulti()");
- _vm->_screen->drawGuiTextMulti((byte*)localPtr(arg16(3)));
- break;
- }
-
- case 7:// ok
- {
- debug(0, "o2_updateVerbLine(slot: %d; offset: %04X)", arg16(5), arg16(3));
- _vm->_screen->updateVerbLine(arg16(5), arg16(3));
- break;
- }
-
- case 8:// ok
- {
- debug(0, "o2_setFontColor(%d)", arg8(3));
- _vm->_screen->_fontColor1 = 0;
- _vm->_screen->_fontColor2 = arg8(3);
- break;
- }
-
- case 9:// ok
- {
- debug(0, "o2_getTalkTextDuration()");
- int16 duration = _vm->_screen->getTalkTextDuration();
- localWrite16(arg16(3), duration);
- break;
- }
-
- case 10:// ok
- {
- debug(0, "o2_talk(slot: %d; offset: %d)", arg16(5), arg16(3));
- _vm->talk(arg16(5), arg16(3));
- break;
- }
-
- case 11:// ok
- {
- debug(0, "o2_findFragment(%d, %d)", arg16(3), arg16(5));
- localWrite16(arg16(5), _vm->_palette->findFragment(arg16(3)));
- break;
- }
-
- case 12:// ok
- {
- debug(0, "o2_clearPaletteFragments()");
- _vm->_palette->clearFragments();
- break;
- }
-
- case 13:// ok
- {
- debug(0, "o2_addFragment(%d, %d)", arg16(3), arg16(5));
- _vm->_palette->addFragment(arg16(3), arg16(5));
- break;
- }
-
- case 14:// ok
- {
- debug(0, "o2_setDeltaPalette(animPalette, %d, %d, %d, %d)", arg8(6), arg8(5), arg8(4), arg8(3));
- _vm->_palette->setDeltaPalette(_vm->_palette->getAnimPalette(), arg8(6), (char)arg8(5), arg8(4), arg8(3));
- break;
- }
-
- case 16:// ok
- {
- debug(0, "o2_buildColorTransTable(%d, %d, %d)", arg8(4), (char)arg8(3), arg8(5));
- _vm->_palette->buildColorTransTable(arg8(4), (char)arg8(3), arg8(5));
- break;
- }
-
- case 17:// ok
- {
- debug(0, "o2_setDeltaPalette(mainPalette, %d, %d, %d, %d)", arg8(6), arg8(5), arg8(4), arg8(3));
- _vm->_palette->setDeltaPalette(_vm->_palette->getMainPalette(), arg8(6), (char)arg8(5), arg8(4), arg8(3));
- break;
- }
-
- case 18:// ok
- {
- debug(0, "o2_loadScript(resIndex: %d; slotIndex: %d)", arg16(4), arg8(3));
- int16 codeOfs = _code - getSlotData(_regs.reg4);
- loadScript(arg16(4), arg8(3));
- _code = getSlotData(_regs.reg4) + codeOfs;
- _switchLocalDataNear = true;
- break;
- }
-
- case 19:// ok
- {
- debug(0, "o2_registerFont(%d, %d)", arg8(3), arg16(4));
- _vm->_screen->registerFont(arg8(3), arg16(4));
- break;
- }
-
- case 20:// ok
- {
- debug(0, "o2_loadAddPalette(startIndex: %d; resIndex: %d)", arg8(3), arg16(4));
- _vm->_palette->loadAddPalette(arg16(4), arg8(3));
- break;
- }
-
- case 21:// TODO
- {
- debug(0, "o2_loadScene(resIndex: %d; flag: %d)", arg16(4), arg8(3));
- if (arg8(3) == 0) {
- _vm->_sound->stopSpeech();
- _vm->loadScene(arg16(4));
- } else {
- _vm->_screen->loadMouseCursor(arg16(4));
- }
- break;
- }
-
- case 22:// ok
- {
- debug(0, "o2_setGuiHeight(%d)", arg8(3));
- _vm->setGuiHeight(arg8(3));
- break;
- }
-
- case 23:// ok
- {
- debug(0, "o2_findMouseInRectIndex1(offset: %d; slot: %d; elemSize: %d; var: %d; index: %d)", arg16(3), arg16(5), arg16(7), arg16(9), arg16(11));
-
- int16 index = -1;
- if (_vm->_mouseY < _vm->_cameraHeight) {
- index = _vm->findRectAtPoint(getSlotData(arg16(5)) + arg16(3),
- _vm->_mouseX + _vm->_cameraX,
- _vm->_mouseY + _vm->_cameraY,
- arg16(11) + 1, arg16(7));
- }
- localWrite16(arg16(9), index);
- break;
- }
-
- case 24:// ok
- {
-
- debug(0, "o2_findMouseInRectIndex2(offset: %d, slot: %d, elemSize: %d, var: %d)", arg16(3), arg16(5), arg16(7), arg16(9));
- int16 index = -1;
-
- if (_vm->_sceneResIndex != 0) {
- if (_vm->_mouseY < _vm->_cameraHeight) {
- index = _vm->findRectAtPoint(getSlotData(arg16(5)) + arg16(3),
- _vm->_mouseX + _vm->_cameraX,
- _vm->_mouseY + _vm->_cameraY,
- 0, arg16(7));
- }
- }
-
- localWrite16(arg16(9), index);
-
- break;
- }
-
- case 25:// ok
- {
- debug(0, "o2_drawGuiImage(x: %d; y: %d; resIndex: %d)", arg16(5), arg16(3), arg16(7));
- _vm->_screen->drawGuiImage(arg16(5), arg16(3), arg16(7));
- break;
- }
-
- case 26:// ok
- {
- debug(0, "o2_addAnimatedSpriteNoLoop(2; x: %d; y: %d; fragmentId: %d; offset: %d)", arg16(5), arg16(3), arg16(7), arg16(9));
- _vm->_screen->addAnimatedSprite(arg16(5), arg16(3), arg16(7), (byte*)localPtr(0), (int16*)localPtr(arg16(9)), false, 2);
- break;
- }
-
- case 27:// ok
- {
- debug(0, "o2_addAnimatedSprite(2; x: %d; y: %d; fragmentId: %d; offset: %d)", arg16(5), arg16(3), arg16(7), arg16(9));
- _vm->_screen->addAnimatedSprite(arg16(5), arg16(3), arg16(7), (byte*)localPtr(0), (int16*)localPtr(arg16(9)), true, 2);
- break;
- }
-
- case 28:// ok
- {
- debug(1, "o2_addStaticSprite()");
- _vm->_screen->addStaticSprite(_subCode + 3);
- break;
- }
-
- case 29:// ok
- {
- debug(0, "o2_addAnimatedSprite(1; x: %d; y: %d; value: %d; offset: %d)", arg16(5), arg16(3), arg16(7), arg16(9));
- _vm->_screen->addAnimatedSprite(arg16(5), arg16(3), arg16(7), (byte*)localPtr(0), (int16*)localPtr(arg16(9)), true, 1);
- break;
- }
-
- case 30:// ok
- {
- debug(0, "o2_findPath(sourceX: %d; sourceY: %d; destX: %d; destY: %d; slotIndex: %d; offset: %d)", arg16(5), arg16(3), arg16(9), arg16(7), arg16(13), arg16(11));
- _vm->_segmap->findPath((int16*)(getSlotData(arg16(13)) + arg16(11)), arg16(9), arg16(7), arg16(5), arg16(3));
- break;
- }
-
- case 31:// ok
- {
- debug(0, "o2_walk()");
- _vm->walk(getSlotData(arg16(5)) + arg16(3));
- break;
- }
-
- case 32:// ok
- {
- debug(0, "o2_scrollCameraUp()");
- _vm->scrollCameraUp(4);
- break;
- }
-
- case 33:// ok
- {
- debug(0, "o2_scrollCameraDown()");
- _vm->scrollCameraDown(4);
- break;
- }
-
- case 34:// ok
- {
- debug(0, "o2_scrollCameraLeft()");
- _vm->scrollCameraLeft(4);
- break;
- }
-
- case 35:// ok
- {
- debug(0, "o2_scrollCameraRight()");
- _vm->scrollCameraRight(4);
- break;
- }
-
- case 36:// ok
- {
- debug(0, "o2_scrollCameraUpEx(%d)", arg16(3));
- _vm->scrollCameraUp(arg16(3));
- break;
- }
-
- case 37:// ok
- {
- debug(0, "o2_scrollCameraDownEx(%d)", arg16(3));
- _vm->scrollCameraDown(arg16(3));
- break;
- }
-
- case 38:// ok
- {
- debug(0, "o2_scrollCameraLeftEx(%d)", arg16(3));
- _vm->scrollCameraLeft(arg16(3));
- break;
- }
-
- case 39:// ok
- {
- debug(0, "o2_scrollCameraRightEx(%d)", arg16(3));
- _vm->scrollCameraRight(arg16(3));
- break;
- }
-
- case 40:// ok
- {
- debug(0, "o2_setCamera(%d, %d)", arg16(5), arg16(3));
- _vm->setCamera(arg16(5), arg16(3));
- break;
- }
-
- case 42:// ok
- {
- debug(0, "o2_getRgbModifiertAtPoint(x: %d; y: %d; id: %d; varSlot: %d; varOffset: %d)", arg16(5), arg16(3), arg16(7), arg16(11), arg16(9));
- byte *rgb = getSlotData(arg16(11)) + arg16(9);
- _vm->_segmap->getRgbModifiertAtPoint(arg16(5), arg16(3), arg16(7), rgb[0], rgb[1], rgb[2]);
- break;
- }
-
- case 43:// ok
- {
- debug(0, "o2_startAnim(%d)", arg16(3));
- _vm->_anim->start(arg16(3));
- break;
- }
-
- case 44:// ok
- {
- debug(0, "o2_animNextFrame()");
- _vm->_anim->nextFrame();
- break;
- }
-
- case 45:// ok
- {
- // NOP
- break;
- }
-
- case 46:// ok
- {
- debug(0, "o2_getAnimFrameNumber(%d)", arg16(3));
- localWrite16(arg16(3), _vm->_anim->getFrameNumber());
- break;
- }
-
- case 47:
- {
- // almost ok
- debug(0, "o2_getAnimStatus()");
- int16 status = _vm->_anim->getStatus();
- if (status == 0 || status == 1) {
- // TODO mov screenFlag01, 0
- }
- localWrite16(arg16(3), status);
- break;
- }
-
- case 48:// ok
- {
- _vm->_screen->startShakeScreen(arg16(3));
- break;
- }
-
- case 49:// ok
- {
- _vm->_screen->stopShakeScreen();
- break;
- }
-
- case 50:// TODO
- {
- debug(0, "o2_startSequence");
- break;
- }
-
- case 51:// TODO
- {
- debug(0, "o2_endSequence");
- break;
- }
-
- case 52:// TODO
- {
- debug(0, "o2_sequenceVolumeStuff");
- break;
- }
-
- case 53:// TODO
- {
- debug(0, "o2_playSound1(%d, %d, %d, %d)", arg16(9), arg16(7), arg16(5), arg16(3));
- break;
- }
-
- case 54:// TODO
- {
- //debug(0, "o2_playSound2(%d, %d, %d)", arg16(7), arg16(5), arg16(3));
-
- _vm->_sound->playSound(arg16(3), arg16(5), arg16(7));
-
- break;
- }
-
- case 55:// TODO
- debug(0, "o2_clearScreen()");
- break;
-
- case 56:// ok
- {
- // NOP
- break;
- }
-
- case 57:// TODO
- {
- debug(0, "o2_handleInput");
- int16 varOfs = arg16(3);
-
- localWrite16(varOfs, 0);
-
- //_vm->_input->update();
- break;
- }
-
- case 58:// TODO
- {
- debug(0, "o2_runOptionsScreen(%d, %d)", arg16(5), arg16(3));
- break;
- }
-
- case 59:// TODO
- {
- debug(0, "o2_precacheSprites(%04X)", arg16(3));
- break;
- }
-
- case 60:// TODO
- {
- debug(0, "o2_precacheSounds1(%04X)", arg16(3));
- break;
- }
-
- case 61:// TODO
- {
- debug(0, "o2_deleteAllPbfFilesByExternalArray()");
- break;
- }
-
- case 62:// TODO - this opcode was never executed while I completed the game
- {
- debug(0, "o2_precacheSounds2(%04X)", arg16(3));
- break;
- }
-
- case 63:// ok
- {
- _regs.sp = _savedSp;
- break;
- }
-
- case 64:// ok
- {
- _savedSp = _regs.sp;
- break;
- }
-
- case 65:// TODO
- {
- debug(0, "o2_playMovie(%d, %d)", arg16(3), arg16(5));
- _vm->_moviePlayer->playMovie(arg16(3));
- break;
- }
-
- case 66:
- // NOP
- break;
-
- default:
- error("Invalid kernel opcode %d", kernelOpcode);
- }
-
+void ScriptInterpreter::execScriptFunction(uint16 index) {
+ debug(4, "execScriptFunction(%d)", index);
+ if (index >= _scriptFuncs.size())
+ error("ScriptInterpreter::execScriptFunction() Invalid script function index %d", index);
+ debug(4, "%s", _scriptFuncNames[index]);
+ (*_scriptFuncs[index])();
}
VarType ScriptInterpreter::getGameVarType(uint variable) {
@@ -1124,16 +692,6 @@ int16 ScriptInterpreter::arg16(int16 offset) {
return READ_LE_UINT16(&_subCode[offset]);
}
-void ScriptInterpreter::pushByte(byte value) {
- _stack[_regs.sp] = value;
- _regs.sp--;
-}
-
-byte ScriptInterpreter::popByte() {
- _regs.sp++;
- return _stack[_regs.sp];
-}
-
void ScriptInterpreter::pushInt16(int16 value) {
WRITE_LE_UINT16(_stack + _regs.sp, value);
_regs.sp -= 2;
@@ -1232,4 +790,315 @@ void ScriptInterpreter::loadState(Common::ReadStream *in) {
}
+void ScriptInterpreter::sfNop() {
+ // NOP
+}
+
+void ScriptInterpreter::sfGetGameVar() {
+ int16 value = getGameVar(arg16(3));
+ localWrite16(arg16(5), value);
+}
+
+void ScriptInterpreter::sfSetGameVar() {
+ int16 varIndex = arg16(3);
+ VarType varType = getGameVarType(varIndex);
+ int16 value = 0;
+ if (varType == vtByte)
+ value = arg8(5);
+ else if (varType == vtWord)
+ value = arg16(5);
+ setGameVar(varIndex, value);
+}
+
+void ScriptInterpreter::sfUpdateScreen() {
+
+ _vm->_sound->updateSpeech();
+
+ _vm->_screen->updateShakeScreen();
+
+ // TODO: Set quit flag
+ if (_vm->shouldQuit())
+ return;
+
+ if (!_vm->_movieSceneFlag)
+ _vm->updateInput();
+ else
+ _vm->_mouseButton = 0;
+
+ // TODO? Check keyb
+
+ _vm->_counter01--;
+ if (_vm->_counter01 <= 0) {
+ _vm->_counter01 = MIN(_vm->_counter02, 30);
+ _vm->_counter02 = 0;
+ _vm->updateScreen();
+ _vm->_flag01 = 1;
+ _vm->_system->delayMillis(5);
+ _vm->_counter02 = 1; // ?
+ } else {
+ _vm->_screen->clearSprites();
+ _vm->_flag01 = 0;
+ //_vm->_system->updateScreen();
+ }
+
+ // TODO
+
+}
+
+void ScriptInterpreter::sfGetRandomNumber() {
+ localWrite16(arg16(5), _vm->_rnd->getRandomNumber(arg16(3) - 1));
+}
+
+void ScriptInterpreter::sfDrawGuiTextMulti() {
+ _vm->_screen->drawGuiTextMulti((byte*)localPtr(arg16(3)));
+}
+
+void ScriptInterpreter::sfUpdateVerbLine() {
+ _vm->_screen->updateVerbLine(arg16(5), arg16(3));
+}
+
+void ScriptInterpreter::sfSetFontColor() {
+ _vm->_screen->_fontColor1 = 0;
+ _vm->_screen->_fontColor2 = arg8(3);
+}
+
+void ScriptInterpreter::sfGetTalkTextDuration() {
+ localWrite16(arg16(3), _vm->_screen->getTalkTextDuration());
+}
+
+void ScriptInterpreter::sfTalk() {
+ _vm->talk(arg16(5), arg16(3));
+}
+
+void ScriptInterpreter::sfFindPaletteFragment() {
+ localWrite16(arg16(5), _vm->_palette->findFragment(arg16(3)));
+}
+
+void ScriptInterpreter::sfClearPaletteFragments() {
+ _vm->_palette->clearFragments();
+}
+
+void ScriptInterpreter::sfAddPaletteFragment() {
+ _vm->_palette->addFragment(arg16(3), arg16(5));
+}
+
+void ScriptInterpreter::sfSetDeltaAnimPalette() {
+ _vm->_palette->setDeltaPalette(_vm->_palette->getAnimPalette(), arg8(6), (char)arg8(5), arg8(4), arg8(3));
+}
+
+void ScriptInterpreter::sfBuildColorTransTable() {
+ _vm->_palette->buildColorTransTable(arg8(4), (char)arg8(3), arg8(5));
+}
+
+void ScriptInterpreter::sfSetDeltaMainPalette() {
+ _vm->_palette->setDeltaPalette(_vm->_palette->getMainPalette(), arg8(6), (char)arg8(5), arg8(4), arg8(3));
+}
+
+void ScriptInterpreter::sfLoadScript() {
+ int16 codeOfs = _code - getSlotData(_regs.reg4);
+ loadScript(arg16(4), arg8(3));
+ _code = getSlotData(_regs.reg4) + codeOfs;
+ _switchLocalDataNear = true;
+}
+
+void ScriptInterpreter::sfRegisterFont() {
+ _vm->_screen->registerFont(arg8(3), arg16(4));
+}
+
+void ScriptInterpreter::sfLoadAddPalette() {
+ _vm->_palette->loadAddPalette(arg16(4), arg8(3));
+}
+
+void ScriptInterpreter::sfLoadScene() {
+ if (arg8(3) == 0) {
+ _vm->_sound->stopSpeech();
+ _vm->loadScene(arg16(4));
+ } else {
+ _vm->_screen->loadMouseCursor(arg16(4));
+ }
+}
+
+void ScriptInterpreter::sfSetGuiHeight() {
+ _vm->setGuiHeight(arg8(3));
+}
+
+void ScriptInterpreter::sfFindMouseInRectIndex1() {
+ int16 index = -1;
+ if (_vm->_mouseY < _vm->_cameraHeight) {
+ index = _vm->findRectAtPoint(getSlotData(arg16(5)) + arg16(3),
+ _vm->_mouseX + _vm->_cameraX,
+ _vm->_mouseY + _vm->_cameraY,
+ arg16(11) + 1, arg16(7));
+ }
+ localWrite16(arg16(9), index);
+}
+
+void ScriptInterpreter::sfFindMouseInRectIndex2() {
+ int16 index = -1;
+ if (_vm->_sceneResIndex != 0) {
+ if (_vm->_mouseY < _vm->_cameraHeight) {
+ index = _vm->findRectAtPoint(getSlotData(arg16(5)) + arg16(3),
+ _vm->_mouseX + _vm->_cameraX,
+ _vm->_mouseY + _vm->_cameraY,
+ 0, arg16(7));
+ }
+ }
+ localWrite16(arg16(9), index);
+}
+
+void ScriptInterpreter::sfDrawGuiImage() {
+ _vm->_screen->drawGuiImage(arg16(5), arg16(3), arg16(7));
+}
+
+void ScriptInterpreter::sfAddAnimatedSpriteNoLoop() {
+ _vm->_screen->addAnimatedSprite(arg16(5), arg16(3), arg16(7), (byte*)localPtr(0), (int16*)localPtr(arg16(9)), false, 2);
+}
+
+void ScriptInterpreter::sfAddAnimatedSprite() {
+ _vm->_screen->addAnimatedSprite(arg16(5), arg16(3), arg16(7), (byte*)localPtr(0), (int16*)localPtr(arg16(9)), true, 2);
+}
+
+void ScriptInterpreter::sfAddStaticSprite() {
+ _vm->_screen->addStaticSprite(_subCode + 3);
+}
+
+void ScriptInterpreter::sfAddAnimatedSpriteScaled() {
+ _vm->_screen->addAnimatedSprite(arg16(5), arg16(3), arg16(7), (byte*)localPtr(0), (int16*)localPtr(arg16(9)), true, 1);
+}
+
+void ScriptInterpreter::sfFindPath() {
+ _vm->_segmap->findPath((int16*)(getSlotData(arg16(13)) + arg16(11)), arg16(9), arg16(7), arg16(5), arg16(3));
+}
+
+void ScriptInterpreter::sfWalk() {
+ _vm->walk(getSlotData(arg16(5)) + arg16(3));
+}
+
+void ScriptInterpreter::sfScrollCameraUp() {
+ _vm->scrollCameraUp(4);
+}
+
+void ScriptInterpreter::sfScrollCameraDown() {
+ _vm->scrollCameraDown(4);
+}
+
+void ScriptInterpreter::sfScrollCameraLeft() {
+ _vm->scrollCameraLeft(4);
+}
+
+void ScriptInterpreter::sfScrollCameraRight() {
+ _vm->scrollCameraRight(4);
+}
+
+void ScriptInterpreter::sfScrollCameraUpEx() {
+ _vm->scrollCameraUp(arg16(3));
+}
+
+void ScriptInterpreter::sfScrollCameraDownEx() {
+ _vm->scrollCameraDown(arg16(3));
+}
+
+void ScriptInterpreter::sfScrollCameraLeftEx() {
+ _vm->scrollCameraLeft(arg16(3));
+}
+
+void ScriptInterpreter::sfScrollCameraRightEx() {
+ _vm->scrollCameraRight(arg16(3));
+}
+
+void ScriptInterpreter::sfSetCamera() {
+ _vm->setCamera(arg16(5), arg16(3));
+}
+
+void ScriptInterpreter::sfGetRgbModifiertAtPoint() {
+ byte *rgb = getSlotData(arg16(11)) + arg16(9);
+ _vm->_segmap->getRgbModifiertAtPoint(arg16(5), arg16(3), arg16(7), rgb[0], rgb[1], rgb[2]);
+}
+
+void ScriptInterpreter::sfStartAnim() {
+ _vm->_anim->start(arg16(3));
+}
+
+void ScriptInterpreter::sfAnimNextFrame() {
+ _vm->_anim->nextFrame();
+}
+
+void ScriptInterpreter::sfGetAnimFrameNumber() {
+ localWrite16(arg16(3), _vm->_anim->getFrameNumber());
+}
+
+void ScriptInterpreter::sfGetAnimStatus() {
+ int16 status = _vm->_anim->getStatus();
+ if (status == 0 || status == 1) {
+ // TODO mov screenFlag01, 0
+ }
+ localWrite16(arg16(3), status);
+}
+
+void ScriptInterpreter::sfStartShakeScreen() {
+ _vm->_screen->startShakeScreen(arg16(3));
+}
+
+void ScriptInterpreter::sfStopShakeScreen() {
+ _vm->_screen->stopShakeScreen();
+}
+
+void ScriptInterpreter::sfStartSequence() {
+ // TODO
+}
+
+void ScriptInterpreter::sfEndSequence() {
+ // TODO
+}
+
+void ScriptInterpreter::sfSequenceVolumeStuff() {
+ // TODO
+}
+
+void ScriptInterpreter::sfPlaySound1() {
+ // TODO
+}
+
+void ScriptInterpreter::sfPlaySound2() {
+ _vm->_sound->playSound(arg16(3), arg16(5), arg16(7));
+}
+
+void ScriptInterpreter::sfClearScreen() {
+ // TODO
+}
+
+void ScriptInterpreter::sfHandleInput() {
+ // TODO: Recheck what this does, I don't remember
+ int16 varOfs = arg16(3);
+ localWrite16(varOfs, 0);
+}
+
+void ScriptInterpreter::sfRunOptionsScreen() {
+ // TODO
+}
+
+void ScriptInterpreter::sfPrecacheSprites() {
+}
+
+void ScriptInterpreter::sfPrecacheSounds1() {
+}
+
+void ScriptInterpreter::sfDeleteAllPbfFilesByExternalArray() {
+}
+
+void ScriptInterpreter::sfPrecacheSounds2() {
+}
+
+void ScriptInterpreter::sfRestoreStackPtr() {
+ _regs.sp = _savedSp;
+}
+
+void ScriptInterpreter::sfSaveStackPtr() {
+ _savedSp = _regs.sp;
+}
+
+void ScriptInterpreter::sfPlayMovie() {
+ _vm->_moviePlayer->playMovie(arg16(3));
+}
+
} // End of namespace Toltecs
diff --git a/engines/toltecs/script.h b/engines/toltecs/script.h
index 8f4ae80818..c35a2e4184 100644
--- a/engines/toltecs/script.h
+++ b/engines/toltecs/script.h
@@ -34,6 +34,7 @@
#include "common/events.h"
#include "common/keyboard.h"
#include "common/array.h"
+#include "common/func.h"
#include "sound/audiostream.h"
#include "sound/mixer.h"
@@ -52,6 +53,8 @@ enum VarType {
vtWord
};
+typedef Common::Functor0<void> ScriptFunction;
+
class ScriptInterpreter {
public:
ScriptInterpreter(ToltecsEngine *vm);
@@ -90,6 +93,8 @@ protected:
};
ToltecsEngine *_vm;
+ Common::Array<const ScriptFunction*> _scriptFuncs;
+ Common::Array<const char *> _scriptFuncNames;
byte *_stack;
@@ -107,13 +112,13 @@ protected:
int16 readInt16();
void execOpcode(byte opcode);
- void execKernelOpcode(uint16 kernelOpcode);
+
+ void setupScriptFunctions();
+ void execScriptFunction(uint16 index);
byte arg8(int16 offset);
int16 arg16(int16 offset);
- void pushByte(byte value);
- byte popByte();
void pushInt16(int16 value);
int16 popInt16();
@@ -123,6 +128,68 @@ protected:
int16 localRead16(int16 offset);
byte *localPtr(int16 offset);
+ void sfNop();
+ void sfGetGameVar();
+ void sfSetGameVar();
+ void sfUpdateScreen();
+ void sfGetRandomNumber();
+ void sfDrawGuiTextMulti();
+ void sfUpdateVerbLine();
+ void sfSetFontColor();
+ void sfGetTalkTextDuration();
+ void sfTalk();
+ void sfFindPaletteFragment();
+ void sfClearPaletteFragments();
+ void sfAddPaletteFragment();
+ void sfSetDeltaAnimPalette();
+ void sfBuildColorTransTable();
+ void sfSetDeltaMainPalette();
+ void sfLoadScript();
+ void sfRegisterFont();
+ void sfLoadAddPalette();
+ void sfLoadScene();
+ void sfSetGuiHeight();
+ void sfFindMouseInRectIndex1();
+ void sfFindMouseInRectIndex2();
+ void sfDrawGuiImage();
+ void sfAddAnimatedSpriteNoLoop();
+ void sfAddAnimatedSprite();
+ void sfAddStaticSprite();
+ void sfAddAnimatedSpriteScaled();
+ void sfFindPath();
+ void sfWalk();
+ void sfScrollCameraUp();
+ void sfScrollCameraDown();
+ void sfScrollCameraLeft();
+ void sfScrollCameraRight();
+ void sfScrollCameraUpEx();
+ void sfScrollCameraDownEx();
+ void sfScrollCameraLeftEx();
+ void sfScrollCameraRightEx();
+ void sfSetCamera();
+ void sfGetRgbModifiertAtPoint();
+ void sfStartAnim();
+ void sfAnimNextFrame();
+ void sfGetAnimFrameNumber();
+ void sfGetAnimStatus();
+ void sfStartShakeScreen();
+ void sfStopShakeScreen();
+ void sfStartSequence();
+ void sfEndSequence();
+ void sfSequenceVolumeStuff();
+ void sfPlaySound1();
+ void sfPlaySound2();
+ void sfClearScreen();
+ void sfHandleInput();
+ void sfRunOptionsScreen();
+ void sfPrecacheSprites();
+ void sfPrecacheSounds1();
+ void sfDeleteAllPbfFilesByExternalArray();
+ void sfPrecacheSounds2();
+ void sfRestoreStackPtr();
+ void sfSaveStackPtr();
+ void sfPlayMovie();
+
};
generated by cgit v1.2.3 (git 2.25.1) at 2025-11-04 06:01:15 +0000