aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEugene Sandulenko2019-12-06 16:50:10 +0100
committerEugene Sandulenko2019-12-06 16:50:10 +0100
commit6c816c5aac050b412dd0ac1c9e704ef00cac0825 (patch)
tree9994795da0f5207c1873b66d519fcca0b1bdd7e1
parentf8c9f129c1813874604b3a1124def549b98599cb (diff)
downloadscummvm-rg350-6c816c5aac050b412dd0ac1c9e704ef00cac0825.tar.gz
scummvm-rg350-6c816c5aac050b412dd0ac1c9e704ef00cac0825.tar.bz2
scummvm-rg350-6c816c5aac050b412dd0ac1c9e704ef00cac0825.zip
DIRECTOR: Added more 'if' statement tests
-rw-r--r--engines/director/lingo/tests/if.lingo24
1 files changed, 23 insertions, 1 deletions
diff --git a/engines/director/lingo/tests/if.lingo b/engines/director/lingo/tests/if.lingo
index 0821d71699..6a5b500dec 100644
--- a/engines/director/lingo/tests/if.lingo
+++ b/engines/director/lingo/tests/if.lingo
@@ -50,6 +50,9 @@ else
put FALSE
end if
+if abs(y) = x and abs(x) = y then put 5
+if abs(y) = x and abs(x) = y then put 5 else put 6
+
if the selection = the text of cast A31 then
go to frame "sEnd"
exit
@@ -88,7 +91,7 @@ else if whichTry = 1 then
else if whichTry = 2 then
put 5
go to frame "sShow"
-else if whichTry = 3 then go to frame "sDo"
+else if whichTry = 3 then go to frame "sDo" else put 7 end if
if rollOver(2) then
put "The cursor is INSIDE the square." into field "Cursor Status"
@@ -96,6 +99,25 @@ else
put "The cursor is OUTSIDE the square." into field "Cursor Status"
end if
+if the selection = the text of cast A31 then
+ if whichTry = 3 then go to frame "sDo"
+else if whichTry = 1 then
+ if whichTry = 3 then go to frame "sDo" else
+ put 5
+ end if
+else if whichTry = 2 then
+ if whichTry = 3 then go to frame "sDo" else
+ if the selection = the text of cast A21 then
+ if whichTry = 3 then go to frame "Foo"
+ else if abra = 5 then put 6 else
+ put 7
+ if abra = 7 thhen put 5
+ end if
+ end if
+else if whichTry = 3 then go to frame "sDo"
+else put 6
+
+
macro WindowHorzP X
set X1 = constrainH( 14, X )
if X1 = X then return( TRUE )