STARTREK: Initialization of away mission.

Crew successfully beams in and does their idle animation.

1 files changed, 237 insertions, 0 deletions

diff --git a/engines/startrek/awaymission.cpp b/engines/startrek/awaymission.cpp
new file mode 100644
index 0000000000..73526eeaa2
--- /dev/null
+++ b/engines/startrek/awaymission.cpp
@@ -0,0 +1,237 @@
+/* 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 "startrek/startrek.h"
+
+namespace StarTrek {
+
+void StarTrekEngine::initAwayMission() {
+	_awayMission = AwayMission(); // Initialize members to 0
+
+	// memset(bitmapBuffer->pixels, 0, 0xfa00);
+	// sub_15ab1("ground");
+	// sub_23a60();
+	_sound->loadMusicFile("ground");
+
+	loadRoom(_missionToLoad, _roomIndexToLoad);
+
+	// Load crew positions for beaming in
+	initAwayCrewPositions(4);
+}
+
+void StarTrekEngine::runAwayMission() {
+	while (true) {
+		handleAwayMissionEvents();
+
+		Common::Point mousePos = _gfx->getMousePos();
+		_awayMission.mouseX = mousePos.x;
+		_awayMission.mouseY = mousePos.y;
+
+		assert(_commandQueue.size() <= 16);
+		if (!_commandQueue.empty()) {
+			// sub_200e7();
+			// sub_20118();
+			runAwayMissionCycle();
+		}
+	}
+}
+
+void StarTrekEngine::cleanupAwayMission() {
+	// TODO
+}
+
+void StarTrekEngine::loadRoom(const Common::String &missionName, int roomIndex) {
+	if (_room != nullptr)
+		delete _room;
+
+	_keyboardControlsMouse = true;
+
+	_missionName = _missionToLoad;
+	_roomIndex = _roomIndexToLoad;
+
+	_roomFrameCounter = 0;
+	_awayMission.field1d = 0;
+
+	_gfx->fadeoutScreen();
+	_sound->stopAllVocSounds();
+
+	_screenName = _missionName + (char)(_roomIndex + '0');
+
+	_gfx->setBackgroundImage(_gfx->loadBitmap(_screenName));
+	_gfx->loadPri(_screenName + ".pri");
+	_gfx->loadPalette("palette");
+	_gfx->copyBackgroundScreen();
+
+	_room = new Room(this, _screenName);
+
+	// Original sets up bytes 0-3 of rdf file as "remote function caller"
+
+	// Load map file
+	_awayMission.mapFileLoaded = 1;
+	_mapFilename = _screenName;
+	_mapFile = loadFile(_mapFilename + ".map");
+	// loadIWFile(_mapFilename);
+
+	objectFunc1();
+	initObjects();
+
+	double num = _room->readRdfWord(0x0c) - _room->readRdfWord(0x0a);
+	double den = _room->readRdfWord(0x06) - _room->readRdfWord(0x08) + 1;
+	_playerObjectScale = (int32)(num * 256 / den);
+
+	// TODO: RDF vars 1e/1f and 20/21; relates to BAN files?
+
+	_commandQueue.clear();
+}
+
+void StarTrekEngine::initAwayCrewPositions(int warpEntryIndex) {
+	_sound->stopAllVocSounds();
+
+	memset(_awayMission.field25, 0xff, 4);
+
+	switch (warpEntryIndex) {
+	case 0:
+		break;
+	case 1:
+		break;
+	case 2:
+		break;
+	case 3:
+		break;
+	case 4: // Crew is beaming in.
+		warpEntryIndex -= 4;
+		for (int i = 0; i < (_awayMission.redshirtDead ? 3 : 4); i++) {
+			Common::String animFilename = getCrewmanAnimFilename(i, "tele");
+			Common::Point warpPos = _room->getBeamInPosition(i);
+			loadObjectAnimWithRoomScaling(i, animFilename, warpPos.x, warpPos.y);
+		}
+		_kirkObject->field64 = 1;
+		_kirkObject->field66 = 0xff;
+		_awayMission.field1d = 1;
+		playSoundEffectIndex(0x09);
+		// word_466f2 = 0;
+		break;
+	case 5:
+		break;
+	case 6:
+		break;
+	}
+}
+
+void StarTrekEngine::handleAwayMissionEvents() {
+	TrekEvent event;
+
+	if (popNextEvent(&event)) {
+		switch (event.type) {
+		case TREKEVENT_TICK:
+			updateObjectAnimations();
+			// sub_236bb();
+			// sub_2325d();
+			// doSomethingWithBanData1();
+			_gfx->drawAllSprites();
+			// doSomethingWithBanData2();
+			// updateMusic(); // Is this needed?
+			// sub_22de0();
+			_frameIndex++;
+			_roomFrameCounter++;
+			// sub_20099(0, _roomFrameCounter & 0xff, (_roomFrameCounter >> 8) & 0xff, 0);
+			if (_roomFrameCounter >= 2)
+				_gfx->incPaletteFadeLevel();
+			break;
+		case TREKEVENT_LBUTTONDOWN:
+			if (_awayMission.field1d != 0)
+				break;
+			switch (_awayMission.mapFileLoaded) {
+			case 0:
+				if (_awayMission.field1c == 0) {
+					_kirkObject->sprite.drawMode = 1; // Hide these objects for function call below?
+					_spockObject->sprite.drawMode = 1;
+					_mccoyObject->sprite.drawMode = 1;
+					_redshirtObject->sprite.drawMode = 1;
+
+					// findObjectClickedOn();
+					// ...
+
+					_kirkObject->sprite.drawMode = 0;
+					_spockObject->sprite.drawMode = 0;
+					_mccoyObject->sprite.drawMode = 0;
+					_redshirtObject->sprite.drawMode = 0;
+
+					Common::String animFilename = getCrewmanAnimFilename(0, "walk");
+					Common::Point mousePos = _gfx->getMousePos();
+					// objectWalkToPosition(0, animFilename, _kirkObject->pos.x, _kirkObject->pos.y, mousePos.x, mousePos.y);
+				}
+				break;
+			case 1:
+				break;
+			case 2:
+				break;
+			case 3:
+				break;
+			case 4:
+				break;
+			case 5:
+				break;
+			}
+			break;
+		case TREKEVENT_MOUSEMOVE:
+			break;
+		case TREKEVENT_RBUTTONDOWN:
+			break;
+		case TREKEVENT_KEYDOWN:
+			break;
+		default:
+			break;
+		}
+	}
+}
+
+/**
+ * Similar to loadObjectAnim, but scale is determined by the y-position in the room. The
+ * further up (away) the object is, the smaller it is.
+ */
+int StarTrekEngine::loadObjectAnimWithRoomScaling(int objectIndex, const Common::String &animName, int16 x, int16 y) {
+	uint16 scale = getObjectScaleAtPosition(y);
+	return loadObjectAnim(objectIndex, animName, x, y, scale);
+}
+
+uint16 StarTrekEngine::getObjectScaleAtPosition(int16 y) {
+	int16 var06 = _room->getVar06();
+	int16 var08 = _room->getVar08();
+	int16 var0a = _room->getVar0a();
+
+	if (var06 < y)
+		y = var06;
+	if (var08 > y)
+		y = var08;
+
+	return ((_playerObjectScale * (y - var08)) >> 8) + var0a;
+}
+
+Room *StarTrekEngine::getRoom() {
+	return _room;
+}
+
+void StarTrekEngine::runAwayMissionCycle() {
+}
+
+}