DIRECTOR: Fix cast id references

2 files changed, 2 insertions, 2 deletions

diff --git a/engines/director/lingo/lingo-builtins.cpp b/engines/director/lingo/lingo-builtins.cpp
index 40ac67206c..1f843f5f4b 100644
--- a/engines/director/lingo/lingo-builtins.cpp
+++ b/engines/director/lingo/lingo-builtins.cpp
@@ -1148,7 +1148,7 @@ void LB::b_installMenu(int nargs) {
 	d.toInt();
 
 	if (g_director->getVersion() < 4)
-		d.u.i += 1024;
+		d.u.i += g_director->getCurrentScore()->_castIDoffset;
 
 	const Stxt *stxt = g_director->getCurrentScore()->_loadedStxts->getVal(d.u.i, nullptr);
 
diff --git a/engines/director/lingo/lingo-code.cpp b/engines/director/lingo/lingo-code.cpp
index 6cf10f861e..a10e131561 100644
--- a/engines/director/lingo/lingo-code.cpp
+++ b/engines/director/lingo/lingo-code.cpp
@@ -349,7 +349,7 @@ void LC::c_assign() {
 				g_lingo->pushVoid();
 				return;
 			} else {
-				d1.u.i -= 1024;
+				d1.u.i -= score->_castIDoffset;
 			}
 		}