197 lines
7.4 KiB
C++
197 lines
7.4 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 3 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, see <http://www.gnu.org/licenses/>.
|
|
*
|
|
*/
|
|
|
|
#include "twine/script/script_life_v1.h"
|
|
#include "common/debug.h"
|
|
#include "twine/twine.h"
|
|
#include "twine/text.h"
|
|
#include "twine/audio/music.h"
|
|
#include "twine/scene/gamestate.h"
|
|
|
|
namespace TwinE {
|
|
|
|
/**
|
|
* Turn on bubbles while actors talk.
|
|
* @note Opcode @c 0x59
|
|
*/
|
|
int32 ScriptLifeV1::lBUBBLE_ON(TwinEEngine *engine, LifeScriptContext &ctx) {
|
|
debugC(3, kDebugLevels::kDebugScriptsLife, "LIFE::BUBBLE_ON()");
|
|
engine->_text->_showDialogueBubble = true;
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Turn off bubbles while actors talk.
|
|
* @note Opcode @c 0x5A
|
|
*/
|
|
int32 ScriptLifeV1::lBUBBLE_OFF(TwinEEngine *engine, LifeScriptContext &ctx) {
|
|
debugC(3, kDebugLevels::kDebugScriptsLife, "LIFE::BUBBLE_OFF()");
|
|
engine->_text->_showDialogueBubble = false;
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Play Midis (Parameter = Midis Index)
|
|
* @note Opcode @c 0x41
|
|
*/
|
|
int32 ScriptLifeV1::lPLAY_MIDI(TwinEEngine *engine, LifeScriptContext &ctx) {
|
|
const int32 midiIdx = ctx.stream.readByte();
|
|
engine->_music->playMusic(midiIdx);
|
|
debugC(3, kDebugLevels::kDebugScriptsLife, "LIFE::PLAY_MIDI(%i)", (int)midiIdx);
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Stop the current played midi.
|
|
* @note Opcode @c 0x63
|
|
*/
|
|
int32 ScriptLifeV1::lMIDI_OFF(TwinEEngine *engine, LifeScriptContext &ctx) {
|
|
debugC(3, kDebugLevels::kDebugScriptsLife, "LIFE::MIDI_OFF()");
|
|
engine->_music->stopMusicMidi();
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Set a new value for the game flag (Paramter = Game Flag Index, Parameter = Value)
|
|
* @note Opcode @c 0x24
|
|
*/
|
|
int32 ScriptLifeV1::lSET_FLAG_GAME(TwinEEngine *engine, LifeScriptContext &ctx) {
|
|
const uint8 flagIdx = ctx.stream.readByte();
|
|
const uint8 flagValue = ctx.stream.readByte();
|
|
debugC(3, kDebugLevels::kDebugScriptsLife, "LIFE::SET_FLAG_GAME(%i, %i)", (int)flagIdx, (int)flagValue);
|
|
engine->_gameState->setGameFlag(flagIdx, flagValue);
|
|
return 0;
|
|
}
|
|
|
|
static const ScriptLifeFunction function_map[] = {
|
|
{"END", ScriptLifeV1::lEND},
|
|
{"NOP", ScriptLifeV1::lNOP},
|
|
{"SNIF", ScriptLifeV1::lSNIF},
|
|
{"OFFSET", ScriptLifeV1::lOFFSET},
|
|
{"NEVERIF", ScriptLifeV1::lNEVERIF},
|
|
{"", ScriptLifeV1::lEMPTY}, // unused
|
|
{"NO_IF", ScriptLifeV1::lNO_IF},
|
|
{"", ScriptLifeV1::lEMPTY}, // unused
|
|
{"", ScriptLifeV1::lEMPTY}, // unused
|
|
{"", ScriptLifeV1::lEMPTY}, // unused
|
|
{"LABEL", ScriptLifeV1::lLABEL},
|
|
{"RETURN", ScriptLifeV1::lRETURN},
|
|
{"IF", ScriptLifeV1::lIF},
|
|
{"SWIF", ScriptLifeV1::lSWIF},
|
|
{"ONEIF", ScriptLifeV1::lONEIF},
|
|
{"ELSE", ScriptLifeV1::lELSE},
|
|
{"ENDIF", ScriptLifeV1::lEMPTY}, // End of a conditional statement (e.g. IF)
|
|
{"BODY", ScriptLifeV1::lBODY},
|
|
{"BODY_OBJ", ScriptLifeV1::lBODY_OBJ},
|
|
{"ANIM", ScriptLifeV1::lANIM},
|
|
{"ANIM_OBJ", ScriptLifeV1::lANIM_OBJ},
|
|
{"SET_LIFE", ScriptLifeV1::lSET_LIFE},
|
|
{"SET_LIFE_OBJ", ScriptLifeV1::lSET_LIFE_OBJ},
|
|
{"SET_TRACK", ScriptLifeV1::lSET_TRACK},
|
|
{"SET_TRACK_OBJ", ScriptLifeV1::lSET_TRACK_OBJ},
|
|
{"MESSAGE", ScriptLifeV1::lMESSAGE},
|
|
{"FALLABLE", ScriptLifeV1::lFALLABLE},
|
|
{"SET_DIRMODE", ScriptLifeV1::lSET_DIRMODE},
|
|
{"SET_DIRMODE_OBJ", ScriptLifeV1::lSET_DIRMODE_OBJ},
|
|
{"CAM_FOLLOW", ScriptLifeV1::lCAM_FOLLOW},
|
|
{"SET_BEHAVIOUR", ScriptLifeV1::lSET_BEHAVIOUR},
|
|
{"SET_FLAG_CUBE", ScriptLifeV1::lSET_FLAG_CUBE},
|
|
{"COMPORTEMENT", ScriptLifeV1::lCOMPORTEMENT},
|
|
{"SET_COMPORTEMENT", ScriptLifeV1::lSET_COMPORTEMENT},
|
|
{"SET_COMPORTEMENT_OBJ", ScriptLifeV1::lSET_COMPORTEMENT_OBJ},
|
|
{"END_COMPORTEMENT", ScriptLifeV1::lEND_COMPORTEMENT},
|
|
{"SET_FLAG_GAME", ScriptLifeV1::lSET_FLAG_GAME},
|
|
{"KILL_OBJ", ScriptLifeV1::lKILL_OBJ},
|
|
{"SUICIDE", ScriptLifeV1::lSUICIDE},
|
|
{"USE_ONE_LITTLE_KEY", ScriptLifeV1::lUSE_ONE_LITTLE_KEY},
|
|
{"GIVE_GOLD_PIECES", ScriptLifeV1::lGIVE_GOLD_PIECES},
|
|
{"END_LIFE", ScriptLifeV1::lEND_LIFE},
|
|
{"STOP_L_TRACK", ScriptLifeV1::lSTOP_L_TRACK},
|
|
{"RESTORE_L_TRACK", ScriptLifeV1::lRESTORE_L_TRACK},
|
|
{"MESSAGE_OBJ", ScriptLifeV1::lMESSAGE_OBJ},
|
|
{"INC_CHAPTER", ScriptLifeV1::lINC_CHAPTER},
|
|
{"FOUND_OBJECT", ScriptLifeV1::lFOUND_OBJECT},
|
|
{"SET_DOOR_LEFT", ScriptLifeV1::lSET_DOOR_LEFT},
|
|
{"SET_DOOR_RIGHT", ScriptLifeV1::lSET_DOOR_RIGHT},
|
|
{"SET_DOOR_UP", ScriptLifeV1::lSET_DOOR_UP},
|
|
{"SET_DOOR_DOWN", ScriptLifeV1::lSET_DOOR_DOWN},
|
|
{"GIVE_BONUS", ScriptLifeV1::lGIVE_BONUS},
|
|
{"CHANGE_CUBE", ScriptLifeV1::lCHANGE_CUBE},
|
|
{"OBJ_COL", ScriptLifeV1::lOBJ_COL},
|
|
{"BRICK_COL", ScriptLifeV1::lBRICK_COL},
|
|
{"OR_IF", ScriptLifeV1::lOR_IF},
|
|
{"INVISIBLE", ScriptLifeV1::lINVISIBLE},
|
|
{"ZOOM", ScriptLifeV1::lZOOM},
|
|
{"POS_POINT", ScriptLifeV1::lPOS_POINT},
|
|
{"SET_MAGIC_LEVEL", ScriptLifeV1::lSET_MAGIC_LEVEL},
|
|
{"SUB_MAGIC_POINT", ScriptLifeV1::lSUB_MAGIC_POINT},
|
|
{"SET_LIFE_POINT_OBJ", ScriptLifeV1::lSET_LIFE_POINT_OBJ},
|
|
{"SUB_LIFE_POINT_OBJ", ScriptLifeV1::lSUB_LIFE_POINT_OBJ},
|
|
{"HIT_OBJ", ScriptLifeV1::lHIT_OBJ},
|
|
{"PLAY_FLA", ScriptLifeV1::lPLAY_FLA},
|
|
{"PLAY_MIDI", ScriptLifeV1::lPLAY_MIDI},
|
|
{"INC_CLOVER_BOX", ScriptLifeV1::lINC_CLOVER_BOX},
|
|
{"SET_USED_INVENTORY", ScriptLifeV1::lSET_USED_INVENTORY},
|
|
{"ADD_CHOICE", ScriptLifeV1::lADD_CHOICE},
|
|
{"ASK_CHOICE", ScriptLifeV1::lASK_CHOICE},
|
|
{"BIG_MESSAGE", ScriptLifeV1::lBIG_MESSAGE},
|
|
{"INIT_PINGOUIN", ScriptLifeV1::lINIT_PINGOUIN},
|
|
{"SET_HOLO_POS", ScriptLifeV1::lSET_HOLO_POS},
|
|
{"CLR_HOLO_POS", ScriptLifeV1::lCLR_HOLO_POS},
|
|
{"ADD_FUEL", ScriptLifeV1::lADD_FUEL},
|
|
{"SUB_FUEL", ScriptLifeV1::lSUB_FUEL},
|
|
{"SET_GRM", ScriptLifeV1::lSET_GRM},
|
|
{"SAY_MESSAGE", ScriptLifeV1::lSAY_MESSAGE},
|
|
{"SAY_MESSAGE_OBJ", ScriptLifeV1::lSAY_MESSAGE_OBJ},
|
|
{"FULL_POINT", ScriptLifeV1::lFULL_POINT},
|
|
{"BETA", ScriptLifeV1::lBETA},
|
|
{"GRM_OFF", ScriptLifeV1::lGRM_OFF},
|
|
{"FADE_PAL_RED", ScriptLifeV1::lFADE_PAL_RED},
|
|
{"FADE_ALARM_RED", ScriptLifeV1::lFADE_ALARM_RED},
|
|
{"FADE_ALARM_PAL", ScriptLifeV1::lFADE_ALARM_PAL},
|
|
{"FADE_RED_PAL", ScriptLifeV1::lFADE_RED_PAL},
|
|
{"FADE_RED_ALARM", ScriptLifeV1::lFADE_RED_ALARM},
|
|
{"FADE_PAL_ALARM", ScriptLifeV1::lFADE_PAL_ALARM},
|
|
{"EXPLODE_OBJ", ScriptLifeV1::lEXPLODE_OBJ},
|
|
{"BUBBLE_ON", ScriptLifeV1::lBUBBLE_ON},
|
|
{"BUBBLE_OFF", ScriptLifeV1::lBUBBLE_OFF},
|
|
{"ASK_CHOICE_OBJ", ScriptLifeV1::lASK_CHOICE_OBJ},
|
|
{"SET_DARK_PAL", ScriptLifeV1::lSET_DARK_PAL},
|
|
{"SET_NORMAL_PAL", ScriptLifeV1::lSET_NORMAL_PAL},
|
|
{"MESSAGE_SENDELL", ScriptLifeV1::lMESSAGE_SENDELL},
|
|
{"ANIM_SET", ScriptLifeV1::lANIM_SET},
|
|
{"HOLOMAP_TRAJ", ScriptLifeV1::lHOLOMAP_TRAJ},
|
|
{"GAME_OVER", ScriptLifeV1::lGAME_OVER},
|
|
{"THE_END", ScriptLifeV1::lTHE_END},
|
|
{"MIDI_OFF", ScriptLifeV1::lMIDI_OFF},
|
|
{"PLAY_CD_TRACK", ScriptLifeV1::lPLAY_CD_TRACK},
|
|
{"PROJ_ISO", ScriptLifeV1::lPROJ_ISO},
|
|
{"PROJ_3D", ScriptLifeV1::lPROJ_3D},
|
|
{"TEXT", ScriptLifeV1::lTEXT},
|
|
{"CLEAR_TEXT", ScriptLifeV1::lCLEAR_TEXT},
|
|
{"BRUTAL_EXIT", ScriptLifeV1::lBRUTAL_EXIT}
|
|
};
|
|
|
|
ScriptLifeV1::ScriptLifeV1(TwinEEngine *engine) : ScriptLife(engine, function_map, ARRAYSIZE(function_map)) {
|
|
}
|
|
|
|
} // namespace TwinE
|