diff options
author | Eugene Sandulenko | 2016-06-30 17:03:02 +0200 |
---|---|---|
committer | Eugene Sandulenko | 2016-08-03 23:40:36 +0200 |
commit | c53e4b579a0217e01208b7e06ead853f4319df7c (patch) | |
tree | 1a8e2a7f6b83b4dd9d82bf6d6ecd3b141dbce003 /engines/director/director.cpp | |
parent | 0b6d950729296c177ad502328fd5b5e3b0bb04c9 (diff) | |
download | scummvm-rg350-c53e4b579a0217e01208b7e06ead853f4319df7c.tar.gz scummvm-rg350-c53e4b579a0217e01208b7e06ead853f4319df7c.tar.bz2 scummvm-rg350-c53e4b579a0217e01208b7e06ead853f4319df7c.zip |
DIRECTOR: Lingo: Make global/local vars work
Diffstat (limited to 'engines/director/director.cpp')
-rw-r--r-- | engines/director/director.cpp | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/engines/director/director.cpp b/engines/director/director.cpp index 9a22e675cb..7463a9e77a 100644 --- a/engines/director/director.cpp +++ b/engines/director/director.cpp @@ -105,6 +105,7 @@ _lingo->executeScript(kMovieScript, 2); _lingo->addCode("--\n\ macro SHIPX\n\ +global x\n\ set x = 5\n\ if x = 1 then\n\ go \"Zoom\"\n\ @@ -117,12 +118,13 @@ put 100\n\ \n\ --\n\ macro ZIPX\n\ -set x = 5\n\ +set x = 7\n\ if x = 1 then\n\ go \"ZIP\"\n\ exit\n\ end if\n\ if x >1 then\n\ +put x\n\ exit\n\ end if\n\ \n\ @@ -136,8 +138,11 @@ end if\n\ ", kMovieScript, 1); _lingo->addCode("check(2, 3)\n\ +global x\n\ shipx\n\ put x\n\ +zipx\n\ +put x\n\ ", kMovieScript, 2); _lingo->executeScript(kMovieScript, 2); |