diff options
| author | Eugene Sandulenko | 2019-11-13 15:29:03 +0100 |
|---|---|---|
| committer | Eugene Sandulenko | 2019-11-13 15:29:03 +0100 |
| commit | 08a475c318b568b189032271a2db6de9645911c4 (patch) | |
| tree | 5770f572bd2d517ce4c537a0c6350edf192f7cab /engines/director/lingo | |
| parent | cc0206217c7556525825b7f36e71f7f22747d7f2 (diff) | |
| download | scummvm-rg350-08a475c318b568b189032271a2db6de9645911c4.tar.gz scummvm-rg350-08a475c318b568b189032271a2db6de9645911c4.tar.bz2 scummvm-rg350-08a475c318b568b189032271a2db6de9645911c4.zip | |
DIRECTOR: Added broken 'if' statement test
Diffstat (limited to 'engines/director/lingo')
| -rw-r--r-- | engines/director/lingo/tests/if.lingo | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/engines/director/lingo/tests/if.lingo b/engines/director/lingo/tests/if.lingo index 8f1e2391e6..cbf70f6873 100644 --- a/engines/director/lingo/tests/if.lingo +++ b/engines/director/lingo/tests/if.lingo @@ -25,3 +25,24 @@ repeat with x = 1 to 6 if x = 4 then put 40 else put 50 end repeat + + +macro checkKey + if the keyCode = 36 then -- return key goes to first menu + go to frame 1 + else if the keyCode = 123 then -- left arrow goes to previous menu + dontPassEvent + go to marker(-1) + else if the keyCode = 124 then -- right arrow goes to next menu + dontPassEvent + go to marker(1) + else if the keyCode = 125 then -- down arrow goes to last (bottom) menu + dontPassEvent + go to frame "credits" + else if the keyCode = 126 then -- up arrow goes to first (top) menu + dontPassEvent + go to frame 1 + end if + +-- specialized macros to determine which sub-menu to return to +-- (these two files appear in two different menus) |