From e7a4f22b598ba0437bfbe7202198ad1fa9ed9f1c Mon Sep 17 00:00:00 2001
From: Eugene Sandulenko
Date: Tue, 5 Jul 2016 10:58:27 +0200
Subject: DIRECTOR: Lingo: More work on if statement overhaul

---
 engines/director/director.cpp | 20 +++++++++++++++-----
 1 file changed, 15 insertions(+), 5 deletions(-)

(limited to 'engines/director/director.cpp')

diff --git a/engines/director/director.cpp b/engines/director/director.cpp
index a39894e50c..8063cf8d6b 100644
--- a/engines/director/director.cpp
+++ b/engines/director/director.cpp
@@ -109,8 +109,15 @@ Common::Error DirectorEngine::run() {
 	_currentScore = nullptr;
 
 	_lingo->addCode("--\n\
-	--repeat with x = 1 to 5\n\
-	set x = 4\n\
+	if x = 10 then put 10\n\
+--	elseif x = 11 then put 11\n\
+--	elseif x = 12 then put 12\n\
+", kMovieScript, 2);
+
+_lingo->executeScript(kMovieScript, 2);
+
+	_lingo->addCode("--\n\
+--	repeat with x = 1 to 5\n\
 		if x = 1 then\n\
 		  put 1\n\
 		else if x = 2 then\n\
@@ -118,9 +125,12 @@ Common::Error DirectorEngine::run() {
 		  put 2.2\n\
 	    else if x = 3 then put 3\n\
 		end if\n\
-		if x = 4 then put 4\n\
-		else put 5\n\
-	--end repeat\n\
+--	end repeat\n\
+	if x = 6 then put 6\n\
+	else put 0\n\
+--	if x = 10 then put 10\n\
+--	elseif x = 11 then put 11\n\
+--	elseif x = 12 then put 12\n\
 ", kMovieScript, 2);
 
 _lingo->executeScript(kMovieScript, 2);
-- 
cgit v1.2.3