aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEugene Sandulenko2019-12-24 15:37:44 +0100
committerEugene Sandulenko2019-12-24 15:37:44 +0100
commit3b6d582988f46aa312c975ecd7206338c6f85208 (patch)
treed215c5da4607e84da8a4d372248e80642d4fe47d
parentfe90e63d26c22d9279a24a29d3053293edad732f (diff)
downloadscummvm-rg350-3b6d582988f46aa312c975ecd7206338c6f85208.tar.gz
scummvm-rg350-3b6d582988f46aa312c975ecd7206338c6f85208.tar.bz2
scummvm-rg350-3b6d582988f46aa312c975ecd7206338c6f85208.zip
DIRECTOR: LINGO: Add test for 'when' statements with 'if'
-rw-r--r--engines/director/lingo/tests/if.lingo3
1 files changed, 3 insertions, 0 deletions
diff --git a/engines/director/lingo/tests/if.lingo b/engines/director/lingo/tests/if.lingo
index bcf1a09120..05176dfa07 100644
--- a/engines/director/lingo/tests/if.lingo
+++ b/engines/director/lingo/tests/if.lingo
@@ -121,6 +121,9 @@ else put 6
if the selection = the text of cast A31 then go to frame "sEnd" else put 7 end if
+when keyDown then if the key = RETURN then checkField
+when keyDown then if the key = QUOTE then checkField else put "bar"
+
macro WindowHorzP X
set X1 = constrainH( 14, X )
if X1 = X then return( TRUE )