- GOTO SCREEN begin *>SCREEN begin - PUT TEXT AT (11,1): "E A S O N" - PUT TEXT AT (1,5): "T E C H N O L O G Y" - POWER RESUME ON - DELAY 500 - CLEAR SCREEN - PUT LARGE TEXT AT (6,1): "E A S O N" - PUT LARGE TEXT AT (1,3): "T E C H N O L O G Y" pos 40,8 - DELAY 500 - PUT HUGE TEXT AT (3,1): "EASON" - PUT HUGE TEXT AT (1,2): "TECHNOLOGY" - DELAY 1000 - CLEAR GRAPHICS SCREEN - PUT LARGE TEXT AT (7,2): "AND THE" - PUT LARGE TEXT AT (6,3): "MODEL 1000" t=56 for x% = 15 to 0 step -1 call box( t,x%,239-t,63-x%,1 ) t = t - 3.5 next t=56 for x% = 15 to 0 step -1 call box( t,x%,239-t,63-x%,0 ) t = t - 3.5 next - GOTO SCREEN scr1 *>SCREEN scr1 - PUT TEXT AT (1,3): "1. Place the Model 1000 near a PC." - PUT TEXT AT (1,4): "2. Locate the NULL MODEM cable supplied" - PUT TEXT AT (4,5): "with the Model 1000." - PUT TEXT AT (1,6): "3. Press the 'MORE' softkey to continue" - PUT LARGE TEXT AT (1,1): "HOW TO GET STARTED:" - SOFTKEY (1) "MORE" GOTO SCREEN scr2 - SOFTKEY (6) "PREV" GOTO SCREEN begin - SOFTKEY WAIT *>SCREEN scr2 - PUT TEXT AT (1,1): "4. Connect one end of the NULL MODEM" - PUT TEXT AT (4,2): "cable to COM 2 --- ON THE MODEL 1000" - PUT TEXT AT (1,3): "5. Connect the other end of the NULL" - PUT TEXT AT (4,4): "MODEM cable to an available COM port" - PUT TEXT AT (4,5): "on your PC (COM1 or COM2)." - PUT TEXT AT (1,6): "6. Turn on and boot DOS on your PC." - PUT TEXT AT (1,7): "7. Locate the ApplicationBuilder disk." - SOFTKEY (1) "MORE" GOTO SCREEN scr3 - SOFTKEY (6) "PREV" GOTO SCREEN scr1 - SOFTKEY WAIT *>SCREEN scr3 - PUT TEXT AT (1,1): "8. Copy the contents of the diskettes on" - PUT TEXT AT (4,2): "to your hard disk (if you have one)." - PUT TEXT AT (1,3): "9. If you have a hard drive type C: and" - PUT TEXT AT (4,4): "then type BUILD (followed by Enter)." - PUT TEXT AT (1,5): "10. If you do not have a hard drive, log" - PUT TEXT AT (4,6): "on to your A: or C: drive and type" - PUT TEXT AT (4,7): "BUILD (followed by Enter)." - SOFTKEY (1) "MORE" GOTO SCREEN scr4 - SOFTKEY (6) "PREV" GOTO SCREEN scr2 - SOFTKEY WAIT *>SCREEN scr4 - PUT TEXT AT (1,3): "1. You will be asked if you want to run" - PUT TEXT AT (4,4): "the TUTORIAL, answer YES (Enter)." - PUT TEXT AT (1,5): "2. Watch a self-paced 'show' of the" - PUT TEXT AT (4,6): "ApplicationBuilder in action." - PUT TEXT AT (1,7): "4. Press MORE when the tutorial is done" - PUT LARGE TEXT AT (1,1): "RUNNING THE TUTORIAL" - SOFTKEY (1) "MORE" GOTO SCREEN scr5 - SOFTKEY (6) "PREV" GOTO SCREEN scr3 - SOFTKEY WAIT *>SCREEN scr5 - PUT TEXT AT (1,3): "1. You are now running the Application-" - PUT TEXT AT (4,4): "Builder. You can create programs" - PUT TEXT AT (4,5): "using Pseudocodes, generate BASIC" - PUT TEXT AT (4,6): "programs, and download programs into" - PUT TEXT AT (4,7): "the Model 1000." - PUT LARGE TEXT AT (2,1): "USING THE BUILDER:" - SOFTKEY (1) "MORE" GOTO SCREEN scr6 - SOFTKEY (6) "PREV" GOTO SCREEN scr4 - SOFTKEY WAIT *>SCREEN scr6 - PUT TEXT AT (1,1): "2. First let's set up the Builder:" - PUT TEXT AT (1,2): "3. Press ALT-S (SETTINGS). Use the cur-" - PUT TEXT AT (4,3): "sor keys to select the COM port which" - PUT TEXT AT (4,4): "is connected to your PC. Press Enter" - PUT TEXT AT (1,5): "4. Now move the cursor to select the" - PUT TEXT AT (4,6): "type of monitor which is on your PC." - PUT TEXT AT (1,7): "5. Press Enter." - SOFTKEY (1) "MORE" GOTO SCREEN scr7 - SOFTKEY (6) "PREV" GOTO SCREEN scr5 - SOFTKEY WAIT *>SCREEN scr7 - PUT TEXT AT (1,1): "6. Press ESC to close window." - PUT TEXT AT (1,2): "7. Now we are ready to begin learning" - PUT TEXT AT (4,3): "about the ApplicationBuilder and" - PUT TEXT AT (4,4): "building a simple program." - PUT TEXT AT (1,5): "8. Press F1 on your PC's keyboard." - PUT TEXT AT (1,6): "9. A window will pop up which contains" - PUT TEXT AT (4,7): "help for the ApplicationBuilder." - SOFTKEY (1) "MORE" GOTO SCREEN scr8 - SOFTKEY (6) "PREV" GOTO SCREEN scr6 - SOFTKEY WAIT *>SCREEN scr8 - PUT TEXT AT (1,1): "10. Read this brief introduction now -" - PUT TEXT AT (5,2): "use your PC's PgDn key for more text" - PUT TEXT AT (1,3): "11. Read it! - There's gonna' be a quiz!" - PUT TEXT AT (1,4): "12. Pop Quiz #1:" - PUT TEXT AT (5,5): "Pseudocode are a computerized form" - PUT TEXT AT (5,6): "Egyptian hieroglyphics." - SOFTKEY (1) "TRUE" GOTO SCREEN scra9 - SOFTKEY (2) "FALSE" GOTO SCREEN scrb9 - SOFTKEY (6) "PREV" GOTO SCREEN scr7 - SOFTKEY WAIT *>SCREEN scra9 - PUT LARGE TEXT AT (2,2): "YOU ARE INCORRECT!" - DELAY 1500 - GOTO SCREEN scr10 *>SCREEN scrb9 - PUT LARGE TEXT AT (3,2): "YOU ARE RIGHT!!!" - DELAY 1500 - GOTO SCREEN scr10 *>SCREEN scr10 - PUT TEXT AT (1,1): "Pseudocodes are an English-like means" - PUT TEXT AT (1,2): "of describing program statements." - PUT TEXT AT (1,3): "Pseudocodes are used to construct pro-" - PUT TEXT AT (1,4): "grams which are ultimately converted to" - PUT TEXT AT (1,5): "BASIC, the language the Model 1000" - PUT TEXT AT (1,6): "understands." - SOFTKEY (1) "MORE" GOTO SCREEN scr11 - SOFTKEY (6) "PREV" GOTO SCREEN scr8 - SOFTKEY WAIT *>SCREEN scr11 - PUT TEXT AT (1,1): "13. Let's load and modify a program that" - PUT TEXT AT (5,2): "is stored on the Builder diskette." - PUT TEXT AT (1,3): "14. Press ALT-F (FILE)." - PUT TEXT AT (1,4): "15. Select OPEN, Press F1 (HELP)." - PUT TEXT AT (1,5): "16. Pop Quiz #2:" - PUT TEXT AT (5,6): "What key moves you from the file" - PUT TEXT AT (5,7): "list to the file name entry?" - SOFTKEY (1) " TAB" GOTO SCREEN scrb13 - SOFTKEY (2) " F1" GOTO SCREEN scra13 - SOFTKEY (6) "PREV" GOTO SCREEN scr10 - SOFTKEY WAIT *>SCREEN scra13 - PUT LARGE TEXT AT (2,2): "YOU ARE INCORRECT!" - DELAY 1500 - GOTO SCREEN scr14 *>SCREEN scrb13 - PUT LARGE TEXT AT (3,2): "YOU ARE RIGHT!!!" - DELAY 1500 - GOTO SCREEN scr14 *>SCREEN scr14 - PUT TEXT AT (1,1): "17. This was a trick question! If you" - PUT TEXT AT (1,2): "look at the bottom of the screen, there" - PUT TEXT AT (1,3): "is additional help available. It always" - PUT TEXT AT (1,4): "tells you what the 'ACTION' keys can do." - PUT TEXT AT (1,5): "When a Key like TAB is active, you can" - PUT TEXT AT (1,6): "tell by looking at this line." - SOFTKEY (1) "MORE" GOTO SCREEN scr15 - SOFTKEY (6) "PREV" GOTO SCREEN scr11 - SOFTKEY WAIT *>SCREEN scr15 - PUT TEXT AT (1,1): "18. Make sure you still have the OPEN" - PUT TEXT AT (5,2): "file highlighted, press Enter." - PUT TEXT AT (1,3): "19. EASY.BLD should now be loaded into" - PUT TEXT AT (5,4): "the workspace. Move the cursor keys" - PUT TEXT AT (5,5): "up and down to examine the program." - PUT TEXT AT (1,6): "20. The small box in the lower left cor-" - PUT TEXT AT (5,7): "ner changes as you move your cursor" - SOFTKEY (1) "MORE" GOTO SCREEN scr16 - SOFTKEY (6) "PREV" GOTO SCREEN scr14 - SOFTKEY WAIT *>SCREEN scr16 - PUT TEXT AT (1,1): "21. This screen simulates the 8 line by" - PUT TEXT AT (5,2): "40 character screen on the Model" - PUT TEXT AT (5,3): "1000. Characters that show up on" - PUT TEXT AT (5,4): "this screen will be programmed into" - PUT TEXT AT (5,5): "the Model 1000 when you 'BUILD' your" - PUT TEXT AT (5,6): "program." - PUT TEXT AT (1,7): "22. Lets study EASY.BLD..." - SOFTKEY (1) "MORE" GOTO SCREEN scr17 - SOFTKEY (6) "PREV" GOTO SCREEN scr15 - SOFTKEY WAIT *>SCREEN scr17 - PUT TEXT AT (1,1): "23. Press CNTRL-PgUp. The first two" - PUT TEXT AT (5,2): "lines of EASY.BLD and the last line" - PUT TEXT AT (5,3): "are automatically inserted by the" - PUT TEXT AT (5,4): "Builder. They cannot be changed or" - PUT TEXT AT (5,5): "erased." - PUT TEXT AT (1,6): "24. Press function key 'F2' on the PC's" - PUT TEXT AT (5,7): "keyboard." - SOFTKEY (1) "MORE" GOTO SCREEN scr18 - SOFTKEY (6) "PREV" GOTO SCREEN scr16 - SOFTKEY WAIT *>SCREEN scr18 - PUT TEXT AT (1,1): "25. Notice that the cursor block jumped" - PUT TEXT AT (5,2): "to the line: *>SCREEN begin" - PUT TEXT AT (1,3): "26. The text in the lower left corner is" - PUT TEXT AT (5,4): "the text for the screen named begin." - PUT TEXT AT (1,5): "27. Move the cursor down one line." - PUT TEXT AT (1,6): "28. The text on that line will be high-" - PUT TEXT AT (5,7): "lighted." - SOFTKEY (1) "MORE" GOTO SCREEN scr19 - SOFTKEY (6) "PREV" GOTO SCREEN scr17 - SOFTKEY WAIT *>SCREEN scr19 - PUT TEXT AT (1,1): "29. Press Enter. A window will open up" - PUT TEXT AT (5,2): "describing the Pseudocode PUT TEXT.." - PUT TEXT AT (1,3): "30. Hold the shift key down and move the" - PUT TEXT AT (5,4): "cursor left and right. Notice that" - PUT TEXT AT (5,5): "the text on the lower left window" - PUT TEXT AT (5,6): "moves. You can use this feature to" - PUT TEXT AT (5,7): "position text on a screen." - SOFTKEY (1) "MORE" GOTO SCREEN scr20 - SOFTKEY (6) "PREV" GOTO SCREEN scr18 - SOFTKEY WAIT *>SCREEN scr20 - PUT TEXT AT (1,1): "31. If you type characters, they will be" - PUT TEXT AT (5,2): "entered directly on the lower left" - PUT TEXT AT (5,3): "window. This allows you to enter" - PUT TEXT AT (5,4): "text on screen. (There is an even" - PUT TEXT AT (5,5): "easier way... hold on we'll get" - PUT TEXT AT (5,6): "there)." - PUT TEXT AT (1,7): "32. Press ESC to exit unchanged." - SOFTKEY (1) "MORE" GOTO SCREEN scr21 - SOFTKEY (6) "PREV" GOTO SCREEN scr19 - SOFTKEY WAIT *>SCREEN scr21 - PUT TEXT AT (1,1): "33. Move the cursor down to the line" - PUT TEXT AT (5,2): "that begins with: SOFTKEY (6)..." - PUT TEXT AT (1,3): "34. This key enters a softkey (some may" - PUT TEXT AT (5,4): "refer to these as FUNCTION KEYS)." - PUT TEXT AT (1,5): "35. Press ENTER. You can now edit the" - PUT TEXT AT (5,6): "softkey." - PUT TEXT AT (1,7): "36. Use Enter to move thru the entries" - SOFTKEY (1) "MORE" GOTO SCREEN scr22 - SOFTKEY (6) "PREV" GOTO SCREEN scr20 - SOFTKEY WAIT *>SCREEN scr22 - PUT TEXT AT (1,1): "37. Now move the cursor down one line to" - PUT TEXT AT (5,2): "the SOFTKEY WAIT pseudocode." - PUT TEXT AT (1,3): "38. This pseudocode waits for a softkey." - PUT TEXT AT (1,4): "39. Now move the cursor up one line and" - PUT TEXT AT (5,5): "press F2." - PUT TEXT AT (1,6): "40. The cursor block will jump to the" - PUT TEXT AT (5,7): "screen labeled 'morescr'." - SOFTKEY (1) "MORE" GOTO SCREEN scr23 - SOFTKEY (6) "PREV" GOTO SCREEN scr21 - SOFTKEY WAIT *>SCREEN scr23 - PUT TEXT AT (1,1): "41. The text for the new screen is pre-" - PUT TEXT AT (5,2): "sent on screen." - PUT TEXT AT (1,3): "42. Press Enter. You are now editing an" - PUT TEXT AT (5,4): "entire screen. All of the text you" - PUT TEXT AT (5,5): "enter will be saved when you press" - PUT TEXT AT (5,6): "Enter." - PUT TEXT AT (1,7): "43. Now press ESC" - SOFTKEY (1) "MORE" GOTO SCREEN scr24 - SOFTKEY (6) "PREV" GOTO SCREEN scr22 - SOFTKEY WAIT *>SCREEN scr24 - PUT TEXT AT (1,1): "44. Now move your cursor up to the" - PUT TEXT AT (5,2): "SOFTKEY WAIT pseudocode." - PUT TEXT AT (1,3): "45. Press F5. This is a list of all of" - PUT TEXT AT (5,4): "the available pseudocodes." - PUT TEXT AT (1,5): "46. Press F1 (HELP). Read the help text" - PUT TEXT AT (5,6): "There is going to be another pop" - PUT TEXT AT (5,7): "quiz!" - SOFTKEY (1) "MORE" GOTO SCREEN scr27 - SOFTKEY (6) "PREV" GOTO SCREEN scr23 - SOFTKEY WAIT *>SCREEN scr27 - PUT TEXT AT (1,1): "47. Now lets add a screen to EASY.BLD." - PUT TEXT AT (1,2): "48. Select the SOFTKEY (skey)... pseudo-" - PUT TEXT AT (5,3): "code by moving the cursor to it and" - PUT TEXT AT (5,4): "press Enter." - PUT TEXT AT (1,5): "49. Answer 2 for the key, NICE for the" - PUT TEXT AT (5,6): "text over the screen, and nicescr" - PUT TEXT AT (5,7): "for the screen to goto." - SOFTKEY (1) "MORE" GOTO SCREEN scr28 - SOFTKEY (6) "PREV" GOTO SCREEN scr24 - SOFTKEY WAIT *>SCREEN scr28 - PUT TEXT AT (1,1): "50. Now press Enter. The pseudocode" - PUT TEXT AT (5,2): "will be added to the program." - PUT TEXT AT (1,3): "51. Move the cursor back onto the line" - PUT TEXT AT (5,4): "you have just added, Press F2." - PUT TEXT AT (1,5): "52. You will be asked if you want to add" - PUT TEXT AT (5,6): "the screen, Press Enter (YES)." - PUT TEXT AT (1,7): "53. You are now editing text on nicescr" - SOFTKEY (1) "MORE" GOTO SCREEN scr29 - SOFTKEY (6) "PREV" GOTO SCREEN scr27 - SOFTKEY WAIT *>SCREEN scr29 - PUT TEXT AT (1,1): "54. Move the cursor to the upper left" - PUT TEXT AT (5,2): "corner and type your name (use the" - PUT TEXT AT (5,3): "next line if you need to)." - PUT TEXT AT (1,4): "55. Press Enter twice (once to end the" - PUT TEXT AT (5,5): "on-screen editing, again to save the" - PUT TEXT AT (5,6): "screen into the program)." - PUT TEXT AT (1,7): "56. Notice the new pseudocodes added." - SOFTKEY (1) "MORE" GOTO SCREEN scr30 - SOFTKEY (6) "PREV" GOTO SCREEN scr28 - SOFTKEY WAIT *>SCREEN scr30 - PUT TEXT AT (1,1): "57. Move the cursor to the end of the" - PUT TEXT AT (5,2): "program. Press F5, then D, the" - PUT TEXT AT (5,3): "DELAY pseudocode." - PUT TEXT AT (1,4): "58. Press Enter. You will be asked for" - PUT TEXT AT (5,5): "a delay (in milliseconds)." - PUT TEXT AT (1,6): "59. Type 1500 (1.5 seconds)." - PUT TEXT AT (1,7): "60. Press Enter." - SOFTKEY (1) "MORE" GOTO SCREEN scr31 - SOFTKEY (6) "PREV" GOTO SCREEN scr29 - SOFTKEY WAIT *>SCREEN scr31 - PUT TEXT AT (1,1): "61. Press F5. We now must jump back to" - PUT TEXT AT (5,2): "the screen 'begin'." - PUT TEXT AT (1,3): "62. Press 'G' and position the cursor" - PUT TEXT AT (5,4): "over the GOTO SCREEN pseudocode." - PUT TEXT AT (1,5): "63. Press Enter." - PUT TEXT AT (1,6): "64. Enter begin (the screen you want to" - PUT TEXT AT (5,7): "go to). Press Enter." - SOFTKEY (1) "MORE" GOTO SCREEN scr32 - SOFTKEY (6) "PREV" GOTO SCREEN scr30 - SOFTKEY WAIT *>SCREEN scr32 - PUT LARGE TEXT AT (3,1): "CONGRATULATIONS!" - PUT LARGE TEXT AT (1,2): "YOU HAVE JUST ADDED" - PUT LARGE TEXT AT (6,3): "A SCREEN!" - DELAY 2000 - GOTO SCREEN scr33 *>SCREEN scr33 - PUT TEXT AT (1,1): "65. Now let's convert our pseudocode" - PUT TEXT AT (5,2): "program into BASIC." - PUT TEXT AT (1,3): "66. First we better save it. Press ALT-" - PUT TEXT AT (5,4): "F (FILE) and move the cursor down to" - PUT TEXT AT (5,5): "SAVE AS." - PUT TEXT AT (1,6): "67. Press Enter." - SOFTKEY (1) "MORE" GOTO SCREEN scr34 - SOFTKEY (6) "PREV" GOTO SCREEN scr31 - SOFTKEY WAIT *>SCREEN scr34 - PUT TEXT AT (1,1): "68. Enter the file name:NEWONE.BLD" - PUT TEXT AT (1,2): "69. Press Enter." - PUT TEXT AT (1,3): "70. Now press F8.. build BASIC code" - PUT TEXT AT (1,4): "71. You will be asked if you want to" - PUT TEXT AT (5,5): "save the BASIC file as: NEWONE.BAS" - PUT TEXT AT (1,6): "72. Press Enter (Accept the name)." - SOFTKEY (1) "MORE" GOTO SCREEN scr35 - SOFTKEY (6) "PREV" GOTO SCREEN scr33 - SOFTKEY WAIT *>SCREEN scr35 - PUT TEXT AT (1,1): "73. You will now be asked if you want to" - PUT TEXT AT (5,2): "load the BASIC program into the" - PUT TEXT AT (5,3): "EDITOR. Press Enter (Yes)." - PUT TEXT AT (1,4): "74. Now, examine the program you have" - PUT TEXT AT (5,5): "just built using the cursor keys." - PUT TEXT AT (1,6): "75. Press F1 (HELP).. read up on the" - PUT TEXT AT (5,7): "EDITOR, there's gonna be a quiz!" - SOFTKEY (1) "MORE" GOTO SCREEN scr36 - SOFTKEY (6) "PREV" GOTO SCREEN scr34 - SOFTKEY WAIT *>SCREEN scr36 - PUT TEXT AT (1,1): "76. Pop Quiz #3 (last one!):" - PUT TEXT AT (1,3): "The PASTE key activates special features" - PUT TEXT AT (1,4): "within the Model 1000 which are indis-" - PUT TEXT AT (1,5): "pensable to glueing applications." - SOFTKEY (1) "TRUE" GOTO SCREEN scra36 - SOFTKEY (2) "FALSE" GOTO SCREEN scrb36 - SOFTKEY (6) "PREV" GOTO SCREEN scr35 - SOFTKEY WAIT *>SCREEN scra36 - PUT LARGE TEXT AT (2,2): "YOU ARE INCORRECT!" - DELAY 1500 - GOTO SCREEN scr37 *>SCREEN scrb36 - PUT LARGE TEXT AT (3,2): "YOU ARE RIGHT!!!" - DELAY 1500 - GOTO SCREEN scr37 *>SCREEN scr37 - PUT TEXT AT (1,1): "77. The CUT and PASTE keys are built-in" - PUT TEXT AT (5,2): "editor features which allow the" - PUT TEXT AT (5,3): "user to CUT text and Pseudocodes to" - PUT TEXT AT (5,4): "the CLIPBOARD and PASTE them back in" - PUT TEXT AT (5,5): "a different location in the program." - PUT TEXT AT (1,6): "78. Now it is time to down-load the" - PUT TEXT AT (5,7): "program into the Model 1000." - SOFTKEY (1) "MORE" GOTO SCREEN scr38 - SOFTKEY (6) "PREV" GOTO SCREEN scr36 - SOFTKEY WAIT *>SCREEN scr38 - PUT TEXT AT (1,1): "79. Now you must down-load your new" - PUT TEXT AT (5,2): "program - doing so will erase this" - PUT TEXT AT (5,3): "one! Refer to the 2nd page of the" - PUT TEXT AT (5,4): "manual if you have difficulty." - PUT TEXT AT (1,5): "80. After down-loading, PRESS F1 (RUN)" - PUT TEXT AT (5,6): "on the MODEL 1000. This will start" - PUT TEXT AT (5,7): "the program in the Model 1000." - SOFTKEY (1) "MORE" GOTO SCREEN scr39 - SOFTKEY (6) "PREV" GOTO SCREEN scr37 - SOFTKEY WAIT *>SCREEN scr39 - PUT TEXT AT (1,1): "81. OK, let's get going!" - PUT TEXT AT (1,2): "82. Press ALT-T (TRANSFER menu)" - PUT TEXT AT (1,3): "83. Press Enter (select DOWNLOAD)." - PUT TEXT AT (1,4): "84. You will see a file menu just like" - PUT TEXT AT (5,5): "the one on the ALT-F menu. Select" - PUT TEXT AT (5,6): "NEWONE.BAS, then press Enter." - PUT TEXT AT (1,7): "85. GOOD BYE!!!" - SOFTKEY (1) "EXIT" GOTO SCREEN exitscr - SOFTKEY (6) "PREV" GOTO SCREEN scr38 - SOFTKEY WAIT *>SCREEN exitscr - PUT LARGE TEXT AT (1,1): "PRESS F1 TO RUN THE" - PUT LARGE TEXT AT (2,2): "PROGRAM AFTER DOWN" - PUT LARGE TEXT AT (7,3): "LOADING." - DELAY 4000 - CLEAR GRAPHICS SCREEN - CLEAR GRAPHICS SCREEN - END OF PSEUDOCODE