From c6567ce71a5dff0422c1133945d590ee416e1d30 Mon Sep 17 00:00:00 2001
From: Eugene Sandulenko
Date: Thu, 9 Feb 2017 20:12:02 +0100
Subject: DIRECTOR: Lingo: Documented D4 "Puppets" Lingo

---
 engines/director/lingo/lingo-builtins.cpp | 12 ++++++------
 engines/director/lingo/lingo-the.cpp      |  1 +
 engines/director/lingo/lingo-the.h        |  1 +
 3 files changed, 8 insertions(+), 6 deletions(-)

(limited to 'engines')

diff --git a/engines/director/lingo/lingo-builtins.cpp b/engines/director/lingo/lingo-builtins.cpp
index f34be6e526..99af75db69 100644
--- a/engines/director/lingo/lingo-builtins.cpp
+++ b/engines/director/lingo/lingo-builtins.cpp
@@ -154,17 +154,17 @@ static struct BuiltinProto {
 	{ "move",			Lingo::b_move,			1, 2, false },	//			D4 c
 	{ "moveableSprite",	Lingo::b_moveableSprite,0, 0, false },	// D2
 	{ "pasteClipBoardInto",Lingo::b_pasteClipBoardInto,1, 1, false },	//	D4 c
-	{ "puppetPalette",	Lingo::b_puppetPalette, -1,0, false },	// D2
-	{ "puppetSound",	Lingo::b_puppetSound,	-1,0, false },	// D2
-	{ "puppetSprite",	Lingo::b_puppetSprite,	-1,0, false },	// D2
-	{ "puppetTempo",	Lingo::b_puppetTempo,	1, 1, false },	// D2
-	{ "puppetTransition",Lingo::b_puppetTransition,-1,0, false },// D2
+	{ "puppetPalette",	Lingo::b_puppetPalette, -1,0, false },	// D2 c
+	{ "puppetSound",	Lingo::b_puppetSound,	-1,0, false },	// D2 c
+	{ "puppetSprite",	Lingo::b_puppetSprite,	-1,0, false },	// D2 c
+	{ "puppetTempo",	Lingo::b_puppetTempo,	1, 1, false },	// D2 c
+	{ "puppetTransition",Lingo::b_puppetTransition,-1,0, false },// D2 c
 	{ "ramNeeded",		Lingo::b_ramNeeded,		2, 2, true },	//			D4 f
 	{ "rollOver",		Lingo::b_rollOver,		1, 1, true },	// D2 f
 	{ "spriteBox",		Lingo::b_spriteBox,		-1,0, false },	// D2
 	{ "unLoad",			Lingo::b_unLoad,		0, 2, false },	//			D4 c
 	{ "unLoadCast",		Lingo::b_unLoadCast,	0, 2, false },	//			D4 c
-	{ "updateStage",	Lingo::b_updateStage,	0, 0, false },	// D2
+	{ "updateStage",	Lingo::b_updateStage,	0, 0, false },	// D2 c
 	{ "zoomBox",		Lingo::b_zoomBox,		-1,0, false },	// D2
 	// Point
 	{ "point",			Lingo::b_point,			2, 2, true },
diff --git a/engines/director/lingo/lingo-the.cpp b/engines/director/lingo/lingo-the.cpp
index 8a5f837d1a..16c7be092b 100644
--- a/engines/director/lingo/lingo-the.cpp
+++ b/engines/director/lingo/lingo-the.cpp
@@ -53,6 +53,7 @@ TheEntity entities[] = {
 	{ kTheFrame,			"frame",			false },	// D2 f
 	{ kTheFrameLabel,		"frameLabel",		false },	//				D4 p
 	{ kTheFrameScript,		"frameScript",		false },	//				D4 p
+	{ kTheFramePalette,		"framePalette",		false },	//				D4 p
 	{ kTheFreeBlock,		"freeBlock",		false },	// D2 f
 	{ kTheFreeBytes,		"freeBytes",		false },	// D2 f
 	{ kTheFullColorPermit,	"fullColorPermit",	false },	// D2 p
diff --git a/engines/director/lingo/lingo-the.h b/engines/director/lingo/lingo-the.h
index e675a2d4b3..368b4a29ce 100644
--- a/engines/director/lingo/lingo-the.h
+++ b/engines/director/lingo/lingo-the.h
@@ -50,6 +50,7 @@ enum TheEntityType {
 	kTheFloatPrecision,
 	kTheFrame,
 	kTheFrameLabel,
+	kTheFramePalette,
 	kTheFrameScript,
 	kTheFreeBlock,
 	kTheFreeBytes,
-- 
cgit v1.2.3