1 files changed, 132 insertions, 0 deletions
diff --git a/engines/tinsel/mareels.cpp b/engines/tinsel/mareels.cpp
new file mode 100644
index 0000000000..4c64eaf091
--- /dev/null
+++ b/engines/tinsel/mareels.cpp
@@ -0,0 +1,132 @@
+/* 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.
+ *
+ * $URL$
+ * $Id$
+ *
+ * Functions to set up moving actors' reels.
+ */
+
+#include "tinsel/pcode.h"	// For D_UP, D_DOWN
+#include "tinsel/rince.h"
+
+#include "common/util.h"
+
+namespace Tinsel {
+
+//----------------- LOCAL GLOBAL DATA --------------------
+
+enum {
+	NUM_INTERVALS = NUM_MAINSCALES - 1,
+
+	// 2 for up and down, 3 allow enough entries for 3 fully subscribed moving actors' worth
+	MAX_SCRENTRIES = NUM_INTERVALS*2*3
+};
+
+struct SCIdataStruct {
+	int	actor;
+	int	scale;
+	int	direction;
+	SCNHANDLE reels[4];
+};
+
+static SCIdataStruct SCIdata[MAX_SCRENTRIES];
+
+static int scrEntries = 0;
+
+/**
+ * Return handle to actor's talk reel at present scale and direction.
+ */
+SCNHANDLE GetMactorTalkReel(PMACTOR pActor, TFTYPE dirn) {
+	assert(1 <= pActor->scale && pActor->scale <= TOTAL_SCALES);
+	switch (dirn) {
+	case TF_NONE:
+		return pActor->TalkReels[pActor->scale-1][pActor->dirn];
+
+	case TF_UP:
+		return pActor->TalkReels[pActor->scale-1][AWAY];
+
+	case TF_DOWN:
+		return pActor->TalkReels[pActor->scale-1][FORWARD];
+
+	case TF_LEFT:
+		return pActor->TalkReels[pActor->scale-1][LEFTREEL];
+
+	case TF_RIGHT:
+		return pActor->TalkReels[pActor->scale-1][RIGHTREEL];
+
+	default:
+		error("GetMactorTalkReel() - illegal direction!");
+	}
+}
+
+/**
+ * scalingreels
+ */
+void setscalingreels(int actor, int scale, int direction,
+		SCNHANDLE left, SCNHANDLE right, SCNHANDLE forward, SCNHANDLE away) {
+	assert(scale >= 1 && scale <= NUM_MAINSCALES); // invalid scale
+	assert(!(scale == 1 && direction == D_UP) &&
+		!(scale == NUM_MAINSCALES && direction == D_DOWN)); // illegal direction from scale
+
+	assert(scrEntries < MAX_SCRENTRIES); // Scaling reels limit reached!
+
+	SCIdata[scrEntries].actor = actor;
+	SCIdata[scrEntries].scale = scale;
+	SCIdata[scrEntries].direction = direction;
+	SCIdata[scrEntries].reels[LEFTREEL]	= left;
+	SCIdata[scrEntries].reels[RIGHTREEL]	= right;
+	SCIdata[scrEntries].reels[FORWARD]	= forward;
+	SCIdata[scrEntries].reels[AWAY]		= away;
+	scrEntries++;
+}
+
+/**
+ * ScalingReel
+ */
+SCNHANDLE ScalingReel(int ano, int scale1, int scale2, DIRREEL reel) {
+	int d;	// Direction
+
+	// The smaller the number, the bigger the scale
+	if (scale1 < scale2)
+		d = D_DOWN;
+	else
+		d = D_UP;
+
+	for (int i = 0; i < scrEntries; i++) 	{
+		if (SCIdata[i].actor == ano && SCIdata[i].scale == scale1 && SCIdata[i].direction == d) {
+			if (SCIdata[i].reels[reel] == TF_NONE)
+				return 0;
+			else
+				return SCIdata[i].reels[reel];
+		}
+	}
+	return 0;
+}
+
+/**
+ * RebootScalingReels
+ */
+void RebootScalingReels(void) {
+	scrEntries = 0;
+	memset(SCIdata, 0, sizeof(SCIdata));
+}
+
+} // end of namespace Tinsel