home *** CD-ROM | disk | FTP | other *** search
- ;*******************************************************************;
- ; Sciptname..: Guidescr.SHW ;
- ; Date.......: 1st. Feb. 1994, by RMP DATA. ;
- ; Purpose....: Part of the demonstration script GUIDE.SHW. ;
- ;*******************************************************************;
-
- COLOR ATTRIBUTE 31
- SCREEN WIPE SPLIT
-
- SHOW SCREEN "SHOW1.SCR" TXT
- WAIT 1
- COLOR ATTRIBUTE 95
- EFFECT POINT 5 7
- GOXY 4 08 DRAW BOX 43 7
- GOXY 5 09 WRITE "In this example you'll learn how to create"
- GOXY 5 10 WRITE "your first simple script. Scripts are the"
- GOXY 5 11 WRITE "the basis for all promotions/tutorials. "
- GOXY 5 12 WRITE " "
- GOXY 5 13 WRITE "You start in the main screen by selecting "
- GOXY 5 14 WRITE "F3 to enter the Script Center. "
-
- MARK 201
- READ KEY inkey
- CASE KEY inkey 461 DO JUMPMARK 202 ; F3 key
- CASE KEY inkey 27 DO JUMPMARK 1 ; <Esc> key
- MUSIC SOUND A 2 200
- JUMPMARK 201
- MARK 202
-
- SHOW SCREEN "SHOW3.SCR" TXT
- WAIT 1
- GOXY 4 08 DRAW BOX 46 7
- GOXY 5 09 WRITE "In the Script Center you write commands to be"
- GOXY 5 10 WRITE "be executed. The Script Center is suited for"
- GOXY 5 11 WRITE "making scripts. With the many commands you"
- GOXY 5 12 WRITE "can create powerful scripts. You either type"
- GOXY 5 13 WRITE "in commands yourself or as in this case, use"
- GOXY 5 14 WRITE "the F9 key to select between commands. "
-
- MARK 203
- READ KEY inkey
- CASE KEY inkey 467 DO JUMPMARK 204 ; F9 key
- CASE KEY inkey 27 DO JUMPMARK 1 ; <Esc> key
- MUSIC SOUND A 2 200
- JUMPMARK 203
- MARK 204
-
- SHOW SCREEN "SHOW4.SCR" TXT
- GOXY 4 08 DRAW BOX 43 4
- GOXY 5 09 WRITE "First you select the Screen Command. It is"
- GOXY 5 10 WRITE "already highlighted, so you can just hit"
- GOXY 5 11 WRITE "the <Enter> key to select it. "
-
- MARK 205
- READ KEY inkey
- CASE KEY inkey 13 DO JUMPMARK 206 ; <Enter> key
- CASE KEY inkey 27 DO JUMPMARK 1 ; <Esc> key
- MUSIC SOUND A 2 200
- JUMPMARK 205
- MARK 206
-
- SHOW SCREEN "GUIDE1.SCR" TXT
- GOXY 4 08 DRAW BOX 40 5
- GOXY 5 09 WRITE "Usually a script starts by erasing the"
- GOXY 5 10 WRITE "current screen. So as a parameter to"
- GOXY 5 11 WRITE "the SCREEN command you push <Enter> to"
- GOXY 5 12 WRITE "select the highlighted CLEAR command. "
-
- MARK 207
- READ KEY inkey
- CASE KEY inkey 13 DO JUMPMARK 208 ; <Enter> key
- CASE KEY inkey 27 DO JUMPMARK 1 ; <Esc> key
- MUSIC SOUND A 2 200
- JUMPMARK 207
- MARK 208
-
- SHOW SCREEN "GUIDE2.SCR" TXT
- GOXY 4 08 DRAW BOX 46 6
- GOXY 5 09 WRITE "So you can see, you can easily select between"
- GOXY 5 10 WRITE "commands with the F9 key. But you can also "
- GOXY 5 11 WRITE "write commands directly in the editor. On the"
- GOXY 5 12 WRITE "current line write the following command: "
- GOXY 5 13 WRITE 'GOXY 10 10 WRITE "HELLO WORLD" '
-
- COLOR ATTRIBUTE 63
- VARIABLE VALUE instr ""
- MARK 209
- GOXY 2 5 READ STRING UPPER instr 32
- CASE STRING UPPER instr 'GOXY 10 10 WRITE "HELLO WORLD"' DO JUMPMARK 210
- MUSIC SOUND A 2 200
- JUMPMARK 209
- MARK 210
-
- SHOW SCREEN "GUIDE3.SCR" TXT
- COLOR ATTRIBUTE 95
- GOXY 4 08 DRAW BOX 43 5
- GOXY 5 09 WRITE "And on line 3, you then want the script to"
- GOXY 5 10 WRITE "halt a little bit before it finishes. This"
- GOXY 5 11 WRITE "can be done with the command you enter: "
- GOXY 5 12 WRITE "WAIT 4 "
-
- COLOR ATTRIBUTE 63
- VARIABLE VALUE instr ""
- MARK 210
- GOXY 2 6 READ STRING UPPER instr 7
- CASE STRING UPPER instr "WAIT 4" DO JUMPMARK 211
- MUSIC SOUND A 2 200
- JUMPMARK 210
- MARK 211
-
- SCREEN GET
-
- COLOR ATTRIBUTE 95
- GOXY 4 08 DRAW BOX 43 5
- GOXY 5 09 WRITE "Now you must save the file. You push the "
- GOXY 5 10 WRITE "F2 key and select save file (since it is "
- GOXY 5 11 WRITE "highlighted, you just press <Enter>. First"
- GOXY 5 12 WRITE "F2 then <Enter> "
-
- MARK 212
- READ KEY inkey
- CASE KEY inkey 460 DO JUMPMARK 213 ; F2 key
- CASE KEY inkey 27 DO JUMPMARK 1 ; <Esc> key
- MUSIC SOUND A 2 200
- JUMPMARK 212
- MARK 213
-
- SHOW SCREEN "GUIDE4.SCR" TXT
-
- MARK 214
- READ KEY inkey
- CASE KEY inkey 13 DO JUMPMARK 215 ; <Enter> key
- CASE KEY inkey 27 DO JUMPMARK 1 ; <Esc> key
- MUSIC SOUND A 2 200
- JUMPMARK 214
- MARK 215
-
- SHOW SCREEN "GUIDE13.SCR" TXT
-
- GOXY 3 08 DRAW BOX 44 4
- GOXY 4 09 WRITE "To keep the names of files somewhat in line"
- GOXY 4 10 WRITE "with each other, you should give the script"
- GOXY 4 11 WRITE "a meaningfull name, here HELLO.SHW "
-
- COLOR ATTRIBUTE 63
- VARIABLE VALUE instr ""
- MARK 216
- GOXY 46 20 READ STRING instr 12
- CASE STRING UPPER instr "HELLO.SHW" DO JUMPMARK 217
- MUSIC SOUND A 2 200
- JUMPMARK 216
- MARK 217
-
- SCREEN PUT
-
- COLOR ATTRIBUTE 95
- GOXY 4 08 DRAW BOX 44 5
- GOXY 5 09 WRITE "The script has been saved and you can now"
- GOXY 5 10 WRITE "run it from the main menu. To return to the"
- GOXY 5 11 WRITE "main menu push F10 "
- GOXY 5 12 WRITE " "
-
- MARK 218
- READ KEY inkey
- CASE KEY inkey 468 DO JUMPMARK 219 ; F10 key
- CASE KEY inkey 27 DO JUMPMARK 1 ; <Esc> key
- MUSIC SOUND A 2 200
- JUMPMARK 218
- MARK 219
-
- SHOW SCREEN "SHOW1.SCR" TXT
- GOXY 3 08 DRAW BOX 42 6
- GOXY 4 09 WRITE "To run a script you must always be in the"
- GOXY 4 10 WRITE "main menu. Also there's a runtime version"
- GOXY 4 11 WRITE "that runs scripts. Scripts are executed"
- GOXY 4 12 WRITE "from the 'Files' menu, so you push F2 and"
- GOXY 4 13 WRITE "push <Enter> to run script from start. "
-
- MARK 220
- READ KEY inkey
- CASE KEY inkey 460 DO JUMPMARK 221 ; F2 key
- CASE KEY inkey 27 DO JUMPMARK 1 ; <Esc> key
- MUSIC SOUND A 2 200
- JUMPMARK 220
- MARK 221
-
- SHOW SCREEN "GUIDE11.SCR" TXT
- MARK 222
- READ KEY inkey
- CASE KEY inkey 13 DO JUMPMARK 223 ; <Enter> key
- CASE KEY inkey 27 DO JUMPMARK 1 ; <Esc> key
- MUSIC SOUND A 2 200
- JUMPMARK 222
- MARK 223
-
- SHOW SCREEN "GUIDE12.SCR" TXT
- GOXY 3 08 DRAW BOX 39 4
- GOXY 4 09 WRITE "The script you must execute is the one"
- GOXY 4 10 WRITE "we just saved in the Script Center. So"
- GOXY 4 11 WRITE "you write HELLO.SHW "
-
- COLOR ATTRIBUTE 63
- VARIABLE VALUE instr ""
- MARK 224
- GOXY 46 20 READ STRING instr 12
- CASE STRING UPPER instr "HELLO.SHW" DO JUMPMARK 225
- MUSIC SOUND A 2 200
- JUMPMARK 224
- MARK 225
-
- COLOR ATTRIBUTE 95
- GOXY 3 08 DRAW BOX 40 4
- GOXY 4 09 WRITE "The script will be executed right away."
- GOXY 4 10 WRITE "When the script has finished GUIDE will"
- GOXY 4 11 WRITE "return with a show message. "
- WAIT 3
-
- ; Here we mimic the slide behavior.
- SCREEN CLEAR
- GOXY 10 10 WRITE "HELLO WORLD"
- WAIT 4
-
- COLOR ATTRIBUTE 111
- SCREEN WIPE SPLIT
- COLOR ATTRIBUTE 95
- GOXY 3 08 DRAW BOX 41 7
- GOXY 4 09 WRITE "This concludes the simple guided tour on"
- GOXY 4 10 WRITE "how to make a very simple slide show u-"
- GOXY 4 11 WRITE "sing the Script Center. There are very"
- GOXY 4 12 WRITE "powerful features within all of many me-"
- GOXY 4 13 WRITE "nues and Centers in DataShow. So play"
- GOXY 4 14 WRITE "with it all and learn MultiMedia! "
-
- ; Place to jump to if <Esc> is pushed.
- MARK 1
-