scummvm/engines/lastexpress/entities/train.cpp

575 lines
17 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 "lastexpress/entities/train.h"
#include "lastexpress/game/action.h"
#include "lastexpress/game/entities.h"
#include "lastexpress/game/logic.h"
#include "lastexpress/game/object.h"
#include "lastexpress/game/savegame.h"
#include "lastexpress/game/savepoint.h"
#include "lastexpress/game/scenes.h"
#include "lastexpress/game/state.h"
#include "lastexpress/sound/queue.h"
#include "lastexpress/lastexpress.h"
namespace LastExpress {
Train::Train(LastExpressEngine *engine) : Entity(engine, kEntityTrain) {
ADD_CALLBACK_FUNCTION(Train, savegame);
ADD_CALLBACK_FUNCTION(Train, chapter1);
ADD_CALLBACK_FUNCTION(Train, chapter2);
ADD_CALLBACK_FUNCTION(Train, chapter3);
ADD_CALLBACK_FUNCTION(Train, chapter4);
ADD_CALLBACK_FUNCTION(Train, chapter5);
ADD_CALLBACK_FUNCTION(Train, harem);
ADD_CALLBACK_FUNCTION(Train, process);
}
//////////////////////////////////////////////////////////////////////////
IMPLEMENT_FUNCTION_II(1, Train, savegame, SavegameType, uint32)
Entity::savegame(savepoint);
IMPLEMENT_FUNCTION_END
//////////////////////////////////////////////////////////////////////////
IMPLEMENT_FUNCTION(2, Train, chapter1)
if (savepoint.action == kActionDefault)
setup_process();
IMPLEMENT_FUNCTION_END
//////////////////////////////////////////////////////////////////////////
IMPLEMENT_FUNCTION(3, Train, chapter2)
if (savepoint.action == kActionDefault)
setup_process();
IMPLEMENT_FUNCTION_END
//////////////////////////////////////////////////////////////////////////
IMPLEMENT_FUNCTION(4, Train, chapter3)
if (savepoint.action == kActionDefault)
setup_process();
IMPLEMENT_FUNCTION_END
//////////////////////////////////////////////////////////////////////////
IMPLEMENT_FUNCTION(5, Train, chapter4)
if (savepoint.action == kActionDefault)
setup_process();
IMPLEMENT_FUNCTION_END
//////////////////////////////////////////////////////////////////////////
IMPLEMENT_FUNCTION(6, Train, chapter5)
if (savepoint.action == kActionDefault)
setup_process();
IMPLEMENT_FUNCTION_END
//////////////////////////////////////////////////////////////////////////
IMPLEMENT_FUNCTION_II(7, Train, harem, ObjectIndex, uint32)
if (savepoint.action != kActionDefault)
return;
switch (params->param1) {
default:
error("[Train::harem] Invalid value for parameter 1: %d", params->param1);
break;
case kObjectCompartment5:
params->param3 = kPosition_4840;
break;
case kObjectCompartment6:
params->param3 = kPosition_4070;
break;
case kObjectCompartment7:
params->param3 = kPosition_3050;
break;
case kObjectCompartment8:
params->param3 = kPosition_2740;
break;
}
params->param4 = getEntities()->isInsideCompartment(kEntityAlouan, kCarGreenSleeping, (EntityPosition)params->param3);
params->param5 = (ENTITY_PARAM(0, 7) - params->param3) < 1 ? true : false;
params->param6 = getEntities()->isInsideCompartment(kEntityYasmin, kCarGreenSleeping, (EntityPosition)params->param3);
params->param7 = getEntities()->isInsideCompartment(kEntityHadija, kCarGreenSleeping, (EntityPosition)params->param3);
getObjects()->update((ObjectIndex)params->param1, kEntityTrain, kObjectLocation3, kCursorNormal, kCursorNormal);
// Knock / closed door sound
getSound()->playSound(kEntityTables5, (params->param2 == 8) ? "LIB012" : "LIB013", kFlagDefault);
if (params->param4 && params->param5) {
ENTITY_PARAM(0, 5)++;
switch (ENTITY_PARAM(0, 5)) {
default:
params->param8 = 1;
break;
case 1:
getSound()->playSound(kEntityTables5, "Har1014", kFlagDefault, 15);
break;
case 2:
getSound()->playSound(kEntityTables5, "Har1013", kFlagDefault, 15);
getSound()->playSound(kEntityTables5, "Har1016", kFlagDefault, 150);
break;
case 3:
getSound()->playSound(kEntityTables5, "Har1015A", kFlagDefault, 15);
getSound()->playSound(kEntityTables5, "Har1015", kFlagDefault, 150);
break;
}
// Update progress
getProgress().field_DC = 1;
getProgress().field_E0 = 1;
handleCompartmentAction();
// Done with it!
return;
}
if (params->param6 && params->param7) {
ENTITY_PARAM(0, 6)++;
switch(ENTITY_PARAM(0, 6)) {
default:
params->param8 = 1;
break;
case 1:
getSound()->playSound(kEntityTables5, "Har1014", kFlagDefault, 15);
break;
case 2:
getSound()->playSound(kEntityTables5, "Har1013", kFlagDefault, 15);
break;
case 3:
getSound()->playSound(kEntityTables5, "Har1013A", kFlagDefault, 15);
break;
}
handleCompartmentAction();
return;
}
if (!params->param5) {
if (params->param6) {
ENTITY_PARAM(0, 3)++;
switch(ENTITY_PARAM(0, 3)) {
default:
params->param8 = 1;
break;
case 1:
getSound()->playSound(kEntityTables5, "Har1012", kFlagDefault, 15);
break;
case 2:
getSound()->playSound(kEntityTables5, "Har1012A", kFlagDefault, 15);
break;
}
handleCompartmentAction();
return;
} else {
if (params->param4) {
ENTITY_PARAM(0, 1)++;
if (ENTITY_PARAM(0, 1) <= 1)
getSound()->playSound(kEntityTables5, "Har1014", kFlagDefault, 15);
else
params->param8 = 1;
getProgress().field_DC = 1;
handleCompartmentAction();
return;
}
if (params->param7) {
ENTITY_PARAM(0, 4)++;
if (ENTITY_PARAM(0, 4) <= 1) {
getSound()->playSound(kEntityTables5, "Har1011", kFlagDefault, 15);
handleCompartmentAction();
return;
}
}
}
params->param8 = 1;
handleCompartmentAction();
return;
}
ENTITY_PARAM(0, 2) += 1;
switch (ENTITY_PARAM(0, 2)) {
default:
params->param8 = 1;
break;
case 1:
getSound()->playSound(kEntityTables5, "Har1013", kFlagDefault, 15);
break;
case 2:
getSound()->playSound(kEntityTables5, "Har1013A", kFlagDefault, 15);
break;
}
getProgress().field_E0 = 1;
handleCompartmentAction();
IMPLEMENT_FUNCTION_END
//////////////////////////////////////////////////////////////////////////
IMPLEMENT_FUNCTION(8, Train, process)
EntityData::EntityParametersIIIS *params1 = (EntityData::EntityParametersIIIS*)_data->getCurrentParameters(1);
switch (savepoint.action) {
default:
break;
case kActionNone:
// Play smoke animation
if ((getEntities()->isPlayerInCar(kCarGreenSleeping) || getEntities()->isPlayerInCar(kCarRedSleeping))
&& params->param4 && !params->param5) {
params->param4 -= 1;
if (!params->param4 && getProgress().jacket == kJacketGreen) {
getAction()->playAnimation(isNight() ? kEventCathSmokeNight : kEventCathSmokeDay);
params->param5 = 1;
getScenes()->processScene();
}
}
if (params->param6) {
if (!Entity::updateParameter(params1->param7, getState()->time, 900))
goto label_process;
getScenes()->loadSceneFromPosition(kCarRestaurant, 58);
}
params1->param7 = 0;
label_process:
if (params->param7) {
if (!params1->param8) {
params1->param8 = (uint)(getState()->time + 4500);
if (!params1->param8)
params->param7 = 0;
}
if (params1->param8 && params1->param8 < getState()->time) {
params->param7 = 0;
params1->param8 = 0;
}
}
// Update object
if (ENTITY_PARAM(0, 8) && !getSoundQueue()->isBuffered(kEntityTables5)) {
getObjects()->update((ObjectIndex)ENTITY_PARAM(0, 8), getObjects()->get((ObjectIndex)ENTITY_PARAM(0, 8)).entity, kObjectLocation3, kCursorHandKnock, kCursorHand);
ENTITY_PARAM(0, 8) = 0;
}
// Play clock sound
if (params->param6 && !getSoundQueue()->isBuffered("ZFX1001", true))
getSound()->playSound(kEntityPlayer, "ZFX1001");
break;
case kActionKnock:
case kActionOpenDoor: {
// Handle opening harem compartments
ObjectIndex compartment = (ObjectIndex)savepoint.param.intValue;
if (compartment == kObjectCompartment5 || compartment == kObjectCompartment6 || compartment == kObjectCompartment7 || compartment == kObjectCompartment8) {
setCallback(savepoint.action == kActionKnock ? 3 : 4);
setup_harem(compartment, savepoint.action);
}
break;
}
case kActionDefault:
params->param3 = 1;
if (getProgress().chapter < kChapter5) {
getObjects()->update(kObjectCompartment5, kEntityTrain, kObjectLocation3, kCursorHandKnock, kCursorHand);
getObjects()->update(kObjectCompartment6, kEntityTrain, kObjectLocation3, kCursorHandKnock, kCursorHand);
getObjects()->update(kObjectCompartment7, kEntityTrain, kObjectLocation3, kCursorHandKnock, kCursorHand);
getObjects()->update(kObjectCompartment8, kEntityTrain, kObjectLocation3, kCursorHandKnock, kCursorHand);
}
getData()->entityPosition = kPosition_30000;
break;
case kActionDrawScene:
getData()->car = getEntityData(kEntityPlayer)->car;
// Play clock sound
if (getEntities()->isPlayerPosition(kCarRestaurant, 81)) {
params->param6 = 1;
if (!getSoundQueue()->isBuffered("ZFX1001"))
getSound()->playSound(kEntityPlayer, "ZFX1001");
} else {
params->param6 = 0;
if (getSoundQueue()->isBuffered("ZFX1001", true))
getSoundQueue()->removeFromQueue("ZFX1001");
}
// Draw moving background behind windows
if (params->param3) {
if (getEntityData(kEntityPlayer)->car != (CarIndex)params->param1 || isNight() != (bool)(params->param2)) {
switch (getEntityData(kEntityPlayer)->car) {
default:
getEntities()->clearSequences(kEntityTrain);
break;
case kCarBaggageRear:
case kCarBaggage:
if (getProgress().isNightTime)
getEntities()->drawSequenceLeft(kEntityTrain, "B1WNM");
else
getEntities()->drawSequenceLeft(kEntityTrain, isNight() ? "B1WNN" : "B1WND");
break;
case kCarGreenSleeping:
case kCarRedSleeping:
if (getProgress().isNightTime)
getEntities()->drawSequenceLeft(kEntityTrain, "S1WNM");
else
getEntities()->drawSequenceLeft(kEntityTrain, isNight() ? "S1WNN" : "S1WND");
break;
case kCarRestaurant:
getEntities()->drawSequenceLeft(kEntityTrain, isNight() ? "RCWNN" : "RCWND");
break;
}
// Set parameters so we do not get called twice
params->param1 = getEntityData(kEntityPlayer)->car;
params->param2 = isNight();
}
}
if (!params->param5) {
params->param4 = 2700; // this is the sound file name
params->param5 = 0;
}
if (getProgress().jacket == kJacketBlood) {
if (getEntities()->isPlayerPosition(kCarRedSleeping, 18)) {
setCallback(1);
setup_savegame(kSavegameTypeEvent, kEventMertensBloodJacket);
break;
}
if (getEntities()->isPlayerPosition(kCarGreenSleeping, 22)) {
setCallback(2);
setup_savegame(kSavegameTypeEvent, kEventMertensBloodJacket);
break;
}
}
resetParam8();
break;
case kActionCallback: {
int action = getCallback();
switch(action) {
default:
break;
case 1:
case 2:
getAction()->playAnimation(action == 1 ? kEventCoudertBloodJacket : kEventMertensBloodJacket);
getLogic()->gameOver(kSavegameTypeIndex, 1, kSceneGameOverBloodJacket, true);
resetParam8();
break;
case 5:
getAction()->playAnimation(kEventLocomotiveConductorsDiscovered);
getLogic()->gameOver(kSavegameTypeIndex, 1, kSceneGameOverPolice2, true);
break;
case 6:
getAction()->playAnimation(kEventCathBreakCeiling);
getObjects()->update(kObjectCeiling, kEntityPlayer, kObjectLocation2, kCursorKeepValue, kCursorKeepValue);
getScenes()->processScene();
break;
case 7:
getAction()->playAnimation(kEventCathJumpDownCeiling);
getScenes()->loadSceneFromPosition(kCarKronos, 89);
break;
case 8:
getAction()->playAnimation(kEventCloseMatchbox);
getScenes()->loadSceneFromPosition(kCarRestaurant, 51);
break;
}
break;
}
case kAction191070912:
ENTITY_PARAM(0, 7) = savepoint.param.intValue;
break;
case kActionTrainStopRunning:
params->param3 = 0;
getEntities()->clearSequences(kEntityTrain);
break;
case kActionCatchBeetle:
setCallback(8);
setup_savegame(kSavegameTypeEvent, kEventCloseMatchbox);
break;
case kAction203339360:
if (params->param7) {
setCallback(5);
setup_savegame(kSavegameTypeEvent, kEventLocomotiveConductorsDiscovered);
} else {
params->param7 = 1;
getAction()->playAnimation(kEventLocomotiveConductorsLook);
getScenes()->loadSceneFromPosition(kCarCoalTender, 2);
}
break;
case kActionTrainStartRunning:
if (!params->param3) {
params->param1 = 0;
params->param3 = 1;
getSavePoints()->push(kEntityTrain, kEntityTrain, kActionDrawScene);
}
break;
case kAction203863200:
if (!strcmp(savepoint.param.charValue, "")) {
params->param8 = 1;
strcpy((char *)&params1->seq, savepoint.param.charValue); // this is the sound file name
}
break;
case kAction222746496:
switch(savepoint.param.intValue) {
default:
break;
case kObjectCompartment1:
case kObjectCompartment2:
case kObjectCompartmentA:
case kObjectCompartmentB:
params1->param1 = (savepoint.param.intValue == kObjectCompartment1 || savepoint.param.intValue == kObjectCompartment2) ? kCarGreenSleeping : kCarRedSleeping;
params1->param2 = (savepoint.param.intValue == kObjectCompartment1 || savepoint.param.intValue == kObjectCompartmentA) ? kPosition_8200 : kPosition_7500;
params1->param3 = kPosition_7850;
break;
case kObjectCompartment3:
case kObjectCompartment4:
case kObjectCompartmentC:
case kObjectCompartmentD:
params1->param1 = (savepoint.param.intValue == kObjectCompartment1 || savepoint.param.intValue == kObjectCompartment2) ? kCarGreenSleeping : kCarRedSleeping;
params1->param2 = (savepoint.param.intValue == kObjectCompartment3 || savepoint.param.intValue == kObjectCompartmentC) ? kPosition_6470 : kPosition_5790;
params1->param3 = kPosition_6130;
break;
case kObjectCompartment5:
case kObjectCompartment6:
case kObjectCompartmentE:
case kObjectCompartmentF:
params1->param1 = (savepoint.param.intValue == kObjectCompartment1 || savepoint.param.intValue == kObjectCompartment2) ? kCarGreenSleeping : kCarRedSleeping;
params1->param2 = (savepoint.param.intValue == kObjectCompartment5 || savepoint.param.intValue == kObjectCompartmentE) ? kPosition_4840 : kPosition_4070;
params1->param3 = kPosition_4455;
break;
case kObjectCompartment7:
case kObjectCompartment8:
case kObjectCompartmentG:
case kObjectCompartmentH:
params1->param1 = (savepoint.param.intValue == kObjectCompartment1 || savepoint.param.intValue == kObjectCompartment2) ? kCarGreenSleeping : kCarRedSleeping;
params1->param2 = (savepoint.param.intValue == kObjectCompartment7 || savepoint.param.intValue == kObjectCompartmentG) ? kPosition_3050 : kPosition_2740;
params1->param3 = kPositionNone;
break;
}
break;
case kActionBreakCeiling:
setCallback(6);
setup_savegame(kSavegameTypeEvent, kEventCathBreakCeiling);
break;
case kActionJumpDownCeiling:
setCallback(7);
setup_savegame(kSavegameTypeEvent, kEventCathJumpDownCeiling);
break;
}
IMPLEMENT_FUNCTION_END
//////////////////////////////////////////////////////////////////////////
// Private functions
//////////////////////////////////////////////////////////////////////////
void Train::handleCompartmentAction() {
EXPOSE_PARAMS(EntityData::EntityParametersIIII)
if (params->param8)
getSavePoints()->push(kEntityTrain, kEntityMahmud, kAction290410610, params->param1);
getAction()->handleOtherCompartment((ObjectIndex)params->param1, false, !params->param8);
ENTITY_PARAM(0, 8) = params->param1;
callbackAction();
}
//////////////////////////////////////////////////////////////////////////
void Train::resetParam8() {
EXPOSE_PARAMS(EntityData::EntityParametersIIII)
EntityData::EntityParametersIIIS *params1 = (EntityData::EntityParametersIIIS*)_data->getCurrentParameters(1);
if (params->param8
&& !getEntities()->isInsideCompartment(kEntityPlayer, (CarIndex)params1->param1, (EntityPosition)params1->param2)
&& !getEntities()->isInsideCompartment(kEntityPlayer, (CarIndex)params1->param1, (EntityPosition)params1->param3)) {
if (getSoundQueue()->isBuffered((const char *)&params1->seq))
getSoundQueue()->processEntry((const char *)&params1->seq);
params->param8 = 0;
}
}
} // End of namespace LastExpress