mirror of
https://github.com/libretro/scummvm.git
synced 2025-01-02 07:28:32 +00:00
101 lines
2.6 KiB
C++
101 lines
2.6 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/credits.h"
|
|
|
|
#include "common/system.h"
|
|
#include "gui/message.h"
|
|
|
|
namespace Mohawk {
|
|
namespace MystStacks {
|
|
|
|
// NOTE: Credits Start Card is 10000
|
|
|
|
Credits::Credits(MohawkEngine_Myst *vm) : MystScriptParser(vm) {
|
|
setupOpcodes();
|
|
}
|
|
|
|
Credits::~Credits() {
|
|
}
|
|
|
|
#define OPCODE(op, x) _opcodes.push_back(new MystOpcode(op, (OpcodeProcMyst) &Credits::x, #x))
|
|
|
|
void Credits::setupOpcodes() {
|
|
// "Stack-Specific" Opcodes
|
|
OPCODE(100, o_quit);
|
|
|
|
// "Init" Opcodes
|
|
OPCODE(200, o_runCredits);
|
|
}
|
|
|
|
#undef OPCODE
|
|
|
|
void Credits::disablePersistentScripts() {
|
|
_creditsRunning = false;
|
|
}
|
|
|
|
void Credits::runPersistentScripts() {
|
|
if (!_creditsRunning)
|
|
return;
|
|
|
|
if (_vm->_system->getMillis() - _startTime >= 7 * 1000) {
|
|
_curImage++;
|
|
|
|
// After the 6th image has shown, it's time to quit
|
|
if (_curImage == 7)
|
|
_vm->quitGame();
|
|
|
|
// Draw next image
|
|
_vm->drawCardBackground();
|
|
_vm->_gfx->copyBackBufferToScreen(Common::Rect(544, 333));
|
|
_vm->_system->updateScreen();
|
|
|
|
_startTime = _vm->_system->getMillis();
|
|
}
|
|
}
|
|
|
|
uint16 Credits::getVar(uint16 var) {
|
|
switch(var) {
|
|
case 0: // Credits Image Control
|
|
return _curImage;
|
|
case 1: // Credits Music Control (Good / bad ending)
|
|
return _globals.ending != 4;
|
|
default:
|
|
return MystScriptParser::getVar(var);
|
|
}
|
|
}
|
|
|
|
void Credits::o_runCredits(uint16 op, uint16 var, uint16 argc, uint16 *argv) {
|
|
// Activate the credits
|
|
_creditsRunning = true;
|
|
_curImage = 0;
|
|
_startTime = _vm->_system->getMillis();
|
|
}
|
|
|
|
} // End of namespace MystStacks
|
|
} // End of namespace Mohawk
|