TUTORIAL
FILE INFORMATION
FILENAME(S): TUTORIAL
FILE TYPE(S): PRG
FILE SIZE: 17.5K
FIRST SEEN: 2025-10-19 22:49:26
APPEARS ON: 1 disk(s)
FILE HASH
a8f914026fb5c5f8b969864326a39e3941178bbe3b8c2f2f358efd149c4dceac
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GOLD DISK 3 | TUTORIAL | PRG | Radd Maxx | 5 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 01 00 8F 20 28 43 29 20 47 4F 4C 44 |....... (C) GOLD|
00000010: 20 44 49 53 4B 20 49 4E 43 00 1F 08 02 00 8F 00 | DISK INC.......|
00000020: 3E 08 03 00 97 35 33 32 38 31 2C 30 3A 99 22 05 |>....53281,0:.".|
00000030: 0E 0E 08 08 22 3A 51 24 B2 C7 28 33 34 29 00 57 |....":Q$..(34).W|
00000040: 08 04 00 8F 20 42 41 53 49 43 20 54 55 54 4F 52 |.... BASIC TUTOR|
00000050: 49 41 4C 20 23 20 33 00 79 08 05 00 8F 20 42 59 |IAL # 3.y.... BY|
00000060: 20 44 2E 4B 45 45 4E 41 4E 20 41 4E 44 20 46 2E | D.KEENAN AND F.|
00000070: 57 48 49 54 45 53 49 44 45 00 A8 08 06 00 53 50 |WHITESIDE.....SP|
00000080: B2 31 3A 99 22 93 22 3A 99 22 20 20 20 20 20 20 |.1:.".":." |
00000090: 20 20 20 20 20 12 C2 41 53 49 43 92 20 12 D4 55 | ..ASIC. ..U|
000000A0: 54 4F 52 49 41 4C 92 22 00 D8 08 07 00 99 3A 99 |TORIAL."......:.|
000000B0: 3A 99 22 20 20 20 20 20 42 59 20 C4 2E CB 45 45 |:." BY ...EE|
000000C0: 4E 41 4E 20 41 4E 44 20 C6 2E D7 48 49 54 45 53 |NAN AND ...HITES|
000000D0: 49 44 45 22 3A 99 3A 99 00 06 09 08 00 99 22 20 |IDE":.:......." |
000000E0: 20 D7 45 4C 43 4F 4D 45 20 54 4F 20 54 48 45 20 | .ELCOME TO THE |
000000F0: 54 48 49 52 44 20 49 4E 20 41 20 54 48 52 45 45 |THIRD IN A THREE|
00000100: 2D 50 41 52 54 22 00 2A 09 09 00 99 22 54 55 54 |-PART".*...."TUT|
00000110: 4F 52 49 41 4C 20 53 45 52 49 45 53 20 4F 4E 20 |ORIAL SERIES ON |
00000120: 54 48 45 20 C2 C1 D3 C9 C3 22 00 57 09 0A 00 99 |THE .....".W....|
00000130: 22 50 52 4F 47 52 41 4D 4D 49 4E 47 20 4C 41 4E |"PROGRAMMING LAN|
00000140: 47 55 41 47 45 2E 20 D4 48 49 53 20 46 49 4E 41 |GUAGE. .HIS FINA|
00000150: 4C 20 50 41 52 54 22 00 81 09 0B 00 99 22 57 49 |L PART"......"WI|
00000160: 4C 4C 20 44 45 41 4C 20 57 49 54 48 20 12 50 52 |LL DEAL WITH .PR|
00000170: 49 4E 54 49 4E 47 20 43 4F 4E 54 52 4F 4C 92 2C |INTING CONTROL.,|
00000180: 22 00 B2 09 0C 00 99 22 12 49 4E 54 52 49 4E 53 |"......".INTRINS|
00000190: 49 43 20 46 55 4E 43 54 49 4F 4E 53 92 2C 20 12 |IC FUNCTIONS., .|
000001A0: 50 45 45 4B 53 20 41 4E 44 20 50 4F 4B 45 53 92 |PEEKS AND POKES.|
000001B0: 2C 22 00 E1 09 0D 00 99 22 12 52 45 41 44 20 53 |,"......".READ S|
000001C0: 54 41 54 45 4D 45 4E 54 53 92 2C 20 12 49 4E 54 |TATEMENTS., .INT|
000001D0: 45 47 45 52 20 56 41 52 49 41 42 4C 45 53 92 2C |EGER VARIABLES.,|
000001E0: 22 00 15 0A 0E 00 99 22 12 4D 55 4C 54 49 2D 44 |"......".MULTI-D|
000001F0: 49 4D 45 4E 53 49 4F 4E 41 4C 20 41 52 52 41 59 |IMENSIONAL ARRAY|
00000200: 53 92 20 41 4E 44 20 12 53 55 42 52 4F 55 54 49 |S. AND .SUBROUTI|
00000210: 4E 45 53 92 22 00 47 0A 0F 00 99 3A 99 22 20 20 |NES.".G....:." |
00000220: 20 D3 4F 20 53 49 54 20 42 41 43 4B 20 41 4E 44 | .O SIT BACK AND|
00000230: 20 47 45 54 20 52 45 41 44 59 20 54 4F 20 42 45 | GET READY TO BE|
00000240: 47 49 4E 2E 2E 2E 22 00 79 0A 10 00 99 3A 99 22 |GIN...".y....:."|
00000250: 12 CE CF D4 C5 3A 20 C9 46 20 59 4F 55 20 54 59 |.....: .F YOU TY|
00000260: 50 45 20 54 48 45 20 27 5F 27 20 4B 45 59 20 54 |PE THE '_' KEY T|
00000270: 48 45 4E 20 49 54 27 53 22 00 AA 0A 11 00 99 22 |HEN IT'S"......"|
00000280: 12 42 41 43 4B 20 54 4F 20 54 48 45 20 C7 CF CC |.BACK TO THE ...|
00000290: C4 20 C4 C9 D3 CB 20 4D 41 49 4E 20 4D 45 4E 55 |. .... MAIN MENU|
000002A0: 20 57 49 54 48 20 59 4F 55 22 00 D7 0A 12 00 99 | WITH YOU"......|
000002B0: 22 20 20 20 20 20 12 D4 48 45 20 27 5E 27 20 4B |" ..HE '^' K|
000002C0: 45 59 20 43 41 55 53 45 53 20 54 48 45 20 54 55 |EY CAUSES THE TU|
000002D0: 54 4F 52 49 41 4C 22 00 FD 0A 13 00 99 22 20 20 |TORIAL"......" |
000002E0: 20 20 20 20 20 20 12 54 4F 20 42 41 43 4B 20 55 | .TO BACK U|
000002F0: 50 20 4F 4E 45 20 53 43 52 45 45 4E 22 00 07 0B |P ONE SCREEN"...|
00000300: 14 00 89 20 34 31 37 00 39 0B 15 00 99 3A 99 22 |... 417.9....:."|
00000310: C6 49 52 53 54 2C 20 4C 45 54 27 53 20 4C 4F 4F |.IRST, LET'S LOO|
00000320: 4B 20 41 54 20 41 44 56 41 4E 43 45 44 20 12 50 |K AT ADVANCED .P|
00000330: 52 49 4E 54 49 4E 47 92 22 00 67 0B 16 00 99 22 |RINTING.".g...."|
00000340: 12 43 4F 4E 54 52 4F 4C 92 2E 20 20 C9 4E 20 54 |.CONTROL.. .N T|
00000350: 48 45 20 50 52 45 56 49 4F 55 53 20 54 55 54 4F |HE PREVIOUS TUTO|
00000360: 52 49 41 4C 53 2C 22 00 96 0B 17 00 99 22 57 45 |RIALS,"......"WE|
00000370: 20 4E 4F 54 45 44 20 54 48 41 54 20 49 54 45 4D | NOTED THAT ITEM|
00000380: 53 20 49 4E 20 41 20 4C 49 53 54 20 4F 46 20 54 |S IN A LIST OF T|
00000390: 48 49 4E 47 53 22 00 C2 0B 18 00 99 22 54 4F 20 |HINGS"......"TO |
000003A0: 42 45 20 50 52 49 4E 54 45 44 20 53 48 4F 55 4C |BE PRINTED SHOUL|
000003B0: 44 20 42 45 20 53 45 50 41 52 41 54 45 44 20 42 |D BE SEPARATED B|
000003C0: 59 22 00 F0 0B 19 00 99 22 53 45 4D 49 43 4F 4C |Y"......"SEMICOL|
000003D0: 4F 4E 53 20 28 3B 29 2E 20 20 D4 48 49 53 20 43 |ONS (;). .HIS C|
000003E0: 41 55 53 45 53 20 45 41 43 48 20 49 54 45 4D 22 |AUSES EACH ITEM"|
000003F0: 00 1B 0C 1A 00 99 22 54 4F 20 42 45 20 50 52 49 |......"TO BE PRI|
00000400: 4E 54 45 44 20 41 54 20 54 48 45 20 4E 45 58 54 |NTED AT THE NEXT|
00000410: 20 41 56 41 49 4C 41 42 4C 45 22 00 48 0C 1B 00 | AVAILABLE".H...|
00000420: 99 22 53 50 41 43 45 20 4F 4E 20 54 48 45 20 53 |."SPACE ON THE S|
00000430: 43 52 45 45 4E 20 28 49 45 2E 20 49 54 20 4C 45 |CREEN (IE. IT LE|
00000440: 41 56 45 53 20 4E 4F 22 00 69 0C 1C 00 99 22 53 |AVES NO".i...."S|
00000450: 50 41 43 45 53 20 42 45 54 57 45 45 4E 20 54 48 |PACES BETWEEN TH|
00000460: 49 4E 47 53 29 2E 22 3A 99 00 93 0C 1D 00 99 22 |INGS).":......."|
00000470: C1 4C 53 4F 2C 20 49 46 20 54 48 45 20 53 45 4D |.LSO, IF THE SEM|
00000480: 49 43 4F 4C 4F 4E 20 49 53 20 54 48 45 20 4C 41 |ICOLON IS THE LA|
00000490: 53 54 22 00 C2 0C 1E 00 99 22 54 48 49 4E 47 20 |ST"......"THING |
000004A0: 49 4E 20 54 48 45 20 50 52 49 4E 54 20 53 54 41 |IN THE PRINT STA|
000004B0: 54 45 4D 45 4E 54 20 54 48 45 4E 20 54 48 45 52 |TEMENT THEN THER|
000004C0: 45 22 00 F4 0C 1F 00 99 22 49 53 20 4E 4F 20 41 |E"......"IS NO A|
000004D0: 55 54 4F 4D 41 54 49 43 20 43 41 52 52 49 41 47 |UTOMATIC CARRIAG|
000004E0: 45 20 52 45 54 55 52 4E 20 50 52 49 4E 54 45 44 |E RETURN PRINTED|
000004F0: 2E 22 3A 99 00 1B 0D 20 00 99 22 C3 4F 4E 53 49 |.":.... ..".ONSI|
00000500: 44 45 52 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E |DER THE FOLLOWIN|
00000510: 47 20 45 58 41 4D 50 4C 45 3A 22 00 5F 0D 21 00 |G EXAMPLE:"._.!.|
00000520: 99 22 20 31 30 20 D0 D2 C9 CE D4 20 22 51 24 22 |." 10 ..... "Q$"|
00000530: 31 22 51 24 22 3B 22 51 24 22 32 22 51 24 22 3B |1"Q$";"Q$"2"Q$";|
00000540: 22 51 24 22 33 22 51 24 22 3B 22 51 24 22 34 22 |"Q$"3"Q$";"Q$"4"|
00000550: 51 24 22 3B 22 51 24 22 35 22 51 24 22 3B 22 00 |Q$";"Q$"5"Q$";".|
00000560: 9A 0D 22 00 99 22 20 32 30 20 D0 D2 C9 CE D4 20 |..".." 20 ..... |
00000570: 22 51 24 22 36 22 51 24 22 3B 22 51 24 22 D8 D8 |"Q$"6"Q$";"Q$"..|
00000580: D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 22 3B 51 24 3B 22 |..........";Q$;"|
00000590: 3B 22 51 24 22 37 22 51 24 22 00 A8 0D 23 00 99 |;"Q$"7"Q$"...#..|
000005A0: 3A 8D 20 34 33 33 3A 99 00 C3 0D 24 00 99 20 22 |:. 433:....$.. "|
000005B0: 31 22 3B 22 32 22 3B 22 33 22 3B 22 34 22 3B 22 |1";"2";"3";"4";"|
000005C0: 35 22 3B 00 E0 0D 25 00 99 20 22 36 22 3B 22 D8 |5";...%.. "6";".|
000005D0: D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 22 3B 22 37 22 |...........";"7"|
000005E0: 00 EA 0D 26 00 89 20 34 31 37 00 1A 0E 27 00 99 |...&.. 417...'..|
000005F0: 3A 99 22 CE 4F 54 49 43 45 20 54 48 41 54 20 45 |:.".OTICE THAT E|
00000600: 56 45 52 59 54 48 49 4E 47 20 41 50 50 45 41 52 |VERYTHING APPEAR|
00000610: 45 44 20 4F 4E 20 4F 4E 45 22 00 48 0E 28 00 99 |ED ON ONE".H.(..|
00000620: 22 4C 49 4E 45 20 57 49 54 48 20 4E 4F 20 53 50 |"LINE WITH NO SP|
00000630: 41 43 45 53 2E 20 20 CE 4F 57 2C 20 57 49 54 48 |ACES. .OW, WITH|
00000640: 4F 55 54 20 54 48 45 22 00 6C 0E 29 00 99 22 4C |OUT THE".l.).."L|
00000650: 41 53 54 20 53 45 4D 49 43 4F 4C 4F 4E 20 49 4E |AST SEMICOLON IN|
00000660: 20 4C 49 4E 45 20 31 30 3A 22 3A 99 00 AD 0E 2A | LINE 10:":....*|
00000670: 00 99 22 20 31 30 20 D0 D2 C9 CE D4 20 22 51 24 |.." 10 ..... "Q$|
00000680: 22 31 22 51 24 22 3B 22 51 24 22 32 22 51 24 22 |"1"Q$";"Q$"2"Q$"|
00000690: 3B 22 51 24 22 33 22 51 24 22 3B 22 51 24 22 34 |;"Q$"3"Q$";"Q$"4|
000006A0: 22 51 24 22 3B 22 51 24 22 35 22 51 24 00 E8 0E |"Q$";"Q$"5"Q$...|
000006B0: 2B 00 99 22 20 32 30 20 D0 D2 C9 CE D4 20 22 51 |+.." 20 ..... "Q|
000006C0: 24 22 36 22 51 24 22 3B 22 51 24 22 D8 D8 D8 D8 |$"6"Q$";"Q$"....|
000006D0: D8 D8 D8 D8 D8 D8 D8 D8 22 3B 51 24 3B 22 3B 22 |........";Q$;";"|
000006E0: 51 24 22 37 22 51 24 22 00 F6 0E 2C 00 99 3A 8D |Q$"7"Q$"...,..:.|
000006F0: 20 34 33 33 3A 99 00 10 0F 2D 00 99 20 22 31 22 | 433:....-.. "1"|
00000700: 3B 22 32 22 3B 22 33 22 3B 22 34 22 3B 22 35 22 |;"2";"3";"4";"5"|
00000710: 00 2D 0F 2E 00 99 20 22 36 22 3B 22 D8 D8 D8 D8 |.-.... "6";"....|
00000720: D8 D8 D8 D8 D8 D8 D8 D8 22 3B 22 37 22 00 59 0F |........";"7".Y.|
00000730: 2F 00 99 3A 99 22 CE 4F 54 45 20 54 48 41 54 20 |/..:.".OTE THAT |
00000740: 49 4E 20 54 48 49 53 20 43 41 53 45 2C 20 45 41 |IN THIS CASE, EA|
00000750: 43 48 20 D0 D2 C9 CE D4 22 00 83 0F 30 00 99 22 |CH ....."...0.."|
00000760: 53 54 41 54 45 4D 45 4E 54 20 47 45 54 53 20 49 |STATEMENT GETS I|
00000770: 54 53 20 4F 57 4E 20 4C 49 4E 45 2E 22 3A 89 20 |TS OWN LINE.":. |
00000780: 34 31 37 00 B3 0F 31 00 99 3A 99 22 C1 4E 20 41 |417...1..:.".N A|
00000790: 4C 54 45 52 4E 41 54 49 56 45 20 54 4F 20 54 48 |LTERNATIVE TO TH|
000007A0: 45 20 53 45 4D 49 43 4F 4C 4F 4E 20 28 3B 29 20 |E SEMICOLON (;) |
000007B0: 49 53 22 00 E2 0F 32 00 99 22 54 48 45 20 43 4F |IS"...2.."THE CO|
000007C0: 4D 4D 41 20 28 2C 29 2E 20 20 D4 48 45 20 43 4F |MMA (,). .HE CO|
000007D0: 4D 4D 41 20 48 41 53 20 41 20 53 49 4D 49 4C 41 |MMA HAS A SIMILA|
000007E0: 52 22 00 0E 10 33 00 99 22 45 46 46 45 43 54 20 |R"...3.."EFFECT |
000007F0: 54 4F 20 54 48 45 20 53 45 4D 49 43 4F 4C 4F 4E |TO THE SEMICOLON|
00000800: 2C 20 45 58 43 45 50 54 20 54 48 41 54 22 00 3B |, EXCEPT THAT".;|
00000810: 10 34 00 99 22 45 41 43 48 20 49 54 45 4D 20 49 |.4.."EACH ITEM I|
00000820: 4E 20 54 48 45 20 4C 49 53 54 20 47 45 54 53 20 |N THE LIST GETS |
00000830: 50 52 49 4E 54 45 44 20 41 54 22 00 68 10 35 00 |PRINTED AT".h.5.|
00000840: 99 22 54 48 45 20 4E 45 58 54 20 41 56 41 49 4C |."THE NEXT AVAIL|
00000850: 41 42 4C 45 20 27 54 41 42 20 43 4F 4C 55 4D 4E |ABLE 'TAB COLUMN|
00000860: 27 2E 20 20 D4 48 45 22 00 95 10 36 00 99 22 C3 |'. .HE"...6..".|
00000870: 4F 4D 4D 4F 44 4F 52 45 20 48 41 53 20 34 20 54 |OMMODORE HAS 4 T|
00000880: 41 42 20 43 4F 4C 55 4D 4E 53 20 50 45 52 20 4C |AB COLUMNS PER L|
00000890: 49 4E 45 2C 22 00 B8 10 37 00 99 22 45 41 43 48 |INE,"...7.."EACH|
000008A0: 20 31 30 20 43 48 41 52 41 43 54 45 52 53 20 41 | 10 CHARACTERS A|
000008B0: 50 41 52 54 2E 22 3A 99 00 E4 10 38 00 99 22 CE |PART.":....8..".|
000008C0: 4F 57 20 4C 45 54 27 53 20 54 52 59 20 54 48 45 |OW LET'S TRY THE|
000008D0: 20 46 49 52 53 54 20 50 52 4F 47 52 41 4D 20 57 | FIRST PROGRAM W|
000008E0: 49 54 48 22 00 0C 11 39 00 99 22 43 4F 4D 4D 41 |ITH"...9.."COMMA|
000008F0: 53 20 49 4E 20 50 4C 41 43 45 20 4F 46 20 53 45 |S IN PLACE OF SE|
00000900: 4D 49 43 4F 4C 4F 4E 53 3A 22 3A 99 00 50 11 3A |MICOLONS:":..P.:|
00000910: 00 99 22 20 31 30 20 D0 D2 C9 CE D4 20 22 51 24 |.." 10 ..... "Q$|
00000920: 22 31 22 51 24 22 2C 22 51 24 22 32 22 51 24 22 |"1"Q$","Q$"2"Q$"|
00000930: 2C 22 51 24 22 33 22 51 24 22 2C 22 51 24 22 34 |,"Q$"3"Q$","Q$"4|
00000940: 22 51 24 22 2C 22 51 24 22 35 22 51 24 22 2C 22 |"Q$","Q$"5"Q$","|
00000950: 00 8B 11 3B 00 99 22 20 32 30 20 D0 D2 C9 CE D4 |...;.." 20 .....|
00000960: 20 22 51 24 22 36 22 51 24 22 2C 22 51 24 22 D8 | "Q$"6"Q$","Q$".|
00000970: D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 22 3B 51 24 3B |...........";Q$;|
00000980: 22 2C 22 51 24 22 37 22 51 24 22 00 98 11 3C 00 |","Q$"7"Q$"...<.|
00000990: 99 3A 8D 34 33 33 3A 99 00 B3 11 3D 00 99 20 22 |.:.433:....=.. "|
000009A0: 31 22 2C 22 32 22 2C 22 33 22 2C 22 34 22 2C 22 |1","2","3","4","|
000009B0: 35 22 2C 00 D0 11 3E 00 99 20 22 36 22 2C 22 D8 |5",...>.. "6",".|
000009C0: D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 22 2C 22 37 22 |...........","7"|
000009D0: 00 FF 11 3F 00 99 3A 99 22 CE 4F 54 49 43 45 20 |...?..:.".OTICE |
000009E0: 54 48 41 54 20 49 46 20 41 4E 20 49 54 45 4D 20 |THAT IF AN ITEM |
000009F0: 49 53 20 4C 4F 4E 47 45 52 20 54 48 41 4E 22 00 |IS LONGER THAN".|
00000A00: 2E 12 40 00 99 22 54 45 4E 20 43 48 41 52 41 43 |..@.."TEN CHARAC|
00000A10: 54 45 52 53 20 54 48 45 4E 20 54 48 45 20 4E 45 |TERS THEN THE NE|
00000A20: 58 54 20 54 41 42 20 43 4F 4C 55 4D 4E 22 00 44 |XT TAB COLUMN".D|
00000A30: 12 41 00 99 22 49 53 20 55 53 45 44 2E 22 3A 89 |.A.."IS USED.":.|
00000A40: 20 34 31 37 00 6F 12 42 00 99 22 D4 52 59 20 41 | 417.o.B..".RY A|
00000A50: 47 41 49 4E 20 57 49 54 48 4F 55 54 20 54 48 45 |GAIN WITHOUT THE|
00000A60: 20 4C 41 53 54 20 43 4F 4D 4D 41 20 49 4E 22 00 | LAST COMMA IN".|
00000A70: 81 12 43 00 99 22 4C 49 4E 45 20 31 30 3A 22 3A |..C.."LINE 10:":|
00000A80: 99 00 C2 12 44 00 99 22 20 31 30 20 D0 D2 C9 CE |....D.." 10 ....|
00000A90: D4 20 22 51 24 22 31 22 51 24 22 2C 22 51 24 22 |. "Q$"1"Q$","Q$"|
00000AA0: 32 22 51 24 22 2C 22 51 24 22 33 22 51 24 22 2C |2"Q$","Q$"3"Q$",|
00000AB0: 22 51 24 22 34 22 51 24 22 2C 22 51 24 22 35 22 |"Q$"4"Q$","Q$"5"|
00000AC0: 51 24 00 FD 12 45 00 99 22 20 32 30 20 D0 D2 C9 |Q$...E.." 20 ...|
00000AD0: CE D4 20 22 51 24 22 36 22 51 24 22 2C 22 51 24 |.. "Q$"6"Q$","Q$|
00000AE0: 22 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 22 3B 51 |"............";Q|
00000AF0: 24 3B 22 2C 22 51 24 22 37 22 51 24 22 00 0A 13 |$;","Q$"7"Q$"...|
00000B00: 46 00 99 3A 8D 34 33 33 3A 99 00 24 13 47 00 99 |F..:.433:..$.G..|
00000B10: 20 22 31 22 2C 22 32 22 2C 22 33 22 2C 22 34 22 | "1","2","3","4"|
00000B20: 2C 22 35 22 00 41 13 48 00 99 20 22 36 22 2C 22 |,"5".A.H.. "6","|
00000B30: D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 D8 22 2C 22 37 |............","7|
00000B40: 22 00 71 13 49 00 99 3A 99 22 CE 4F 54 49 43 45 |".q.I..:.".OTICE|
00000B50: 20 54 48 45 20 53 49 4D 49 4C 41 52 49 54 59 20 | THE SIMILARITY |
00000B60: 54 4F 20 54 48 45 20 53 45 4D 49 43 4F 4C 4F 4E |TO THE SEMICOLON|
00000B70: 22 00 A0 13 4A 00 99 22 43 41 53 45 2E 20 20 D7 |"...J.."CASE. .|
00000B80: 45 20 53 48 4F 55 4C 44 20 4D 45 4E 54 49 4F 4E |E SHOULD MENTION|
00000B90: 20 54 48 41 54 20 54 48 45 20 53 45 4D 49 2D 22 | THAT THE SEMI-"|
00000BA0: 00 CD 13 4B 00 99 22 43 4F 4C 4F 4E 20 49 53 20 |...K.."COLON IS |
00000BB0: 4E 4F 54 20 41 4C 57 41 59 53 20 4E 45 43 45 53 |NOT ALWAYS NECES|
00000BC0: 53 41 52 59 2E 20 20 C9 46 20 49 54 22 00 FC 13 |SARY. .F IT"...|
00000BD0: 4C 00 99 22 57 49 4C 4C 20 43 41 55 53 45 20 4E |L.."WILL CAUSE N|
00000BE0: 4F 20 41 4D 42 49 47 55 49 54 59 2C 20 49 54 20 |O AMBIGUITY, IT |
00000BF0: 4D 41 59 20 42 45 20 4C 45 46 54 22 00 29 14 4D |MAY BE LEFT".).M|
00000C00: 00 99 22 4F 55 54 20 28 D4 48 49 53 20 55 53 55 |.."OUT (.HIS USU|
00000C10: 41 4C 4C 59 20 4D 45 41 4E 53 20 41 52 4F 55 4E |ALLY MEANS AROUN|
00000C20: 44 20 51 55 4F 54 45 2D 22 00 4B 14 4E 00 99 22 |D QUOTE-".K.N.."|
00000C30: 44 45 46 49 4E 45 44 20 53 54 52 49 4E 47 53 29 |DEFINED STRINGS)|
00000C40: 2E 20 20 D4 48 55 53 3A 22 3A 99 00 8F 14 4F 00 |. .HUS:":....O.|
00000C50: 99 22 20 31 30 20 D0 D2 C9 CE D4 20 22 51 24 22 |." 10 ..... "Q$"|
00000C60: D4 C5 D3 D4 22 51 24 22 20 31 36 20 22 51 24 22 |...."Q$" 16 "Q$"|
00000C70: 4F 46 22 51 24 22 20 32 30 22 3A 99 3A 99 22 49 |OF"Q$" 20":.:."I|
00000C80: 53 20 54 48 45 20 53 41 4D 45 20 41 53 3A 22 00 |S THE SAME AS:".|
00000C90: C6 14 50 00 99 3A 99 22 20 31 30 20 D0 D2 C9 CE |..P..:." 10 ....|
00000CA0: D4 20 22 51 24 22 D4 C5 D3 D4 22 51 24 22 3B 31 |. "Q$"...."Q$";1|
00000CB0: 36 3B 22 51 24 22 4F 46 22 51 24 22 3B 32 30 22 |6;"Q$"OF"Q$";20"|
00000CC0: 3A 89 20 34 31 37 00 F3 14 51 00 99 3A 99 22 C9 |:. 417...Q..:.".|
00000CD0: 54 20 53 48 4F 55 4C 44 20 41 4C 53 4F 20 42 45 |T SHOULD ALSO BE|
00000CE0: 20 4E 4F 54 45 44 20 54 48 41 54 20 49 46 20 54 | NOTED THAT IF T|
00000CF0: 48 45 22 00 1C 15 52 00 99 22 4C 41 53 54 20 49 |HE"...R.."LAST I|
00000D00: 54 45 4D 20 4F 4E 20 41 4E 59 20 4C 49 4E 45 20 |TEM ON ANY LINE |
00000D10: 49 53 20 41 20 51 55 4F 54 45 2D 22 00 49 15 53 |IS A QUOTE-".I.S|
00000D20: 00 99 22 44 45 4C 49 4D 49 54 45 44 20 53 54 52 |.."DELIMITED STR|
00000D30: 49 4E 47 20 54 48 45 4E 20 54 48 45 20 46 49 4E |ING THEN THE FIN|
00000D40: 41 4C 20 51 55 4F 54 45 22 00 78 15 54 00 99 22 |AL QUOTE".x.T.."|
00000D50: 49 53 20 4E 4F 54 20 4E 45 43 45 53 53 41 52 59 |IS NOT NECESSARY|
00000D60: 3B 20 54 48 45 20 53 54 52 49 4E 47 20 49 53 20 |; THE STRING IS |
00000D70: 41 53 53 55 4D 45 44 22 00 A6 15 55 00 99 22 54 |ASSUMED"...U.."T|
00000D80: 4F 20 45 4E 44 20 41 54 20 54 48 45 20 4C 41 53 |O END AT THE LAS|
00000D90: 54 20 4E 4F 4E 2D 42 4C 41 4E 4B 20 43 48 41 52 |T NON-BLANK CHAR|
00000DA0: 41 43 54 45 52 22 00 BC 15 56 00 99 22 4F 4E 20 |ACTER"...V.."ON |
00000DB0: 54 48 45 20 4C 49 4E 45 2E 22 3A 99 00 E9 15 57 |THE LINE.":....W|
00000DC0: 00 99 22 D3 4F 4D 45 20 4F 54 48 45 52 20 57 41 |..".OME OTHER WA|
00000DD0: 59 53 20 4F 46 20 50 55 54 54 49 4E 47 20 53 50 |YS OF PUTTING SP|
00000DE0: 41 43 45 20 49 4E 54 4F 22 00 15 16 58 00 99 22 |ACE INTO"...X.."|
00000DF0: 59 4F 55 52 20 4F 55 54 50 55 54 20 41 52 45 20 |YOUR OUTPUT ARE |
00000E00: 54 48 45 20 55 53 45 20 4F 46 20 45 49 54 48 45 |THE USE OF EITHE|
00000E10: 52 20 4F 46 22 00 44 16 59 00 99 22 54 57 4F 20 |R OF".D.Y.."TWO |
00000E20: 46 55 4E 43 54 49 4F 4E 53 2C 20 12 D3 D0 C3 92 |FUNCTIONS, .....|
00000E30: 20 41 4E 44 20 12 D4 C1 C2 92 2E 20 20 D3 D0 C3 | AND ...... ...|
00000E40: 28 4E 29 22 00 73 16 5A 00 99 22 43 41 55 53 45 |(N)".s.Z.."CAUSE|
00000E50: 53 20 4E 20 53 50 41 43 45 53 20 54 4F 20 42 45 |S N SPACES TO BE|
00000E60: 20 50 52 49 4E 54 45 44 2E 20 20 D4 48 55 53 3A | PRINTED. .HUS:|
00000E70: 22 3A 99 00 AA 16 5B 00 99 22 20 31 30 20 D0 D2 |":....[.." 10 ..|
00000E80: C9 CE D4 20 22 51 24 22 D3 50 41 43 45 53 20 41 |... "Q$".PACES A|
00000E90: 52 45 22 51 24 22 D3 D0 C3 28 31 35 29 22 51 24 |RE"Q$"...(15)"Q$|
00000EA0: 22 49 4D 50 4F 52 54 41 4E 54 00 B7 16 5C 00 99 |"IMPORTANT...\..|
00000EB0: 3A 8D 34 33 33 3A 99 00 D7 16 5D 00 99 22 D3 50 |:.433:....]..".P|
00000EC0: 41 43 45 53 20 41 52 45 22 A6 31 35 29 22 49 4D |ACES ARE".15)"IM|
00000ED0: 50 4F 52 54 41 4E 54 00 E3 16 5E 00 99 3A 89 20 |PORTANT...^..:. |
00000EE0: 34 31 37 00 0C 17 5F 00 99 22 D4 C1 C2 28 4E 29 |417..._.."...(N)|
00000EF0: 20 43 41 55 53 45 53 20 54 48 45 20 4E 45 58 54 | CAUSES THE NEXT|
00000F00: 20 49 54 45 4D 20 54 4F 20 42 45 22 00 37 17 60 | ITEM TO BE".7.`|
00000F10: 00 99 22 50 52 49 4E 54 45 44 20 53 54 41 52 54 |.."PRINTED START|
00000F20: 49 4E 47 20 41 54 20 43 4F 4C 55 4D 4E 20 4E 20 |ING AT COLUMN N |
00000F30: 4F 46 20 54 48 45 22 00 60 17 61 00 99 22 43 55 |OF THE".`.a.."CU|
00000F40: 52 52 45 4E 54 20 4C 49 4E 45 2C 20 50 52 4F 56 |RRENT LINE, PROV|
00000F50: 49 44 45 44 20 57 45 20 48 41 56 45 4E 27 54 22 |IDED WE HAVEN'T"|
00000F60: 00 85 17 62 00 99 22 41 4C 52 45 41 44 59 20 47 |...b.."ALREADY G|
00000F70: 4F 4E 45 20 50 41 53 54 20 43 4F 4C 55 4D 4E 20 |ONE PAST COLUMN |
00000F80: 4E 2E 22 3A 99 00 BE 17 63 00 99 22 20 31 30 20 |N.":....c.." 10 |
00000F90: D0 D2 C9 CE D4 22 51 24 22 D3 50 41 43 45 53 20 |....."Q$".PACES |
00000FA0: 41 52 45 22 51 24 22 D4 C1 C2 28 31 35 29 22 51 |ARE"Q$"...(15)"Q|
00000FB0: 24 22 49 4D 50 4F 52 54 41 4E 54 22 51 24 00 CC |$"IMPORTANT"Q$..|
00000FC0: 17 64 00 99 3A 8D 20 34 33 33 3A 99 00 ED 17 65 |.d..:. 433:....e|
00000FD0: 00 99 22 D3 50 41 43 45 53 20 41 52 45 22 A3 31 |..".PACES ARE".1|
00000FE0: 35 29 22 49 4D 50 4F 52 54 41 4E 54 22 00 0E 18 |5)"IMPORTANT"...|
00000FF0: 66 00 99 3A 99 22 CE 4F 57 20 54 52 59 20 54 48 |f..:.".OW TRY TH|
00001000: 49 53 20 50 52 4F 47 52 41 4D 3A 22 3A 99 00 54 |IS PROGRAM:":..T|
00001010: 18 67 00 99 22 20 31 30 20 D0 D2 C9 CE D4 20 D4 |.g.." 10 ..... .|
00001020: C1 C2 28 31 30 29 22 51 24 22 C4 CF C7 22 51 24 |..(10)"Q$"..."Q$|
00001030: 22 D4 C1 C2 28 34 29 22 51 24 22 C3 C1 D4 22 51 |"...(4)"Q$"..."Q|
00001040: 24 22 D4 C1 C2 28 33 32 29 22 51 24 22 CF CF D0 |$"...(32)"Q$"...|
00001050: D3 22 51 24 00 62 18 68 00 99 3A 8D 20 34 33 33 |."Q$.b.h..:. 433|
00001060: 3A 99 00 83 18 69 00 99 A3 31 30 29 22 C4 CF C7 |:....i...10)"...|
00001070: 22 A3 34 29 22 C3 C1 D4 22 A3 33 32 29 22 CF CF |".4)"...".32)"..|
00001080: D0 D3 22 00 B1 18 6A 00 99 3A 99 22 C8 45 52 45 |.."...j..:.".ERE|
00001090: 20 C3 C1 D4 20 57 41 53 20 50 52 49 4E 54 45 44 | ... WAS PRINTED|
000010A0: 20 4F 55 54 20 52 49 47 48 54 20 41 46 54 45 52 | OUT RIGHT AFTER|
000010B0: 22 00 DA 18 6B 00 99 22 C4 CF C7 20 42 45 43 41 |"...k.."... BECA|
000010C0: 55 53 45 20 57 45 20 48 41 44 20 41 4C 52 45 41 |USE WE HAD ALREA|
000010D0: 44 59 20 50 41 53 53 45 44 22 00 F4 18 6C 00 99 |DY PASSED"...l..|
000010E0: 22 43 4F 4C 55 4D 4E 20 46 4F 55 52 2E 22 3A 89 |"COLUMN FOUR.":.|
000010F0: 20 34 31 37 00 1F 19 6D 00 99 22 D3 D0 C3 20 41 | 417...m.."... A|
00001100: 4E 44 20 D4 C1 C2 20 41 52 45 20 54 57 4F 20 45 |ND ... ARE TWO E|
00001110: 58 41 4D 50 4C 45 53 20 4F 46 20 54 48 45 22 00 |XAMPLES OF THE".|
00001120: 4C 19 6E 00 99 22 46 55 4E 43 54 49 4F 4E 53 20 |L.n.."FUNCTIONS |
00001130: 54 48 41 54 20 C2 C1 D3 C9 C3 20 50 52 4F 56 49 |THAT ..... PROVI|
00001140: 44 45 53 2C 20 43 41 4C 4C 45 44 22 00 7A 19 6F |DES, CALLED".z.o|
00001150: 00 99 22 12 49 4E 54 52 49 4E 53 49 43 20 46 55 |..".INTRINSIC FU|
00001160: 4E 43 54 49 4F 4E 53 92 2E 20 20 D4 48 45 52 45 |NCTIONS.. .HERE|
00001170: 20 41 52 45 20 4D 41 4E 59 22 00 A4 19 70 00 99 | ARE MANY"...p..|
00001180: 22 4F 46 20 54 48 45 53 45 20 3A 20 4D 41 54 48 |"OF THESE : MATH|
00001190: 45 4D 41 54 49 43 41 4C 20 46 55 4E 43 54 49 4F |EMATICAL FUNCTIO|
000011A0: 4E 53 2C 22 00 CB 19 71 00 99 22 43 48 41 52 41 |NS,"...q.."CHARA|
000011B0: 43 54 45 52 20 53 54 52 49 4E 47 20 46 55 4E 43 |CTER STRING FUNC|
000011C0: 54 49 4F 4E 53 2C 20 41 4E 44 22 00 F0 19 72 00 |TIONS, AND"...r.|
000011D0: 99 22 4D 49 53 43 45 4C 4C 41 4E 45 4F 55 53 20 |."MISCELLANEOUS |
000011E0: 46 55 4E 43 54 49 4F 4E 53 2E 20 20 D4 48 45 22 |FUNCTIONS. .HE"|
000011F0: 00 17 1A 73 00 99 22 12 4D 41 54 48 45 4D 41 54 |...s..".MATHEMAT|
00001200: 49 43 41 4C 20 46 55 4E 43 54 49 4F 4E 53 92 20 |ICAL FUNCTIONS. |
00001210: 41 52 45 3A 22 3A 99 00 40 1A 74 00 99 22 20 C1 |ARE:":..@.t.." .|
00001220: C2 D3 28 58 29 20 2D 20 54 48 45 20 41 42 53 4F |..(X) - THE ABSO|
00001230: 4C 55 54 45 20 56 41 4C 55 45 20 4F 46 20 58 22 |LUTE VALUE OF X"|
00001240: 00 65 1A 75 00 99 22 20 C1 D4 CE 28 58 29 20 2D |.e.u.." ...(X) -|
00001250: 20 54 48 45 20 41 52 43 54 41 4E 47 45 4E 54 20 | THE ARCTANGENT |
00001260: 4F 46 20 58 22 00 86 1A 76 00 99 22 20 C3 CF D3 |OF X"...v.." ...|
00001270: 28 58 29 20 2D 20 54 48 45 20 43 4F 53 49 4E 45 |(X) - THE COSINE|
00001280: 20 4F 46 20 58 22 00 B1 1A 77 00 99 22 20 C5 D8 | OF X"...w.." ..|
00001290: D0 28 58 29 20 2D 20 27 45 27 20 52 41 49 53 45 |.(X) - 'E' RAISE|
000012A0: 44 20 54 4F 20 54 48 45 20 50 4F 57 45 52 20 58 |D TO THE POWER X|
000012B0: 22 00 D8 1A 78 00 99 22 20 C9 CE D4 28 58 29 20 |"...x.." ...(X) |
000012C0: 2D 20 54 48 45 20 49 4E 54 45 47 45 52 20 50 41 |- THE INTEGER PA|
000012D0: 52 54 20 4F 46 20 58 22 00 04 1B 79 00 99 22 20 |RT OF X"...y.." |
000012E0: CC CF C7 28 58 29 20 2D 20 54 48 45 20 4E 41 54 |...(X) - THE NAT|
000012F0: 55 52 41 4C 20 4C 4F 47 41 52 49 54 48 4D 20 4F |URAL LOGARITHM O|
00001300: 46 20 58 22 00 2D 1B 7A 00 99 22 20 D3 C7 CE 28 |F X".-.z.." ...(|
00001310: 58 29 20 2D 20 54 48 45 20 53 49 47 4E 20 28 2B |X) - THE SIGN (+|
00001320: 31 2C 30 2C 2D 31 29 20 4F 46 20 58 22 00 4C 1B |1,0,-1) OF X".L.|
00001330: 7B 00 99 22 20 D3 C9 CE 28 58 29 20 2D 20 54 48 |{.." ...(X) - TH|
00001340: 45 20 53 49 4E 45 20 4F 46 20 58 22 00 72 1B 7C |E SINE OF X".r.||
00001350: 00 99 22 20 D3 D1 D2 28 58 29 20 2D 20 54 48 45 |.." ...(X) - THE|
00001360: 20 53 51 55 41 52 45 20 52 4F 4F 54 20 4F 46 20 | SQUARE ROOT OF |
00001370: 58 22 00 94 1B 7D 00 99 22 20 D4 C1 CE 28 58 29 |X"...}.." ...(X)|
00001380: 20 2D 20 54 48 45 20 54 41 4E 47 45 4E 54 20 4F | - THE TANGENT O|
00001390: 46 20 58 22 00 BE 1B 7E 00 99 3A 99 22 D4 48 45 |F X"...~..:.".HE|
000013A0: 53 45 20 46 55 4E 43 54 49 4F 4E 53 20 41 52 45 |SE FUNCTIONS ARE|
000013B0: 20 54 48 45 20 53 54 41 4E 44 41 52 44 22 00 EC | THE STANDARD"..|
000013C0: 1B 7F 00 99 22 4D 41 54 48 45 4D 41 54 49 43 41 |...."MATHEMATICA|
000013D0: 4C 20 46 55 4E 43 54 49 4F 4E 53 20 41 4E 44 20 |L FUNCTIONS AND |
000013E0: 54 48 45 49 52 20 45 58 41 43 54 22 00 18 1C 80 |THEIR EXACT"....|
000013F0: 00 99 22 44 45 46 49 4E 49 54 49 4F 4E 53 20 4D |.."DEFINITIONS M|
00001400: 41 59 20 42 45 20 46 4F 55 4E 44 20 49 4E 20 41 |AY BE FOUND IN A|
00001410: 4E 59 20 4D 41 54 48 22 00 35 1C 81 00 99 22 52 |NY MATH".5...."R|
00001420: 45 46 45 52 45 4E 43 45 20 42 4F 4F 4B 2E 22 3A |EFERENCE BOOK.":|
00001430: 89 20 34 31 37 00 66 1C 82 00 99 3A 99 22 D4 48 |. 417.f....:.".H|
00001440: 45 20 12 43 48 41 52 41 43 54 45 52 20 53 54 52 |E .CHARACTER STR|
00001450: 49 4E 47 20 46 55 4E 43 54 49 4F 4E 53 92 20 41 |ING FUNCTIONS. A|
00001460: 52 45 3A 22 3A 99 00 93 1C 83 00 99 22 20 C1 D3 |RE:":......." ..|
00001470: C3 28 C1 24 29 20 2D 20 54 48 45 20 C1 D3 C3 C9 |.(.$) - THE ....|
00001480: C9 20 4E 55 4D 45 52 49 43 20 43 4F 44 45 20 46 |. NUMERIC CODE F|
00001490: 4F 52 22 00 C1 1C 84 00 99 22 20 20 20 20 20 20 |OR"......" |
000014A0: 20 20 20 20 20 54 48 45 20 46 49 52 53 54 20 43 | THE FIRST C|
000014B0: 48 41 52 41 43 54 45 52 20 4F 46 20 C1 24 22 3A |HARACTER OF .$":|
000014C0: 99 00 EF 1C 85 00 99 22 20 C3 C8 D2 24 28 58 29 |......." ...$(X)|
000014D0: 20 2D 20 54 48 45 20 43 48 41 52 41 43 54 45 52 | - THE CHARACTER|
000014E0: 20 43 4F 52 52 45 53 50 4F 4E 44 49 4E 47 22 00 | CORRESPONDING".|
000014F0: 17 1D 86 00 99 22 20 20 20 20 20 20 20 20 20 20 |....." |
00001500: 20 54 4F 20 54 48 45 20 C1 D3 C3 C9 C9 20 43 4F | TO THE ..... CO|
00001510: 44 45 20 58 22 3A 99 00 45 1D 87 00 99 22 20 CC |DE X":..E...." .|
00001520: C5 C6 D4 24 28 C1 24 2C 4E 29 20 2D 20 41 20 43 |...$(.$,N) - A C|
00001530: 48 41 52 41 43 54 45 52 20 53 54 52 49 4E 47 20 |HARACTER STRING |
00001540: 54 48 41 54 22 00 6D 1D 88 00 99 22 20 20 20 20 |THAT".m...." |
00001550: 20 20 20 20 20 20 20 20 20 20 20 49 53 20 54 48 | IS TH|
00001560: 45 20 4E 20 4C 45 46 54 4D 4F 53 54 22 00 96 1D |E N LEFTMOST"...|
00001570: 89 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |..." |
00001580: 20 20 20 43 48 41 52 41 43 54 45 52 53 20 4F 46 | CHARACTERS OF|
00001590: 20 C1 24 22 3A 99 00 C4 1D 8A 00 99 22 20 CC C5 | .$":......." ..|
000015A0: CE 28 C1 24 29 20 2D 20 54 48 45 20 4E 55 4D 42 |.(.$) - THE NUMB|
000015B0: 45 52 20 4F 46 20 43 48 41 52 41 43 54 45 52 53 |ER OF CHARACTERS|
000015C0: 20 49 4E 22 00 E6 1D 8B 00 99 22 20 20 20 20 20 | IN"......" |
000015D0: 20 20 20 20 20 20 54 48 45 20 53 54 52 49 4E 47 | THE STRING|
000015E0: 20 C1 24 22 3A 99 00 13 1E 8C 00 99 22 20 CD C9 | .$":......." ..|
000015F0: C4 24 28 C1 24 2C 53 2C 4C 29 20 2D 20 41 20 53 |.$(.$,S,L) - A S|
00001600: 54 52 49 4E 47 20 4C 20 43 48 41 52 41 43 54 45 |TRING L CHARACTE|
00001610: 52 53 22 00 3F 1E 8D 00 99 22 20 20 20 20 20 20 |RS".?...." |
00001620: 20 20 20 20 20 20 20 20 20 20 4C 4F 4E 47 20 53 | LONG S|
00001630: 54 41 52 54 49 4E 47 20 41 54 20 54 48 45 22 00 |TARTING AT THE".|
00001640: 71 1E 8E 00 99 22 20 20 20 20 20 20 20 20 20 20 |q...." |
00001650: 20 20 20 20 20 20 53 20 54 48 20 43 48 41 52 41 | S TH CHARA|
00001660: 43 54 45 52 20 49 4E 20 C1 24 22 3A 89 20 34 31 |CTER IN .$":. 41|
00001670: 37 00 A4 1E 8F 00 99 3A 99 3A 99 22 20 D2 C9 C7 |7......:.:." ...|
00001680: C8 D4 24 28 C1 24 2C 4E 29 20 2D 20 41 20 43 48 |..$(.$,N) - A CH|
00001690: 41 52 41 43 54 45 52 20 53 54 52 49 4E 47 20 54 |ARACTER STRING T|
000016A0: 48 41 54 22 00 CE 1E 90 00 99 22 20 20 20 20 20 |HAT"......" |
000016B0: 20 20 20 20 20 20 20 20 20 20 20 49 53 20 54 48 | IS TH|
000016C0: 45 20 4E 20 52 49 47 48 54 4D 4F 53 54 22 00 F8 |E N RIGHTMOST"..|
000016D0: 1E 91 00 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
000016E0: 20 20 20 20 20 43 48 41 52 41 43 54 45 52 53 20 | CHARACTERS |
000016F0: 4F 46 20 C1 24 22 3A 99 00 22 1F 92 00 99 22 20 |OF .$":.."...." |
00001700: D3 D4 D2 24 28 58 29 20 2D 20 41 20 43 48 41 52 |...$(X) - A CHAR|
00001710: 41 43 54 45 52 20 53 54 52 49 4E 47 20 54 48 41 |ACTER STRING THA|
00001720: 54 22 00 52 1F 93 00 99 22 20 20 20 20 20 20 20 |T".R...." |
00001730: 20 20 20 20 43 4F 52 52 45 53 50 4F 4E 44 53 20 | CORRESPONDS |
00001740: 54 4F 20 54 48 45 1D 4E 55 4D 42 45 52 20 58 22 |TO THE.NUMBER X"|
00001750: 3A 99 00 81 1F 94 00 99 22 20 D6 C1 CC 28 C1 24 |:......." ...(.$|
00001760: 29 20 2D 20 41 20 4E 55 4D 42 45 52 20 54 48 41 |) - A NUMBER THA|
00001770: 54 20 43 4F 52 52 45 53 50 4F 4E 44 53 20 54 4F |T CORRESPONDS TO|
00001780: 22 00 AD 1F 95 00 99 22 20 20 20 20 20 20 20 20 |"......" |
00001790: 20 20 20 54 48 45 20 43 48 41 52 41 43 54 45 52 | THE CHARACTER|
000017A0: 20 53 54 52 49 4E 47 20 C1 24 22 3A 99 00 DC 1F | STRING .$":....|
000017B0: 96 00 99 22 D7 48 41 54 20 44 4F 20 59 4F 55 20 |...".HAT DO YOU |
000017C0: 54 48 49 4E 4B 20 54 48 45 20 46 4F 4C 4C 4F 57 |THINK THE FOLLOW|
000017D0: 49 4E 47 20 50 52 4F 47 52 41 4D 22 00 F6 1F 97 |ING PROGRAM"....|
000017E0: 00 99 22 57 49 4C 4C 20 50 52 49 4E 54 20 4F 55 |.."WILL PRINT OU|
000017F0: 54 20 3F 22 3A 99 00 1B 20 98 00 99 22 20 31 30 |T ?":... ..." 10|
00001800: 20 C1 24 20 3D 20 22 51 24 22 C2 C1 D3 C9 C3 20 | .$ = "Q$"..... |
00001810: D4 D5 D4 CF D2 C9 C1 CC 22 51 24 00 63 20 99 00 |........"Q$.c ..|
00001820: 99 22 20 32 30 20 D0 D2 C9 CE D4 20 CD C9 C4 24 |." 20 ..... ...$|
00001830: 28 C1 24 2C 31 32 2C 31 29 22 51 24 22 20 22 51 |(.$,12,1)"Q$" "Q|
00001840: 24 22 CD C9 C4 24 28 C1 24 2C 37 2C 35 29 22 51 |$"...$(.$,7,5)"Q|
00001850: 24 22 20 22 51 24 22 CC C5 C6 D4 24 28 C1 24 2C |$" "Q$"....$(.$,|
00001860: 35 29 22 00 A3 20 9A 00 99 3A 41 31 24 B2 22 C9 |5)".. ...:A1$.".|
00001870: 20 D4 D5 D4 CF D2 20 C2 C1 D3 C9 C3 22 3A 41 32 | ..... .....":A2|
00001880: 24 B2 22 49 20 54 55 54 4F 52 20 42 41 53 49 43 |$."I TUTOR BASIC|
00001890: 22 3A 99 22 C1 4E 53 57 45 52 20 22 3B 3A 8D 20 |":.".NSWER ";:. |
000018A0: 34 32 38 00 AD 20 9B 00 89 20 34 31 37 00 B5 20 |428.. ... 417.. |
000018B0: 9C 00 99 3A 99 00 E1 20 9D 00 99 22 C3 C8 D2 24 |...:... ..."...$|
000018C0: 20 49 53 20 55 53 45 44 20 54 4F 20 50 52 49 4E | IS USED TO PRIN|
000018D0: 54 20 4F 55 54 20 43 48 41 52 41 43 54 45 52 53 |T OUT CHARACTERS|
000018E0: 22 00 10 21 9E 00 99 22 54 48 41 54 20 41 52 45 |"..!..."THAT ARE|
000018F0: 20 41 57 4B 57 41 52 44 20 54 4F 20 54 59 50 45 | AWKWARD TO TYPE|
00001900: 2C 20 46 4F 52 20 45 58 41 4D 50 4C 45 22 3A 99 |, FOR EXAMPLE":.|
00001910: 00 2C 21 9F 00 99 22 20 31 30 20 D0 D2 C9 CE D4 |.,!..." 10 .....|
00001920: 20 C3 C8 D2 24 28 33 34 29 22 3A 99 00 56 21 A0 | ...$(34)":..V!.|
00001930: 00 99 22 57 49 4C 4C 20 50 52 49 4E 54 20 4F 55 |.."WILL PRINT OU|
00001940: 54 20 41 20 51 55 4F 54 41 54 49 4F 4E 20 4D 41 |T A QUOTATION MA|
00001950: 52 4B 2E 22 3A 99 00 82 21 A1 00 99 22 D4 48 45 |RK.":...!...".HE|
00001960: 20 46 55 4E 43 54 49 4F 4E 20 D6 C1 CC 20 49 53 | FUNCTION ... IS|
00001970: 20 48 45 41 56 49 4C 59 20 55 53 45 44 20 46 4F | HEAVILY USED FO|
00001980: 52 22 00 B0 21 A2 00 99 22 43 48 45 43 4B 49 4E |R"..!..."CHECKIN|
00001990: 47 20 49 4E 50 55 54 2E 20 20 CF 4E 45 20 49 4E |G INPUT. .NE IN|
000019A0: 50 55 54 53 20 45 56 45 52 59 54 48 49 4E 47 22 |PUTS EVERYTHING"|
000019B0: 00 DA 21 A3 00 99 22 41 53 20 43 48 41 52 41 43 |..!..."AS CHARAC|
000019C0: 54 45 52 53 20 41 4E 44 20 55 53 45 53 20 D6 C1 |TERS AND USES ..|
000019D0: CC 20 54 4F 20 47 49 56 45 22 00 F8 21 A4 00 99 |. TO GIVE"..!...|
000019E0: 22 4E 55 4D 42 45 52 53 20 41 53 20 52 45 51 55 |"NUMBERS AS REQU|
000019F0: 49 52 45 44 2E 22 3A 99 00 27 22 A5 00 99 22 20 |IRED.":..'"..." |
00001A00: 31 30 20 C9 CE D0 D5 D4 20 22 51 24 22 C5 CE D4 |10 ..... "Q$"...|
00001A10: C5 D2 A0 C1 A0 CE D5 CD C2 C5 D2 A0 3E 20 30 22 |............> 0"|
00001A20: 51 24 22 3B C1 24 22 00 57 22 A6 00 99 22 20 32 |Q$";.$".W"..." 2|
00001A30: 30 20 D0 D2 C9 CE D4 20 22 51 24 22 D4 C8 C5 A0 |0 ..... "Q$"....|
00001A40: CE D5 CD C2 C5 D2 A0 D7 C1 D3 20 22 51 24 22 D6 |.......... "Q$".|
00001A50: C1 CC 28 C1 24 29 22 00 65 22 A7 00 99 3A 8D 20 |..(.$)".e"...:. |
00001A60: 34 33 33 3A 99 00 82 22 A8 00 85 22 C5 CE D4 C5 |433:..."..."....|
00001A70: D2 A0 C1 A0 CE D5 CD C2 C5 D2 A0 3E A0 30 22 3B |...........>.0";|
00001A80: 41 24 00 A4 22 A9 00 99 22 D4 C8 C5 A0 CE D5 CD |A$.."...".......|
00001A90: C2 C5 D2 A0 D7 C1 D3 A0 22 C5 28 41 24 29 3A 89 |........".(A$):.|
00001AA0: 20 34 31 37 00 D2 22 AA 00 99 3A 99 22 D4 48 45 | 417.."...:.".HE|
00001AB0: 20 12 4D 49 53 43 45 4C 4C 41 4E 45 4F 55 53 20 | .MISCELLANEOUS |
00001AC0: 46 55 4E 43 54 49 4F 4E 53 92 20 41 52 45 3A 22 |FUNCTIONS. ARE:"|
00001AD0: 3A 99 00 FC 22 AB 00 99 22 20 C6 D2 C5 28 30 29 |:..."..." ...(0)|
00001AE0: 20 2D 20 47 49 56 45 53 20 54 48 45 20 41 4D 4F | - GIVES THE AMO|
00001AF0: 55 4E 54 20 4F 46 20 46 52 45 45 22 00 20 23 AC |UNT OF FREE". #.|
00001B00: 00 99 22 20 20 20 20 20 20 20 20 20 20 4D 45 4D |.." MEM|
00001B10: 4F 52 59 20 41 56 41 49 4C 41 42 4C 45 22 3A 99 |ORY AVAILABLE":.|
00001B20: 00 4A 23 AD 00 99 22 20 D2 CE C4 28 4E 29 20 2D |.J#..." ...(N) -|
00001B30: 20 52 45 54 55 52 4E 53 20 52 41 4E 44 4F 4D 20 | RETURNS RANDOM |
00001B40: 4E 55 4D 42 45 52 53 22 3A 99 00 75 23 AE 00 99 |NUMBERS":..u#...|
00001B50: 22 20 D0 CF D3 28 30 29 20 2D 20 47 49 56 45 53 |" ...(0) - GIVES|
00001B60: 20 54 48 45 20 50 4F 53 49 54 49 4F 4E 20 4F 46 | THE POSITION OF|
00001B70: 20 54 48 45 22 00 9D 23 AF 00 99 22 20 20 20 20 | THE"..#..." |
00001B80: 20 20 20 20 20 20 43 55 52 53 4F 52 20 4F 4E 20 | CURSOR ON |
00001B90: 54 48 45 20 53 43 52 45 45 4E 22 3A 99 00 C6 23 |THE SCREEN":...#|
00001BA0: B0 00 99 22 20 D5 D3 D2 28 58 29 20 2D 20 45 58 |..." ...(X) - EX|
00001BB0: 45 43 55 54 45 53 20 41 20 55 53 45 52 2D 44 45 |ECUTES A USER-DE|
00001BC0: 46 49 4E 45 44 22 00 F2 23 B1 00 99 22 20 20 20 |FINED"..#..." |
00001BD0: 20 20 20 20 20 20 20 4D 41 43 48 49 4E 45 2D 4C | MACHINE-L|
00001BE0: 41 4E 47 55 41 47 45 20 46 55 4E 43 54 49 4F 4E |ANGUAGE FUNCTION|
00001BF0: 2E 22 00 1F 24 B2 00 99 22 20 20 20 20 20 20 20 |."..$..." |
00001C00: 20 20 20 D2 45 46 45 52 20 54 4F 20 59 4F 55 52 | .EFER TO YOUR|
00001C10: 20 55 53 45 52 27 53 20 4D 41 4E 55 41 4C 22 00 | USER'S MANUAL".|
00001C20: 3F 24 B3 00 99 22 20 20 20 20 20 20 20 20 20 20 |?$..." |
00001C30: 46 4F 52 20 44 45 54 41 49 4C 53 2E 22 3A 99 00 |FOR DETAILS.":..|
00001C40: 6C 24 B4 00 99 22 CF 46 20 54 48 45 53 45 2C 20 |l$...".F THESE, |
00001C50: 54 48 45 20 D2 CE C4 20 46 55 4E 43 54 49 4F 4E |THE ... FUNCTION|
00001C60: 20 49 53 20 54 48 45 20 4F 4E 45 22 00 98 24 B5 | IS THE ONE"..$.|
00001C70: 00 99 22 4D 4F 53 54 20 43 4F 4D 4D 4F 4E 4C 59 |.."MOST COMMONLY|
00001C80: 20 55 53 45 44 2E 20 20 CF 46 54 45 4E 20 41 20 | USED. .FTEN A |
00001C90: 50 52 4F 47 52 41 4D 22 00 C7 24 B6 00 99 22 57 |PROGRAM"..$..."W|
00001CA0: 49 4C 4C 20 57 41 4E 54 20 54 4F 20 44 4F 20 53 |ILL WANT TO DO S|
00001CB0: 4F 4D 45 54 48 49 4E 47 20 50 41 52 54 2C 20 42 |OMETHING PART, B|
00001CC0: 55 54 20 4E 4F 54 22 00 F2 24 B7 00 99 22 41 4C |UT NOT"..$..."AL|
00001CD0: 4C 2C 20 4F 46 20 54 48 45 20 54 49 4D 45 2E 20 |L, OF THE TIME. |
00001CE0: 20 D4 48 45 20 D2 CE C4 20 46 55 4E 43 54 49 4F | .HE ... FUNCTIO|
00001CF0: 4E 22 00 21 25 B8 00 99 22 57 49 4C 4C 20 47 49 |N".!%..."WILL GI|
00001D00: 56 45 20 41 20 52 41 4E 44 4F 4D 20 4E 55 4D 42 |VE A RANDOM NUMB|
00001D10: 45 52 20 42 45 54 57 45 45 4E 20 30 20 41 4E 44 |ER BETWEEN 0 AND|
00001D20: 22 00 55 25 B9 00 99 22 31 20 57 48 49 43 48 20 |".U%..."1 WHICH |
00001D30: 43 41 4E 20 42 45 20 55 53 45 44 20 54 4F 20 4D |CAN BE USED TO M|
00001D40: 41 4B 45 20 44 45 43 49 53 49 4F 4E 53 2E 22 3A |AKE DECISIONS.":|
00001D50: 89 20 34 31 37 00 73 25 BA 00 99 3A 99 22 C8 45 |. 417.s%...:.".E|
00001D60: 52 45 27 53 20 41 4E 20 45 58 41 4D 50 4C 45 3A |RE'S AN EXAMPLE:|
00001D70: 22 3A 99 00 8E 25 BB 00 99 22 20 31 30 20 D0 D2 |":...%..." 10 ..|
00001D80: C9 CE D4 20 22 51 24 22 D3 D4 C1 D2 D4 22 00 A9 |... "Q$"....."..|
00001D90: 25 BC 00 99 22 20 32 30 20 C6 CF D2 20 C9 20 3D |%..." 20 ... . =|
00001DA0: 20 31 20 D4 CF 20 33 30 22 00 BF 25 BD 00 99 22 | 1 .. 30"..%..."|
00001DB0: 20 33 30 20 C1 20 3D 20 D2 CE C4 28 30 29 22 00 | 30 . = ...(0)".|
00001DC0: EB 25 BE 00 99 22 20 34 30 20 C9 C6 A0 C1 A0 3E |.%..." 40 .....>|
00001DD0: 3D 20 2E 34 20 D4 C8 C5 CE A0 D0 D2 C9 CE D4 A0 |= .4 ...........|
00001DE0: 22 51 24 22 30 22 51 24 22 3B 22 00 16 26 BF 00 |"Q$"0"Q$";"..&..|
00001DF0: 99 22 20 35 30 20 C9 C6 A0 C1 A0 3C A0 2E 34 A0 |." 50 .....<..4.|
00001E00: D4 C8 C5 CE A0 D0 D2 C9 CE D4 A0 22 51 24 22 31 |..........."Q$"1|
00001E10: 22 51 24 22 3B 22 00 28 26 C0 00 99 22 20 36 30 |"Q$";".(&..." 60|
00001E20: 20 CE C5 D8 D4 A0 C9 22 00 55 26 C1 00 99 22 20 | ......".U&..." |
00001E30: 37 30 20 D0 D2 C9 CE D4 3A C9 CE D0 D5 D4 22 51 |70 .....:....."Q|
00001E40: 24 22 C1 C7 C1 C9 CE A0 28 D9 2F CE 29 22 51 24 |$"......(./.)"Q$|
00001E50: 22 3B C1 24 22 00 81 26 C2 00 99 22 20 38 30 20 |";.$"..&..." 80 |
00001E60: C9 C6 A0 C1 24 20 3D 20 22 51 24 22 D9 22 51 24 |....$ = "Q$"."Q$|
00001E70: 22 20 D4 C8 C5 CE A0 C7 CF D4 CF 20 31 30 22 3A |" ......... 10":|
00001E80: 99 00 B0 26 C3 00 99 22 CF 4E 20 41 56 45 52 41 |...&...".N AVERA|
00001E90: 47 45 2C 20 54 48 45 52 45 20 53 48 4F 55 4C 44 |GE, THERE SHOULD|
00001EA0: 20 42 45 20 54 57 4F 20 30 27 53 20 46 4F 52 22 | BE TWO 0'S FOR"|
00001EB0: 00 DF 26 C4 00 99 22 45 56 45 52 59 20 54 48 52 |..&..."EVERY THR|
00001EC0: 45 45 20 31 27 53 2E 20 20 C5 41 43 48 20 54 49 |EE 1'S. .ACH TI|
00001ED0: 4D 45 20 54 48 49 53 20 49 53 20 52 55 4E 22 00 |ME THIS IS RUN".|
00001EE0: 12 27 C5 00 99 22 41 20 44 49 46 46 45 52 45 4E |.'..."A DIFFEREN|
00001EF0: 54 20 50 41 54 54 45 52 4E 20 53 48 4F 55 4C 44 |T PATTERN SHOULD|
00001F00: 20 4F 43 43 55 52 2E 22 3A 99 3A 8D 20 34 33 33 | OCCUR.":.:. 433|
00001F10: 3A 99 00 1F 27 C6 00 99 22 D3 D4 C1 D2 D4 22 00 |:...'...".....".|
00001F20: 2E 27 C7 00 81 20 49 B2 31 20 A4 20 33 30 00 49 |.'... I.1 . 30.I|
00001F30: 27 C8 00 41 B2 BB 28 30 29 3A 8B 20 41 B1 B2 2E |'..A..(0):. A...|
00001F40: 34 20 A7 20 99 22 30 22 3B 00 5D 27 C9 00 8B 20 |4 . ."0";.]'... |
00001F50: 41 B3 2E 34 20 A7 20 99 20 22 31 22 3B 00 63 27 |A..4 . . "1";.c'|
00001F60: CA 00 82 00 91 27 CB 00 99 3A 85 22 C1 C7 C1 C9 |.....'...:."....|
00001F70: CE 20 28 D9 2F CE 29 22 3B 41 24 3A 8B 20 41 24 |. (./.)";A$:. A$|
00001F80: B2 22 D9 22 B0 41 24 B2 22 59 22 20 89 20 31 39 |.".".A$."Y" . 19|
00001F90: 38 00 9D 27 CC 00 99 3A 89 20 34 31 37 00 CC 27 |8..'...:. 417..'|
00001FA0: CD 00 99 3A 99 22 D4 57 4F 20 4F 54 48 45 52 20 |...:.".WO OTHER |
00001FB0: 46 55 4E 43 54 49 4F 4E 53 20 4E 4F 54 20 59 45 |FUNCTIONS NOT YE|
00001FC0: 54 20 4D 45 4E 54 49 4F 4E 45 44 22 00 F1 27 CE |T MENTIONED"..'.|
00001FD0: 00 99 22 41 52 45 20 12 D0 C5 C5 CB 28 58 29 92 |.."ARE .....(X).|
00001FE0: 20 41 4E 44 20 12 D0 CF CB C5 20 59 2C 58 92 2E | AND ..... Y,X..|
00001FF0: 22 00 22 28 CF 00 99 3A 99 22 D7 45 4C 4C 2C 20 |"."(...:.".ELL, |
00002000: D0 CF CB C5 20 49 53 4E 27 54 20 52 45 41 4C 4C |.... ISN'T REALL|
00002010: 59 20 41 20 46 55 4E 43 54 49 4F 4E 2C 20 42 55 |Y A FUNCTION, BU|
00002020: 54 22 00 51 28 D0 00 99 22 41 20 53 54 41 54 45 |T".Q(..."A STATE|
00002030: 4D 45 4E 54 3B 20 4E 45 56 45 52 54 48 45 4C 45 |MENT; NEVERTHELE|
00002040: 53 53 20 57 45 27 4C 4C 20 4C 4F 4F 4B 20 41 54 |SS WE'LL LOOK AT|
00002050: 22 00 7A 28 D1 00 99 22 42 4F 54 48 20 4F 46 20 |".z(..."BOTH OF |
00002060: 54 48 45 4D 20 54 4F 47 45 54 48 45 52 2E 20 20 |THEM TOGETHER. |
00002070: D4 48 45 53 45 20 54 57 4F 22 00 A8 28 D2 00 99 |.HESE TWO"..(...|
00002080: 22 27 46 55 4E 43 54 49 4F 4E 53 27 20 41 4C 4C |"'FUNCTIONS' ALL|
00002090: 4F 57 20 59 4F 55 20 54 4F 20 44 45 41 4C 20 44 |OW YOU TO DEAL D|
000020A0: 49 52 45 43 54 4C 59 22 00 D0 28 D3 00 99 22 57 |IRECTLY"..(..."W|
000020B0: 49 54 48 20 54 48 45 20 4D 45 4D 4F 52 59 20 4F |ITH THE MEMORY O|
000020C0: 46 20 54 48 45 20 43 4F 4D 50 55 54 45 52 2E 22 |F THE COMPUTER."|
000020D0: 00 FC 28 D4 00 99 22 D0 C5 C5 CB 28 58 29 20 52 |..(..."....(X) R|
000020E0: 45 54 55 52 4E 53 20 54 48 45 20 4E 55 4D 42 45 |ETURNS THE NUMBE|
000020F0: 52 20 53 54 4F 52 45 44 20 49 4E 22 00 28 29 D5 |R STORED IN".().|
00002100: 00 99 22 4D 45 4D 4F 52 59 20 4C 4F 43 41 54 49 |.."MEMORY LOCATI|
00002110: 4F 4E 20 58 2C 20 41 4E 44 20 D0 CF CB C5 20 59 |ON X, AND .... Y|
00002120: 2C 58 20 50 55 54 53 22 00 53 29 D6 00 99 22 54 |,X PUTS".S)..."T|
00002130: 48 45 20 56 41 4C 55 45 20 58 20 49 4E 54 4F 20 |HE VALUE X INTO |
00002140: 4D 45 4D 4F 52 59 20 4C 4F 43 41 54 49 4F 4E 20 |MEMORY LOCATION |
00002150: 59 2E 22 00 82 29 D7 00 99 22 D4 48 45 53 45 20 |Y."..)...".HESE |
00002160: 41 52 45 20 55 53 45 44 20 41 20 47 52 45 41 54 |ARE USED A GREAT|
00002170: 20 44 45 41 4C 20 46 4F 52 20 43 4F 4E 54 52 4F | DEAL FOR CONTRO|
00002180: 4C 22 00 AF 29 D8 00 99 22 4F 46 20 53 50 52 49 |L"..)..."OF SPRI|
00002190: 54 45 53 20 28 54 48 45 20 47 52 41 50 48 49 43 |TES (THE GRAPHIC|
000021A0: 53 20 4F 4E 20 54 48 45 20 C3 2D 36 34 29 22 00 |S ON THE .-64)".|
000021B0: D7 29 D9 00 99 22 41 4E 44 20 46 4F 52 20 55 53 |.)..."AND FOR US|
000021C0: 49 4E 47 20 54 48 45 20 42 55 49 4C 54 2D 49 4E |ING THE BUILT-IN|
000021D0: 20 4D 55 53 49 43 22 00 03 2A DA 00 99 22 53 59 | MUSIC"..*..."SY|
000021E0: 4E 54 48 45 53 49 5A 45 52 2E 20 20 C1 4E 20 45 |NTHESIZER. .N E|
000021F0: 58 41 4D 50 4C 45 20 4F 46 20 54 48 45 53 45 20 |XAMPLE OF THESE |
00002200: 49 53 22 00 2F 2A DB 00 99 22 42 45 59 4F 4E 44 |IS"./*..."BEYOND|
00002210: 20 54 48 45 20 53 43 4F 50 45 20 4F 46 20 54 48 | THE SCOPE OF TH|
00002220: 45 53 45 20 54 55 54 4F 52 49 41 4C 53 2C 22 00 |ESE TUTORIALS,".|
00002230: 55 2A DC 00 99 22 42 55 54 20 54 48 45 52 45 20 |U*..."BUT THERE |
00002240: 41 52 45 20 53 45 56 45 52 41 4C 20 45 58 41 4D |ARE SEVERAL EXAM|
00002250: 50 4C 45 53 22 00 7E 2A DD 00 99 22 45 4C 53 45 |PLES".~*..."ELSE|
00002260: 57 48 45 52 45 20 4F 4E 20 54 48 45 20 C7 CF CC |WHERE ON THE ...|
00002270: C4 20 C4 C9 D3 CB 2E 22 3A 89 20 34 31 37 00 AD |. .....":. 417..|
00002280: 2A DE 00 99 22 D7 45 20 48 41 56 45 20 53 45 45 |*...".E HAVE SEE|
00002290: 4E 20 4F 4E 45 20 4D 45 54 48 4F 44 20 4F 46 20 |N ONE METHOD OF |
000022A0: 49 4E 49 54 49 41 4C 49 5A 49 4E 47 22 00 C1 2A |INITIALIZING"..*|
000022B0: DF 00 99 22 56 41 52 49 41 42 4C 45 53 3A 22 3A |..."VARIABLES:":|
000022C0: 99 00 F0 2A E0 00 99 22 20 31 30 20 C1 31 20 3D |...*..." 10 .1 =|
000022D0: 20 30 3A 20 C2 32 20 3D 20 35 3A 20 C3 24 20 3D | 0: .2 = 5: .$ =|
000022E0: 20 22 51 24 22 C8 C9 20 D4 C8 C5 D2 C5 22 51 24 | "Q$".. ....."Q$|
000022F0: 00 21 2B E1 00 99 3A 99 22 D4 48 45 52 45 20 49 |.!+...:.".HERE I|
00002300: 53 20 41 4E 20 41 4C 54 45 52 4E 41 54 45 20 4D |S AN ALTERNATE M|
00002310: 45 54 48 4F 44 2E 2E 2E 54 48 45 20 D2 C5 C1 C4 |ETHOD...THE ....|
00002320: 22 00 50 2B E2 00 99 22 53 54 41 54 45 4D 45 4E |".P+..."STATEMEN|
00002330: 54 2E 20 20 D4 48 45 20 12 D2 C5 C1 C4 20 53 54 |T. .HE ..... ST|
00002340: 41 54 45 4D 45 4E 54 92 20 43 41 55 53 45 53 22 |ATEMENT. CAUSES"|
00002350: 00 7B 2B E3 00 99 22 49 4E 46 4F 52 4D 41 54 49 |.{+..."INFORMATI|
00002360: 4F 4E 20 46 52 4F 4D 20 54 48 45 20 43 55 52 52 |ON FROM THE CURR|
00002370: 45 4E 54 20 12 C4 C1 D4 C1 92 22 00 AB 2B E4 00 |ENT ......"..+..|
00002380: 99 22 12 53 54 41 54 45 4D 45 4E 54 92 20 54 4F |.".STATEMENT. TO|
00002390: 20 42 45 20 50 55 54 20 49 4E 54 4F 20 54 48 45 | BE PUT INTO THE|
000023A0: 20 56 41 52 49 41 42 4C 45 53 22 00 DA 2B E5 00 | VARIABLES"..+..|
000023B0: 99 22 49 4E 20 54 48 45 20 4C 49 53 54 2E 20 20 |."IN THE LIST. |
000023C0: D4 48 55 53 20 54 48 45 20 50 52 45 56 49 4F 55 |.HUS THE PREVIOU|
000023D0: 53 20 45 58 41 4D 50 4C 45 22 00 F5 2B E6 00 99 |S EXAMPLE"..+...|
000023E0: 22 43 4F 55 4C 44 20 42 45 20 57 52 49 54 54 45 |"COULD BE WRITTE|
000023F0: 4E 3A 22 3A 99 00 0E 2C E7 00 99 22 20 31 30 20 |N:":...,..." 10 |
00002400: D2 C5 C1 C4 20 C1 31 2C C2 32 2C C3 24 22 00 31 |.... .1,.2,.$".1|
00002410: 2C E8 00 99 22 20 32 30 20 C4 C1 D4 C1 20 30 2C |,..." 20 .... 0,|
00002420: 35 2C 22 51 24 22 C8 C9 20 D4 C8 C5 D2 C5 22 51 |5,"Q$".. ....."Q|
00002430: 24 00 60 2C E9 00 99 3A 99 22 D4 48 45 20 41 44 |$.`,...:.".HE AD|
00002440: 56 41 4E 54 41 47 45 53 20 4F 46 20 54 48 49 53 |VANTAGES OF THIS|
00002450: 20 41 52 45 20 47 52 45 41 54 2E 20 20 C9 46 22 | ARE GREAT. .F"|
00002460: 00 8F 2C EA 00 99 22 4F 4E 45 20 57 41 4E 54 53 |..,..."ONE WANTS|
00002470: 20 54 4F 20 43 48 41 4E 47 45 20 54 48 45 20 49 | TO CHANGE THE I|
00002480: 4E 49 54 49 41 4C 49 5A 41 54 49 4F 4E 2C 22 00 |NITIALIZATION,".|
00002490: BF 2C EB 00 99 22 4F 4E 45 20 4E 45 45 44 20 4F |.,..."ONE NEED O|
000024A0: 4E 4C 59 20 43 48 41 4E 47 45 20 54 48 45 20 C4 |NLY CHANGE THE .|
000024B0: C1 D4 C1 20 53 54 41 54 45 4D 45 4E 54 2E 22 00 |... STATEMENT.".|
000024C0: EB 2C EC 00 99 22 C1 4C 53 4F 2C 20 54 48 45 20 |.,...".LSO, THE |
000024D0: C4 C1 D4 C1 20 4D 41 59 20 4F 43 43 55 52 20 41 |.... MAY OCCUR A|
000024E0: 4E 59 57 48 45 52 45 20 49 4E 22 00 19 2D ED 00 |NYWHERE IN"..-..|
000024F0: 99 22 54 48 45 20 50 52 4F 47 52 41 4D 2C 20 41 |."THE PROGRAM, A|
00002500: 4E 44 20 56 41 52 49 41 42 4C 45 53 20 4D 41 59 |ND VARIABLES MAY|
00002510: 20 42 45 20 D2 C5 C1 C4 22 00 47 2D EE 00 99 22 | BE ....".G-..."|
00002520: 4D 41 4E 59 20 54 49 4D 45 53 2C 20 53 4F 20 45 |MANY TIMES, SO E|
00002530: 4E 54 49 52 45 20 44 41 54 41 42 41 53 45 53 20 |NTIRE DATABASES |
00002540: 4D 41 59 20 42 45 22 00 65 2D EF 00 99 22 43 48 |MAY BE".e-..."CH|
00002550: 41 4E 47 45 44 20 51 55 49 43 4B 4C 59 2E 22 3A |ANGED QUICKLY.":|
00002560: 89 20 34 31 37 00 96 2D F0 00 99 3A 99 22 D7 49 |. 417..-...:.".I|
00002570: 54 48 20 4A 55 44 49 43 49 4F 55 53 20 55 53 45 |TH JUDICIOUS USE|
00002580: 20 4F 46 20 54 48 45 20 D2 CE C4 20 46 55 4E 43 | OF THE ... FUNC|
00002590: 54 49 4F 4E 2C 22 00 C0 2D F1 00 99 22 41 20 47 |TION,"..-..."A G|
000025A0: 52 4F 55 50 20 4F 46 20 56 41 52 49 41 42 4C 45 |ROUP OF VARIABLE|
000025B0: 53 20 4D 41 59 20 42 45 20 53 45 54 20 54 4F 22 |S MAY BE SET TO"|
000025C0: 00 EE 2D F2 00 99 22 43 4F 4E 54 41 49 4E 20 41 |..-..."CONTAIN A|
000025D0: 20 56 41 4C 55 45 20 43 48 4F 53 45 4E 20 46 52 | VALUE CHOSEN FR|
000025E0: 4F 4D 20 41 20 53 50 45 43 49 46 49 43 22 00 0A |OM A SPECIFIC"..|
000025F0: 2E F3 00 99 22 53 45 54 2E 20 20 C6 4F 52 20 45 |...."SET. .OR E|
00002600: 58 41 4D 50 4C 45 3A 22 3A 99 00 2D 2E F4 00 99 |XAMPLE:":..-....|
00002610: 22 20 31 30 20 C6 CF D2 20 C9 20 3D 20 31 20 D4 |" 10 ... . = 1 .|
00002620: CF 20 D2 CE C4 28 30 29 2A 33 2B 31 22 00 46 2E |. ...(0)*3+1".F.|
00002630: F5 00 99 22 20 32 30 20 D2 C5 C1 C4 20 C1 24 3A |..." 20 .... .$:|
00002640: 20 CE C5 D8 D4 22 00 66 2E F6 00 99 22 20 33 30 | ....".f...." 30|
00002650: 20 C4 C1 D4 C1 20 22 51 24 22 CD C5 D3 D3 C1 C7 | .... "Q$"......|
00002660: C5 20 31 22 51 24 00 8B 2E F7 00 99 22 20 34 30 |. 1"Q$......" 40|
00002670: 20 C4 C1 D4 C1 20 22 51 24 22 CD C1 D9 C2 C5 20 | .... "Q$"..... |
00002680: D4 C8 C9 D3 20 CF CE C5 22 51 24 00 B2 2E F8 00 |.... ..."Q$.....|
00002690: 99 22 20 35 30 20 C4 C1 D4 C1 20 22 51 24 22 CF |." 50 .... "Q$".|
000026A0: D2 A0 D4 C8 C5 A0 CF D4 C8 C5 D2 A0 CF CE C5 22 |..............."|
000026B0: 51 24 00 D6 2E F9 00 99 22 20 36 30 20 C4 C1 D4 |Q$......" 60 ...|
000026C0: C1 20 22 51 24 22 CF CE C5 A0 CD CF D2 C5 A0 D4 |. "Q$"..........|
000026D0: C9 CD C5 22 51 24 00 EA 2E FA 00 99 22 20 37 30 |..."Q$......" 70|
000026E0: 20 D0 D2 C9 CE D4 20 C1 24 22 00 1B 2F FB 00 99 | ..... .$"../...|
000026F0: 3A 99 22 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 |:.".HIS PROGRAM |
00002700: 52 41 4E 44 4F 4D 4C 59 20 43 48 4F 4F 53 45 53 |RANDOMLY CHOOSES|
00002710: 20 41 20 4D 45 53 53 41 47 45 22 00 47 2F FC 00 | A MESSAGE".G/..|
00002720: 99 22 41 4E 44 20 57 49 4C 4C 20 47 49 56 45 20 |."AND WILL GIVE |
00002730: 44 49 46 46 45 52 45 4E 54 20 52 45 53 55 4C 54 |DIFFERENT RESULT|
00002740: 53 20 45 41 43 48 22 00 6A 2F FD 00 99 22 54 49 |S EACH".j/..."TI|
00002750: 4D 45 20 49 54 20 49 53 20 52 55 4E 2E 22 3A 99 |ME IT IS RUN.":.|
00002760: 3A 8D 20 34 33 33 3A 99 3A 8C 00 7F 2F FE 00 81 |:. 433:.:.../...|
00002770: 20 49 B2 31 20 A4 20 BB 28 30 29 AC 33 AA 31 00 | I.1 . .(0).3.1.|
00002780: 8A 2F FF 00 87 20 41 24 3A 82 00 D0 2F 00 01 83 |./... A$:.../...|
00002790: 20 22 CD C5 D3 D3 C1 C7 C5 20 31 22 2C 22 CD C1 | "....... 1","..|
000027A0: D9 C2 C5 A0 D4 C8 C9 D3 A0 CF CE C5 22 2C 22 CF |............",".|
000027B0: D2 A0 D4 C8 C5 A0 CF D4 C8 C5 D2 A0 CF CE C5 22 |..............."|
000027C0: 2C 22 CF CE C5 20 CD CF D2 C5 A0 D4 C9 CD C5 22 |,"... ........."|
000027D0: 00 DF 2F 01 01 99 20 41 24 3A 89 20 34 31 37 00 |../... A$:. 417.|
000027E0: 11 30 02 01 99 3A 99 3A 99 22 C1 53 53 4F 43 49 |.0...:.:.".SSOCI|
000027F0: 41 54 45 44 20 57 49 54 48 20 C4 C1 D4 C1 20 53 |ATED WITH .... S|
00002800: 54 41 54 45 4D 45 4E 54 53 20 49 53 20 54 48 45 |TATEMENTS IS THE|
00002810: 22 00 3B 30 03 01 99 22 D2 C5 D3 D4 CF D2 C5 20 |".;0..."....... |
00002820: 53 54 41 54 45 4D 45 4E 54 2E 20 20 D4 48 49 53 |STATEMENT. .HIS|
00002830: 20 53 54 41 54 45 4D 45 4E 54 22 00 69 30 04 01 | STATEMENT".i0..|
00002840: 99 22 4D 45 52 45 4C 59 20 54 45 4C 4C 53 20 C2 |."MERELY TELLS .|
00002850: C1 D3 C9 C3 20 54 48 41 54 20 49 54 20 49 53 20 |.... THAT IT IS |
00002860: 54 4F 20 53 54 41 52 54 22 00 95 30 05 01 99 22 |TO START"..0..."|
00002870: 46 52 4F 4D 20 54 48 45 20 42 45 47 49 4E 4E 49 |FROM THE BEGINNI|
00002880: 4E 47 20 4F 46 20 54 48 45 20 46 49 52 53 54 20 |NG OF THE FIRST |
00002890: C4 C1 D4 C1 22 00 C3 30 06 01 99 22 53 54 41 54 |...."..0..."STAT|
000028A0: 45 4D 45 4E 54 20 41 47 41 49 4E 2E 20 20 D2 C5 |EMENT AGAIN. ..|
000028B0: C1 C4 20 41 4E 44 20 C4 C1 D4 C1 20 53 54 41 54 |.. AND .... STAT|
000028C0: 45 2D 22 00 F0 30 07 01 99 22 4D 45 4E 54 53 20 |E-"..0..."MENTS |
000028D0: 41 52 45 20 4F 43 43 41 53 49 4F 4E 41 4C 4C 59 |ARE OCCASIONALLY|
000028E0: 20 55 53 45 44 20 57 49 54 48 20 D0 CF CB C5 22 | USED WITH ...."|
000028F0: 00 22 31 08 01 99 22 54 4F 20 43 52 45 41 54 45 |."1..."TO CREATE|
00002900: 20 4D 41 43 48 49 4E 45 2D 4C 41 4E 47 55 41 47 | MACHINE-LANGUAG|
00002910: 45 20 50 52 4F 47 52 41 4D 53 2E 22 3A 89 20 34 |E PROGRAMS.":. 4|
00002920: 31 37 00 53 31 09 01 99 3A 99 22 C2 45 53 49 44 |17.S1...:.".ESID|
00002930: 45 20 52 45 41 4C 20 41 4E 44 20 43 48 41 52 41 |E REAL AND CHARA|
00002940: 43 54 45 52 20 56 41 52 49 41 42 4C 45 53 2C 20 |CTER VARIABLES, |
00002950: 57 45 22 00 80 31 0A 01 99 22 41 4C 53 4F 20 48 |WE"..1..."ALSO H|
00002960: 41 56 45 20 12 49 4E 54 45 47 45 52 20 56 41 52 |AVE .INTEGER VAR|
00002970: 49 41 42 4C 45 53 92 2E 20 20 D4 48 45 53 45 22 |IABLES.. .HESE"|
00002980: 00 AC 31 0B 01 99 22 56 41 52 49 41 42 4C 45 53 |..1..."VARIABLES|
00002990: 20 4D 41 59 20 43 4F 4E 54 41 49 4E 20 4F 4E 4C | MAY CONTAIN ONL|
000029A0: 59 20 49 4E 54 45 47 45 52 53 2C 22 00 DB 31 0C |Y INTEGERS,"..1.|
000029B0: 01 99 22 54 48 41 54 20 49 53 20 4E 4F 20 46 52 |.."THAT IS NO FR|
000029C0: 41 43 54 49 4F 4E 41 4C 20 50 41 52 54 53 20 41 |ACTIONAL PARTS A|
000029D0: 52 45 20 41 4C 4C 4F 57 45 44 22 00 05 32 0D 01 |RE ALLOWED"..2..|
000029E0: 99 22 41 4E 44 20 54 48 45 20 4E 55 4D 42 45 52 |."AND THE NUMBER|
000029F0: 53 20 4D 41 59 20 4F 4E 4C 59 20 42 45 20 49 4E |S MAY ONLY BE IN|
00002A00: 20 54 48 45 22 00 34 32 0E 01 99 22 52 41 4E 47 | THE".42..."RANG|
00002A10: 45 20 2D 33 32 37 36 37 20 54 4F 20 33 32 37 36 |E -32767 TO 3276|
00002A20: 37 2E 20 20 D4 48 45 53 45 20 56 41 52 49 41 42 |7. .HESE VARIAB|
00002A30: 4C 45 53 22 00 63 32 0F 01 99 22 41 52 45 20 44 |LES".c2..."ARE D|
00002A40: 45 53 49 47 4E 41 54 45 44 20 42 59 20 41 20 50 |ESIGNATED BY A P|
00002A50: 45 52 43 45 4E 54 20 53 49 47 4E 20 28 25 29 20 |ERCENT SIGN (%) |
00002A60: 41 54 22 00 88 32 10 01 99 22 54 48 45 20 45 4E |AT"..2..."THE EN|
00002A70: 44 20 4F 46 20 54 48 45 20 56 41 52 49 41 42 4C |D OF THE VARIABL|
00002A80: 45 20 4E 41 4D 45 2E 22 00 A3 32 11 01 99 22 28 |E NAME."..2..."(|
00002A90: 45 47 2E 20 C1 31 25 2C 20 D4 C1 25 2C 20 45 54 |EG. .1%, ..%, ET|
00002AA0: 43 29 22 00 CF 32 12 01 99 3A 99 22 C1 52 49 54 |C)"..2...:.".RIT|
00002AB0: 48 4D 45 54 49 43 20 4F 50 45 52 41 54 49 4F 4E |HMETIC OPERATION|
00002AC0: 53 20 50 45 52 46 4F 52 4D 45 44 20 4F 4E 22 00 |S PERFORMED ON".|
00002AD0: F8 32 13 01 99 22 49 4E 54 45 47 45 52 20 56 41 |.2..."INTEGER VA|
00002AE0: 52 49 41 42 4C 45 53 20 54 41 4B 45 20 4D 4F 52 |RIABLES TAKE MOR|
00002AF0: 45 20 54 49 4D 45 2C 22 00 20 33 14 01 99 22 42 |E TIME,". 3..."B|
00002B00: 45 43 41 55 53 45 20 C2 C1 D3 C9 C3 20 4D 55 53 |ECAUSE ..... MUS|
00002B10: 54 20 43 4F 4E 56 45 52 54 20 54 48 45 53 45 22 |T CONVERT THESE"|
00002B20: 00 4B 33 15 01 99 22 4E 55 4D 42 45 52 53 20 49 |.K3..."NUMBERS I|
00002B30: 4E 54 4F 20 52 45 41 4C 20 4E 55 4D 42 45 52 53 |NTO REAL NUMBERS|
00002B40: 20 42 45 46 4F 52 45 20 49 54 22 00 78 33 16 01 | BEFORE IT".x3..|
00002B50: 99 22 44 4F 45 53 20 41 4E 59 54 48 49 4E 47 20 |."DOES ANYTHING |
00002B60: 57 49 54 48 20 54 48 45 4D 2E 20 20 D7 49 54 48 |WITH THEM. .ITH|
00002B70: 20 41 4C 4C 20 4F 46 22 00 A5 33 17 01 99 22 54 | ALL OF"..3..."T|
00002B80: 48 45 53 45 20 52 45 53 54 52 49 43 54 49 4F 4E |HESE RESTRICTION|
00002B90: 53 20 41 4E 44 20 44 52 41 57 42 41 43 4B 53 2C |S AND DRAWBACKS,|
00002BA0: 20 59 4F 55 22 00 D7 33 18 01 99 22 4D 49 47 48 | YOU"..3..."MIGH|
00002BB0: 54 20 57 45 4C 4C 20 41 53 4B 20 57 48 59 20 42 |T WELL ASK WHY B|
00002BC0: 4F 54 48 45 52 20 57 49 54 48 20 54 48 45 4D 2E |OTHER WITH THEM.|
00002BD0: 22 3A 89 20 34 31 37 00 08 34 19 01 99 3A 99 22 |":. 417..4...:."|
00002BE0: D4 48 45 20 41 4E 53 57 45 52 20 49 53 20 53 50 |.HE ANSWER IS SP|
00002BF0: 41 43 45 2E 20 20 D9 4F 55 52 20 C3 2D 36 34 20 |ACE. .OUR .-64 |
00002C00: 48 41 53 20 36 34 CB 22 00 30 34 1A 01 99 22 57 |HAS 64.".04..."W|
00002C10: 4F 52 44 53 20 4F 46 20 4D 45 4D 4F 52 59 2C 20 |ORDS OF MEMORY, |
00002C20: 4F 52 20 36 35 35 33 36 20 4D 45 4D 4F 52 59 22 |OR 65536 MEMORY"|
00002C30: 00 5A 34 1B 01 99 22 4C 4F 43 41 54 49 4F 4E 53 |.Z4..."LOCATIONS|
00002C40: 2E 20 20 C2 C1 D3 C9 C3 20 49 54 53 45 4C 46 20 |. ..... ITSELF |
00002C50: 55 53 45 53 20 55 50 20 41 22 00 84 34 1C 01 99 |USES UP A"..4...|
00002C60: 22 4C 41 52 47 45 20 43 48 55 4E 4B 20 4F 46 20 |"LARGE CHUNK OF |
00002C70: 54 48 41 54 20 28 41 42 4F 55 54 20 38 CB 29 20 |THAT (ABOUT 8.) |
00002C80: 41 4E 44 22 00 AE 34 1D 01 99 22 4F 54 48 45 52 |AND"..4..."OTHER|
00002C90: 20 53 59 53 54 45 4D 20 52 4F 55 54 49 4E 45 53 | SYSTEM ROUTINES|
00002CA0: 20 55 53 45 20 55 50 20 4D 4F 52 45 2E 22 00 DD | USE UP MORE."..|
00002CB0: 34 1E 01 99 22 C9 46 20 59 4F 55 20 41 52 45 20 |4...".F YOU ARE |
00002CC0: 57 52 49 54 49 4E 47 20 41 20 4C 41 52 47 45 20 |WRITING A LARGE |
00002CD0: 50 52 4F 47 52 41 4D 20 57 49 54 48 22 00 0A 35 |PROGRAM WITH"..5|
00002CE0: 1F 01 99 22 41 20 4C 41 52 47 45 20 4E 55 4D 42 |..."A LARGE NUMB|
00002CF0: 45 52 20 4F 46 20 56 41 52 49 41 42 4C 45 53 2C |ER OF VARIABLES,|
00002D00: 20 54 48 45 4E 20 59 4F 55 22 00 36 35 20 01 99 | THEN YOU".65 ..|
00002D10: 22 43 4F 55 4C 44 20 45 41 53 49 4C 59 20 52 55 |"COULD EASILY RU|
00002D20: 4E 20 4F 55 54 20 4F 46 20 4D 45 4D 4F 52 59 2E |N OUT OF MEMORY.|
00002D30: 20 20 C6 4F 52 22 00 5E 35 21 01 99 22 45 58 41 | .OR".^5!.."EXA|
00002D40: 4D 50 4C 45 3A 22 3A 99 3A 99 22 20 31 30 20 C4 |MPLE:":.:." 10 .|
00002D50: C9 CD 20 C1 28 32 30 30 30 30 29 22 3A 99 00 8C |.. .(20000)":...|
00002D60: 35 22 01 99 22 57 49 4C 4C 20 41 4C 57 41 59 53 |5".."WILL ALWAYS|
00002D70: 20 43 41 55 53 45 20 59 4F 55 52 20 50 52 4F 47 | CAUSE YOUR PROG|
00002D80: 52 41 4D 20 54 4F 20 42 4F 4D 42 22 00 BA 35 23 |RAM TO BOMB"..5#|
00002D90: 01 99 22 4F 55 54 20 57 49 54 48 20 41 4E 20 4F |.."OUT WITH AN O|
00002DA0: 55 54 20 4F 46 20 4D 45 4D 4F 52 59 20 45 52 52 |UT OF MEMORY ERR|
00002DB0: 4F 52 2E 22 3A 89 20 34 31 37 00 EA 35 24 01 99 |OR.":. 417..5$..|
00002DC0: 3A 99 22 C5 41 43 48 20 52 45 41 4C 20 56 41 52 |:.".ACH REAL VAR|
00002DD0: 49 41 42 4C 45 20 4F 52 20 41 52 52 41 59 20 45 |IABLE OR ARRAY E|
00002DE0: 4C 45 4D 45 4E 54 20 49 4E 22 00 18 36 25 01 99 |LEMENT IN"..6%..|
00002DF0: 22 C2 C1 D3 C9 C3 20 55 53 45 53 20 35 20 57 4F |"..... USES 5 WO|
00002E00: 52 44 53 20 4F 46 20 4D 45 4D 4F 52 59 2E 20 20 |RDS OF MEMORY. |
00002E10: C8 4F 57 45 56 45 52 22 00 46 36 26 01 99 22 45 |.OWEVER".F6&.."E|
00002E20: 41 43 48 20 49 4E 54 45 47 45 52 20 56 41 52 49 |ACH INTEGER VARI|
00002E30: 41 42 4C 45 20 4F 52 20 41 52 52 41 59 20 45 4C |ABLE OR ARRAY EL|
00002E40: 45 4D 45 4E 54 22 00 75 36 27 01 99 22 55 53 45 |EMENT".u6'.."USE|
00002E50: 53 20 4F 4E 4C 59 20 32 20 57 4F 52 44 53 20 4F |S ONLY 2 WORDS O|
00002E60: 46 20 4D 45 4D 4F 52 59 2E 20 20 D4 48 49 53 20 |F MEMORY. .HIS |
00002E70: 49 53 20 41 22 00 A4 36 28 01 99 22 53 49 47 4E |IS A"..6(.."SIGN|
00002E80: 49 46 49 43 41 4E 54 20 53 41 56 49 4E 47 20 49 |IFICANT SAVING I|
00002E90: 46 20 59 4F 55 52 20 50 52 4F 47 52 41 4D 20 55 |F YOUR PROGRAM U|
00002EA0: 53 45 53 22 00 D2 36 29 01 99 22 4D 41 4E 59 20 |SES"..6).."MANY |
00002EB0: 56 41 52 49 41 42 4C 45 53 2E 20 20 CD 4F 53 54 |VARIABLES. .OST|
00002EC0: 20 50 52 4F 47 52 41 4D 53 20 43 4F 4E 54 41 49 | PROGRAMS CONTAI|
00002ED0: 4E 22 00 01 37 2A 01 99 22 44 41 54 41 20 49 54 |N"..7*.."DATA IT|
00002EE0: 45 4D 53 20 54 48 41 54 20 52 45 41 4C 4C 59 20 |EMS THAT REALLY |
00002EF0: 41 52 45 20 49 4E 54 45 47 45 52 53 20 28 4E 4F |ARE INTEGERS (NO|
00002F00: 22 00 30 37 2B 01 99 22 46 52 41 43 54 49 4F 4E |".07+.."FRACTION|
00002F10: 41 4C 20 50 41 52 54 29 20 42 55 54 20 41 52 45 |AL PART) BUT ARE|
00002F20: 20 52 45 50 52 45 53 45 4E 54 45 44 20 42 59 22 | REPRESENTED BY"|
00002F30: 00 5A 37 2C 01 99 22 52 45 41 4C 53 2E 20 20 D4 |.Z7,.."REALS. .|
00002F40: 48 45 20 4F 4E 4C 59 20 50 52 41 43 54 49 43 41 |HE ONLY PRACTICA|
00002F50: 4C 20 55 53 45 20 46 4F 52 22 00 83 37 2D 01 99 |L USE FOR"..7-..|
00002F60: 22 49 4E 54 45 47 45 52 53 20 49 4E 20 C2 C1 D3 |"INTEGERS IN ...|
00002F70: C9 C3 20 49 53 20 57 48 45 4E 20 59 4F 55 20 41 |.. IS WHEN YOU A|
00002F80: 52 45 22 00 A7 37 2E 01 99 22 52 55 4E 4E 49 4E |RE"..7..."RUNNIN|
00002F90: 47 20 4F 55 54 20 4F 46 20 4D 45 4D 4F 52 59 2E |G OUT OF MEMORY.|
00002FA0: 22 3A 89 20 34 31 37 00 D7 37 2F 01 99 3A 99 22 |":. 417..7/..:."|
00002FB0: C9 4E 20 4C 41 53 54 20 4D 4F 4E 54 48 27 53 20 |.N LAST MONTH'S |
00002FC0: 54 55 54 4F 52 49 41 4C 2C 20 57 45 20 44 49 53 |TUTORIAL, WE DIS|
00002FD0: 43 55 53 53 45 44 22 00 04 38 30 01 99 22 41 52 |CUSSED"..80.."AR|
00002FE0: 52 41 59 53 2E 20 20 D4 48 45 53 45 20 47 52 4F |RAYS. .HESE GRO|
00002FF0: 55 50 49 4E 47 53 20 4F 46 20 4C 49 4B 45 20 44 |UPINGS OF LIKE D|
00003000: 41 54 41 22 00 30 38 31 01 99 22 57 45 52 45 20 |ATA".081.."WERE |
00003010: 46 4F 55 4E 44 20 54 4F 20 42 45 20 41 20 43 4F |FOUND TO BE A CO|
00003020: 4E 56 45 4E 49 45 4E 54 20 57 41 59 20 54 4F 22 |NVENIENT WAY TO"|
00003030: 00 5A 38 32 01 99 22 53 54 4F 52 45 20 41 4E 44 |.Z82.."STORE AND|
00003040: 20 4D 41 4E 49 50 55 4C 41 54 45 20 53 4F 4D 45 | MANIPULATE SOME|
00003050: 20 54 59 50 45 53 20 4F 46 22 00 88 38 33 01 99 | TYPES OF"..83..|
00003060: 22 49 4E 46 4F 52 4D 41 54 49 4F 4E 2E 20 20 D7 |"INFORMATION. .|
00003070: 45 20 53 48 4F 55 4C 44 20 4E 4F 57 20 43 4F 4E |E SHOULD NOW CON|
00003080: 53 49 44 45 52 20 41 22 00 99 38 34 01 99 22 4D |SIDER A"..84.."M|
00003090: 41 54 52 49 58 2E 22 3A 99 00 C7 38 35 01 99 22 |ATRIX.":...85.."|
000030A0: C9 46 20 4F 4E 45 20 57 45 52 45 20 54 4F 20 44 |.F ONE WERE TO D|
000030B0: 52 41 57 20 55 50 20 41 20 43 48 41 52 54 20 4F |RAW UP A CHART O|
000030C0: 46 2C 20 46 4F 52 22 00 F5 38 36 01 99 22 45 58 |F, FOR"..86.."EX|
000030D0: 41 4D 50 4C 45 2C 20 54 48 45 20 4D 41 4B 45 20 |AMPLE, THE MAKE |
000030E0: 4F 46 20 41 20 43 4F 4D 50 55 54 45 52 20 56 45 |OF A COMPUTER VE|
000030F0: 52 53 55 53 22 00 24 39 37 01 99 22 54 48 45 20 |RSUS".$97.."THE |
00003100: 4F 50 54 49 4F 4E 53 20 41 56 41 49 4C 41 42 4C |OPTIONS AVAILABL|
00003110: 45 20 4F 4E 20 54 48 41 54 20 43 4F 4D 50 55 54 |E ON THAT COMPUT|
00003120: 45 52 2C 22 00 4C 39 38 01 99 22 54 48 45 20 52 |ER,".L98.."THE R|
00003130: 45 53 55 4C 54 20 57 4F 55 4C 44 20 42 45 20 4F |ESULT WOULD BE O|
00003140: 4E 45 20 4F 46 20 54 48 4F 53 45 22 00 7A 39 39 |NE OF THOSE".z99|
00003150: 01 99 22 44 49 41 47 52 41 4D 53 20 4D 55 43 48 |.."DIAGRAMS MUCH|
00003160: 20 4C 4F 56 45 44 20 42 59 20 41 44 56 45 52 54 | LOVED BY ADVERT|
00003170: 49 53 45 52 53 20 41 4E 44 22 00 A8 39 3A 01 99 |ISERS AND"..9:..|
00003180: 22 43 4F 4D 50 41 52 49 53 4F 4E 2D 53 48 4F 50 |"COMPARISON-SHOP|
00003190: 50 49 4E 47 20 4D 4F 47 55 4C 53 2E 20 20 D4 48 |PING MOGULS. .H|
000031A0: 49 53 20 53 4F 52 54 22 00 D4 39 3B 01 99 22 4F |IS SORT"..9;.."O|
000031B0: 46 20 41 20 43 48 41 52 54 2C 20 57 48 49 43 48 |F A CHART, WHICH|
000031C0: 20 4C 4F 4F 4B 53 20 41 20 42 49 54 20 4C 49 4B | LOOKS A BIT LIK|
000031D0: 45 20 41 22 00 04 3A 3C 01 99 22 43 52 4F 53 53 |E A"..:<.."CROSS|
000031E0: 57 4F 52 44 2C 20 49 53 20 43 41 4C 4C 45 44 20 |WORD, IS CALLED |
000031F0: 41 20 4D 41 54 52 49 58 2C 20 4F 52 20 12 54 57 |A MATRIX, OR .TW|
00003200: 4F 2D 92 22 00 26 3A 3D 01 99 22 12 44 49 4D 45 |O-.".&:=..".DIME|
00003210: 4E 53 49 4F 4E 41 4C 20 41 52 52 41 59 92 2E 22 |NSIONAL ARRAY.."|
00003220: 3A 89 20 34 31 37 00 58 3A 3E 01 99 3A 99 22 C2 |:. 417.X:>..:.".|
00003230: C1 D3 C9 C3 20 41 4C 4C 4F 57 53 20 59 4F 55 20 |.... ALLOWS YOU |
00003240: 54 4F 20 43 52 45 41 54 45 20 53 55 43 48 20 41 |TO CREATE SUCH A|
00003250: 20 54 48 49 4E 47 3A 22 00 70 3A 3F 01 99 22 20 | THING:".p:?.." |
00003260: 31 30 20 C4 C9 CD 20 C1 28 34 2C 33 29 22 3A 99 |10 ... .(4,3)":.|
00003270: 00 9F 3A 40 01 99 22 D4 48 49 53 20 53 54 41 54 |..:@..".HIS STAT|
00003280: 45 4D 45 4E 54 20 53 41 59 53 20 54 48 41 54 20 |EMENT SAYS THAT |
00003290: 54 48 45 20 41 52 52 41 59 20 C1 20 49 53 22 00 |THE ARRAY . IS".|
000032A0: CB 3A 41 01 99 22 54 4F 20 48 41 56 45 20 35 20 |.:A.."TO HAVE 5 |
000032B0: 52 4F 57 53 20 28 30 2E 2E 2E 34 29 2C 20 45 41 |ROWS (0...4), EA|
000032C0: 43 48 20 57 49 54 48 20 34 20 22 00 EF 3A 42 01 |CH WITH 4 "..:B.|
000032D0: 99 22 43 4F 4C 55 4D 4E 53 20 28 30 2E 2E 2E 33 |."COLUMNS (0...3|
000032E0: 29 2C 4F 46 20 45 4C 45 4D 45 4E 54 53 2E 22 00 |),OF ELEMENTS.".|
000032F0: 1D 3B 43 01 99 3A 99 22 C9 46 20 59 4F 55 20 57 |.;C..:.".F YOU W|
00003300: 41 4E 54 45 44 20 54 4F 20 50 52 4F 47 52 41 4D |ANTED TO PROGRAM|
00003310: 20 41 20 47 41 4D 45 20 4C 49 4B 45 22 00 48 3B | A GAME LIKE".H;|
00003320: 44 01 99 22 C2 41 54 54 4C 45 53 48 49 50 53 2C |D..".ATTLESHIPS,|
00003330: 20 59 4F 55 20 57 4F 55 4C 44 20 50 52 4F 42 41 | YOU WOULD PROBA|
00003340: 42 4C 59 20 55 53 45 22 00 74 3B 45 01 99 22 53 |BLY USE".t;E.."S|
00003350: 4F 4D 45 54 48 49 4E 47 20 4C 49 4B 45 20 54 48 |OMETHING LIKE TH|
00003360: 49 53 20 54 4F 20 52 45 50 52 45 53 45 4E 54 20 |IS TO REPRESENT |
00003370: 54 48 45 22 00 9E 3B 46 01 99 22 42 4F 41 52 44 |THE"..;F.."BOARD|
00003380: 2E 20 20 C2 C1 D3 C9 C3 20 41 4C 4C 4F 57 53 20 |. ..... ALLOWS |
00003390: 41 4E 59 20 4E 55 4D 42 45 52 20 4F 46 22 00 C8 |ANY NUMBER OF"..|
000033A0: 3B 47 01 99 22 44 49 4D 45 4E 53 49 4F 4E 53 20 |;G.."DIMENSIONS |
000033B0: 49 4E 20 41 4E 20 41 52 52 41 59 2C 20 42 55 54 |IN AN ARRAY, BUT|
000033C0: 20 48 49 47 48 45 52 22 00 FB 3B 48 01 99 22 44 | HIGHER"..;H.."D|
000033D0: 49 4D 45 4E 53 49 4F 4E 53 20 4F 46 20 41 52 52 |IMENSIONS OF ARR|
000033E0: 41 59 53 20 41 52 45 20 52 41 52 45 4C 59 20 55 |AYS ARE RARELY U|
000033F0: 53 45 44 2E 22 3A 89 20 34 31 37 00 26 3C 49 01 |SED.":. 417.&<I.|
00003400: 99 3A 99 22 C6 52 45 51 55 45 4E 54 4C 59 2C 20 |.:.".REQUENTLY, |
00003410: 41 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 48 |A PROGRAM WILL H|
00003420: 41 56 45 20 41 22 00 53 3C 4A 01 99 22 53 45 43 |AVE A".S<J.."SEC|
00003430: 54 49 4F 4E 20 4F 46 20 43 4F 44 45 20 54 48 41 |TION OF CODE THA|
00003440: 54 20 49 53 20 52 45 50 45 41 54 45 44 20 4F 56 |T IS REPEATED OV|
00003450: 45 52 22 00 7D 3C 4B 01 99 22 41 4E 44 20 4F 56 |ER".}<K.."AND OV|
00003460: 45 52 20 49 4E 20 44 49 46 46 45 52 45 4E 54 20 |ER IN DIFFERENT |
00003470: 50 4C 41 43 45 53 2E 20 20 CF 4E 45 22 00 98 3C |PLACES. .NE"..<|
00003480: 4C 01 99 22 45 58 41 4D 50 4C 45 20 57 4F 55 4C |L.."EXAMPLE WOUL|
00003490: 44 20 42 45 3A 22 3A 99 00 C7 3C 4D 01 99 22 20 |D BE:":...<M.." |
000034A0: 31 30 30 20 C9 CE D0 D5 D4 20 22 51 24 22 C1 4E |100 ..... "Q$".N|
000034B0: 53 57 45 52 2E 2E 2E 28 59 45 53 2F 4E 4F 29 22 |SWER...(YES/NO)"|
000034C0: 51 24 22 3B C1 24 22 00 08 3D 4E 01 99 22 20 31 |Q$";.$"..=N.." 1|
000034D0: 31 30 20 C9 C6 20 C1 24 3C 3E 22 51 24 22 59 45 |10 .. .$<>"Q$"YE|
000034E0: 53 22 51 24 22 20 C1 CE C4 20 C1 24 3C 3E 22 51 |S"Q$" ... .$<>"Q|
000034F0: 24 22 4E 4F 22 51 24 22 20 D4 C8 C5 CE 20 D0 D2 |$"NO"Q$" .... ..|
00003500: C9 CE D4 20 22 51 24 3B 00 34 3D 4F 01 99 22 59 |... "Q$;.4=O.."Y|
00003510: 45 53 20 4F 52 20 4E 4F 20 4F 4E 4C 59 20 50 4C |ES OR NO ONLY PL|
00003520: 45 41 53 45 22 51 24 22 3A C7 CF D4 CF 20 31 30 |EASE"Q$":.... 10|
00003530: 30 22 3A 99 00 63 3D 50 01 99 22 D4 48 49 53 20 |0":..c=P..".HIS |
00003540: 53 48 4F 52 54 20 53 45 47 4D 45 4E 54 20 50 52 |SHORT SEGMENT PR|
00003550: 4F 4D 50 54 53 20 46 4F 52 20 41 20 59 45 53 2F |OMPTS FOR A YES/|
00003560: 4E 4F 22 00 92 3D 51 01 99 22 52 45 53 50 4F 4E |NO"..=Q.."RESPON|
00003570: 53 45 2C 20 52 45 41 44 53 20 49 4E 50 55 54 2C |SE, READS INPUT,|
00003580: 20 43 48 45 43 4B 53 20 54 4F 20 53 45 45 20 49 | CHECKS TO SEE I|
00003590: 46 22 00 C0 3D 52 01 99 22 49 54 27 53 20 45 49 |F"..=R.."IT'S EI|
000035A0: 54 48 45 52 20 59 45 53 20 4F 52 20 4E 4F 2C 20 |THER YES OR NO, |
000035B0: 41 4E 44 20 54 52 49 45 53 20 41 47 41 49 4E 22 |AND TRIES AGAIN"|
000035C0: 00 ED 3D 53 01 99 22 49 46 20 4E 45 49 54 48 45 |..=S.."IF NEITHE|
000035D0: 52 2E 20 20 C9 54 20 43 4F 55 4C 44 20 42 45 20 |R. .T COULD BE |
000035E0: 55 53 45 44 20 49 4E 20 4D 41 4E 59 22 00 1C 3E |USED IN MANY"..>|
000035F0: 54 01 99 22 41 50 50 4C 49 43 41 54 49 4F 4E 53 |T.."APPLICATIONS|
00003600: 2E 20 20 C3 4F 4E 53 49 44 45 52 20 41 20 51 55 |. .ONSIDER A QU|
00003610: 45 53 54 49 4F 4E 4E 41 49 52 45 22 00 44 3E 55 |ESTIONNAIRE".D>U|
00003620: 01 99 22 57 48 45 52 45 20 54 48 45 52 45 20 57 |.."WHERE THERE W|
00003630: 4F 55 4C 44 20 4C 49 4B 45 4C 59 20 42 45 20 4D |OULD LIKELY BE M|
00003640: 41 4E 59 22 00 70 3E 56 01 99 22 51 55 45 53 54 |ANY".p>V.."QUEST|
00003650: 49 4F 4E 53 20 54 48 41 54 20 52 45 51 55 49 52 |IONS THAT REQUIR|
00003660: 45 44 20 54 48 49 53 20 53 4F 52 54 20 4F 46 22 |ED THIS SORT OF"|
00003670: 00 93 3E 57 01 99 22 52 45 53 50 4F 4E 53 45 20 |..>W.."RESPONSE |
00003680: 46 52 4F 4D 20 41 20 55 53 45 52 2E 22 3A 89 20 |FROM A USER.":. |
00003690: 34 31 37 00 C3 3E 58 01 99 3A 99 22 C9 46 20 54 |417..>X..:.".F T|
000036A0: 48 45 20 50 52 4F 47 52 41 4D 20 57 45 52 45 20 |HE PROGRAM WERE |
000036B0: 54 4F 20 48 41 56 45 20 54 4F 20 49 4E 43 4C 55 |TO HAVE TO INCLU|
000036C0: 44 45 22 00 F1 3E 59 01 99 22 54 48 45 53 45 20 |DE"..>Y.."THESE |
000036D0: 54 57 4F 20 4C 49 4E 45 53 20 45 56 45 52 59 20 |TWO LINES EVERY |
000036E0: 54 49 4D 45 20 54 48 45 52 45 20 57 41 53 20 41 |TIME THERE WAS A|
000036F0: 22 00 1C 3F 5A 01 99 22 51 55 45 53 54 49 4F 4E |"..?Z.."QUESTION|
00003700: 2C 20 54 48 45 20 50 52 4F 47 52 41 4D 20 57 4F |, THE PROGRAM WO|
00003710: 55 4C 44 20 51 55 49 43 4B 4C 59 22 00 47 3F 5B |ULD QUICKLY".G?[|
00003720: 01 99 22 42 45 43 4F 4D 45 20 56 45 52 59 20 4C |.."BECOME VERY L|
00003730: 41 52 47 45 2E 20 20 D4 48 45 52 45 20 53 48 4F |ARGE. .HERE SHO|
00003740: 55 4C 44 20 42 45 22 00 72 3F 5C 01 99 22 53 4F |ULD BE".r?\.."SO|
00003750: 4D 45 20 4D 45 54 48 4F 44 20 4F 46 20 55 53 49 |ME METHOD OF USI|
00003760: 4E 47 20 54 48 45 20 53 41 4D 45 20 4C 49 4E 45 |NG THE SAME LINE|
00003770: 53 22 00 9C 3F 5D 01 99 22 4F 56 45 52 2C 20 53 |S"..?].."OVER, S|
00003780: 49 4E 43 45 20 54 48 45 59 27 52 45 20 54 48 45 |INCE THEY'RE THE|
00003790: 20 53 41 4D 45 2E 20 20 CF 4E 45 22 00 C6 3F 5E | SAME. .NE"..?^|
000037A0: 01 99 22 43 4F 55 4C 44 20 C7 CF D4 CF 20 54 48 |.."COULD .... TH|
000037B0: 45 20 4C 49 4E 45 53 2C 20 42 55 54 20 54 48 45 |E LINES, BUT THE|
000037C0: 4E 20 59 4F 07 22 00 F4 3F 5F 01 99 22 43 4F 55 |N YO."..?_.."COU|
000037D0: 4C 44 4E 27 54 20 47 45 54 20 42 41 43 4B 20 54 |LDN'T GET BACK T|
000037E0: 4F 20 57 48 45 52 45 20 59 4F 55 20 57 45 52 45 |O WHERE YOU WERE|
000037F0: 2E 22 3A 99 00 22 40 60 01 99 22 D4 48 45 20 53 |.":.."@`..".HE S|
00003800: 4F 4C 55 54 49 4F 4E 20 49 53 20 41 20 4E 45 57 |OLUTION IS A NEW|
00003810: 20 42 52 41 4E 43 48 49 4E 47 20 53 54 41 54 45 | BRANCHING STATE|
00003820: 2D 22 00 50 40 61 01 99 22 4D 45 4E 54 20 12 C7 |-".P@a.."MENT ..|
00003830: CF D3 D5 C2 92 2C 20 57 48 49 43 48 20 49 53 20 |....., WHICH IS |
00003840: 53 48 4F 52 54 20 46 4F 52 20 C7 CF 20 54 4F 22 |SHORT FOR .. TO"|
00003850: 00 7D 40 62 01 99 22 D3 D5 C2 52 4F 55 54 49 4E |.}@b.."...ROUTIN|
00003860: 45 2E 20 20 D4 48 49 53 20 53 54 41 54 45 4D 45 |E. .HIS STATEME|
00003870: 4E 54 20 41 43 54 53 20 4A 55 53 54 22 00 AC 40 |NT ACTS JUST"..@|
00003880: 63 01 99 22 4C 49 4B 45 20 41 20 C7 CF D4 CF 20 |c.."LIKE A .... |
00003890: 53 54 41 54 45 4D 45 4E 54 2C 20 42 55 54 20 49 |STATEMENT, BUT I|
000038A0: 54 20 52 45 4D 45 4D 42 45 52 53 22 00 D7 40 64 |T REMEMBERS"..@d|
000038B0: 01 99 22 57 48 45 52 45 20 49 54 20 43 41 4D 45 |.."WHERE IT CAME|
000038C0: 20 46 52 4F 4D 2E 20 20 D4 48 45 20 53 45 43 54 | FROM. .HE SECT|
000038D0: 49 4F 4E 20 4F 46 22 00 02 41 65 01 99 22 43 4F |ION OF"..Ae.."CO|
000038E0: 44 45 20 54 48 41 54 20 4F 4E 45 20 C7 CF D3 D5 |DE THAT ONE ....|
000038F0: C2 53 20 54 4F 20 49 53 20 43 41 4C 4C 45 44 20 |.S TO IS CALLED |
00003900: 41 22 00 2E 41 66 01 99 22 53 55 42 52 4F 55 54 |A"..Af.."SUBROUT|
00003910: 49 4E 45 2C 20 41 4E 44 20 49 54 20 48 41 53 20 |INE, AND IT HAS |
00003920: 54 48 45 20 53 54 41 54 45 4D 45 4E 54 22 00 5B |THE STATEMENT".[|
00003930: 41 67 01 99 22 12 D2 C5 D4 D5 D2 CE 92 20 41 53 |Ag.."........ AS|
00003940: 20 49 54 53 20 4C 41 53 54 20 53 54 41 54 45 4D | ITS LAST STATEM|
00003950: 45 4E 54 2E 20 20 D4 48 49 53 22 00 86 41 68 01 |ENT. .HIS"..Ah.|
00003960: 99 22 54 45 4C 4C 53 20 49 54 20 54 4F 20 47 4F |."TELLS IT TO GO|
00003970: 20 42 41 43 4B 20 54 4F 20 54 48 45 20 50 4C 41 | BACK TO THE PLA|
00003980: 43 45 20 49 4E 22 00 B2 41 69 01 99 22 54 48 45 |CE IN"..Ai.."THE|
00003990: 20 50 52 4F 47 52 41 4D 20 54 48 41 54 20 49 54 | PROGRAM THAT IT|
000039A0: 20 43 41 4D 45 20 46 52 4F 4D 2E 22 3A 89 20 34 | CAME FROM.":. 4|
000039B0: 31 37 00 CE 41 6A 01 99 3A 99 22 D5 53 49 4E 47 |17..Aj..:.".SING|
000039C0: 20 54 48 49 53 20 49 44 45 41 3A 22 3A 99 00 08 | THIS IDEA:":...|
000039D0: 42 6B 01 99 22 20 31 30 20 D0 D2 C9 CE D4 20 22 |Bk.." 10 ..... "|
000039E0: 51 24 22 C4 4F 20 59 4F 55 20 4F 57 4E 20 41 20 |Q$".O YOU OWN A |
000039F0: 43 4F 4D 50 55 54 45 52 22 51 24 22 3A 20 C7 CF |COMPUTER"Q$": ..|
00003A00: D3 D5 C2 20 31 30 30 22 00 50 42 6C 01 99 22 20 |... 100".PBl.." |
00003A10: 32 30 20 C9 C6 20 C1 24 20 3D 20 22 51 24 22 59 |20 .. .$ = "Q$"Y|
00003A20: 45 53 22 51 24 22 20 D4 C8 C5 CE 20 D0 D2 C9 CE |ES"Q$" .... ....|
00003A30: D4 20 22 51 24 22 C4 4F 20 59 4F 55 20 4F 57 4E |. "Q$".O YOU OWN|
00003A40: 20 41 20 C3 4F 4D 4D 4F 44 4F 52 45 22 51 24 3B | A .OMMODORE"Q$;|
00003A50: 00 7C 42 6D 01 99 22 3A 20 C7 CF D3 D5 C2 20 31 |.|Bm..": ..... 1|
00003A60: 30 30 22 3A 99 3A 99 22 20 20 20 20 20 20 2E 2E |00":.:." ..|
00003A70: 2E 20 45 54 43 20 2E 2E 2E 22 3A 99 00 AB 42 6E |. ETC ...":...Bn|
00003A80: 01 99 22 20 31 30 30 20 C9 CE D0 D5 D4 20 22 51 |.." 100 ..... "Q|
00003A90: 24 22 C1 4E 53 57 45 52 2E 2E 2E 28 59 45 53 2F |$".NSWER...(YES/|
00003AA0: 4E 4F 29 22 51 24 22 3B C1 24 22 00 EC 42 6F 01 |NO)"Q$";.$"..Bo.|
00003AB0: 99 22 20 31 31 30 20 C9 C6 20 C1 24 3C 3E 22 51 |." 110 .. .$<>"Q|
00003AC0: 24 22 59 45 53 22 51 24 22 20 C1 CE C4 20 C1 24 |$"YES"Q$" ... .$|
00003AD0: 3C 3E 22 51 24 22 4E 4F 22 51 24 22 20 D4 C8 C5 |<>"Q$"NO"Q$" ...|
00003AE0: CE 20 D0 D2 C9 CE D4 20 22 51 24 3B 00 2B 43 70 |. ..... "Q$;.+Cp|
00003AF0: 01 99 22 59 45 53 20 4F 52 20 4E 4F 20 4F 4E 4C |.."YES OR NO ONL|
00003B00: 59 20 50 4C 45 41 53 45 22 51 24 22 3A C7 CF D4 |Y PLEASE"Q$":...|
00003B10: CF 20 31 30 30 22 3A 99 22 20 31 32 30 20 D2 C5 |. 100":." 120 ..|
00003B20: D4 D5 D2 CE 22 3A 89 20 34 31 37 00 5A 43 71 01 |....":. 417.ZCq.|
00003B30: 99 3A 99 22 D4 48 45 20 53 55 42 52 4F 55 54 49 |.:.".HE SUBROUTI|
00003B40: 4E 45 20 49 4E 54 52 4F 44 55 43 45 53 20 54 48 |NE INTRODUCES TH|
00003B50: 45 20 49 44 45 41 20 4F 46 22 00 86 43 72 01 99 |E IDEA OF"..Cr..|
00003B60: 22 4D 4F 44 55 4C 41 52 20 50 52 4F 47 52 41 4D |"MODULAR PROGRAM|
00003B70: 4D 49 4E 47 3B 20 54 48 41 54 20 49 53 2C 20 48 |MING; THAT IS, H|
00003B80: 41 56 49 4E 47 22 00 AE 43 73 01 99 22 53 4D 41 |AVING"..Cs.."SMA|
00003B90: 4C 4C 20 53 45 43 54 49 4F 4E 53 20 4F 46 20 43 |LL SECTIONS OF C|
00003BA0: 4F 44 45 20 54 48 41 54 20 45 41 43 48 22 00 DB |ODE THAT EACH"..|
00003BB0: 43 74 01 99 22 41 43 43 4F 4D 50 4C 49 53 48 20 |Ct.."ACCOMPLISH |
00003BC0: 41 20 53 4D 41 4C 4C 2C 20 53 50 45 43 49 46 49 |A SMALL, SPECIFI|
00003BD0: 43 20 54 41 53 4B 2E 20 20 C1 22 00 07 44 75 01 |C TASK. ."..Du.|
00003BE0: 99 22 53 48 4F 52 54 20 53 55 42 52 4F 55 54 49 |."SHORT SUBROUTI|
00003BF0: 4E 45 20 54 4F 20 52 45 41 44 20 49 4E 20 4E 55 |NE TO READ IN NU|
00003C00: 4D 42 45 52 53 3B 22 00 33 44 76 01 99 22 4F 4E |MBERS;".3Dv.."ON|
00003C10: 45 20 54 4F 20 4D 41 4B 45 20 41 20 43 48 41 52 |E TO MAKE A CHAR|
00003C20: 41 43 54 45 52 20 53 54 52 49 4E 47 20 41 20 53 |ACTER STRING A S|
00003C30: 45 54 22 00 60 44 77 01 99 22 4C 45 4E 47 54 48 |ET".`Dw.."LENGTH|
00003C40: 2C 20 45 54 43 2E 20 20 D4 48 49 53 20 49 53 20 |, ETC. .HIS IS |
00003C50: 45 41 53 49 45 52 20 54 4F 20 44 4F 20 49 4E 22 |EASIER TO DO IN"|
00003C60: 00 8D 44 78 01 99 22 4F 54 48 45 52 20 4C 41 4E |..Dx.."OTHER LAN|
00003C70: 47 55 41 47 45 53 2C 20 42 55 54 20 59 4F 55 20 |GUAGES, BUT YOU |
00003C80: 43 41 4E 20 44 4F 20 49 54 20 49 4E 22 00 BB 44 |CAN DO IT IN"..D|
00003C90: 79 01 99 22 C2 C1 D3 C9 C3 20 49 46 20 59 4F 55 |y.."..... IF YOU|
00003CA0: 20 54 41 4B 45 20 43 41 52 45 20 49 4E 20 50 52 | TAKE CARE IN PR|
00003CB0: 4F 47 52 41 4D 4D 49 4E 47 2C 22 00 E7 44 7A 01 |OGRAMMING,"..Dz.|
00003CC0: 99 22 41 4E 44 20 54 48 45 20 42 45 4E 45 46 49 |."AND THE BENEFI|
00003CD0: 54 53 20 41 52 45 20 47 52 45 41 54 3A 20 20 45 |TS ARE GREAT: E|
00003CE0: 41 53 45 20 4F 46 22 00 11 45 7B 01 99 22 4D 4F |ASE OF"..E{.."MO|
00003CF0: 44 49 46 49 43 41 54 49 4F 4E 2C 20 53 49 4D 50 |DIFICATION, SIMP|
00003D00: 4C 49 43 49 54 59 2C 20 41 4E 44 20 4D 4F 52 45 |LICITY, AND MORE|
00003D10: 22 00 3B 45 7C 01 99 22 53 54 52 41 49 47 48 54 |".;E|.."STRAIGHT|
00003D20: 46 4F 52 57 41 52 44 20 4D 41 49 4E 54 45 4E 41 |FORWARD MAINTENA|
00003D30: 4E 43 45 2C 20 41 4D 4F 4E 47 22 00 50 45 7D 01 |NCE, AMONG".PE}.|
00003D40: 99 22 4F 54 48 45 52 53 2E 22 3A 89 20 34 31 37 |."OTHERS.":. 417|
00003D50: 00 7D 45 7E 01 99 3A 99 22 C9 4E 20 54 48 45 53 |.}E~..:.".N THES|
00003D60: 45 20 54 55 54 4F 52 49 41 4C 53 20 57 45 20 48 |E TUTORIALS WE H|
00003D70: 41 56 45 20 54 52 49 45 44 20 54 4F 22 00 A9 45 |AVE TRIED TO"..E|
00003D80: 7F 01 99 22 47 49 56 45 20 59 4F 55 20 53 4F 4D |..."GIVE YOU SOM|
00003D90: 45 20 49 4E 53 49 47 48 54 20 49 4E 54 4F 20 48 |E INSIGHT INTO H|
00003DA0: 4F 57 20 C2 C1 D3 C9 C3 22 00 D4 45 80 01 99 22 |OW ....."..E..."|
00003DB0: 57 4F 52 4B 53 2C 20 41 53 20 57 45 4C 4C 20 41 |WORKS, AS WELL A|
00003DC0: 53 20 44 45 4D 4F 4E 53 54 52 41 54 49 4E 47 20 |S DEMONSTRATING |
00003DD0: 54 48 45 22 00 00 46 81 01 99 22 4C 41 4E 47 55 |THE"..F..."LANGU|
00003DE0: 41 47 45 2E 20 20 CE 4F 54 20 41 4C 4C 20 4F 46 |AGE. .OT ALL OF|
00003DF0: 20 C2 C1 D3 C9 C3 20 48 41 53 20 42 45 45 4E 22 | ..... HAS BEEN"|
00003E00: 00 2E 46 82 01 99 22 43 4F 56 45 52 45 44 3A 20 |..F..."COVERED: |
00003E10: 20 57 45 20 48 41 56 45 20 4F 4D 49 54 54 45 44 | WE HAVE OMITTED|
00003E20: 20 54 48 45 20 43 4F 4D 4D 41 4E 44 53 22 00 5D | THE COMMANDS".]|
00003E30: 46 83 01 99 22 54 48 41 54 20 44 45 41 4C 20 44 |F..."THAT DEAL D|
00003E40: 49 52 45 43 54 4C 59 20 57 49 54 48 20 C9 2F CF |IRECTLY WITH ./.|
00003E50: 20 54 4F 20 41 20 44 45 56 49 43 45 22 00 8C 46 | TO A DEVICE"..F|
00003E60: 84 01 99 22 53 55 43 48 20 41 53 20 41 20 44 49 |..."SUCH AS A DI|
00003E70: 53 4B 20 44 52 49 56 45 2E 20 20 C1 4C 4C 20 4F |SK DRIVE. .LL O|
00003E80: 46 20 54 48 45 20 C2 C1 D3 C9 C3 22 00 B7 46 85 |F THE ....."..F.|
00003E90: 01 99 22 53 54 41 54 45 4D 45 4E 54 53 20 41 52 |.."STATEMENTS AR|
00003EA0: 45 20 43 4F 56 45 52 45 44 20 49 4E 20 4D 55 43 |E COVERED IN MUC|
00003EB0: 48 20 4D 4F 52 45 22 00 E2 46 86 01 99 22 44 45 |H MORE"..F..."DE|
00003EC0: 54 41 49 4C 20 49 4E 20 54 48 45 20 C3 4F 4D 4D |TAIL IN THE .OMM|
00003ED0: 4F 44 4F 52 45 20 D0 52 4F 47 52 41 4D 4D 45 52 |ODORE .ROGRAMMER|
00003EE0: 53 22 00 10 47 87 01 99 22 D2 45 46 45 52 45 4E |S"..G...".EFEREN|
00003EF0: 43 45 20 CD 41 4E 55 41 4C 2C 20 57 48 49 43 48 |CE .ANUAL, WHICH|
00003F00: 20 49 53 20 41 20 56 45 52 59 20 47 4F 4F 44 22 | IS A VERY GOOD"|
00003F10: 00 3C 47 88 01 99 22 42 4F 4F 4B 2C 20 41 4E 44 |.<G..."BOOK, AND|
00003F20: 20 53 48 4F 55 4C 44 20 42 45 20 45 41 53 59 20 | SHOULD BE EASY |
00003F30: 54 4F 20 52 45 41 44 20 4E 4F 57 22 00 6A 47 89 |TO READ NOW".jG.|
00003F40: 01 99 22 54 48 41 54 20 59 4F 55 27 56 45 20 43 |.."THAT YOU'VE C|
00003F50: 4F 4D 50 4C 45 54 45 44 20 54 48 45 53 45 20 54 |OMPLETED THESE T|
00003F60: 55 54 4F 52 49 41 4C 53 2E 22 00 97 47 8A 01 99 |UTORIALS."..G...|
00003F70: 3A 99 22 C7 4F 4F 44 20 CC 55 43 4B 20 41 4E 44 |:.".OOD .UCK AND|
00003F80: 20 CB 45 45 50 20 C3 4F 4D 50 55 54 49 4E 47 2E | .EEP .OMPUTING.|
00003F90: 22 3A 89 20 34 31 37 00 C4 47 8B 01 99 3A 99 22 |":. 417..G...:."|
00003FA0: C1 4E 44 20 48 45 52 45 27 53 20 54 48 49 53 20 |.ND HERE'S THIS |
00003FB0: 4D 4F 4E 54 48 27 53 20 4C 49 54 54 4C 45 20 51 |MONTH'S LITTLE Q|
00003FC0: 55 49 5A 22 00 F0 47 8C 01 99 22 4F 4E 20 54 48 |UIZ"..G..."ON TH|
00003FD0: 45 20 4D 41 54 45 52 49 41 4C 20 4F 46 20 54 48 |E MATERIAL OF TH|
00003FE0: 45 20 54 55 54 4F 52 49 41 4C 2E 22 3A 99 3A 99 |E TUTORIAL.":.:.|
00003FF0: 00 1B 48 8D 01 99 22 D7 48 41 54 20 49 53 20 D0 |..H...".HAT IS .|
00004000: D2 C9 CE D4 45 44 20 42 59 20 54 48 45 20 46 4F |....ED BY THE FO|
00004010: 4C 4C 4F 57 49 4E 47 3A 22 3A 99 00 41 48 8E 01 |LLOWING:":..AH..|
00004020: 99 22 20 31 30 20 C1 24 20 3D 20 22 51 24 22 DA |." 10 .$ = "Q$".|
00004030: C1 D0 C8 CF C4 A0 C2 C5 C5 C2 CC C5 C2 D2 CF D8 |................|
00004040: 22 00 78 48 8F 01 99 22 20 32 30 20 D0 D2 C9 CE |".xH..." 20 ....|
00004050: D4 20 D2 C9 C7 C8 D4 24 28 C1 24 2C 31 30 29 20 |. .....$(.$,10) |
00004060: 22 51 24 22 20 22 51 24 22 20 CC C5 C6 D4 24 28 |"Q$" "Q$" ....$(|
00004070: C1 24 2C 36 29 22 3A 99 00 BD 48 90 01 41 31 24 |.$,6)":...H..A1$|
00004080: B2 22 C2 C5 C5 C2 CC C5 C2 D2 CF D8 20 DA C1 D0 |.".......... ...|
00004090: C8 CF C4 22 3A 41 32 24 B2 22 42 45 45 42 4C 45 |...":A2$."BEEBLE|
000040A0: 42 52 4F 58 20 5A 41 50 48 4F 44 22 3A 99 22 C1 |BROX ZAPHOD":.".|
000040B0: 4E 53 57 45 52 22 3B 3A 8D 20 34 32 38 00 DA 48 |NSWER";:. 428..H|
000040C0: 91 01 99 3A 99 22 20 31 30 20 D8 20 3D 20 35 2F |...:." 10 . = 5/|
000040D0: 33 3A 20 D8 25 20 3D 20 D8 22 00 05 49 92 01 99 |3: .% = ."..I...|
000040E0: 22 20 32 30 20 C9 C6 20 D8 25 20 3E 20 31 20 D4 |" 20 .. .% > 1 .|
000040F0: C8 C5 CE 20 D0 D2 C9 CE D4 20 22 51 24 22 31 2E |... ..... "Q$"1.|
00004100: 36 36 22 51 24 00 30 49 93 01 99 22 20 33 30 20 |66"Q$.0I..." 30 |
00004110: C9 C6 20 D8 25 20 3C 3D 20 31 20 D4 C8 C5 CE 20 |.. .% <= 1 .... |
00004120: D0 D2 C9 CE D4 20 22 51 24 22 31 22 51 24 3A 99 |..... "Q$"1"Q$:.|
00004130: 00 5B 49 94 01 41 31 24 B2 22 31 22 3A 41 32 24 |.[I..A1$."1":A2$|
00004140: B2 41 31 24 3A 99 22 C1 4E 53 57 45 52 22 3B 3A |.A1$:.".NSWER";:|
00004150: 8D 20 34 32 38 3A 89 20 34 31 37 00 86 49 95 01 |. 428:. 417..I..|
00004160: 99 22 C8 4F 57 20 4D 41 4E 59 20 4D 45 4D 4F 52 |.".OW MANY MEMOR|
00004170: 59 20 4C 4F 43 41 54 49 4F 4E 53 20 28 57 4F 52 |Y LOCATIONS (WOR|
00004180: 44 53 20 4F 46 22 00 A4 49 96 01 99 22 4D 45 4D |DS OF"..I..."MEM|
00004190: 4F 52 59 29 20 41 52 45 20 55 53 45 44 20 42 59 |ORY) ARE USED BY|
000041A0: 3A 22 3A 99 00 D9 49 97 01 99 22 20 C4 C9 CD 20 |:":...I..." ... |
000041B0: D8 28 33 29 22 3A 99 3A 41 31 24 B2 22 32 30 22 |.(3)":.:A1$."20"|
000041C0: 3A 41 32 24 B2 41 31 24 3A 99 22 C1 4E 53 57 45 |:A2$.A1$:.".NSWE|
000041D0: 52 22 3B 3A 8D 20 34 32 38 00 13 4A 98 01 99 3A |R";:. 428..J...:|
000041E0: 99 22 20 C4 C9 CD 20 C1 25 28 32 2C 32 29 22 3A |." ... .%(2,2)":|
000041F0: 99 3A 41 31 24 B2 22 31 38 22 3A 41 32 24 B2 41 |.:A1$."18":A2$.A|
00004200: 31 24 3A 99 22 C1 4E 53 57 45 52 22 3B 3A 8D 20 |1$:.".NSWER";:. |
00004210: 34 32 38 00 1D 4A 99 01 89 20 34 31 37 00 4D 4A |428..J... 417.MJ|
00004220: 9A 01 99 3A 99 22 C4 4F 45 53 20 54 48 45 20 C7 |...:.".OES THE .|
00004230: CF D4 CF 20 53 54 41 54 45 4D 45 4E 54 20 52 45 |... STATEMENT RE|
00004240: 4D 45 4D 42 45 52 20 57 48 45 52 45 22 00 7B 4A |MEMBER WHERE".{J|
00004250: 9B 01 99 22 49 54 20 43 41 4D 45 20 46 52 4F 4D |..."IT CAME FROM|
00004260: 22 3B 3A 41 31 24 B2 22 CE CF 22 3A 41 32 24 B2 |";:A1$."..":A2$.|
00004270: 22 4E 4F 22 3A 8D 34 32 38 3A 99 00 A3 4A 9C 01 |"NO":.428:...J..|
00004280: 99 22 D7 48 41 54 20 44 4F 45 53 20 54 48 45 20 |.".HAT DOES THE |
00004290: 46 4F 4C 4C 4F 57 49 4E 47 20 50 52 49 4E 54 3A |FOLLOWING PRINT:|
000042A0: 22 3A 99 00 D1 4A 9D 01 99 22 20 31 30 20 D0 CF |":...J..." 10 ..|
000042B0: CB C5 20 31 36 34 32 33 2C 37 3A 20 D0 D2 C9 CE |.. 16423,7: ....|
000042C0: D4 20 D0 C5 C5 CB 20 28 31 36 34 32 33 29 22 3A |. .... (16423)":|
000042D0: 99 00 FB 4A 9E 01 41 31 24 B2 22 37 22 3A 41 32 |...J..A1$."7":A2|
000042E0: 24 B2 41 31 24 3A 99 22 C1 4E 53 57 45 52 22 3B |$.A1$:.".NSWER";|
000042F0: 3A 8D 34 32 38 3A 89 20 34 31 37 00 2F 4B 9F 01 |:.428:. 417./K..|
00004300: 99 22 11 11 11 11 11 11 11 11 20 20 20 20 20 20 |."........ |
00004310: 20 20 20 54 48 41 54 27 53 20 41 4C 4C 2C 20 46 | THAT'S ALL, F|
00004320: 4F 4C 4B 53 20 2E 2E 2E 22 3A 89 20 34 31 37 00 |OLKS ...":. 417.|
00004330: 42 4B A0 01 99 20 22 93 22 3A 20 9E 20 34 39 31 |BK... ".": . 491|
00004340: 35 32 00 84 4B A1 01 53 50 B2 53 50 AA 31 3A 99 |52..K..SP.SP.1:.|
00004350: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00004360: 11 11 11 11 11 11 11 11 11 11 D4 59 50 45 20 41 |...........YPE A|
00004370: 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E |NY KEY TO CONTIN|
00004380: 55 45 22 3B 00 9B 4B A2 01 A1 4B 45 59 24 3A 8B |UE";..K...KEY$:.|
00004390: 4B 45 59 24 B2 22 22 A7 34 31 38 00 AD 4B A3 01 |KEY$."".418..K..|
000043A0: 8B 4B 45 59 24 B2 22 5F 22 A7 34 31 36 00 C6 4B |.KEY$."_".416..K|
000043B0: A4 01 8B 4B 45 59 24 B2 22 5E 22 AF 53 50 B3 B2 |...KEY$."^".SP..|
000043C0: 32 A7 53 50 B2 31 00 E1 4B A5 01 8B 4B 45 59 24 |2.SP.1..K...KEY$|
000043D0: B2 22 5E 22 AF 53 50 B1 32 A7 53 50 B2 53 50 AB |."^".SP.2.SP.SP.|
000043E0: 32 00 FA 4B A6 01 99 22 93 22 3B 3A 97 35 33 32 |2..K...".";:.532|
000043F0: 38 30 2C BB 28 31 29 AC 31 35 00 35 4C A7 01 91 |80,.(1).15.5L...|
00004400: 20 53 50 20 89 20 36 2C 32 31 2C 33 39 2C 34 39 | SP . 6,21,39,49|
00004410: 2C 36 36 2C 38 31 2C 39 35 2C 31 30 39 2C 31 33 |,66,81,95,109,13|
00004420: 30 2C 31 34 33 2C 31 35 36 2C 31 37 30 2C 31 38 |0,143,156,170,18|
00004430: 36 2C 32 30 35 00 72 4C A8 01 91 28 53 50 AB 31 |6,205.rL...(SP.1|
00004440: 34 29 89 32 32 32 2C 32 34 30 2C 32 35 38 2C 32 |4).222,240,258,2|
00004450: 36 35 2C 32 38 31 2C 32 39 32 2C 33 30 33 2C 33 |65,281,292,303,3|
00004460: 31 38 2C 33 32 39 2C 33 34 34 2C 33 36 32 2C 33 |18,329,344,362,3|
00004470: 36 39 00 93 4C A9 01 91 28 53 50 AB 32 36 29 89 |69..L...(SP.26).|
00004480: 33 38 32 2C 33 39 35 2C 34 30 35 2C 34 31 30 2C |382,395,405,410,|
00004490: 34 31 35 00 9D 4C AA 01 89 20 34 31 36 00 BC 4C |415..L... 416..L|
000044A0: AB 01 99 22 45 52 52 4F 52 2A 2A 2A 45 52 52 4F |..."ERROR***ERRO|
000044B0: 52 2A 2A 2A 45 52 52 4F 52 22 3A 90 00 D5 4C AC |R***ERROR":...L.|
000044C0: 01 4E 55 B2 30 3A 41 4E 53 57 24 B2 22 22 3A 97 |.NU.0:ANSW$."":.|
000044D0: 31 39 38 2C 30 00 13 4D AD 01 85 20 41 4E 53 57 |198,0..M... ANSW|
000044E0: 24 3A 8B 20 41 4E 53 57 24 B2 41 31 24 20 B0 20 |$:. ANSW$.A1$ . |
000044F0: 41 4E 53 57 24 B2 41 32 24 A7 20 99 22 20 20 20 |ANSW$.A2$. ." |
00004500: 20 20 20 20 20 20 20 20 12 C3 4F 52 52 45 43 54 | ..ORRECT|
00004510: 22 3A 8E 00 26 4D AE 01 8B 41 4E 53 57 24 B2 22 |":..&M...ANSW$."|
00004520: 5F 22 A7 34 31 36 00 63 4D AF 01 99 22 CE 4F 2E |_".416.cM...".O.|
00004530: 2E D4 48 41 54 27 53 20 4E 4F 54 20 49 54 22 3B |..HAT'S NOT IT";|
00004540: 3A 4E 55 B2 4E 55 AA 31 3A 8B 4E 55 B3 34 A7 99 |:NU.NU.1:.NU.4..|
00004550: 22 2E 2E D4 52 59 20 41 47 41 49 4E 22 3B 3A 89 |"...RY AGAIN";:.|
00004560: 34 32 39 00 8B 4D B0 01 99 3A 99 22 D4 48 45 20 |429..M...:.".HE |
00004570: 43 4F 52 52 45 43 54 20 41 4E 53 57 45 52 20 49 |CORRECT ANSWER I|
00004580: 53 2E 2E 2E 22 3B 41 31 24 3A 8E 00 B7 4D B1 01 |S...";A1$:...M..|
00004590: 99 22 D4 59 50 45 20 41 4E 59 20 4B 45 59 20 54 |.".YPE ANY KEY T|
000045A0: 4F 20 45 58 45 43 55 54 45 20 54 48 45 20 50 52 |O EXECUTE THE PR|
000045B0: 4F 47 52 41 4D 22 3B 00 CE 4D B2 01 A1 4B 45 59 |OGRAM";..M...KEY|
000045C0: 24 3A 8B 4B 45 59 24 B2 22 22 A7 34 33 34 00 E0 |$:.KEY$."".434..|
000045D0: 4D B3 01 8B 4B 45 59 24 B2 22 5F 22 A7 34 31 36 |M...KEY$."_".416|
000045E0: 00 E8 4D B4 01 99 3A 8E 00 00 00 |..M...:.... |
....... (C) GOLD DISK INC.......>....532
81,0:.".....":Q$.G(34).W.... BASIC TUTOR
IAL # 3.Y.... BY D.KEENAN AND F.WHITESID
E.....SP.1:.".":." .BASIC. .TU
TORIAL.".X....:.:." BY D.KEENAN AND
F.WHITESIDE":.:......." WELCOME TO THE
THIRD IN A THREE-PART".*...."TUTORIAL SE
RIES ON THE BASIC".W...."PROGRAMMING LAN
GUAGE. THIS FINAL PART"......"WILL DEAL
WITH .PRINTING CONTROL.,"......".INTRINS
IC FUNCTIONS., .PEEKS AND POKES.,"......
".READ STATEMENTS., .INTEGER VARIABLES.,
"......".MULTI-DIMENSIONAL ARRAYS. AND .
SUBROUTINES.".G....:." SO SIT BACK AND
GET READY TO BEGIN...".Y....:.".NOTE: I
F YOU TYPE THE '_' KEY THEN IT'S"......"
.BACK TO THE GOLD DISK MAIN MENU WITH YO
U".W...." .THE '^' KEY CAUSES THE TU
TORIAL"......" .TO BACK UP ONE SC
REEN"...... 417.9....:."FIRST, LET'S LOO
K AT ADVANCED .PRINTING.".G....".CONTROL
.. IN THE PREVIOUS TUTORIALS,"......"WE
NOTED THAT ITEMS IN A LIST OF THINGS".B
...."TO BE PRINTED SHOULD BE SEPARATED B
Y"......"SEMICOLONS (;). THIS CAUSES EA
CH ITEM"......"TO BE PRINTED AT THE NEXT
AVAILABLE".H...."SPACE ON THE SCREEN (I
E. IT LEAVES NO".I...."SPACES BETWEEN TH
INGS).":......."ALSO, IF THE SEMICOLON I
S THE LAST".B...."THING IN THE PRINT STA
TEMENT THEN THERE"......"IS NO AUTOMATIC
CARRIAGE RETURN PRINTED.":.... .."CONSI
DER THE FOLLOWING EXAMPLE:"._.!.." 10 PR
INT "Q$"1"Q$";"Q$"2"Q$";"Q$"3"Q$";"Q$"4"
Q$";"Q$"5"Q$";"...".." 20 PRINT "Q$"6"Q$
";"Q$"XXXXXXXXXXXX";Q$;";"Q$"7"Q$"...#..
:. 433:..C.$.. "1";"2";"3";"4";"5";...%.
. "6";"XXXXXXXXXXXX";"7"...&.. 417...'..
:."NOTICE THAT EVERYTHING APPEARED ON ON
E".H.(.."LINE WITH NO SPACES. NOW, WITH
OUT THE".L.).."LAST SEMICOLON IN LINE 10
:":....*.." 10 PRINT "Q$"1"Q$";"Q$"2"Q$"
;"Q$"3"Q$";"Q$"4"Q$";"Q$"5"Q$...+.." 20
PRINT "Q$"6"Q$";"Q$"XXXXXXXXXXXX";Q$;";"
Q$"7"Q$"...,..:. 433:....-.. "1";"2";"3"
;"4";"5".-.... "6";"XXXXXXXXXXXX";"7".Y.
/..:."NOTE THAT IN THIS CASE, EACH PRINT
"...0.."STATEMENT GETS ITS OWN LINE.":.
417...1..:."AN ALTERNATIVE TO THE SEMICO
LON (;) IS"...2.."THE COMMA (,). THE CO
MMA HAS A SIMILAR"...3.."EFFECT TO THE S
EMICOLON, EXCEPT THAT".;.4.."EACH ITEM I
N THE LIST GETS PRINTED AT".H.5.."THE NE
XT AVAILABLE 'TAB COLUMN'. THE"...6.."C
OMMODORE HAS 4 TAB COLUMNS PER LINE,"...
7.."EACH 10 CHARACTERS APART.":....8.."N
OW LET'S TRY THE FIRST PROGRAM WITH"...9
.."COMMAS IN PLACE OF SEMICOLONS:":..P.:
.." 10 PRINT "Q$"1"Q$","Q$"2"Q$","Q$"3"Q
$","Q$"4"Q$","Q$"5"Q$","...;.." 20 PRINT
"Q$"6"Q$","Q$"XXXXXXXXXXXX";Q$;","Q$"7"
Q$"...<..:.433:....=.. "1","2","3","4","
5",.P.>.. "6","XXXXXXXXXXXX","7"...?..:.
"NOTICE THAT IF AN ITEM IS LONGER THAN".
..@.."TEN CHARACTERS THEN THE NEXT TAB C
OLUMN".D.A.."IS USED.":. 417.O.B.."TRY A
GAIN WITHOUT THE LAST COMMA IN"...C.."LI
NE 10:":..B.D.." 10 PRINT "Q$"1"Q$","Q$"
2"Q$","Q$"3"Q$","Q$"4"Q$","Q$"5"Q$...E..
" 20 PRINT "Q$"6"Q$","Q$"XXXXXXXXXXXX";Q
$;","Q$"7"Q$"...F..:.433:..$.G.. "1","2"
,"3","4","5".A.H.. "6","XXXXXXXXXXXX","7
".Q.I..:."NOTICE THE SIMILARITY TO THE S
EMICOLON". .J.."CASE. WE SHOULD MENTION
THAT THE SEMI-".M.K.."COLON IS NOT ALWA
YS NECESSARY. IF IT"...L.."WILL CAUSE N
O AMBIGUITY, IT MAY BE LEFT".).M.."OUT (
THIS USUALLY MEANS AROUND QUOTE-".K.N.."
DEFINED STRINGS). THUS:":....O.." 10 PR
INT "Q$"TEST"Q$" 16 "Q$"OF"Q$" 20":.:."I
S THE SAME AS:".F.P..:." 10 PRINT "Q$"TE
ST"Q$";16;"Q$"OF"Q$";20":. 417...Q..:."I
T SHOULD ALSO BE NOTED THAT IF THE"...R.
."LAST ITEM ON ANY LINE IS A QUOTE-".I.S
.."DELIMITED STRING THEN THE FINAL QUOTE
".X.T.."IS NOT NECESSARY; THE STRING IS
ASSUMED"...U.."TO END AT THE LAST NON-BL
ANK CHARACTER"...V.."ON THE LINE.":....W
.."SOME OTHER WAYS OF PUTTING SPACE INTO
"...X.."YOUR OUTPUT ARE THE USE OF EITHE
R OF".D.Y.."TWO FUNCTIONS, .SPC. AND .TA
B.. SPC(N)".S.Z.."CAUSES N SPACES TO BE
PRINTED. THUS:":....[.." 10 PRINT "Q$"
SPACES ARE"Q$"SPC(15)"Q$"IMPORTANT...\..
:.433:..W.].."SPACES ARE".15)"IMPORTANT.
..^..:. 417..._.."TAB(N) CAUSES THE NEXT
ITEM TO BE".7.`.."PRINTED STARTING AT C
OLUMN N OF THE".`.A.."CURRENT LINE, PROV
IDED WE HAVEN'T"...B.."ALREADY GONE PAST
COLUMN N.":....C.." 10 PRINT"Q$"SPACES
ARE"Q$"TAB(15)"Q$"IMPORTANT"Q$.L.D..:. 4
33:....E.."SPACES ARE".15)"IMPORTANT"...
F..:."NOW TRY THIS PROGRAM:":..T.G.." 10
PRINT TAB(10)"Q$"DOG"Q$"TAB(4)"Q$"CAT"Q
$"TAB(32)"Q$"OOPS"Q$.B.H..:. 433:....I..
.10)"DOG".4)"CAT".32)"OOPS"...J..:."HERE
CAT WAS PRINTED OUT RIGHT AFTER".Z.K.."
DOG BECAUSE WE HAD ALREADY PASSED"...L..
"COLUMN FOUR.":. 417...M.."SPC AND TAB A
RE TWO EXAMPLES OF THE".L.N.."FUNCTIONS
THAT BASIC PROVIDES, CALLED".Z.O..".INTR
INSIC FUNCTIONS.. THERE ARE MANY"...P..
"OF THESE : MATHEMATICAL FUNCTIONS,".K.Q
.."CHARACTER STRING FUNCTIONS, AND"...R.
."MISCELLANEOUS FUNCTIONS. THE"...S..".
MATHEMATICAL FUNCTIONS. ARE:":..@.T.." A
BS(X) - THE ABSOLUTE VALUE OF X".E.U.."
ATN(X) - THE ARCTANGENT OF X"...V.." COS
(X) - THE COSINE OF X"...W.." EXP(X) - '
E' RAISED TO THE POWER X".X.X.." INT(X)
- THE INTEGER PART OF X"...Y.." LOG(X) -
THE NATURAL LOGARITHM OF X".-.Z.." SGN(
X) - THE SIGN (+1,0,-1) OF X".L.{.." SIN
(X) - THE SINE OF X".R.|.." SQR(X) - THE
SQUARE ROOT OF X"...}.." TAN(X) - THE T
ANGENT OF X"...~..:."THESE FUNCTIONS ARE
THE STANDARD"....."MATHEMATICAL FUNCTI
ONS AND THEIR EXACT"......"DEFINITIONS M
AY BE FOUND IN ANY MATH".5...."REFERENCE
BOOK.":. 417.F....:."THE .CHARACTER STR
ING FUNCTIONS. ARE:":......." ASC(A$) -
THE ASCII NUMERIC CODE FOR".A...."
THE FIRST CHARACTER OF A$":......."
CHR$(X) - THE CHARACTER CORRESPONDING".
....." TO THE ASCII CODE X":..
E...." LEFT$(A$,N) - A CHARACTER STRING
THAT".M...." IS THE N LEFT
MOST"......" CHARACTERS OF
A$":..D...." LEN(A$) - THE NUMBER OF CH
ARACTERS IN"......" THE STRING
A$":......." MID$(A$,S,L) - A STRING L
CHARACTERS".?...." LONG S
TARTING AT THE".Q...." S
TH CHARACTER IN A$":. 417......:.:." RIG
HT$(A$,N) - A CHARACTER STRING THAT".N..
.." IS THE N RIGHTMOST"..
...." CHARACTERS OF A$":.
."...." STR$(X) - A CHARACTER STRING THA
T".R...." CORRESPONDS TO THE.N
UMBER X":......." VAL(A$) - A NUMBER THA
T CORRESPONDS TO"......" THE C
HARACTER STRING A$":......."WHAT DO YOU
THINK THE FOLLOWING PROGRAM"......"WILL
PRINT OUT ?":... ..." 10 A$ = "Q$"BASIC
TUTORIAL"Q$.C ..." 20 PRINT MID$(A$,12,1
)"Q$" "Q$"MID$(A$,7,5)"Q$" "Q$"LEFT$(A$,
5)".. ...:A1$."I TUTOR BASIC":A2$."I TUT
OR BASIC":."ANSWER ";:. 428.. ... 417..
...:... ..."CHR$ IS USED TO PRINT OUT CH
ARACTERS"..!..."THAT ARE AWKWARD TO TYPE
, FOR EXAMPLE":..,!..." 10 PRINT CHR$(34
)":..V! .."WILL PRINT OUT A QUOTATION MA
RK.":...!..."THE FUNCTION VAL IS HEAVILY
USED FOR"..!..."CHECKING INPUT. ONE IN
PUTS EVERYTHING".Z!..."AS CHARACTERS AND
USES VAL TO GIVE"..!..."NUMBERS AS REQU
IRED.":..'"..." 10 INPUT "Q$"ENTER A NUM
BER > 0"Q$";A$".W"..." 20 PRINT "Q$"THE
NUMBER WAS "Q$"VAL(A$)".E"...:. 433:..."
..."ENTER A NUMBER > 0";A$.."..."THE NUM
BER WAS "E(A$):. 417.R"...:."THE .MISCEL
LANEOUS FUNCTIONS. ARE:":..."..." FRE(0)
- GIVES THE AMOUNT OF FREE". #..."
MEMORY AVAILABLE":..J#..." RND(N) -
RETURNS RANDOM NUMBERS":..U#..." POS(0)
- GIVES THE POSITION OF THE"..#..."
CURSOR ON THE SCREEN":..F#..." USR
(X) - EXECUTES A USER-DEFINED"..#..."
MACHINE-LANGUAGE FUNCTION."..$...
" REFER TO YOUR USER'S MANUAL".
?$..." FOR DETAILS.":..L$..."OF
THESE, THE RND FUNCTION IS THE ONE"..$.
.."MOST COMMONLY USED. OFTEN A PROGRAM"
.G$..."WILL WANT TO DO SOMETHING PART, B
UT NOT"..$..."ALL, OF THE TIME. THE RND
FUNCTION".!%..."WILL GIVE A RANDOM NUMB
ER BETWEEN 0 AND".U%..."1 WHICH CAN BE U
SED TO MAKE DECISIONS.":. 417.S%...:."HE
RE'S AN EXAMPLE:":...%..." 10 PRINT "Q$"
START"..%..." 20 FOR I = 1 TO 30"..%..."
30 A = RND(0)"..%..." 40 IF A >= .4 THE
N PRINT "Q$"0"Q$";"..&..." 50 IF A < .4
THEN PRINT "Q$"1"Q$";".(&..." 60 NEXT I"
.U&A.." 70 PRINT:INPUT"Q$"AGAIN (Y/N)"Q$
";A$"..&B.." 80 IF A$ = "Q$"Y"Q$" THEN G
OTO 10":...&C.."ON AVERAGE, THERE SHOULD
BE TWO 0'S FOR"..&D.."EVERY THREE 1'S.
EACH TIME THIS IS RUN"..'E.."A DIFFEREN
T PATTERN SHOULD OCCUR.":.:. 433:...'F..
"START"..'G.. I.1 . 30.I'H.A..(0):. A...
4 . ."0";.]'I.. A..4 . . "1";.C'J....'K.
.:."AGAIN (Y/N)";A$:. A$."Y".A$."Y" . 19
8..'L..:. 417.L'M..:."TWO OTHER FUNCTION
S NOT YET MENTIONED"..'N.."ARE .PEEK(X).
AND .POKE Y,X.."."(O..:."WELL, POKE ISN
'T REALLY A FUNCTION, BUT".Q(P.."A STATE
MENT; NEVERTHELESS WE'LL LOOK AT".Z(Q.."
BOTH OF THEM TOGETHER. THESE TWO"..(R..
"'FUNCTIONS' ALLOW YOU TO DEAL DIRECTLY"
.P(S.."WITH THE MEMORY OF THE COMPUTER."
..(T.."PEEK(X) RETURNS THE NUMBER STORED
IN".()U.."MEMORY LOCATION X, AND POKE Y
,X PUTS".S)V.."THE VALUE X INTO MEMORY L
OCATION Y."..)W.."THESE ARE USED A GREAT
DEAL FOR CONTROL"..)X.."OF SPRITES (THE
GRAPHICS ON THE C-64)".W)Y.."AND FOR US
ING THE BUILT-IN MUSIC"..*Z.."SYNTHESIZE
R. AN EXAMPLE OF THESE IS"./*..."BEYOND
THE SCOPE OF THESE TUTORIALS,".U*..."BU
T THERE ARE SEVERAL EXAMPLES".~*..."ELSE
WHERE ON THE GOLD DISK.":. 417..*..."WE
HAVE SEEN ONE METHOD OF INITIALIZING".A*
..."VARIABLES:":...*..." 10 A1 = 0: B2 =
5: C$ = "Q$"HI THERE"Q$.!+...:."THERE I
S AN ALTERNATE METHOD...THE READ".P+..."
STATEMENT. THE .READ STATEMENT. CAUSES"
.{+..."INFORMATION FROM THE CURRENT .DAT
A."..+...".STATEMENT. TO BE PUT INTO THE
VARIABLES".Z+..."IN THE LIST. THUS THE
PREVIOUS EXAMPLE"..+..."COULD BE WRITTE
N:":...,..." 10 READ A1,B2,C$".1,..." 20
DATA 0,5,"Q$"HI THERE"Q$.`,...:."THE AD
VANTAGES OF THIS ARE GREAT. IF"..,..."O
NE WANTS TO CHANGE THE INITIALIZATION,".
.,..."ONE NEED ONLY CHANGE THE DATA STAT
EMENT."..,..."ALSO, THE DATA MAY OCCUR A
NYWHERE IN"..-..."THE PROGRAM, AND VARIA
BLES MAY BE READ".G-..."MANY TIMES, SO E
NTIRE DATABASES MAY BE".E-..."CHANGED QU
ICKLY.":. 417..-...:."WITH JUDICIOUS USE
OF THE RND FUNCTION,"..-..."A GROUP OF
VARIABLES MAY BE SET TO"..-..."CONTAIN A
VALUE CHOSEN FROM A SPECIFIC"......"SET
. FOR EXAMPLE:":..-...." 10 FOR I = 1 T
O RND(0)*3+1".F...." 20 READ A$: NEXT".F
...." 30 DATA "Q$"MESSAGE 1"Q$......" 40
DATA "Q$"MAYBE THIS ONE"Q$......" 50 DA
TA "Q$"OR THE OTHER ONE"Q$.V...." 60 DAT
A "Q$"ONE MORE TIME"Q$......" 70 PRINT A
$"../...:."THIS PROGRAM RANDOMLY CHOOSES
A MESSAGE".G/..."AND WILL GIVE DIFFEREN
T RESULTS EACH".J/..."TIME IT IS RUN.":.
:. 433:.:../... I.1 . .(0).3.1../... A$
:..P/... "MESSAGE 1","MAYBE THIS ONE","O
R THE OTHER ONE","ONE MORE TIME"../... A
$:. 417..0...:.:."ASSOCIATED WITH DATA S
TATEMENTS IS THE".;0..."RESTORE STATEMEN
T. THIS STATEMENT".I0..."MERELY TELLS B
ASIC THAT IT IS TO START"..0..."FROM THE
BEGINNING OF THE FIRST DATA".C0..."STAT
EMENT AGAIN. READ AND DATA STATE-"..0..
."MENTS ARE OCCASIONALLY USED WITH POKE"
."1..."TO CREATE MACHINE-LANGUAGE PROGRA
MS.":. 417.S1...:."BESIDE REAL AND CHARA
CTER VARIABLES, WE"..1..."ALSO HAVE .INT
EGER VARIABLES.. THESE"..1..."VARIABLES
MAY CONTAIN ONLY INTEGERS,"..1..."THAT
IS NO FRACTIONAL PARTS ARE ALLOWED"..2..
."AND THE NUMBERS MAY ONLY BE IN THE".42
..."RANGE -32767 TO 32767. THESE VARIAB
LES".C2..."ARE DESIGNATED BY A PERCENT S
IGN (%) AT"..2..."THE END OF THE VARIABL
E NAME."..2..."(EG. A1%, TA%, ETC)".O2..
.:."ARITHMETIC OPERATIONS PERFORMED ON".
.2..."INTEGER VARIABLES TAKE MORE TIME,"
. 3..."BECAUSE BASIC MUST CONVERT THESE"
.K3..."NUMBERS INTO REAL NUMBERS BEFORE
IT".X3..."DOES ANYTHING WITH THEM. WITH
ALL OF"..3..."THESE RESTRICTIONS AND DR
AWBACKS, YOU".W3..."MIGHT WELL ASK WHY B
OTHER WITH THEM.":. 417..4...:."THE ANSW
ER IS SPACE. YOUR C-64 HAS 64K".04..."W
ORDS OF MEMORY, OR 65536 MEMORY".Z4..."L
OCATIONS. BASIC ITSELF USES UP A"..4...
"LARGE CHUNK OF THAT (ABOUT 8K) AND"..4.
.."OTHER SYSTEM ROUTINES USE UP MORE."..
4..."IF YOU ARE WRITING A LARGE PROGRAM
WITH"..5..."A LARGE NUMBER OF VARIABLES,
THEN YOU".65 .."COULD EASILY RUN OUT OF
MEMORY. FOR".^5!.."EXAMPLE:":.:." 10 D
IM A(20000)":...5".."WILL ALWAYS CAUSE Y
OUR PROGRAM TO BOMB"..5#.."OUT WITH AN O
UT OF MEMORY ERROR.":. 417..5$..:."EACH
REAL VARIABLE OR ARRAY ELEMENT IN"..6%..
"BASIC USES 5 WORDS OF MEMORY. HOWEVER"
.F6&.."EACH INTEGER VARIABLE OR ARRAY EL
EMENT".U6'.."USES ONLY 2 WORDS OF MEMORY
. THIS IS A"..6(.."SIGNIFICANT SAVING I
F YOUR PROGRAM USES".R6).."MANY VARIABLE
S. MOST PROGRAMS CONTAIN"..7*.."DATA IT
EMS THAT REALLY ARE INTEGERS (NO".07+.."
FRACTIONAL PART) BUT ARE REPRESENTED BY"
.Z7,.."REALS. THE ONLY PRACTICAL USE FO
R"..7-.."INTEGERS IN BASIC IS WHEN YOU A
RE"..7..."RUNNING OUT OF MEMORY.":. 417.
W7/..:."IN LAST MONTH'S TUTORIAL, WE DIS
CUSSED"..80.."ARRAYS. THESE GROUPINGS O
F LIKE DATA".081.."WERE FOUND TO BE A CO
NVENIENT WAY TO".Z82.."STORE AND MANIPUL
ATE SOME TYPES OF"..83.."INFORMATION. W
E SHOULD NOW CONSIDER A"..84.."MATRIX.":
..G85.."IF ONE WERE TO DRAW UP A CHART O
F, FOR"..86.."EXAMPLE, THE MAKE OF A COM
PUTER VERSUS".$97.."THE OPTIONS AVAILABL
E ON THAT COMPUTER,".L98.."THE RESULT WO
ULD BE ONE OF THOSE".Z99.."DIAGRAMS MUCH
LOVED BY ADVERTISERS AND"..9:.."COMPARI
SON-SHOPPING MOGULS. THIS SORT".T9;.."O
F A CHART, WHICH LOOKS A BIT LIKE A"..:<
.."CROSSWORD, IS CALLED A MATRIX, OR .TW
O-.".&:=..".DIMENSIONAL ARRAY..":. 417.X
:>..:."BASIC ALLOWS YOU TO CREATE SUCH A
THING:".P:?.." 10 DIM A(4,3)":...:@.."T
HIS STATEMENT SAYS THAT THE ARRAY A IS".
K:A.."TO HAVE 5 ROWS (0...4), EACH WITH
4 "..:B.."COLUMNS (0...3),OF ELEMENTS.".
.;C..:."IF YOU WANTED TO PROGRAM A GAME
LIKE".H;D.."BATTLESHIPS, YOU WOULD PROBA
BLY USE".T;E.."SOMETHING LIKE THIS TO RE
PRESENT THE"..;F.."BOARD. BASIC ALLOWS
ANY NUMBER OF".H;G.."DIMENSIONS IN AN AR
RAY, BUT HIGHER"..;H.."DIMENSIONS OF ARR
AYS ARE RARELY USED.":. 417.&<I..:."FREQ
UENTLY, A PROGRAM WILL HAVE A".S<J.."SEC
TION OF CODE THAT IS REPEATED OVER".}<K.
."AND OVER IN DIFFERENT PLACES. ONE"..<
L.."EXAMPLE WOULD BE:":..G<M.." 100 INPU
T "Q$"ANSWER...(YES/NO)"Q$";A$"..=N.." 1
10 IF A$<>"Q$"YES"Q$" AND A$<>"Q$"NO"Q$"
THEN PRINT "Q$;.4=O.."YES OR NO ONLY PL
EASE"Q$":GOTO 100":..C=P.."THIS SHORT SE
GMENT PROMPTS FOR A YES/NO"..=Q.."RESPON
SE, READS INPUT, CHECKS TO SEE IF"..=R..
"IT'S EITHER YES OR NO, AND TRIES AGAIN"
..=S.."IF NEITHER. IT COULD BE USED IN
MANY"..>T.."APPLICATIONS. CONSIDER A QU
ESTIONNAIRE".D>U.."WHERE THERE WOULD LIK
ELY BE MANY".P>V.."QUESTIONS THAT REQUIR
ED THIS SORT OF"..>W.."RESPONSE FROM A U
SER.":. 417.C>X..:."IF THE PROGRAM WERE
TO HAVE TO INCLUDE"..>Y.."THESE TWO LINE
S EVERY TIME THERE WAS A"..?Z.."QUESTION
, THE PROGRAM WOULD QUICKLY".G?[.."BECOM
E VERY LARGE. THERE SHOULD BE".R?\.."SO
ME METHOD OF USING THE SAME LINES"..?]..
"OVER, SINCE THEY'RE THE SAME. ONE".F?^
.."COULD GOTO THE LINES, BUT THEN YO."..
?_.."COULDN'T GET BACK TO WHERE YOU WERE
.":.."@`.."THE SOLUTION IS A NEW BRANCHI
NG STATE-".P@A.."MENT .GOSUB., WHICH IS
SHORT FOR GO TO".}@B.."SUBROUTINE. THIS
STATEMENT ACTS JUST"..@C.."LIKE A GOTO
STATEMENT, BUT IT REMEMBERS".W@D.."WHERE
IT CAME FROM. THE SECTION OF"..AE.."CO
DE THAT ONE GOSUBS TO IS CALLED A"..AF..
"SUBROUTINE, AND IT HAS THE STATEMENT".[
AG..".RETURN. AS ITS LAST STATEMENT. TH
IS"..AH.."TELLS IT TO GO BACK TO THE PLA
CE IN"..AI.."THE PROGRAM THAT IT CAME FR
OM.":. 417.NAJ..:."USING THIS IDEA:":...
BK.." 10 PRINT "Q$"DO YOU OWN A COMPUTER
"Q$": GOSUB 100".PBL.." 20 IF A$ = "Q$"Y
ES"Q$" THEN PRINT "Q$"DO YOU OWN A COMMO
DORE"Q$;.|BM..": GOSUB 100":.:." ..
. ETC ...":...BN.." 100 INPUT "Q$"ANSWER
...(YES/NO)"Q$";A$"..BO.." 110 IF A$<>"Q
$"YES"Q$" AND A$<>"Q$"NO"Q$" THEN PRINT
"Q$;.+CP.."YES OR NO ONLY PLEASE"Q$":GOT
O 100":." 120 RETURN":. 417.ZCQ..:."THE
SUBROUTINE INTRODUCES THE IDEA OF"..CR..
"MODULAR PROGRAMMING; THAT IS, HAVING"..
CS.."SMALL SECTIONS OF CODE THAT EACH"..
CT.."ACCOMPLISH A SMALL, SPECIFIC TASK.
A"..DU.."SHORT SUBROUTINE TO READ IN NU
MBERS;".3DV.."ONE TO MAKE A CHARACTER ST
RING A SET".`DW.."LENGTH, ETC. THIS IS
EASIER TO DO IN"..DX.."OTHER LANGUAGES,
BUT YOU CAN DO IT IN"..DY.."BASIC IF YOU
TAKE CARE IN PROGRAMMING,"..DZ.."AND TH
E BENEFITS ARE GREAT: EASE OF"..E{.."MO
DIFICATION, SIMPLICITY, AND MORE".;E|.."
STRAIGHTFORWARD MAINTENANCE, AMONG".PE}.
."OTHERS.":. 417.}E~..:."IN THESE TUTORI
ALS WE HAVE TRIED TO"..E.."GIVE YOU SOM
E INSIGHT INTO HOW BASIC".TE..."WORKS, A
S WELL AS DEMONSTRATING THE"..F..."LANGU
AGE. NOT ALL OF BASIC HAS BEEN"..F..."C
OVERED: WE HAVE OMITTED THE COMMANDS".]
F..."THAT DEAL DIRECTLY WITH I/O TO A DE
VICE"..F..."SUCH AS A DISK DRIVE. ALL O
F THE BASIC"..F..."STATEMENTS ARE COVERE
D IN MUCH MORE"..F..."DETAIL IN THE COMM
ODORE PROGRAMMERS"..G..."REFERENCE MANUA
L, WHICH IS A VERY GOOD".<G..."BOOK, AND
SHOULD BE EASY TO READ NOW".JG..."THAT
YOU'VE COMPLETED THESE TUTORIALS."..G...
:."GOOD LUCK AND KEEP COMPUTING.":. 417.
DG...:."AND HERE'S THIS MONTH'S LITTLE Q
UIZ"..G..."ON THE MATERIAL OF THE TUTORI
AL.":.:...H..."WHAT IS PRINTED BY THE FO
LLOWING:":..AH..." 10 A$ = "Q$"ZAPHOD BE
EBLEBROX".XH..." 20 PRINT RIGHT$(A$,10)
"Q$" "Q$" LEFT$(A$,6)":...H..A1$."BEEBLE
BROX ZAPHOD":A2$."BEEBLEBROX ZAPHOD":."A
NSWER";:. 428.ZH...:." 10 X = 5/3: X% =
X"..I..." 20 IF X% > 1 THEN PRINT "Q$"1.
66"Q$.0I..." 30 IF X% <= 1 THEN PRINT "Q
$"1"Q$:..[I..A1$."1":A2$.A1$:."ANSWER";:
. 428:. 417..I..."HOW MANY MEMORY LOCATI
ONS (WORDS OF"..I..."MEMORY) ARE USED BY
:":..YI..." DIM X(3)":.:A1$."20":A2$.A1$
:."ANSWER";:. 428..J...:." DIM A%(2,2)":
.:A1$."18":A2$.A1$:."ANSWER";:. 428..J..
. 417.MJ...:."DOES THE GOTO STATEMENT RE
MEMBER WHERE".{J..."IT CAME FROM";:A1$."
NO":A2$."NO":.428:...J..."WHAT DOES THE
FOLLOWING PRINT:":..QJ..." 10 POKE 16423
,7: PRINT PEEK (16423)":...J..A1$."7":A2
$.A1$:."ANSWER";:.428:. 417./K..."......
.. THAT'S ALL, FOLKS ...":. 417.
BK .. ".": . 49152..K..SP.SP.1:.".......
..................TYPE ANY KEY TO CONTIN
UE";..K...KEY$:.KEY$."".418..K...KEY$."_
".416.FK...KEY$."^".SP..2.SP.1..K...KEY$
."^".SP.2.SP.SP.2..K...".";:.53280,.(1).
15.5L... SP . 6,21,39,49,66,81,95,109,13
0,143,156,170,186,205.RL...(SP.14).222,2
40,258,265,281,292,303,318,329,344,362,3
69..L...(SP.26).382,395,405,410,415..L..
. 416..L..."ERROR***ERROR***ERROR":..UL.
.NU.0:ANSW$."":.198,0..M... ANSW$:. ANSW
$.A1$ . ANSW$.A2$. ." .CORRECT
":..&M...ANSW$."_".416.CM..."NO..THAT'S
NOT IT";:NU.NU.1:.NU.4.."..TRY AGAIN";:.
429..M...:."THE CORRECT ANSWER IS...";A1
$:...M..."TYPE ANY KEY TO EXECUTE THE PR
OGRAM";.NM...KEY$:.KEY$."".434..M...KEY$
."_".416..M...:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL