Here - 1000 BiT

More documents

Recommendations

Info

1 REM A26-410 REM *** DOUBLE DUTCH *••12 PRINT "(clr)(wht)(dn)(dn)(dn)"20 PRINT " GIVE ME A SENTENCE: (dn)"30 INPUT S$35 L=LEN(S$)40 PRINT: PRINT45 SS$=""47 REM CHECK LETTERS50 FOR 1=1 TO L52L$=MID$(S$.I,1)B0IFL$="A"THEN7261 IFL$="E"THEN7262 IF L$="l" THEN 7263IFL$="O"THEN7264IFL$="U"THEN7266 SS$=SS$+$L$72 NEXT I75 PRINT" IN DOUBLE DUTCH (dn)"77 PRINT" "iSSSffdnHdnHdn)"80 GOTO 201 REM A26-510 REM*** MENU***12 PRINT "(clr){wht)(dn)(dn)(dn)"20 REM MAKE A MENU30 PRINT " MAKE YOUR CHOICE: (dn)"31 PRINT " EAT AN APPLE (dn)"32 PRINT " TAKE A NAP (dn)"33 PRINT" CALL A FRIEND (dn)(dn)(dn)"40 GET X$: IF X$="" THEN 4041 X=ASC(X$)-64: IFX
1 REM A27-110 REM *** BACKWARD ***12 PRINT "(clr)(wht)(dn)(dn)(dn)"20 INPUT " GIVE ME A NUMBER";N30 N$=STR$(N]35 L=LEN(N$)40 FOR 1=1 TO L45 B$=B$+$MID$[N$.L+$1-I.1]50 NEXT I55 B=VAL(B$)57 PRINT "(clr)(dn)(dn)(dn)"60 PRINT "";N$61 PRINT "+$";B$65 PRINT" ";LEFT$(" ".L)70 A=N+$B72 A$=STR$(A)75 IF LEN(A$)=LTHEN PRINT "";A$76 IF LEN(A$]=L+$1 THEN PRINT " ";A$80 END1 REM A27-210 REM*** LEAP FROG***12 PRINT "(clr)(wht)(dn](dn)(dn)"20 INPUT "GIVE ME A NUMBER";N25 N$=STR$(N)26 L=LEN(N$]27 N$=RIGHT$(N$.L-1]: L=L-130FORI=0TO39-L32 PRINT "(hm)(dn)(dnJ(dn)(dn)(dn)(dnHdn)(dn){dn)(dnHdn)"35PRINTTAB[I);"";N$40 N$=RIGHT$(N$,L-1 J+$LEFT$(N$,1)45 FOR T=1 TO 300: NEXT T50 NEXT I1 REM A30-110 REM *** THIRTY DAYS HAS ...***12 PRINT "(clr)(wht)(dn)(dn](dn)"15 DIM D(12)20 FOR 1=1 TO 1222 READ D(l]25 NEXT I30 INPUT " WHICH MONTH (1 TO 12)";M31 PRINT: PRINT35 PRINT" MONTH NUMBER";M;"HAS";D{M);"DAYS"99 DATA 31,28.31.30.31.30.31,31.30,31.30.31231
Page 3 and 4:
KIDSAND THECOMMODORE 64
Page 5 and 6:
KIDSAND THECOMMODORE 64neoartment o
Page 7 and 8:
nTABLE OF CONTENTSAcknowledgements
Page 9 and 10:
nACKNOWLEDGEMENTS^My sincere thanks
Page 11 and 12:
nTO THE PARENTSThis book is designe
Page 13 and 14:
n~ ABOUT PROGRAMMINGThere is a comm
Page 15 and 16:
nn INSTRUCTOR NOTES 1 NEW, PRINT, R
Page 17 and 18:
COMMAND THE COMPUTERTry this. Type
Page 19 and 20:
THE NUMBER ZERO AND THE LETTER "O"T
Page 21 and 22:
nINSTRUCTOR NOTES 2COLOR AND THE KE
Page 23 and 24:
There are eight colors on the numbe
Page 25 and 26:
OTHER COMMANDS IN PRINT STATEMENTSJ
Page 27 and 28:
LESSON 3 LIST, BOXES IN MEMORYClear
Page 29:
ADDING A LINEYou can add a new line
Page 35 and 36:
THE DELETE KEYThe DEL key is your "
Page 37 and 38:
INSTRUCTOR NOTES 5 TRICKS WITH PRIN
Page 39 and 40:
RULE: The semicolon makes the invis
Page 41 and 42:
Assignment 5:1- Write a program whi
Page 43 and 44:
LESSON 6THE INPUT COMMANDUse INPUT
Page 45 and 46:
YOU WEAR TWO HATS, USER AND PROGRAM
Page 47 and 48:
LESSON 7THE LET COMMAND, GLUING STR
Page 49 and 50:
GLUING THE STRINGSHere is how to st
Page 51 and 52:
LESSON 8THE GOTO COMMAND AND THE ST
Page 53 and 54:
A CAN OF SPAGHETTILook at this: 10
Page 55 and 56:
Assignment 8:1. Just for practice i
Page 57 and 58:
LESSON 9 THE IF COMMANDClear the me
Page 59 and 60:
JtTHE "NOT EQUAL" SIGNTwo signs:= m
Page 61 and 62:
INSTRUCTOR NOTES 10 INTRODUCING NUM
Page 63 and 64:
The thing which is put into the box
Page 65 and 66:
MIXTURES IN PRINTYou can print numb
Page 67 and 68:
INSTRUCTOR NOTES 11TAB AND DELAY LO
Page 69 and 70:
HOW BIG A SPACE CAN TAB( ) MAKE?The
Page 71 and 72:
INSTRUCTOR NOTES 12 THE IF COMMAND
Page 73 and 74:
AN IF INSIDE AN IFThe "teenager" pr
Page 75 and 76:
2. Here is another program. What wi
Page 77 and 78:
LESSON 13RANDOM NUMBERS AND THE INT
Page 79 and 80:
ROUNDING OFF NUMBERSPerhaps you kno
Page 81 and 82:
INSTRUCTOR NOTES 14SAVING TO TAPEWe
Page 83 and 84:
The computer automatically turned o
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 and 136:
^ INSTRUCTOR NOTES 24 PRETTY PROGRA
Page 137 and 138:
Assignment 24A:1. The delay loop is
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
Page 187 and 188: TIE A STRING AROUND THE USER'S FING
Page 189 and 190: SET TRAPS FOR ERRORSExample: Add th
Page 191 and 192: LESSON 33DEBUGGING, STOP, CONTTHE S
Page 193 and 194: Use the PRINT command to look at va
Page 195 and 196: RESERVED WORDSABSAND ASC ATNCHR$CLR
Page 197 and 198: ells and whistlesA phrase going bac
Page 199 and 200: error trapPart of a program which c
Page 201 and 202: listingA list of all the lines in a
Page 203 and 204: emarkA comment you make in the prog
Page 205 and 206: variableA name given to a box in me
Page 207 and 208: FORMULA TOO COMPLEXYou wrote a stri
Page 209 and 210: SYNTAXYou "spelled" the line wrong.
Page 211 and 212: 1 REM A4-310 REM*** SMILE***13 POKE
Page 213 and 214: 1 REM A6-210 REM*** FAVORITE***15 P
Page 215 and 216: ~ 40 INPUT C$1 REM A9B-210 REM ***
Page 217 and 218: ^ 1 REM A11A-210 REM !"#$% INSULTS
Page 219 and 220: 1 REM A12B-410 REM *** PICK A CARD
Page 221 and 222: ^ 1 REM A15-210 REM!!! VACATION!!!r
Page 223 and 224: ■1 REMA17B-510 REM*** OPERA SOPRA
Page 225 and 226: 1 REM A22-110 REM *** COLORED BOX *
Page 227 and 228: 1 REM A24B-1r> 10 REM*** SUBROUTINE
Page 229: 1 REM A26-210 REM*** ANSWERER***12
Page 233 and 234: 441 FOR l=2 TO LEN(A$]442L1$=MID$(F
Page 235 and 236: INDEX OF TOPICSaddition 59,74ADSR 1
Page 237 and 238: memory 16, 24-26, 45, 59, 81, 83,11
Page 239: nnnnnnonnnOnooonnnnnnnnonnnHnonnOn
show all

Here - 1000 BiT

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?