aboutsummaryrefslogtreecommitdiff
path: root/engines/director/lingo/lingo-code.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'engines/director/lingo/lingo-code.cpp')
-rw-r--r--engines/director/lingo/lingo-code.cpp63
1 files changed, 63 insertions, 0 deletions
diff --git a/engines/director/lingo/lingo-code.cpp b/engines/director/lingo/lingo-code.cpp
index 4f4a2b3be1..675f7ef8ca 100644
--- a/engines/director/lingo/lingo-code.cpp
+++ b/engines/director/lingo/lingo-code.cpp
@@ -83,6 +83,12 @@ static struct FuncDescr {
{ Lingo::c_within, "c_within", "" },
{ Lingo::c_charOf, "c_charOf", "" }, // D3
{ Lingo::c_charToOf, "c_charToOf", "" }, // D3
+ { Lingo::c_itemOf, "c_itemOf", "" }, // D3
+ { Lingo::c_itemToOf, "c_itemToOf", "" }, // D3
+ { Lingo::c_lineOf, "c_lineOf", "" }, // D3
+ { Lingo::c_lineToOf, "c_lineToOf", "" }, // D3
+ { Lingo::c_wordOf, "c_wordOf", "" }, // D3
+ { Lingo::c_wordToOf, "c_wordToOf", "" }, // D3
{ Lingo::c_and, "c_and", "" },
{ Lingo::c_or, "c_or", "" },
{ Lingo::c_not, "c_not", "" },
@@ -606,6 +612,63 @@ void Lingo::c_charToOf() {
g_lingo->push(d1);
}
+void Lingo::c_itemOf() {
+ Datum d2 = g_lingo->pop();
+ Datum d1 = g_lingo->pop();
+
+ warning("STUB: c_itemOf: %d %d", d1.u.i, d2.u.i);
+
+ g_lingo->push(d1);
+}
+
+void Lingo::c_itemToOf() {
+ Datum d3 = g_lingo->pop();
+ Datum d2 = g_lingo->pop();
+ Datum d1 = g_lingo->pop();
+
+ warning("STUB: c_itemToOf: %d %d %d", d1.u.i, d2.u.i, d3.u.i);
+
+ g_lingo->push(d1);
+}
+
+void Lingo::c_lineOf() {
+ Datum d2 = g_lingo->pop();
+ Datum d1 = g_lingo->pop();
+
+ warning("STUB: c_lineOf: %d %d", d1.u.i, d2.u.i);
+
+ g_lingo->push(d1);
+}
+
+void Lingo::c_lineToOf() {
+ Datum d3 = g_lingo->pop();
+ Datum d2 = g_lingo->pop();
+ Datum d1 = g_lingo->pop();
+
+ warning("STUB: c_lineToOf: %d %d %d", d1.u.i, d2.u.i, d3.u.i);
+
+ g_lingo->push(d1);
+}
+
+void Lingo::c_wordOf() {
+ Datum d2 = g_lingo->pop();
+ Datum d1 = g_lingo->pop();
+
+ warning("STUB: c_wordOf: %d %d", d1.u.i, d2.u.i);
+
+ g_lingo->push(d1);
+}
+
+void Lingo::c_wordToOf() {
+ Datum d3 = g_lingo->pop();
+ Datum d2 = g_lingo->pop();
+ Datum d1 = g_lingo->pop();
+
+ warning("STUB: c_wordToOf: %d %d %d", d1.u.i, d2.u.i, d3.u.i);
+
+ g_lingo->push(d1);
+}
+
void Lingo::c_and() {
Datum d2 = g_lingo->pop();
Datum d1 = g_lingo->pop();