Here - 1000 BiT
Here - 1000 BiT Here - 1000 BiT
LESSON 24 PRETTY PROGRAMS, GOSUB, RETURN, ENDRun this program, then SAVE it:100 REM TAKE A TRIP101 :105 POKE 53281.0110 PRINT "clr HOP TO THE SUBROUTINE dn"120 GOSUB 200130 PRINT "grh BACK FROM THE SUBROUTINE dn"133 FORT=1 TO 1000:NEXTT135 PRINT "blu HOP AGAIN dn"140 GOSUB 200150 PRINT "cyn HOME FOR GOOD dn whf'190 END199:200 REM SUBROUTINE201 :210 PRINT "red GOT HERE OK dn"215 FORT=1 TO 1000:NEXTT220 PRINT "yel PACK YOUR BAGS. BACK WE GO dn"230 FOR T=1 TO 1000:NEXT T290 RETURNThis is the skeleton of a long program. The main program starts at line 100 and ends atline 190.Where there are PRINT commands, you may put in many more program lines.The END command in line 190 tells the computer that the program is over. The computergoes back to the edit mode.Line 120 and line 140 "call the subroutine." This means the computer goes to thecommands in the subroutine, does them and then comes back.The GOSUB 200 command is like a GOTO 200 command except that the computerremembers where it came from so that it can go back there again.The RETURN command tells the computer to go back to the statement after the GOSUB.136
Assignment 24A:1. The delay loop is written three times in the above program. Add another subroutinewith a delay loop in it, and GOSUB every time you need a delay.WHAT GOOD IS A SUBROUTINE?In a short program, not much good.In a long program, it does two things:1. It saves you work and saves space in memory. You do not have to repeat thesame program lines in different parts of the program.2. It makes the program easier to understand and faster to write and debug.THE END COMMANDThe program may have zero, one or many END commands.RULE: The END command tells the computer to stop running and go back to theEdit Mode.That is really all it does. You can put an END command anywhere in the program: forexample, after THEN in an IF statement.137
- Page 85 and 86: nnr^nnnnnr^nnLOADING A PROGRAM FROM
- Page 87 and 88: 5. We are ready to put in the next
- Page 89 and 90: n INSTRUCTOR NOTES 15 SOME SHORTCUT
- Page 91 and 92: AN INPUT SHORTCUTInstead of10 PRINT
- Page 93 and 94: WHEN TO USE THE COLON SHORTCUTUse t
- Page 95 and 96: But if we write this line in a prog
- Page 97 and 98: LESSON 16 MOVING PICTURESMOVING THE
- Page 99 and 100: Line 40 waits for you to see this b
- Page 101 and 102: LESSON 17FOR-NEXT LOOPSRemember the
- Page 103 and 104: LOOP VARIABLESTo make sure that eac
- Page 105 and 106: ^ INSTRUCTOR NOTES 18 DATA, READ, R
- Page 107 and 108: STRANGE RULES1. It doesn't matter w
- Page 109 and 110: MIXTURES OF DATAThe DATA statement
- Page 111 and 112: LESSON 19SOUND EFFECTSTurn up the s
- Page 113 and 114: TONES BY THE BUSHELEnter: 10 REM **
- Page 115 and 116: "TM" stands for "timbre." Timbre is
- Page 117 and 118: INSTRUCTOR NOTES 20NAMES, CLOCKS AN
- Page 119 and 120: cAnytimeyou type, the characters ar
- Page 121 and 122: LESSON 21COLOR GRAPHICSADJUST YOUR
- Page 123 and 124: Add these lines to the above progra
- Page 125 and 126: INSTRUCTOR NOTES 22POKEing GRAPHICS
- Page 127 and 128: Try this: Change the number 83 to a
- Page 129 and 130: We can number the streets and house
- Page 131 and 132: n INSTRUCTOR NOTES 23 SECRET WRITIN
- Page 133 and 134: THE COMPUTER ISIMPATIENTThe compute
- Page 135: ^ INSTRUCTOR NOTES 24 PRETTY PROGRA
- Page 139 and 140: Assignment 24B:1. Write a short pro
- Page 141 and 142: LESSON 25 LOGIC: AND, OR, NOTANOTHE
- Page 143 and 144: THE IF COMMAND TELLS LITTLE WHITE L
- Page 145 and 146: THE LOGIC SIGNSYou can use these si
- Page 147 and 148: LESSON 26 SNIPPING STRINGS: LEFTS,
- Page 149 and 150: CUTTING A PIECE OUT OF THE MIDDLETh
- Page 151 and 152: nnO INSTRUCTOR NOTES 27 SWITCHING N
- Page 153 and 154: MAKING NUMBERS INTO STRINGSRun10 RE
- Page 155 and 156: Assignment 27:1. Write a program wh
- Page 157 and 158: LESSON 28ACTION GAMES AND THE FUNCT
- Page 159 and 160: LOOKING IN THE KEYBOARD'S BOXHere i
- Page 161 and 162: Run it. It puts a white diamond on
- Page 163 and 164: cTHETARGETS ARE HEARTSAdd these lin
- Page 165 and 166: LESSON 29MUSICGo back and review th
- Page 167 and 168: REGISTER ADDRESSES Base address is
- Page 169 and 170: D^ INSTRUCTOR NOTES 30 ARRAYS AND T
- Page 171 and 172: The DIM... command tells the comput
- Page 173 and 174: 1 REM *** EIGHT QUEENS ***2 GOTO 10
- Page 175 and 176: Assignment 30:1. Write a program wh
- Page 177 and 178: LESSON 31SPRITES FOR ACTION GRAPHIC
- Page 179 and 180: Then use the CRSR keys to move the
- Page 181 and 182: MANY SPRITES AT ONCEHere are the bo
- Page 183 and 184: WATCH OUT, TWO SPRITES ARE GOING TO
- Page 185 and 186: LESSON 32USER FRIENDLY PROGRAMSTher
LESSON 24 PRETTY PROGRAMS, GOSUB, RETURN, ENDRun this program, then SAVE it:100 REM TAKE A TRIP101 :105 POKE 53281.0110 PRINT "clr HOP TO THE SUBROUTINE dn"120 GOSUB 200130 PRINT "grh BACK FROM THE SUBROUTINE dn"133 FORT=1 TO <strong>1000</strong>:NEXTT135 PRINT "blu HOP AGAIN dn"140 GOSUB 200150 PRINT "cyn HOME FOR GOOD dn whf'190 END199:200 REM SUBROUTINE201 :210 PRINT "red GOT HERE OK dn"215 FORT=1 TO <strong>1000</strong>:NEXTT220 PRINT "yel PACK YOUR BAGS. BACK WE GO dn"230 FOR T=1 TO <strong>1000</strong>:NEXT T290 RETURNThis is the skeleton of a long program. The main program starts at line 100 and ends atline 190.Where there are PRINT commands, you may put in many more program lines.The END command in line 190 tells the computer that the program is over. The computergoes back to the edit mode.Line 120 and line 140 "call the subroutine." This means the computer goes to thecommands in the subroutine, does them and then comes back.The GOSUB 200 command is like a GOTO 200 command except that the computerremembers where it came from so that it can go back there again.The RETURN command tells the computer to go back to the statement after the GOSUB.136