DIRECTOR: Lingo: Implement logical operators

1 files changed, 49 insertions, 0 deletions

diff --git a/engines/director/lingo/lingo-funcs.cpp b/engines/director/lingo/lingo-funcs.cpp
index cd399f7100..3e3d8858b0 100644
--- a/engines/director/lingo/lingo-funcs.cpp
+++ b/engines/director/lingo/lingo-funcs.cpp
@@ -341,6 +341,55 @@ void Lingo::func_negate() {
 	g_lingo->push(d);
 }
 
+void Lingo::func_eq() {
+	Datum d2 = g_lingo->pop();
+	Datum d1 = g_lingo->pop();
+
+	d1.val = (d1.val == d2.val) ? 1 : 0;
+	g_lingo->push(d1);
+}
+
+void Lingo::func_neq() {
+	Datum d2 = g_lingo->pop();
+	Datum d1 = g_lingo->pop();
+
+	d1.val = (d1.val != d2.val) ? 1 : 0;
+	g_lingo->push(d1);
+}
+
+void Lingo::func_gt() {
+	Datum d2 = g_lingo->pop();
+	Datum d1 = g_lingo->pop();
+
+	d1.val = (d1.val > d2.val) ? 1 : 0;
+	g_lingo->push(d1);
+}
+
+void Lingo::func_lt() {
+	Datum d2 = g_lingo->pop();
+	Datum d1 = g_lingo->pop();
+
+	d1.val = (d1.val < d2.val) ? 1 : 0;
+	g_lingo->push(d1);
+}
+
+void Lingo::func_ge() {
+	Datum d2 = g_lingo->pop();
+	Datum d1 = g_lingo->pop();
+
+	d1.val = (d1.val >= d2.val) ? 1 : 0;
+	g_lingo->push(d1);
+}
+
+void Lingo::func_le() {
+	Datum d2 = g_lingo->pop();
+	Datum d1 = g_lingo->pop();
+
+	d1.val = (d1.val <= d2.val) ? 1 : 0;
+	g_lingo->push(d1);
+}
+
+
 void Lingo::func_ifcode() {
 	Datum d;
 	int savepc = g_lingo->_pc;	/* then part */