mirror of
https://github.com/libretro/scummvm.git
synced 2025-01-06 18:00:44 +00:00
83 lines
2.2 KiB
C++
83 lines
2.2 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/myst.h"
|
|
#include "mohawk/graphics.h"
|
|
#include "mohawk/myst_areas.h"
|
|
#include "mohawk/sound.h"
|
|
#include "mohawk/video.h"
|
|
#include "mohawk/myst_stacks/slides.h"
|
|
|
|
#include "common/system.h"
|
|
#include "gui/message.h"
|
|
|
|
namespace Mohawk {
|
|
namespace MystStacks {
|
|
|
|
Slides::Slides(MohawkEngine_Myst *vm) : MystScriptParser(vm) {
|
|
setupOpcodes();
|
|
}
|
|
|
|
Slides::~Slides() {
|
|
}
|
|
|
|
#define OPCODE(op, x) _opcodes.push_back(new MystOpcode(op, (OpcodeProcMyst) &Slides::x, #x))
|
|
|
|
void Slides::setupOpcodes() {
|
|
// "Stack-Specific" Opcodes
|
|
OPCODE(100, o_returnToMenu);
|
|
|
|
// "Init" Opcodes
|
|
OPCODE(200, o_setCardSwap);
|
|
}
|
|
|
|
#undef OPCODE
|
|
|
|
void Slides::disablePersistentScripts() {
|
|
_cardSwapEnabled = false;
|
|
}
|
|
|
|
void Slides::runPersistentScripts() {
|
|
if (_cardSwapEnabled) {
|
|
// Used on Cards...
|
|
if (_vm->_system->getMillis() - _lastCardTime >= 2 * 1000)
|
|
_vm->changeToCard(_nextCardID, true);
|
|
}
|
|
}
|
|
|
|
void Slides::o_returnToMenu(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
_vm->changeToStack(kDemoStack, 2001, 0, 0);
|
|
}
|
|
|
|
void Slides::o_setCardSwap(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
// Used on Cards...
|
|
if (argc == 1) {
|
|
_nextCardID = argv[0];
|
|
_lastCardTime = _vm->_system->getMillis();
|
|
_cardSwapEnabled = true;
|
|
} else
|
|
unknown(op, var, argc, argv);
|
|
}
|
|
|
|
} // End of namespace MystStacks
|
|
} // End of namespace Mohawk
|