aboutsummaryrefslogtreecommitdiff
path: root/engines
diff options
context:
space:
mode:
Diffstat (limited to 'engines')
-rw-r--r--engines/director/lingo/lingo-builtins.cpp18
-rw-r--r--engines/director/lingo/lingo.h2
2 files changed, 20 insertions, 0 deletions
diff --git a/engines/director/lingo/lingo-builtins.cpp b/engines/director/lingo/lingo-builtins.cpp
index 52f840db3c..7597debb37 100644
--- a/engines/director/lingo/lingo-builtins.cpp
+++ b/engines/director/lingo/lingo-builtins.cpp
@@ -97,6 +97,8 @@ static struct BuiltinProto {
// Misc
{ "alert", Lingo::b_alert, 1, 1, false }, // D2
{ "cursor", Lingo::b_cursor, 1, 1, false }, // D2
+ { "framesToHMS", Lingo::b_framesToHMS, 4, 4, false }, // D3
+ { "HMStoFrames", Lingo::b_HMStoFrames, 4, 4, false }, // D3
{ "printFrom", Lingo::b_printFrom, -1,0, false }, // D2
// put // D2
// set // D2
@@ -563,6 +565,22 @@ void Lingo::b_preLoadCast(int nargs) {
g_lingo->dropStack(nargs);
}
+void Lingo::b_framesToHMS(int nargs) {
+ g_lingo->printStubWithArglist("b_framesToHMS", nargs);
+
+ g_lingo->dropStack(nargs);
+
+ g_lingo->push(Datum(0));
+}
+
+void Lingo::b_HMStoFrames(int nargs) {
+ g_lingo->printStubWithArglist("b_HMStoFrames", nargs);
+
+ g_lingo->dropStack(nargs);
+
+ g_lingo->push(Datum(0));
+}
+
void Lingo::b_printFrom(int nargs) {
g_lingo->printStubWithArglist("b_printFrom", nargs);
diff --git a/engines/director/lingo/lingo.h b/engines/director/lingo/lingo.h
index cd0943f5eb..54a719e58f 100644
--- a/engines/director/lingo/lingo.h
+++ b/engines/director/lingo/lingo.h
@@ -341,6 +341,8 @@ public:
static void b_alert(int nargs);
static void b_cursor(int nargs);
+ static void b_framesToHMS(int nargs);
+ static void b_HMStoFrames(int nargs);
static void b_printFrom(int nargs);
static void b_showGlobals(int nargs);
static void b_showLocals(int nargs);