mirror of
https://github.com/libretro/scummvm.git
synced 2025-01-12 04:36:15 +00:00
8e80f5690d
- Adds break statements where missing in Mechanical::toggleVar() and Mechanical::setVarValue() - Restore proper numbering of Achenar and Sirrus panel state variables, which were wrongly swapped. - When bird is singing, play sound continuously. - When operating the fortress elevator, keep the engine sound active while the elevator is moving.
829 lines
26 KiB
C++
829 lines
26 KiB
C++
/* 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.
|
|
*
|
|
*/
|
|
|
|
#include "mohawk/cursors.h"
|
|
#include "mohawk/myst.h"
|
|
#include "mohawk/graphics.h"
|
|
#include "mohawk/myst_areas.h"
|
|
#include "mohawk/myst_state.h"
|
|
#include "mohawk/sound.h"
|
|
#include "mohawk/video.h"
|
|
#include "mohawk/myst_stacks/mechanical.h"
|
|
|
|
#include "common/events.h"
|
|
#include "common/system.h"
|
|
|
|
namespace Mohawk {
|
|
namespace MystStacks {
|
|
|
|
Mechanical::Mechanical(MohawkEngine_Myst *vm) :
|
|
MystScriptParser(vm), _state(vm->_gameState->_mechanical) {
|
|
setupOpcodes();
|
|
|
|
_mystStaircaseState = false;
|
|
_fortressPosition = 0;
|
|
}
|
|
|
|
Mechanical::~Mechanical() {
|
|
}
|
|
|
|
#define OPCODE(op, x) _opcodes.push_back(new MystOpcode(op, (OpcodeProcMyst) &Mechanical::x, #x))
|
|
|
|
void Mechanical::setupOpcodes() {
|
|
// "Stack-Specific" Opcodes
|
|
OPCODE(100, o_throneEnablePassage);
|
|
OPCODE(101, o_birdCrankStart);
|
|
OPCODE(102, NOP);
|
|
OPCODE(103, o_birdCrankStop);
|
|
OPCODE(104, o_snakeBoxTrigger);
|
|
OPCODE(105, o_fortressStaircaseMovie);
|
|
OPCODE(106, o_elevatorRotationStart);
|
|
OPCODE(107, o_elevatorRotationMove);
|
|
OPCODE(108, o_elevatorRotationStop);
|
|
OPCODE(109, o_fortressRotationSpeedStart);
|
|
OPCODE(110, o_fortressRotationSpeedMove);
|
|
OPCODE(111, o_fortressRotationSpeedStop);
|
|
OPCODE(112, o_fortressRotationBrakeStart);
|
|
OPCODE(113, o_fortressRotationBrakeMove);
|
|
OPCODE(114, o_fortressRotationBrakeStop);
|
|
OPCODE(115, o_fortressSimulationSpeedStart);
|
|
OPCODE(116, o_fortressSimulationSpeedMove);
|
|
OPCODE(117, o_fortressSimulationSpeedStop);
|
|
OPCODE(118, o_fortressSimulationBrakeStart);
|
|
OPCODE(119, o_fortressSimulationBrakeMove);
|
|
OPCODE(120, o_fortressSimulationBrakeStop);
|
|
OPCODE(121, o_elevatorWindowMovie);
|
|
OPCODE(122, o_elevatorGoMiddle);
|
|
OPCODE(123, o_elevatorTopMovie);
|
|
OPCODE(124, opcode_124);
|
|
OPCODE(125, o_mystStaircaseMovie);
|
|
OPCODE(126, opcode_126);
|
|
OPCODE(127, o_crystalEnterYellow);
|
|
OPCODE(128, o_crystalLeaveYellow);
|
|
OPCODE(129, o_crystalEnterGreen);
|
|
OPCODE(130, o_crystalLeaveGreen);
|
|
OPCODE(131, o_crystalEnterRed);
|
|
OPCODE(132, o_crystalLeaveRed);
|
|
|
|
// "Init" Opcodes
|
|
OPCODE(200, o_throne_init);
|
|
OPCODE(201, o_fortressStaircase_init);
|
|
OPCODE(202, o_bird_init);
|
|
OPCODE(203, o_snakeBox_init);
|
|
OPCODE(204, o_elevatorRotation_init);
|
|
OPCODE(205, o_fortressRotation_init);
|
|
OPCODE(206, o_fortressSimulation_init);
|
|
OPCODE(209, o_fortressSimulationStartup_init);
|
|
|
|
// "Exit" Opcodes
|
|
OPCODE(300, NOP);
|
|
}
|
|
|
|
#undef OPCODE
|
|
|
|
void Mechanical::disablePersistentScripts() {
|
|
_fortressSimulationRunning = false;
|
|
_elevatorRotationLeverMoving = false;
|
|
_elevatorGoingMiddle = false;
|
|
_birdSinging = false;
|
|
_fortressRotationRunning = false;
|
|
}
|
|
|
|
void Mechanical::runPersistentScripts() {
|
|
if (_birdSinging)
|
|
birdSing_run();
|
|
|
|
if (_elevatorRotationLeverMoving)
|
|
elevatorRotation_run();
|
|
|
|
if (_elevatorGoingMiddle)
|
|
elevatorGoMiddle_run();
|
|
|
|
if (_fortressRotationRunning)
|
|
fortressRotation_run();
|
|
|
|
if (_fortressSimulationRunning)
|
|
fortressSimulation_run();
|
|
}
|
|
|
|
uint16 Mechanical::getVar(uint16 var) {
|
|
switch(var) {
|
|
case 0: // Achenar's Secret Panel State
|
|
return _state.achenarPanelState;
|
|
case 1: // Sirrus's Secret Panel State
|
|
return _state.sirrusPanelState;
|
|
case 2: // Achenar's Secret Room Crate Lid Open and Blue Page Present
|
|
if (_state.achenarCrateOpened) {
|
|
if (_globals.bluePagesInBook & 4 || _globals.heldPage == 3)
|
|
return 2;
|
|
else
|
|
return 3;
|
|
} else {
|
|
return _globals.bluePagesInBook & 4 || _globals.heldPage == 3;
|
|
}
|
|
case 3: // Achenar's Secret Room Crate State
|
|
return _state.achenarCrateOpened;
|
|
case 4: // Myst Book Room Staircase State
|
|
return _mystStaircaseState;
|
|
case 5: // Fortress Position
|
|
return _fortressPosition;
|
|
case 6: // Fortress Position - Big Cog Visible Through Doorway
|
|
return _fortressPosition == 0;
|
|
case 7: // Fortress Elevator Open
|
|
if (_state.elevatorRotation == 4)
|
|
return 1; // Open
|
|
else
|
|
return 0; // Closed
|
|
case 10: // Fortress Staircase State
|
|
return _state.staircaseState;
|
|
case 11: // Fortress Elevator Rotation Position
|
|
return _state.elevatorRotation;
|
|
case 12: // Fortress Elevator Rotation Cog Position
|
|
return 5 - (uint16)(_elevatorRotationGearPosition + 0.5) % 6;
|
|
case 13: // Elevator position
|
|
return _elevatorPosition;
|
|
case 14: // Elevator going down when at top
|
|
if (_elevatorGoingDown && _elevatorTooLate)
|
|
return 2;
|
|
else
|
|
return _elevatorGoingDown;
|
|
case 15: // Code Lock Execute Button Script
|
|
if (_mystStaircaseState)
|
|
return 0;
|
|
else if (_state.codeShape[0] == 2 && _state.codeShape[1] == 8
|
|
&& _state.codeShape[2] == 5 && _state.codeShape[3] == 1)
|
|
return 1;
|
|
else
|
|
return 2;
|
|
case 16: // Code Lock Shape #1 - Left
|
|
case 17: // Code Lock Shape #2
|
|
case 18: // Code Lock Shape #3
|
|
case 19: // Code Lock Shape #4 - Right
|
|
return _state.codeShape[var - 16];
|
|
case 20: // Crystal Lit Flag - Yellow
|
|
return _crystalLit == 3;
|
|
case 21: // Crystal Lit Flag - Green
|
|
return _crystalLit == 1;
|
|
case 22: // Crystal Lit Flag - Red
|
|
return _crystalLit == 2;
|
|
case 102: // Red page
|
|
return !(_globals.redPagesInBook & 4) && (_globals.heldPage != 9);
|
|
case 103: // Blue page
|
|
return !(_globals.bluePagesInBook & 4) && (_globals.heldPage != 3);
|
|
default:
|
|
return MystScriptParser::getVar(var);
|
|
}
|
|
}
|
|
|
|
void Mechanical::toggleVar(uint16 var) {
|
|
switch(var) {
|
|
case 0: // Achenar's Secret Panel State
|
|
_state.achenarPanelState ^= 1;
|
|
break;
|
|
case 1: // Sirrus's Secret Panel State
|
|
_state.sirrusPanelState ^= 1;
|
|
break;
|
|
case 3: // Achenar's Secret Room Crate State
|
|
_state.achenarCrateOpened ^= 1;
|
|
break;
|
|
case 4: // Myst Book Room Staircase State
|
|
_mystStaircaseState ^= 1;
|
|
break;
|
|
case 10: // Fortress Staircase State
|
|
_state.staircaseState ^= 1;
|
|
break;
|
|
case 16: // Code Lock Shape #1 - Left
|
|
case 17: // Code Lock Shape #2
|
|
case 18: // Code Lock Shape #3
|
|
case 19: // Code Lock Shape #4 - Right
|
|
_state.codeShape[var - 16] = (_state.codeShape[var - 16] + 1) % 10;
|
|
break;
|
|
case 23: // Elevator player is in cabin
|
|
_elevatorInCabin = false;
|
|
break;
|
|
case 102: // Red page
|
|
if (!(_globals.redPagesInBook & 4)) {
|
|
if (_globals.heldPage == 9)
|
|
_globals.heldPage = 0;
|
|
else
|
|
_globals.heldPage = 9;
|
|
}
|
|
break;
|
|
case 103: // Blue page
|
|
if (!(_globals.bluePagesInBook & 4)) {
|
|
if (_globals.heldPage == 3)
|
|
_globals.heldPage = 0;
|
|
else
|
|
_globals.heldPage = 3;
|
|
}
|
|
break;
|
|
default:
|
|
MystScriptParser::toggleVar(var);
|
|
break;
|
|
}
|
|
}
|
|
|
|
bool Mechanical::setVarValue(uint16 var, uint16 value) {
|
|
bool refresh = false;
|
|
|
|
switch (var) {
|
|
case 13:
|
|
_elevatorPosition = value;
|
|
break;
|
|
case 14: // Elevator going down when at top
|
|
_elevatorGoingDown = value;
|
|
break;
|
|
default:
|
|
refresh = MystScriptParser::setVarValue(var, value);
|
|
break;
|
|
}
|
|
|
|
return refresh;
|
|
}
|
|
|
|
void Mechanical::o_throneEnablePassage(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Enable throne passage", op);
|
|
|
|
_vm->_resources[argv[0]]->setEnabled(getVar(var));
|
|
}
|
|
|
|
void Mechanical::o_birdCrankStart(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Mechanical bird crank start", op);
|
|
|
|
MystResourceType11 *crank = static_cast<MystResourceType11 *>(_invokingResource);
|
|
|
|
uint16 crankSoundId = crank->getList2(0);
|
|
_vm->_sound->replaceSoundMyst(crankSoundId, Audio::Mixer::kMaxChannelVolume, true);
|
|
|
|
_birdSingEndTime = 0;
|
|
_birdCrankStartTime = _vm->_system->getMillis();
|
|
|
|
MystResourceType6 *crankMovie = static_cast<MystResourceType6 *>(crank->getSubResource(0));
|
|
crankMovie->playMovie();
|
|
}
|
|
|
|
void Mechanical::o_birdCrankStop(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Mechanical bird crank stop", op);
|
|
|
|
MystResourceType11 *crank = static_cast<MystResourceType11 *>(_invokingResource);
|
|
|
|
MystResourceType6 *crankMovie = static_cast<MystResourceType6 *>(crank->getSubResource(0));
|
|
crankMovie->pauseMovie(true);
|
|
|
|
uint16 crankSoundId = crank->getList2(1);
|
|
_vm->_sound->replaceSoundMyst(crankSoundId);
|
|
|
|
_birdSingEndTime = 2 * _vm->_system->getMillis() - _birdCrankStartTime;
|
|
_birdSinging = true;
|
|
|
|
_bird->playMovie();
|
|
}
|
|
|
|
void Mechanical::o_snakeBoxTrigger(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Trigger Playing Of Snake Movie", op);
|
|
|
|
// Used on Mechanical Card 6043 (Weapons Rack with Snake Box)
|
|
_snakeBox->playMovie();
|
|
}
|
|
|
|
void Mechanical::o_fortressStaircaseMovie(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Play Stairs Movement Movie", op);
|
|
|
|
VideoHandle staircase = _vm->_video->playMovie(_vm->wrapMovieFilename("hhstairs", kMechanicalStack), 174, 222);
|
|
|
|
if (_state.staircaseState) {
|
|
_vm->_video->setVideoBounds(staircase, Audio::Timestamp(0, 840, 600), Audio::Timestamp(0, 1680, 600));
|
|
} else {
|
|
_vm->_video->setVideoBounds(staircase, Audio::Timestamp(0, 0, 600), Audio::Timestamp(0, 840, 600));
|
|
}
|
|
|
|
_vm->_video->waitUntilMovieEnds(staircase);
|
|
}
|
|
|
|
void Mechanical::o_elevatorRotationStart(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Elevator rotation lever start", op);
|
|
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
lever->drawFrame(0);
|
|
|
|
_elevatorRotationLeverMoving = true;
|
|
_elevatorRotationSpeed = 0;
|
|
|
|
_vm->_sound->stopBackgroundMyst();
|
|
|
|
_vm->_cursor->setCursor(700);
|
|
}
|
|
|
|
void Mechanical::o_elevatorRotationMove(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Elevator rotation lever move", op);
|
|
|
|
const Common::Point &mouse = _vm->_system->getEventManager()->getMousePos();
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
|
|
// Make the handle follow the mouse
|
|
int16 maxStep = lever->getNumFrames() - 1;
|
|
Common::Rect rect = lever->getRect();
|
|
int16 step = ((rect.bottom - mouse.y) * lever->getNumFrames()) / rect.height();
|
|
step = CLIP<int16>(step, 0, maxStep);
|
|
|
|
_elevatorRotationSpeed = step * 0.1;
|
|
|
|
// Draw current frame
|
|
lever->drawFrame(step);
|
|
}
|
|
|
|
void Mechanical::o_elevatorRotationStop(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Elevator rotation lever stop", op);
|
|
|
|
const Common::Point &mouse = _vm->_system->getEventManager()->getMousePos();
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
|
|
// Get current lever frame
|
|
int16 maxStep = lever->getNumFrames() - 1;
|
|
Common::Rect rect = lever->getRect();
|
|
int16 step = ((rect.bottom - mouse.y) * lever->getNumFrames()) / rect.height();
|
|
step = CLIP<int16>(step, 0, maxStep);
|
|
|
|
// Release lever
|
|
for (int i = step; i >= 0; i--) {
|
|
lever->drawFrame(i);
|
|
_vm->_system->delayMillis(10);
|
|
}
|
|
|
|
// Stop persistent script
|
|
_elevatorRotationLeverMoving = false;
|
|
|
|
float speed = _elevatorRotationSpeed * 10;
|
|
|
|
if (speed > 0) {
|
|
|
|
// Decrease speed
|
|
while (speed > 2) {
|
|
speed -= 0.5;
|
|
|
|
_elevatorRotationGearPosition += speed * 0.1;
|
|
|
|
if (_elevatorRotationGearPosition > 12)
|
|
break;
|
|
|
|
_vm->redrawArea(12);
|
|
_vm->_system->delayMillis(100);
|
|
}
|
|
|
|
// Increment position
|
|
_state.elevatorRotation = (_state.elevatorRotation + 1) % 10;
|
|
|
|
_vm->_sound->replaceSoundMyst(_elevatorRotationSoundId);
|
|
_vm->redrawArea(11);
|
|
}
|
|
|
|
_vm->checkCursorHints();
|
|
}
|
|
|
|
void Mechanical::o_fortressRotationSpeedStart(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation speed lever start", op);
|
|
|
|
_vm->_cursor->setCursor(700);
|
|
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
lever->drawFrame(0);
|
|
}
|
|
|
|
void Mechanical::o_fortressRotationSpeedMove(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation speed lever move", op);
|
|
|
|
const Common::Point &mouse = _vm->_system->getEventManager()->getMousePos();
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
|
|
// Make the handle follow the mouse
|
|
int16 maxStep = lever->getNumFrames() - 1;
|
|
Common::Rect rect = lever->getRect();
|
|
int16 step = ((rect.top + 65 - mouse.y) * lever->getNumFrames()) / 65;
|
|
step = CLIP<int16>(step, 0, maxStep);
|
|
|
|
_fortressRotationSpeed = step;
|
|
|
|
// Draw current frame
|
|
lever->drawFrame(step);
|
|
}
|
|
|
|
void Mechanical::o_fortressRotationSpeedStop(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation speed lever stop", op);
|
|
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
|
|
// Release lever
|
|
for (int i = _fortressRotationSpeed; i >= 0; i--) {
|
|
lever->drawFrame(i);
|
|
_vm->_system->delayMillis(10);
|
|
}
|
|
|
|
_fortressRotationSpeed = 0;
|
|
|
|
_vm->checkCursorHints();
|
|
}
|
|
|
|
void Mechanical::o_fortressRotationBrakeStart(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation brake lever start", op);
|
|
|
|
_vm->_cursor->setCursor(700);
|
|
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
lever->drawFrame(_fortressRotationBrake);
|
|
}
|
|
|
|
void Mechanical::o_fortressRotationBrakeMove(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation brake lever move", op);
|
|
|
|
const Common::Point &mouse = _vm->_system->getEventManager()->getMousePos();
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
|
|
// Make the handle follow the mouse
|
|
int16 maxStep = lever->getNumFrames() - 1;
|
|
Common::Rect rect = lever->getRect();
|
|
int16 step = ((rect.top + 65 - mouse.y) * lever->getNumFrames()) / 65;
|
|
step = CLIP<int16>(step, 0, maxStep);
|
|
|
|
_fortressRotationBrake = step;
|
|
|
|
// Draw current frame
|
|
lever->drawFrame(step);
|
|
}
|
|
|
|
void Mechanical::o_fortressRotationBrakeStop(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation brake lever stop", op);
|
|
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
lever->drawFrame(_fortressRotationBrake);
|
|
|
|
_vm->checkCursorHints();
|
|
}
|
|
|
|
void Mechanical::o_fortressSimulationSpeedStart(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation simulator speed lever start", op);
|
|
|
|
_vm->_cursor->setCursor(700);
|
|
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
lever->drawFrame(0);
|
|
}
|
|
|
|
void Mechanical::o_fortressSimulationSpeedMove(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation simulator speed lever move", op);
|
|
|
|
const Common::Point &mouse = _vm->_system->getEventManager()->getMousePos();
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
|
|
// Make the handle follow the mouse
|
|
int16 maxStep = lever->getNumFrames() - 1;
|
|
Common::Rect rect = lever->getRect();
|
|
int16 step = ((rect.bottom - mouse.y) * lever->getNumFrames()) / rect.height();
|
|
step = CLIP<int16>(step, 0, maxStep);
|
|
|
|
_fortressSimulationSpeed = step;
|
|
|
|
// Draw current frame
|
|
lever->drawFrame(step);
|
|
}
|
|
|
|
void Mechanical::o_fortressSimulationSpeedStop(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation simulator speed lever stop", op);
|
|
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
|
|
// Release lever
|
|
for (int i = _fortressSimulationSpeed; i >= 0; i--) {
|
|
lever->drawFrame(i);
|
|
_vm->_system->delayMillis(10);
|
|
}
|
|
|
|
_fortressSimulationSpeed = 0;
|
|
|
|
_vm->checkCursorHints();
|
|
}
|
|
|
|
void Mechanical::o_fortressSimulationBrakeStart(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation simulator brake lever start", op);
|
|
|
|
_vm->_cursor->setCursor(700);
|
|
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
lever->drawFrame(_fortressSimulationBrake);
|
|
}
|
|
|
|
void Mechanical::o_fortressSimulationBrakeMove(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation simulator brake lever move", op);
|
|
|
|
const Common::Point &mouse = _vm->_system->getEventManager()->getMousePos();
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
|
|
// Make the handle follow the mouse
|
|
int16 maxStep = lever->getNumFrames() - 1;
|
|
Common::Rect rect = lever->getRect();
|
|
int16 step = ((rect.bottom - mouse.y) * lever->getNumFrames()) / rect.height();
|
|
step = CLIP<int16>(step, 0, maxStep);
|
|
|
|
_fortressSimulationBrake = step;
|
|
|
|
// Draw current frame
|
|
lever->drawFrame(step);
|
|
}
|
|
|
|
void Mechanical::o_fortressSimulationBrakeStop(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d Fortress rotation simulator brake lever stop", op);
|
|
|
|
MystResourceType12 *lever = static_cast<MystResourceType12 *>(_invokingResource);
|
|
lever->drawFrame(_fortressSimulationBrake);
|
|
|
|
_vm->checkCursorHints();
|
|
}
|
|
|
|
void Mechanical::o_elevatorWindowMovie(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
uint16 startTime = argv[0];
|
|
uint16 endTime = argv[1];
|
|
|
|
debugC(kDebugScript, "Opcode %d Movie Time Index %d to %d", op, startTime, endTime);
|
|
|
|
VideoHandle window = _vm->_video->playMovie(_vm->wrapMovieFilename("ewindow", kMechanicalStack), 253, 0);
|
|
_vm->_video->setVideoBounds(window, Audio::Timestamp(0, startTime, 600), Audio::Timestamp(0, endTime, 600));
|
|
_vm->_video->waitUntilMovieEnds(window);
|
|
}
|
|
|
|
void Mechanical::o_elevatorGoMiddle(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Elevator go middle from top", op);
|
|
|
|
_elevatorTooLate = false;
|
|
_elevatorTopCounter = 5;
|
|
_elevatorGoingMiddle = true;
|
|
_elevatorInCabin = true;
|
|
_elevatorNextTime = _vm->_system->getMillis() + 1000;
|
|
}
|
|
|
|
void Mechanical::elevatorGoMiddle_run() {
|
|
uint32 time = _vm->_system->getMillis();
|
|
if (_elevatorNextTime < time) {
|
|
_elevatorNextTime = time + 1000;
|
|
_elevatorTopCounter--;
|
|
|
|
if (_elevatorTopCounter > 0) {
|
|
// Draw button pressed
|
|
if (_elevatorInCabin) {
|
|
_vm->_gfx->copyImageSectionToScreen(6332, Common::Rect(0, 35, 51, 63), Common::Rect(10, 137, 61, 165));
|
|
_vm->_system->updateScreen();
|
|
}
|
|
|
|
// Blip
|
|
_vm->_sound->playSoundBlocking(14120);
|
|
|
|
// Restore button
|
|
if (_elevatorInCabin) {
|
|
_vm->_gfx->copyBackBufferToScreen(Common::Rect(10, 137, 61, 165));
|
|
_vm->_system->updateScreen();
|
|
}
|
|
} else if (_elevatorInCabin) {
|
|
_elevatorTooLate = true;
|
|
|
|
// Elevator going to middle animation
|
|
_vm->_cursor->hideCursor();
|
|
_vm->_sound->playSoundBlocking(11120);
|
|
_vm->_gfx->copyImageToBackBuffer(6118, Common::Rect(544, 333));
|
|
_vm->_sound->replaceSoundMyst(12120);
|
|
_vm->_gfx->runTransition(2, Common::Rect(177, 0, 370, 333), 25, 0);
|
|
_vm->_sound->playSoundBlocking(13120);
|
|
_vm->_sound->replaceSoundMyst(8120);
|
|
_vm->_gfx->copyImageToBackBuffer(6327, Common::Rect(544, 333));
|
|
_vm->_system->delayMillis(500);
|
|
_vm->_sound->replaceSoundMyst(9120);
|
|
static uint16 moviePos[2] = { 3540, 5380 };
|
|
o_elevatorWindowMovie(121, 0, 2, moviePos);
|
|
_vm->_gfx->copyBackBufferToScreen(Common::Rect(544, 333));
|
|
_vm->_sound->replaceSoundMyst(10120);
|
|
_vm->_cursor->showCursor();
|
|
|
|
_elevatorGoingMiddle = false;
|
|
_elevatorPosition = 1;
|
|
|
|
_vm->changeToCard(6327, true);
|
|
}
|
|
}
|
|
}
|
|
|
|
void Mechanical::o_elevatorTopMovie(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
uint16 startTime = argv[0];
|
|
uint16 endTime = argv[1];
|
|
|
|
debugC(kDebugScript, "Opcode %d Movie Time Index %d to %d", op, startTime, endTime);
|
|
|
|
VideoHandle window = _vm->_video->playMovie(_vm->wrapMovieFilename("hcelev", kMechanicalStack), 206, 38);
|
|
_vm->_video->setVideoBounds(window, Audio::Timestamp(0, startTime, 600), Audio::Timestamp(0, endTime, 600));
|
|
_vm->_video->waitUntilMovieEnds(window);
|
|
}
|
|
|
|
void Mechanical::opcode_124(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
varUnusedCheck(op, var);
|
|
|
|
if (argc == 0) {
|
|
// Used by Card 6156 (Fortress Rotation Controls)
|
|
// Called when Red Exit Button Pressed to raise Elevator
|
|
|
|
// TODO: Fill in Code...
|
|
} else
|
|
unknown(op, var, argc, argv);
|
|
}
|
|
|
|
void Mechanical::o_mystStaircaseMovie(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Myst book staircase video", op);
|
|
|
|
_vm->_video->playMovieBlocking(_vm->wrapMovieFilename("sstairs", kMechanicalStack), 199, 108);
|
|
}
|
|
|
|
void Mechanical::opcode_126(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
varUnusedCheck(op, var);
|
|
|
|
if (argc == 0) {
|
|
// Used by Card 6120 (Fortress Elevator)
|
|
// Called when Red Exit Button Pressed to raise Elevator and
|
|
// exit is clicked...
|
|
|
|
// TODO: Fill in Code...
|
|
} else
|
|
unknown(op, var, argc, argv);
|
|
}
|
|
|
|
void Mechanical::o_crystalEnterYellow(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Crystal enter", op);
|
|
|
|
_crystalLit = 3;
|
|
_vm->redrawArea(20);
|
|
}
|
|
|
|
void Mechanical::o_crystalEnterGreen(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Crystal enter", op);
|
|
|
|
_crystalLit = 1;
|
|
_vm->redrawArea(21);
|
|
}
|
|
|
|
void Mechanical::o_crystalEnterRed(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Crystal enter", op);
|
|
|
|
_crystalLit = 2;
|
|
_vm->redrawArea(22);
|
|
}
|
|
|
|
void Mechanical::o_crystalLeaveYellow(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Crystal leave", op);
|
|
|
|
_crystalLit = 0;
|
|
_vm->redrawArea(20);
|
|
}
|
|
|
|
void Mechanical::o_crystalLeaveGreen(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Crystal leave", op);
|
|
|
|
_crystalLit = 0;
|
|
_vm->redrawArea(21);
|
|
}
|
|
|
|
void Mechanical::o_crystalLeaveRed(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Crystal leave", op);
|
|
|
|
_crystalLit = 0;
|
|
_vm->redrawArea(22);
|
|
}
|
|
|
|
void Mechanical::o_throne_init(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
// Used on Card 6238 (Sirrus' Throne) and Card 6027 (Achenar's Throne)
|
|
debugC(kDebugScript, "Opcode %d: Brother throne init", op);
|
|
|
|
_invokingResource->setEnabled(getVar(var));
|
|
}
|
|
|
|
void Mechanical::o_fortressStaircase_init(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Staircase init", op);
|
|
|
|
_vm->_resources[argv[0]]->setEnabled(!_state.staircaseState);
|
|
_vm->_resources[argv[1]]->setEnabled(!_state.staircaseState);
|
|
_vm->_resources[argv[2]]->setEnabled(_state.staircaseState);
|
|
}
|
|
|
|
void Mechanical::birdSing_run() {
|
|
// Used for Card 6220 (Sirrus' Mechanical Bird)
|
|
uint32 time = _vm->_system->getMillis();
|
|
if (_birdSingEndTime < time) {
|
|
_bird->pauseMovie(true);
|
|
_vm->_sound->stopSound();
|
|
_birdSinging = false;
|
|
}
|
|
}
|
|
|
|
void Mechanical::o_bird_init(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Mechanical bird init", op);
|
|
|
|
_birdSinging = false;
|
|
_birdSingEndTime = 0;
|
|
_bird = static_cast<MystResourceType6 *>(_invokingResource);
|
|
}
|
|
|
|
void Mechanical::o_snakeBox_init(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Snake box init", op);
|
|
|
|
_snakeBox = static_cast<MystResourceType6 *>(_invokingResource);
|
|
}
|
|
|
|
void Mechanical::elevatorRotation_run() {
|
|
_vm->redrawArea(12);
|
|
|
|
_elevatorRotationGearPosition += _elevatorRotationSpeed;
|
|
|
|
if (_elevatorRotationGearPosition > 12) {
|
|
uint16 position = (uint16)_elevatorRotationGearPosition;
|
|
_elevatorRotationGearPosition = _elevatorRotationGearPosition - position + position % 6;
|
|
|
|
_state.elevatorRotation = (_state.elevatorRotation + 1) % 10;
|
|
|
|
_vm->_sound->replaceSoundMyst(_elevatorRotationSoundId);
|
|
_vm->redrawArea(11);
|
|
_vm->_system->delayMillis(100);
|
|
}
|
|
}
|
|
|
|
void Mechanical::o_elevatorRotation_init(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Elevator rotation init", op);
|
|
|
|
_elevatorRotationSoundId = argv[0];
|
|
_elevatorRotationGearPosition = 0;
|
|
_elevatorRotationLeverMoving = false;
|
|
}
|
|
|
|
void Mechanical::fortressRotation_run() {
|
|
// Used for Card 6156 (Fortress Rotation Controls)
|
|
// TODO: Fill in function...
|
|
}
|
|
|
|
void Mechanical::o_fortressRotation_init(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Fortress rotation init", op);
|
|
|
|
_fortressRotationGears = static_cast<MystResourceType6 *>(_invokingResource);
|
|
|
|
_fortressRotationSounds[0] = argv[0];
|
|
_fortressRotationSounds[1] = argv[1];
|
|
_fortressRotationSounds[2] = argv[2];
|
|
_fortressRotationSounds[3] = argv[3];
|
|
|
|
_fortressRotationBrake = 0;
|
|
|
|
_fortressRotationRunning = true;
|
|
}
|
|
|
|
void Mechanical::fortressSimulation_run() {
|
|
// Used for Card 6044 (Fortress Rotation Simulator)
|
|
// TODO: Fill in function...
|
|
}
|
|
|
|
void Mechanical::o_fortressSimulation_init(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Fortress rotation simulator init", op);
|
|
|
|
_fortressSimulationHolo = static_cast<MystResourceType6 *>(_invokingResource);
|
|
|
|
_fortressSimulationStartSound1 = argv[0];
|
|
_fortressSimulationStartSound2 = argv[1];
|
|
|
|
_fortressRotationSounds[0] = argv[2];
|
|
_fortressRotationSounds[1] = argv[3];
|
|
_fortressRotationSounds[2] = argv[4];
|
|
_fortressRotationSounds[3] = argv[5];
|
|
|
|
_fortressSimulationBrake = 0;
|
|
|
|
_fortressSimulationRunning = true;
|
|
}
|
|
|
|
void Mechanical::o_fortressSimulationStartup_init(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
debugC(kDebugScript, "Opcode %d: Fortress rotation simulator startup init", op);
|
|
|
|
_fortressSimulationStartup = static_cast<MystResourceType6 *>(_invokingResource);
|
|
}
|
|
|
|
} // End of namespace MystStacks
|
|
} // End of namespace Mohawk
|