From eb1b2d30881aec619561984b424b5daaa64a4727 Mon Sep 17 00:00:00 2001
From: Eugene Sandulenko
Date: Sat, 6 Aug 2016 08:01:42 +0200
Subject: DIRECTOR: Lingo: Added more command stubs

---
 engines/director/lingo/lingo-builtins.cpp | 44 ++++++++++++++++++++++++-------
 engines/director/lingo/lingo.h            |  6 ++++-
 2 files changed, 39 insertions(+), 11 deletions(-)

(limited to 'engines')

diff --git a/engines/director/lingo/lingo-builtins.cpp b/engines/director/lingo/lingo-builtins.cpp
index 63b7fe9ce8..06c3e7f7dd 100644
--- a/engines/director/lingo/lingo-builtins.cpp
+++ b/engines/director/lingo/lingo-builtins.cpp
@@ -49,20 +49,26 @@ static struct BuiltinProto {
 	{ "chars",	Lingo::b_chars,		3, 3, true },
 	{ "length",	Lingo::b_length,	1, 1, true },
 	{ "string",	Lingo::b_string,	1, 1, true },
-	// Misc
-	{ "alert",	 		Lingo::b_alert,			1, 1, false },
-	{ "beep",	 		Lingo::b_beep,			0, 1, false },
+	// Files
 	{ "closeDA",	 	Lingo::b_closeDA, 		0, 0, false },
 	{ "closeResFile",	Lingo::b_closeResFile,	0, 1, false },
 	{ "closeXlib",		Lingo::b_closeXlib,		0, 1, false },
+	// Misc
+	{ "alert",	 		Lingo::b_alert,			1, 1, false },
 	{ "continue",		Lingo::b_continue,		0, 0, false },
 	{ "cursor",	 		Lingo::b_cursor,		1, 1, false },
 	{ "delay",	 		Lingo::b_delay,			1, 1, false },
-	{ "dontpassevent",	Lingo::b_dontpassevent,	0, 0, false },
+	{ "dontPassEvent",	Lingo::b_dontPassEvent,	0, 0, false },
+	{ "editableText",	Lingo::b_editableText,	0, 0, false },
+	{ "installMenu",	Lingo::b_installMenu,	1, 1, false },
+	{ "moveableSprite",	Lingo::b_moveableSprite,0, 0, false },
+	{ "nothing",		Lingo::b_nothing,		0, 0, false },
 	{ "updatestage",	Lingo::b_updatestage,	0, 0, false },
 	{ "ilk",	 		Lingo::b_ilk,			1, 2, true },
-	// point
+	// Point
 	{ "point",	Lingo::b_point, 2, 2, true },
+	// Sound
+	{ "beep",	 		Lingo::b_beep,			0, 1, false },
 	{ 0, 0, 0, 0, false }
 };
 
@@ -236,8 +242,8 @@ void Lingo::b_string() {
 ///////////////////
 // Misc
 ///////////////////
-void Lingo::b_dontpassevent() {
-	warning("STUB: b_dontpassevent");
+void Lingo::b_dontPassEvent() {
+	warning("STUB: b_dontPassEvent");
 }
 
 void Lingo::b_updatestage() {
@@ -259,6 +265,10 @@ void Lingo::b_continue() {
 	warning("STUB: b_continue");
 }
 
+void Lingo::b_nothing() {
+	warning("STUB: b_nothing");
+}
+
 void Lingo::b_alert() {
 	Datum d = g_lingo->pop();
 
@@ -291,19 +301,33 @@ void Lingo::b_closeXlib() {
 
 void Lingo::b_beep() {
 	Datum d = g_lingo->pop();
-	warning("STUB: c_closeResFile(%d)", d.u.i);
+	warning("STUB: b_beep(%d)", d.u.i);
 }
 
 void Lingo::b_cursor() {
 	Datum d = g_lingo->pop();
 	d.toInt();
-	warning("STUB: c_cursor(%d)", d.u.i);
+	warning("STUB: b_cursor(%d)", d.u.i);
 }
 
 void Lingo::b_delay() {
 	Datum d = g_lingo->pop();
 	d.toInt();
-	warning("STUB: c_delay(%d)", d.u.i);
+	warning("STUB: b_delay(%d)", d.u.i);
+}
+
+void Lingo::b_editableText() {
+	warning("STUB: b_editableText");
+}
+
+void Lingo::b_installMenu() {
+	Datum d = g_lingo->pop();
+	warning("STUB: b_installMenu(%d)", d.u.i);
+}
+
+void Lingo::b_moveableSprite() {
+	Datum d = g_lingo->pop();
+	warning("STUB: b_moveableSprite(%d)", d.u.i);
 }
 
 
diff --git a/engines/director/lingo/lingo.h b/engines/director/lingo/lingo.h
index c0b59d5b67..4fa1d6410b 100644
--- a/engines/director/lingo/lingo.h
+++ b/engines/director/lingo/lingo.h
@@ -266,9 +266,13 @@ public:
 	static void b_string();
 	static void b_tan();
 
-	static void b_dontpassevent();
+	static void b_dontPassEvent();
+	static void b_editableText();
+	static void b_installMenu();
 	static void b_updatestage();
 	static void b_ilk();
+	static void b_moveableSprite();
+	static void b_nothing();
 	static void b_closeDA();
 	static void b_continue();
 
-- 
cgit v1.2.3