VOLUME.3

00000000: 01 1C 3E 1C 0A 00 8F 20  22 C9 20 41 4D 20 41 20  |..>.... ". AM A |
00000010: C3 31 32 38 20 56 4F 4C  55 4D 45 20 33 20 53 48  |.128 VOLUME 3 SH|
00000020: 45 4C 4C 20 32 2E 33 20  56 45 52 53 49 4F 4E 20  |ELL 2.3 VERSION |
00000030: 30 34 2F 32 31 2F 38 36  20 31 33 3A 31 30 00 6D  |04/21/86 13:10.m|
00000040: 1C 14 00 8F 20 22 57 52  49 54 54 45 4E 20 42 59  |.... "WRITTEN BY|
00000050: 20 C2 52 55 43 45 20 CD  4F 52 47 41 4E 20 41 4E  | .RUCE .ORGAN AN|
00000060: 44 20 C5 44 57 49 4E 20  D2 45 49 43 48 00 8E 1C  |D .DWIN .EICH...|
00000070: 1E 00 8F 20 22 43 4F 50  59 52 49 47 48 54 20 31  |... "COPYRIGHT 1|
00000080: 39 38 36 20 C1 43 54 49  56 49 53 49 4F 4E 00 B1  |986 .CTIVISION..|
00000090: 1C 32 00 89 20 31 31 31  39 31 3A 8F 20 53 54 41  |.2.. 11191:. STA|
000000A0: 52 54 20 41 54 20 56 4F  4C 55 4D 45 20 4D 45 4E  |RT AT VOLUME MEN|
000000B0: 55 00 D0 1C 64 00 8F 20  2D 2D 2D 2D 2D 20 43 48  |U...d.. ----- CH|
000000C0: 45 43 4B 20 46 4F 52 20  4B 45 59 50 52 45 53 53  |ECK FOR KEYPRESS|
000000D0: 00 EE 1C 6C 00 4B 42 B2  AB 31 3A 53 44 B2 30 3A  |...l.KB..1:SD.0:|
000000E0: A1 4B 42 24 3A 8B 4B 42  24 B2 22 22 A7 8E 00 01  |.KB$:.KB$.""....|
000000F0: 1D 74 00 8B 4B 42 24 B2  48 50 24 A7 31 30 30 30  |.t..KB$.HP$.1000|
00000100: 30 00 17 1D 76 00 4B 42  B2 53 4B 28 D4 28 53 4B  |0...v.KB.SK(.(SK|
00000110: 24 2C 4B 42 24 29 29 00  32 1D 78 00 8B 4B 42 B2  |$,KB$)).2.x..KB.|
00000120: 33 A7 53 44 B2 31 3A D5  8B 4B 42 B1 30 A7 53 44  |3.SD.1:..KB.0.SD|
00000130: B2 32 00 48 1D 80 00 91  4B 42 89 36 30 30 30 30  |.2.H....KB.60000|
00000140: 2C 36 30 35 30 30 3A 8E  00 70 1D 96 00 8F 20 2D  |,60500:..p.... -|
00000150: 2D 2D 2D 2D 20 57 41 49  54 20 46 4F 52 20 41 20  |---- WAIT FOR A |
00000160: 4B 45 59 42 4F 41 52 44  20 43 4F 4D 4D 41 4E 44  |KEYBOARD COMMAND|
00000170: 00 8C 1D A0 00 97 32 30  38 2C 30 3A EB 3A 8D 31  |......208,0:.:.1|
00000180: 30 30 3A EC FD 4B 42 B3  B2 30 3A 8E 00 A9 1D C8  |00:..KB..0:.....|
00000190: 00 8F 20 2D 2D 2D 2D 2D  20 57 41 49 54 20 46 4F  |.. ----- WAIT FO|
000001A0: 52 20 41 4E 59 20 4B 45  59 00 C5 1D D2 00 97 32  |R ANY KEY......2|
000001B0: 30 38 2C 30 3A EB 3A 8D  31 30 30 3A EC FD 4B 42  |08,0:.:.100:..KB|
000001C0: B2 AB 31 3A 8E 00 FE 1D  FA 00 8F 20 2D 2D 2D 2D  |..1:....... ----|
000001D0: 2D 20 44 45 4C 41 59 20  46 4F 52 20 28 44 56 29  |- DELAY FOR (DV)|
000001E0: 20 4C 4F 4F 50 53 20 57  48 49 4C 45 20 43 48 45  | LOOPS WHILE CHE|
000001F0: 43 4B 49 4E 47 20 4B 45  59 42 4F 41 52 44 00 24  |CKING KEYBOARD.$|
00000200: 1E FE 00 97 32 30 38 2C  30 3A 81 44 56 B2 44 56  |....208,0:.DV.DV|
00000210: A4 30 A9 AB 31 3A 8D 31  30 30 3A 8B 4B 42 B3 31  |.0..1:.100:.KB.1|
00000220: A7 82 44 56 00 2A 1E 06  01 8E 00 76 1E 36 01 8F  |..DV.*.....v.6..|
00000230: 20 2D 2D 2D 2D 2D 20 43  45 4E 54 45 52 20 55 50  | ----- CENTER UP|
00000240: 24 28 55 50 29 20 4F 4E  20 32 34 20 49 4E 20 57  |$(UP) ON 24 IN W|
00000250: 48 49 54 45 2C 20 44 4F  45 53 4E 27 54 20 43 48  |HITE, DOESN'T CH|
00000260: 41 4E 47 45 20 43 4F 4C  4F 52 20 4F 52 20 50 4F  |ANGE COLOR OR PO|
00000270: 53 49 54 49 4F 4E 00 AB  1E 38 01 8B CC 28 30 29  |SITION...8...(0)|
00000280: B2 30 B0 47 53 B3 32 35  A7 FE 18 3A 99 C7 28 32  |.0.GS.25...:..(2|
00000290: 37 29 22 4F 22 3B 3A 81  49 B2 30 A4 37 3A 49 28  |7)"O";:.I.0.7:I(|
000002A0: 49 29 B2 C2 28 32 32 34  AA 49 29 00 DD 1E 3B 01  |I)..(224.I)...;.|
000002B0: 82 3A 49 B2 B9 28 58 29  3A 4A B2 C2 28 32 33 35  |.:I..(X):J..(235|
000002C0: 29 3A 4B B2 CD 28 35 29  3A E7 35 2C 46 31 3A FE  |):K..(5):.5,F1:.|
000002D0: 1A 30 2C 32 34 2C 33 39  2C 32 34 2C 31 00 0F 1F  |.0,24,39,24,1...|
000002E0: 40 01 99 A3 32 30 AB C3  28 55 50 24 28 55 50 29  |@...20..(UP$(UP)|
000002F0: 29 AD 32 29 55 50 24 28  55 50 29 3B 3A E7 35 2C  |).2)UP$(UP);:.5,|
00000300: 4B 3A 97 32 33 35 2C 4A  3A 97 32 33 36 2C 49 00  |K:.235,J:.236,I.|
00000310: 42 1F 45 01 81 49 B2 30  A4 37 3A 97 32 32 34 AA  |B.E..I.0.7:.224.|
00000320: 49 2C 49 28 49 29 3A 82  3A FE 19 3A D5 FE 18 49  |I,I(I):.:..:...I|
00000330: B2 C2 28 34 34 34 36 29  3A 4A B2 C2 28 34 34 34  |..(4446):J..(444|
00000340: 37 29 00 7E 1F 4A 01 4B  B2 CD 28 31 29 3A E7 31  |7).~.J.K..(1):.1|
00000350: 2C 46 31 3A E0 2C 30 2C  32 34 2C 53 50 24 3A E0  |,F1:.,0,24,SP$:.|
00000360: 2C 32 30 AB C3 28 55 50  24 28 55 50 29 29 AD 32  |,20..(UP$(UP)).2|
00000370: 2C 32 34 2C 4C 24 AA 55  50 24 28 55 50 29 00 9A  |,24,L$.UP$(UP)..|
00000380: 1F 4F 01 E7 31 2C 4B 3A  97 34 34 34 36 2C 49 3A  |.O..1,K:.4446,I:|
00000390: 97 34 34 34 37 2C 4A 3A  FE 19 00 A0 1F 54 01 8E  |.4447,J:.....T..|
000003A0: 00 D0 1F 90 01 8F 20 2D  2D 2D 2D 2D 20 43 59 43  |...... ----- CYC|
000003B0: 4C 45 20 47 55 49 44 45  20 41 4E 44 20 57 41 49  |LE GUIDE AND WAI|
000003C0: 54 20 46 4F 52 20 41 20  4B 45 59 50 52 45 53 53  |T FOR A KEYPRESS|
000003D0: 00 FB 1F 9A 01 8D 39 30  30 3A 8D 33 31 30 3A 8D  |......900:.310:.|
000003E0: 31 35 30 3A 55 31 B2 55  50 3A 55 50 B2 30 3A 8D  |150:U1.UP:UP.0:.|
000003F0: 33 31 30 3A 55 50 B2 55  31 3A 8E 00 20 20 F4 01  |310:UP.U1:..  ..|
00000400: 8F 20 2D 2D 2D 2D 2D 20  45 4E 41 42 4C 45 20 53  |. ----- ENABLE S|
00000410: 50 52 49 54 45 53 20 46  52 4F 4D 20 48 53 28 29  |PRITES FROM HS()|
00000420: 00 3A 20 FE 01 81 49 B2  31 A4 38 3A FE 07 49 2C  |.: ...I.1.8:..I,|
00000430: 48 53 28 49 29 3A 82 49  3A 8E 00 75 20 58 02 8F  |HS(I):.I:..u X..|
00000440: 20 2D 2D 2D 2D 2D 20 44  49 53 41 42 4C 45 20 53  | ----- DISABLE S|
00000450: 50 52 49 54 45 53 20 41  4E 44 20 53 41 56 45 20  |PRITES AND SAVE |
00000460: 45 4E 41 42 4C 45 20 53  54 41 54 55 53 20 49 4E  |ENABLE STATUS IN|
00000470: 20 48 53 28 29 00 99 20  62 02 81 49 B2 31 A4 38  | HS().. b..I.1.8|
00000480: 3A 48 53 28 49 29 B2 CE  06 28 49 2C 30 29 3A FE  |:HS(I)...(I,0):.|
00000490: 07 49 2C 30 3A 82 49 3A  8E 00 CF 20 84 03 8F 20  |.I,0:.I:... ... |
000004A0: 2D 2D 2D 2D 2D 20 50 4F  53 49 54 49 4F 4E 20 47  |----- POSITION G|
000004B0: 55 49 44 45 20 41 4E 44  20 43 59 43 4C 45 20 54  |UIDE AND CYCLE T|
000004C0: 48 52 4F 55 47 48 20 4D  4F 56 45 4D 45 4E 54 00  |HROUGH MOVEMENT.|
000004D0: 06 21 8E 03 81 49 B2 31  A4 53 46 3A FE 06 49 2C  |.!...I.1.SF:..I,|
000004E0: 53 58 28 30 29 AA 53 58  28 49 29 2C 53 59 28 30  |SX(0).SX(I),SY(0|
000004F0: 29 AA 53 59 28 49 29 3A  82 49 3A 8B 53 50 B1 53  |).SY(I):.I:.SP.S|
00000500: 53 A7 53 50 B2 30 00 3B  21 A7 03 81 49 B2 31 A4  |S.SP.0.;!...I.1.|
00000510: 53 46 3A FE 16 47 55 24  28 49 2C 53 50 29 2C 49  |SF:..GU$(I,SP),I|
00000520: 3A FE 07 49 2C 31 3A 48  53 28 49 29 B2 31 3A 82  |:..I,1:HS(I).1:.|
00000530: 49 3A 53 50 B2 53 50 AA  31 3A 8E 00 5A 21 E8 03  |I:SP.SP.1:..Z!..|
00000540: 8F 20 2D 2D 2D 2D 2D 20  56 4F 4C 55 4D 45 20 53  |. ----- VOLUME S|
00000550: 43 52 45 45 4E 20 4C 4F  4F 50 00 8F 21 F2 03 EB  |CREEN LOOP..!...|
00000560: 3A 52 53 B2 30 3A 55 50  B2 31 3A 47 4D B2 47 4D  |:RS.0:UP.1:GM.GM|
00000570: 28 43 53 29 3A 47 53 B2  47 53 28 43 53 29 3A 47  |(CS):GS.GS(CS):G|
00000580: 50 B2 47 50 28 43 53 29  3A 8D 36 30 37 30 30 00  |P.GP(CS):.60700.|
00000590: AA 21 F7 03 49 B2 54 4D  3A 8B 47 53 B3 B1 30 AF  |.!..I.TM:.GS..0.|
000005A0: 47 53 B3 32 30 A7 49 B2  47 53 00 D6 21 13 04 FE  |GS.20.I.GS..!...|
000005B0: 1A 30 2C 49 2C 33 39 2C  32 34 2C 31 3A 8D 31 31  |.0,I,39,24,1:.11|
000005C0: 30 30 3A 8B 28 52 53 AF  31 29 B2 30 A7 55 50 B2  |00:.(RS.1).0.UP.|
000005D0: 31 3A 8D 34 30 30 00 FF  21 29 04 8B 4B 42 B3 B1  |1:.400..!)..KB..|
000005E0: 34 A7 43 53 B2 43 53 AA  31 3A D5 8B 28 52 53 AF  |4.CS.CS.1:..(RS.|
000005F0: 32 35 34 29 B3 B1 32 A7  43 53 B2 43 53 AB 31 00  |254)..2.CS.CS.1.|
00000600: 25 22 2E 04 EC FC 28 43  53 B3 31 B0 43 53 B1 4D  |%"....(CS.1.CS.M|
00000610: 53 29 3A 8B 43 53 B2 30  A7 36 30 35 30 30 3A D5  |S):.CS.0.60500:.|
00000620: 36 30 30 30 30 00 45 22  4C 04 8F 20 2D 2D 2D 2D  |60000.E"L.. ----|
00000630: 2D 20 56 4F 4C 55 4D 45  20 33 20 44 49 53 50 41  |- VOLUME 3 DISPA|
00000640: 54 43 48 45 52 00 57 22  51 04 8B 20 43 53 B3 B2  |TCHER.W"Q.. CS..|
00000650: 31 30 20 A7 20 FE 18 00  A1 22 56 04 3A 20 20 91  |10 . ...."V.:  .|
00000660: 20 43 53 20 8D 20 31 31  30 30 30 2C 31 32 30 30  | CS . 11000,1200|
00000670: 30 2C 31 33 30 30 30 2C  31 34 30 30 30 2C 31 35  |0,13000,14000,15|
00000680: 30 30 30 2C 31 36 30 30  30 2C 31 37 30 30 30 2C  |000,16000,17000,|
00000690: 31 38 30 30 30 2C 31 39  30 30 30 2C 32 30 30 30  |18000,19000,2000|
000006A0: 30 00 AB 22 5B 04 3A 20  20 FE 19 00 C5 22 60 04  |0.."[.:  ...."`.|
000006B0: 8B 20 43 53 B1 31 30 20  AF 20 43 53 B3 B2 32 30  |. CS.10 . CS..20|
000006C0: 20 A7 20 FE 18 00 0F 23  65 04 3A 20 20 91 43 53  | . ....#e.:  .CS|
000006D0: AB 31 30 8D 32 31 30 30  30 2C 32 32 30 30 30 2C  |.10.21000,22000,|
000006E0: 32 33 30 30 30 2C 32 34  30 30 30 2C 32 35 30 30  |23000,24000,2500|
000006F0: 30 2C 32 35 35 30 30 2C  32 36 30 30 30 2C 32 37  |0,25500,26000,27|
00000700: 30 30 30 2C 32 38 30 30  30 2C 32 39 30 30 30 00  |000,28000,29000.|
00000710: 19 23 6A 04 3A 20 20 FE  19 00 1F 23 AF 04 8E 00  |.#j.:  ....#....|
00000720: 55 23 B0 04 8F 20 2D 2D  2D 2D 2D 20 46 4C 41 53  |U#... ----- FLAS|
00000730: 48 20 43 55 52 53 4F 52  20 57 48 49 4C 45 20 57  |H CURSOR WHILE W|
00000740: 41 49 54 49 4E 47 20 46  4F 52 20 41 20 4B 45 59  |AITING FOR A KEY|
00000750: 50 52 45 53 53 00 89 23  B4 04 FE 02 31 35 3A 43  |PRESS..#....15:C|
00000760: 41 B2 C2 28 32 32 34 29  AA C2 28 32 32 35 29 AC  |A..(224)..(225).|
00000770: 32 35 36 AA C2 28 32 33  36 29 3A 43 4F B2 C2 28  |256..(236):CO..(|
00000780: 43 41 29 3A 43 42 B2 43  4F 00 C6 23 BC 04 4E 41  |CA):CB.CO..#..NA|
00000790: B2 28 43 41 AF 31 30 32  33 29 AA 35 35 32 39 36  |.(CA.1023).55296|
000007A0: 3A 4E 4F B2 C2 28 4E 41  29 3A 97 4E 41 2C CD 28  |:NO..(NA):.NA,.(|
000007B0: 35 29 AB 31 3A EB 3A 43  42 B2 28 43 42 AA 31 32  |5).1:.:CB.(CB.12|
000007C0: 38 29 AF 32 35 35 00 EA  23 C6 04 97 43 41 2C 43  |8).255..#...CA,C|
000007D0: 42 3A 81 44 56 B2 31 A4  31 30 3A 8D 31 30 30 3A  |B:.DV.1.10:.100:|
000007E0: 8B 4B 42 B2 AB 31 A7 82  44 56 00 06 24 CE 04 EC  |.KB..1..DV..$...|
000007F0: FD 4B 42 B2 AB 31 3A 97  43 41 2C 43 4F 3A 97 4E  |.KB..1:.CA,CO:.N|
00000800: 41 2C 4E 4F 3A 8E 00 4E  24 E2 04 8F 20 2D 2D 2D  |A,NO:..N$... ---|
00000810: 2D 2D 20 46 4C 41 53 48  20 43 55 52 53 4F 52 20  |-- FLASH CURSOR |
00000820: 57 48 49 4C 45 20 57 41  49 54 49 4E 47 20 46 4F  |WHILE WAITING FO|
00000830: 52 20 41 20 53 50 45 43  49 41 4C 20 4B 45 59 20  |R A SPECIAL KEY |
00000840: 28 45 58 43 45 50 54 20  53 50 41 43 45 29 00 6B  |(EXCEPT SPACE).k|
00000850: 24 EC 04 EB 3A 8D 31 32  30 30 3A EC FD 4B 42 24  |$...:.1200:..KB$|
00000860: B2 22 20 22 B0 53 44 B2  30 3A 8E 00 B6 24 14 05  |." ".SD.0:...$..|
00000870: 8F 20 2D 2D 2D 2D 2D 20  41 43 43 45 50 54 20 49  |. ----- ACCEPT I|
00000880: 4E 50 55 54 20 28 41 24  29 20 4F 46 20 4C 45 4E  |NPUT (A$) OF LEN|
00000890: 47 54 48 20 43 4C 20 41  54 20 43 58 2C 43 59 20  |GTH CL AT CX,CY |
000008A0: 57 49 54 48 20 44 45 4C  45 54 45 20 41 4E 44 20  |WITH DELETE AND |
000008B0: 52 45 54 55 52 4E 00 F3  24 17 05 97 32 33 36 2C  |RETURN..$...236,|
000008C0: 43 58 3A 97 32 33 35 2C  43 59 3A 49 B2 43 59 AC  |CX:.235,CY:I.CY.|
000008D0: 34 30 3A 97 32 32 34 2C  49 AB B5 28 49 AD 32 35  |40:.224,I..(I.25|
000008E0: 36 29 AC 32 35 36 3A 97  32 32 35 2C 49 AD 32 35  |6).256:.225,I.25|
000008F0: 36 AA 34 00 12 25 1B 05  97 32 32 36 2C C2 28 32  |6.4..%...226,.(2|
00000900: 32 34 29 3A 97 32 32 37  2C 49 AD 32 35 36 AA 32  |24):.227,I.256.2|
00000910: 31 36 00 5E 25 1E 05 8F  20 2D 2D 2D 2D 2D 20 41  |16.^%... ----- A|
00000920: 43 43 45 50 54 20 49 4E  50 55 54 20 28 41 24 29  |CCEPT INPUT (A$)|
00000930: 20 4F 46 20 4C 45 4E 47  54 48 20 43 4C 20 41 54  | OF LENGTH CL AT|
00000940: 20 43 55 52 53 4F 52 20  57 49 54 48 20 44 45 4C  | CURSOR WITH DEL|
00000950: 45 54 45 20 41 4E 44 20  52 45 54 55 52 4E 00 85  |ETE AND RETURN..|
00000960: 25 22 05 97 32 30 38 2C  30 3A 41 24 B2 22 22 3A  |%"..208,0:A$."":|
00000970: EB 3A 8D 31 32 30 30 3A  8B 4B 42 24 B2 22 20 22  |.:.1200:.KB$." "|
00000980: A7 4B 42 B2 30 00 92 25  2C 05 8B 4B 42 B2 30 A7  |.KB.0..%,..KB.0.|
00000990: FE 18 00 C7 25 2E 05 8B  28 28 4B 42 24 B1 C7 28  |....%...((KB$..(|
000009A0: 33 31 29 AF 4B 42 24 B3  C7 28 31 32 39 29 29 B0  |31).KB$..(129)).|
000009B0: 4B 42 24 B1 C7 28 31 35  39 29 29 AF C3 28 41 24  |KB$..(159))..(A$|
000009C0: 29 B3 43 4C A7 FE 18 00  DE 25 30 05 99 4B 42 24  |).CL.....%0..KB$|
000009D0: 3B 3A 41 24 B2 41 24 AA  4B 42 24 3A FE 19 00 0A  |;:A$.A$.KB$:....|
000009E0: 26 36 05 8B 4B 42 24 B2  C7 28 32 30 29 AF C3 28  |&6..KB$..(20)..(|
000009F0: 41 24 29 B1 30 A7 FE 18  8B C3 28 41 24 29 B2 31  |A$).0.....(A$).1|
00000A00: A7 41 24 B2 22 22 3A D5  FE 18 00 22 26 3E 05 41  |.A$."":...."&>.A|
00000A10: 24 B2 C8 28 41 24 2C C3  28 41 24 29 AB 31 29 3A  |$..(A$,.(A$).1):|
00000A20: FE 19 00 2F 26 42 05 99  4B 42 24 3B 3A FE 19 00  |.../&B..KB$;:...|
00000A30: 36 26 46 05 FE 19 00 43  26 48 05 EC FD 4B 42 B2  |6&F....C&H...KB.|
00000A40: 30 3A 8E 00 6C 26 78 05  8F 20 2D 2D 2D 2D 2D 20  |0:..l&x.. ----- |
00000A50: 41 43 43 45 50 54 20 43  55 52 53 4F 52 20 41 4E  |ACCEPT CURSOR AN|
00000A60: 44 20 41 52 52 4F 57 20  4B 45 59 53 00 A2 26 7B  |D ARROW KEYS..&{|
00000A70: 05 FE 1A 30 2C 47 53 2C  33 39 2C 32 33 3A 49 B2  |...0,GS,39,23:I.|
00000A80: 28 32 34 AB 47 53 29 AD  32 AA 47 53 3A 97 32 33  |(24.GS).2.GS:.23|
00000A90: 36 2C 31 39 3A 97 32 33  35 2C 49 3A 49 B2 49 AC  |6,19:.235,I:I.I.|
00000AA0: 34 30 00 D5 26 84 05 97  32 32 34 2C 49 AB 28 B5  |40..&...224,I.(.|
00000AB0: 28 49 AD 32 35 36 29 AC  32 35 36 29 3A 97 32 32  |(I.256).256):.22|
00000AC0: 35 2C 49 AD 32 35 36 AA  34 3A 97 32 32 36 2C C2  |5,I.256.4:.226,.|
00000AD0: 28 32 32 34 29 00 F4 26  8A 05 97 32 32 37 2C 49  |(224)..&...227,I|
00000AE0: AD 32 35 36 AA 32 31 36  3A 97 32 30 38 2C 30 3A  |.256.216:.208,0:|
00000AF0: 8D 33 31 30 00 29 27 90  05 41 24 B2 C7 28 31 34  |.310.)'..A$..(14|
00000B00: 35 29 AA C7 28 31 37 29  AA C7 28 31 35 37 29 AA  |5)..(17)..(157).|
00000B10: C7 28 32 39 29 3A 99 43  24 28 46 32 29 53 30 24  |.(29):.C$(F2)S0$|
00000B20: 3B 3A EB 3A 8D 31 32 30  30 00 52 27 98 05 8B 28  |;:.:.1200.R'...(|
00000B30: 43 58 B2 30 B0 43 58 B2  4B 58 29 AF D4 28 41 24  |CX.0.CX.KX)..(A$|
00000B40: 2C 4B 42 24 29 B1 30 A7  99 4B 42 24 3B 3A 4B 42  |,KB$).0..KB$;:KB|
00000B50: B2 30 00 6B 27 A0 05 EC  FD 4B 42 B2 30 3A 99 43  |.0.k'....KB.0:.C|
00000B60: 24 28 46 31 29 53 31 24  3B 3A 8E 00 B7 27 AA 05  |$(F1)S1$;:...'..|
00000B70: 8F 20 2D 2D 2D 2D 2D 20  50 52 4F 4D 50 54 20 55  |. ----- PROMPT U|
00000B80: 53 45 52 20 46 4F 52 20  52 45 54 55 52 4E 2C 20  |SER FOR RETURN, |
00000B90: 57 41 49 54 20 46 4F 52  20 41 20 53 50 45 43 49  |WAIT FOR A SPECI|
00000BA0: 41 4C 20 4E 4F 4E 2D 53  50 41 43 45 20 28 57 2F  |AL NON-SPACE (W/|
00000BB0: 43 55 52 53 4F 52 29 00  DE 27 AF 05 55 50 B2 32  |CURSOR)..'..UP.2|
00000BC0: 3A 8D 33 31 30 3A 8D 39  30 30 3A 8D 31 32 35 30  |:.310:.900:.1250|
00000BD0: 3A 99 3A 55 50 B2 30 3A  8D 33 31 30 3A 8E 00 2A  |:.:UP.0:.310:..*|
00000BE0: 28 DC 05 8F 20 2D 2D 2D  2D 2D 20 41 43 43 45 50  |(... ----- ACCEP|
00000BF0: 54 20 23 20 49 4E 50 55  54 20 28 41 29 20 4F 46  |T # INPUT (A) OF|
00000C00: 20 4C 45 4E 47 54 48 20  43 4C 20 41 54 20 43 58  | LENGTH CL AT CX|
00000C10: 2C 43 59 20 57 49 54 48  20 44 45 4C 45 54 45 20  |,CY WITH DELETE |
00000C20: 41 4E 44 20 52 45 54 55  52 4E 00 67 28 DF 05 97  |AND RETURN.g(...|
00000C30: 32 33 36 2C 43 58 3A 97  32 33 35 2C 43 59 3A 49  |236,CX:.235,CY:I|
00000C40: B2 43 59 AC 34 30 3A 97  32 32 34 2C 49 AB B5 28  |.CY.40:.224,I..(|
00000C50: 49 AD 32 35 36 29 AC 32  35 36 3A 97 32 32 35 2C  |I.256).256:.225,|
00000C60: 49 AD 32 35 36 AA 34 00  86 28 E3 05 97 32 32 36  |I.256.4..(...226|
00000C70: 2C C2 28 32 32 34 29 3A  97 32 32 37 2C 49 AD 32  |,.(224):.227,I.2|
00000C80: 35 36 AA 32 31 36 00 D3  28 E6 05 8F 20 2D 2D 2D  |56.216..(... ---|
00000C90: 2D 2D 20 41 43 43 45 50  54 20 23 20 49 4E 50 55  |-- ACCEPT # INPU|
00000CA0: 54 20 28 41 29 20 4F 46  20 4C 45 4E 47 54 48 20  |T (A) OF LENGTH |
00000CB0: 43 4C 20 41 54 20 43 55  52 53 4F 52 20 57 49 54  |CL AT CURSOR WIT|
00000CC0: 48 20 44 45 4C 45 54 45  20 41 4E 44 20 52 45 54  |H DELETE AND RET|
00000CD0: 55 52 4E 00 FA 28 EA 05  97 32 30 38 2C 30 3A 41  |URN..(...208,0:A|
00000CE0: 24 B2 22 22 3A EB 3A 8D  31 32 30 30 3A 8B 4B 42  |$."":.:.1200:.KB|
00000CF0: 24 B2 22 20 22 A7 4B 42  B2 30 00 07 29 F4 05 8B  |$." ".KB.0..)...|
00000D00: 4B 42 B2 30 A7 FE 18 00  39 29 F6 05 8B 28 4B 42  |KB.0....9)...(KB|
00000D10: 24 B1 B2 22 30 22 AF 4B  42 24 B3 B2 22 39 22 29  |$.."0".KB$.."9")|
00000D20: AF C3 28 41 24 29 B3 43  4C A7 99 4B 42 24 3B 3A  |..(A$).CL..KB$;:|
00000D30: 41 24 B2 41 24 AA 4B 42  24 00 65 29 FE 05 8B 4B  |A$.A$.KB$.e)...K|
00000D40: 42 24 B2 C7 28 32 30 29  AF C3 28 41 24 29 B1 30  |B$..(20)..(A$).0|
00000D50: A7 FE 18 8B C3 28 41 24  29 B2 31 A7 41 24 B2 22  |.....(A$).1.A$."|
00000D60: 22 3A D5 FE 18 00 7D 29  06 06 41 24 B2 C8 28 41  |":....})..A$..(A|
00000D70: 24 2C C3 28 41 24 29 AB  31 29 3A FE 19 00 8A 29  |$,.(A$).1):....)|
00000D80: 0A 06 99 4B 42 24 3B 3A  FE 19 00 91 29 0E 06 FE  |...KB$;:....)...|
00000D90: 19 00 A6 29 10 06 EC FD  4B 42 B2 30 3A 41 B2 C5  |...)....KB.0:A..|
00000DA0: 28 41 24 29 3A 8E 00 BF  29 10 27 8F 20 2D 2D 2D  |(A$):...).'. ---|
00000DB0: 2D 2D 20 44 49 53 50 4C  41 59 20 48 45 4C 50 00  |-- DISPLAY HELP.|
00000DC0: ED 29 1A 27 FE 02 31 35  3A 8D 36 30 30 3A 48 47  |.).'..15:.600:HG|
00000DD0: B2 CC 28 30 29 3A 48 42  B2 CD 28 34 29 3A 49 B2  |..(0):HB..(4):I.|
00000DE0: 35 33 32 36 35 3A 4A B2  35 36 35 37 36 00 24 2A  |53265:J.56576.$*|
00000DF0: 1F 27 81 4B B2 31 A4 33  3A 48 58 28 4B 29 B2 CE  |.'.K.1.3:HX(K)..|
00000E00: 05 28 4B 2C 30 29 3A 48  59 28 4B 29 B2 CE 05 28  |.(K,0):HY(K)...(|
00000E10: 4B 2C 31 29 3A 48 43 28  4B 29 B2 CE 06 28 4B 2C  |K,1):HC(K)...(K,|
00000E20: 31 29 3A 82 00 49 2A 24  27 97 49 2C C2 28 49 29  |1):..I*$'.I,.(I)|
00000E30: AF 32 33 39 3A 97 4A 2C  C2 28 4A 29 AF 32 35 32  |.239:.J,.(J).252|
00000E40: 3A E7 34 2C 42 31 3A DE  31 00 71 2A 26 27 FE 06  |:.4,B1:.1.q*&'..|
00000E50: 31 2C 32 39 33 2C 31 39  31 3A FE 06 32 2C 33 31  |1,293,191:..2,31|
00000E60: 37 2C 31 39 31 3A FE 06  33 2C 33 31 37 2C 32 31  |7,191:..3,317,21|
00000E70: 32 00 91 2A 29 27 81 4B  B2 31 A4 33 3A FE 07 4B  |2..*)'.K.1.3:..K|
00000E80: 2C 31 2C 39 3A 82 3A 97  49 2C C2 28 49 29 B0 31  |,1,9:.:.I,.(I).1|
00000E90: 36 00 C1 2A 2E 27 EB 3A  A1 F9 4B 42 24 3A EC FD  |6..*.'.:..KB$:..|
00000EA0: 4B 42 24 B2 48 50 24 3A  4B 42 24 B2 22 22 3A 97  |KB$.HP$:KB$."":.|
00000EB0: 32 30 38 2C 30 3A 97 49  2C C2 28 49 29 AF 32 33  |208,0:.I,.(I).23|
00000EC0: 39 00 E9 2A 33 27 81 4B  B2 31 A4 33 3A FE 06 4B  |9..*3'.K.1.3:..K|
00000ED0: 2C 48 58 28 4B 29 2C 48  59 28 4B 29 3A FE 07 4B  |,HX(K),HY(K):..K|
00000EE0: 2C 2C 48 43 28 4B 29 3A  82 00 04 2B 38 27 97 4A  |,,HC(K):...+8'.J|
00000EF0: 2C C2 28 4A 29 B0 33 3A  DE 48 47 2C 2C 47 53 3A  |,.(J).3:.HG,,GS:|
00000F00: 8D 35 30 30 00 23 2B 3D  27 97 35 33 32 36 35 2C  |.500.#+='.53265,|
00000F10: C2 28 35 33 32 36 35 29  B0 31 36 3A E7 34 2C 48  |.(53265).16:.4,H|
00000F20: 42 3A 8E 00 50 2B 3C 28  8F 20 2D 2D 2D 2D 2D 20  |B:..P+<(. ----- |
00000F30: 57 41 49 54 20 46 4F 52  20 41 20 4D 45 4E 55 20  |WAIT FOR A MENU |
00000F40: 43 4F 4D 4D 41 4E 44 20  28 4D 4B 2C 4D 4B 24 29  |COMMAND (MK,MK$)|
00000F50: 00 71 2B 46 28 EB 3A A1  F9 4D 4B 24 3A 4D 4B B2  |.q+F(.:..MK$:MK.|
00000F60: 30 3A 8B 4D 4B 24 B2 48  50 24 A7 8D 31 30 30 30  |0:.MK$.HP$..1000|
00000F70: 30 00 95 2B 50 28 EC FD  28 4D 4B 24 B2 48 50 24  |0..+P(..(MK$.HP$|
00000F80: 29 3A 4D 4B B2 53 4B 28  D4 28 53 4B 24 2C 4D 4B  |):MK.SK(.(SK$,MK|
00000F90: 24 29 29 3A 8E 00 D1 2B  A0 28 8F 20 2D 2D 2D 2D  |$)):...+.(. ----|
00000FA0: 2D 20 57 41 49 54 20 46  4F 52 20 41 20 4D 45 4E  |- WAIT FOR A MEN|
00000FB0: 55 20 4B 45 59 2C 20 48  49 4C 49 54 45 20 41 4E  |U KEY, HILITE AN|
00000FC0: 59 20 4E 55 4D 42 45 52  20 53 45 4C 45 43 54 45  |Y NUMBER SELECTE|
00000FD0: 44 00 13 2C A3 28 4D 57  B2 30 3A 81 49 B2 31 A4  |D..,.(MW.0:.I.1.|
00000FE0: 4D 4E 3A 56 24 28 49 29  B2 C7 28 34 38 AA 49 29  |MN:V$(I)..(48.I)|
00000FF0: AA 22 2E 22 AA 54 24 AA  56 24 28 49 29 3A 4A B2  |.".".T$.V$(I):J.|
00001000: C3 28 56 24 28 49 29 29  3A 8B 4A B1 4D 57 A7 4D  |.(V$(I)):.J.MW.M|
00001010: 57 B2 4A 00 52 2C A5 28  82 49 3A 4D 50 B2 32 30  |W.J.R,.(.I:MP.20|
00001020: AB 4D 57 AD 32 3A E7 31  2C 42 31 3A 81 49 B2 31  |.MW.2:.1,B1:.I.1|
00001030: A4 4D 4E 3A 56 24 28 49  29 B2 56 24 28 49 29 AA  |.MN:V$(I).V$(I).|
00001040: C8 28 53 50 24 2C 4D 57  AB C3 28 56 24 28 49 29  |.(SP$,MW..(V$(I)|
00001050: 29 29 00 73 2C A7 28 E0  2C 4D 50 2C 49 AA 35 2C  |)).s,.(.,MP,I.5,|
00001060: 4C 24 AA 56 24 28 49 29  3A 82 49 3A DE 47 4D 2C  |L$.V$(I):.I:.GM,|
00001070: 2C 47 53 00 A9 2C AA 28  4D 49 B2 AB 31 3A EB 3A  |,GS..,.(MI..1:.:|
00001080: 8D 31 30 33 30 30 3A 4D  32 B2 C6 28 4D 4B 24 29  |.10300:M2..(MK$)|
00001090: AB 34 38 3A 8B 4D 4B B2  30 AF 4D 32 B1 B2 31 AF  |.48:.MK.0.M2..1.|
000010A0: 4D 32 B3 B2 4D 4E A7 FE  18 00 D1 2C B4 28 8B 4D  |M2..MN.....,.(.M|
000010B0: 49 B3 B1 AB 31 AF 4D 49  B3 B1 4D 32 A7 E0 31 2C  |I...1.MI..M2..1,|
000010C0: 4D 50 2C 35 AA 4D 49 2C  4C 24 AA 56 24 28 4D 49  |MP,5.MI,L$.V$(MI|
000010D0: 29 00 F5 2C BE 28 4D 49  B2 4D 32 3A E0 31 2C 4D  |)..,.(MI.M2:.1,M|
000010E0: 50 2C 35 AA 4D 32 2C 4C  24 AA 56 24 28 4D 49 29  |P,5.M2,L$.V$(MI)|
000010F0: 2C 31 3A FE 19 00 1D 2D  C8 28 EC FC 28 4D 4B B2  |,1:....-.(..(MK.|
00001100: 31 B0 28 4D 49 B3 B1 AB  31 AF 4D 4B 24 B2 C7 28  |1.(MI...1.MK$..(|
00001110: 31 33 29 29 29 3A E7 31  2C 46 31 3A 8E 00 3B 2D  |13))):.1,F1:..;-|
00001120: 04 29 8F 20 2D 2D 2D 2D  2D 20 54 41 42 4C 45 20  |.). ----- TABLE |
00001130: 4F 46 20 43 4F 4E 54 45  4E 54 53 00 6C 2D 0E 29  |OF CONTENTS.l-.)|
00001140: 8D 36 30 30 3A 8D 36 30  39 30 30 3A E7 31 2C 42  |.600:.60900:.1,B|
00001150: 31 3A E0 2C 31 32 2C 33  2C 22 54 41 42 4C 45 20  |1:.,12,3,"TABLE |
00001160: 4F 46 20 43 4F 4E 54 45  4E 54 53 22 00 B0 2D 18  |OF CONTENTS"..-.|
00001170: 29 E0 2C 31 31 2C 32 30  2C 4C 24 AA 22 D4 59 50  |).,11,20,L$.".YP|
00001180: 45 20 41 20 D6 4F 4C 55  4D 45 20 4E 55 4D 42 45  |E A .OLUME NUMBE|
00001190: 52 22 3A E0 2C 31 33 2C  32 31 2C 4C 24 AA 22 41  |R":.,13,21,L$."A|
000011A0: 4E 44 20 50 52 45 53 53  20 D2 C5 D4 D5 D2 CE 22  |ND PRESS ......"|
000011B0: 00 D2 2D 22 29 4D 4E B2  39 3A EB 3A 81 49 B2 31  |..-")MN.9:.:.I.1|
000011C0: A4 39 3A 56 24 28 49 29  B2 56 4C 24 28 49 29 3A  |.9:V$(I).VL$(I):|
000011D0: 82 49 00 E4 2D 2C 29 8D  31 30 34 30 30 3A EC FD  |.I..-,).10400:..|
000011E0: 4D 4B B2 31 00 0F 2E 36  29 8B 4D 49 B2 4E 56 A7  |MK.1...6).MI.NV.|
000011F0: 36 30 35 30 30 3A D5 DE  31 3A 8A 28 22 56 4F 4C  |60500:..1:.("VOL|
00001200: 55 4D 45 2E 22 AA C7 28  34 38 AA 4D 49 29 29 00  |UME."..(48.MI)).|
00001210: 27 2E 30 2A 8F 20 2D 2D  2D 2D 2D 20 56 4F 4C 55  |'.0*. ----- VOLU|
00001220: 4D 45 20 4D 45 4E 55 00  3D 2E 35 2A 8D 36 30 30  |ME MENU.=.5*.600|
00001230: 3A 8D 36 30 39 30 30 3A  E7 31 2C 42 31 00 7D 2E  |:.60900:.1,B1.}.|
00001240: 3A 2A E0 2C 31 35 2C 33  2C 4C 24 AA 22 D6 4F 4C  |:*.,15,3,L$.".OL|
00001250: 55 4D 45 20 22 AA C7 28  34 38 AA 4E 56 29 3A E0  |UME "..(48.NV):.|
00001260: 2C 31 39 AB C3 28 56 4C  24 28 4E 56 29 29 AD 32  |,19..(VL$(NV)).2|
00001270: 2C 34 2C 4C 24 AA 56 4C  24 28 4E 56 29 00 99 2E  |,4,L$.VL$(NV)...|
00001280: 3F 2A 81 49 B2 31 A4 4D  4D 3A 56 24 28 49 29 B2  |?*.I.1.MM:V$(I).|
00001290: 56 4D 24 28 49 29 3A 82  49 00 D6 2E 44 2A E0 2C  |VM$(I):.I...D*.,|
000012A0: 31 34 2C 32 30 2C 4C 24  AA 22 D4 59 50 45 20 41  |14,20,L$.".YPE A|
000012B0: 20 4E 55 4D 42 45 52 22  3A E0 2C 31 33 2C 32 31  | NUMBER":.,13,21|
000012C0: 2C 4C 24 AA 22 41 4E 44  20 50 52 45 53 53 20 D2  |,L$."AND PRESS .|
000012D0: C5 D4 D5 D2 CE 22 00 01  2F 49 2A 4D 4E B2 4D 4D  |....."../I*MN.MM|
000012E0: 3A 8D 31 30 34 30 30 3A  91 4D 4B 89 36 30 30 30  |:.10400:.MK.6000|
000012F0: 30 3A 43 53 B2 56 41 28  4D 49 29 3A 89 31 30 30  |0:CS.VA(MI):.100|
00001300: 30 00 4D 2F F8 2A 8F 20  2D 2D 2D 2D 2D 20 56 4F  |0.M/.*. ----- VO|
00001310: 4C 55 4D 45 20 33 20 53  43 52 45 45 4E 53 20 2D  |LUME 3 SCREENS -|
00001320: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001330: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001340: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 00 62 2F  |-------------.b/|
00001350: 02 2B 8F 20 2D 2D 2D 2D  2D 20 53 43 52 45 45 4E  |.+. ----- SCREEN|
00001360: 20 31 00 82 2F 20 2B 99  A3 39 29 22 C7 45 54 54  | 1../ +..9)".ETT|
00001370: 49 4E 47 20 54 4F 20 CB  4E 4F 57 20 C2 C1 D3 C9  |ING TO .NOW ....|
00001380: C3 22 00 88 2F 2A 2B 99  00 B4 2F 34 2B 99 20 22  |."../*+.../4+. "|
00001390: C1 53 20 59 4F 55 20 4B  4E 4F 57 2C 20 C2 C1 D3  |.S YOU KNOW, ...|
000013A0: C9 C3 20 49 53 20 41 20  50 52 4F 47 52 41 4D 4D  |.. IS A PROGRAMM|
000013B0: 49 4E 47 22 00 E2 2F 3E  2B 99 20 22 4C 41 4E 47  |ING"../>+. "LANG|
000013C0: 55 41 47 45 2C 20 41 20  57 41 59 20 4F 46 20 43  |UAGE, A WAY OF C|
000013D0: 4F 4D 4D 55 4E 49 43 41  54 49 4E 47 20 57 49 54  |OMMUNICATING WIT|
000013E0: 48 22 00 F9 2F 48 2B 99  20 22 59 4F 55 52 20 43  |H"../H+. "YOUR C|
000013F0: 4F 4D 50 55 54 45 52 2E  22 00 FF 2F 52 2B 99 00  |OMPUTER."../R+..|
00001400: 2A 30 5C 2B 99 20 22 CF  4E 43 45 20 59 4F 55 27  |*0\+. ".NCE YOU'|
00001410: 56 45 20 4C 45 41 52 4E  45 44 20 C2 C1 D3 C9 C3  |VE LEARNED .....|
00001420: 27 53 20 53 49 4D 50 4C  45 22 00 51 30 66 2B 99  |'S SIMPLE".Q0f+.|
00001430: 20 22 52 55 4C 45 53 20  41 4E 44 20 54 48 45 20  | "RULES AND THE |
00001440: 46 45 57 20 57 4F 52 44  53 20 49 4E 20 49 54 53  |FEW WORDS IN ITS|
00001450: 22 00 7C 30 70 2B 99 20  22 56 4F 43 41 42 55 4C  |".|0p+. "VOCABUL|
00001460: 41 52 59 2C 20 59 4F 55  20 43 41 4E 20 55 53 45  |ARY, YOU CAN USE|
00001470: 20 49 54 20 54 4F 20 54  45 4C 4C 22 00 A5 30 7A  | IT TO TELL"..0z|
00001480: 2B 99 20 22 54 48 45 20  C3 31 32 38 20 57 48 41  |+. "THE .128 WHA|
00001490: 54 20 54 4F 20 44 4F 20  2D 2D 20 46 52 4F 4D 20  |T TO DO -- FROM |
000014A0: 56 45 52 59 22 00 D5 30  84 2B 99 20 22 53 49 4D  |VERY"..0.+. "SIM|
000014B0: 50 4C 45 20 4F 50 45 52  41 54 49 4F 4E 53 2C 20  |PLE OPERATIONS, |
000014C0: 4C 49 4B 45 20 41 44 44  49 4E 47 20 4E 55 4D 42  |LIKE ADDING NUMB|
000014D0: 45 52 53 2C 22 00 F8 30  8E 2B 99 20 22 54 4F 20  |ERS,"..0.+. "TO |
000014E0: 4C 4F 4E 47 2C 20 43 4F  4D 50 4C 45 58 20 50 52  |LONG, COMPLEX PR|
000014F0: 4F 47 52 41 4D 53 2E 22  00 FE 30 98 2B 99 00 2B  |OGRAMS."..0.+..+|
00001500: 31 A2 2B 99 20 22 C9 4E  20 46 41 43 54 2C 20 54  |1.+. ".N FACT, T|
00001510: 48 49 53 20 54 4F 55 52  20 4F 46 20 59 4F 55 52  |HIS TOUR OF YOUR|
00001520: 20 C3 31 32 38 20 49 53  20 41 22 00 42 31 AC 2B  | .128 IS A".B1.+|
00001530: 99 20 22 C2 C1 D3 C9 C3  20 50 52 4F 47 52 41 4D  |. "..... PROGRAM|
00001540: 2E 22 00 48 31 B6 2B 8E  00 5B 31 B7 2B 8B 20 4A  |.".H1.+..[1.+. J|
00001550: 47 B2 31 20 89 20 31 31  31 39 34 00 64 31 B8 2B  |G.1 . 11194.d1.+|
00001560: 4A 47 B2 31 00 75 31 B9  2B FE 11 20 22 42 54 53  |JG.1.u1.+.. "BTS|
00001570: 54 31 32 38 22 00 96 31  BA 2B 97 20 34 36 33 33  |T128"..1.+. 4633|
00001580: 2C 30 30 3A 97 20 34 36  33 34 2C 31 34 3A 97 20  |,00:. 4634,14:. |
00001590: 34 30 39 35 2C 33 00 A1  31 BB 2B 42 B2 B7 28 30  |4095,3..1.+B..(0|
000015A0: 29 00 AA 31 BC 2B 4A 47  B2 30 00 B3 31 BD 2B 89  |)..1.+JG.0..1.+.|
000015B0: 20 35 30 00 C8 31 E0 2E  8F 20 2D 2D 2D 2D 2D 20  | 50..1... ----- |
000015C0: 53 43 52 45 45 4E 20 32  00 D9 31 08 2F 99 A3 31  |SCREEN 2..1./..1|
000015D0: 37 29 22 D0 D2 C9 CE D4  22 00 DF 31 12 2F 99 00  |7)"....."..1./..|
000015E0: 0E 32 1C 2F 99 20 22 CF  4E 45 20 4F 46 20 54 48  |.2./. ".NE OF TH|
000015F0: 45 20 C2 C1 D3 C9 C3 20  57 4F 52 44 53 20 59 4F  |E ..... WORDS YO|
00001600: 55 27 4C 4C 20 55 53 45  20 4D 4F 53 54 22 00 3A  |U'LL USE MOST".:|
00001610: 32 26 2F 99 20 22 4F 46  54 45 4E 20 49 53 20 54  |2&/. "OFTEN IS T|
00001620: 48 45 20 D0 D2 C9 CE D4  20 43 4F 4D 4D 41 4E 44  |HE ..... COMMAND|
00001630: 2E 20 D9 4F 55 20 55 53  45 22 00 6A 32 30 2F 99  |. .OU USE".j20/.|
00001640: 20 22 D0 D2 C9 CE D4 20  57 48 45 4E 45 56 45 52  | "..... WHENEVER|
00001650: 20 59 4F 55 20 57 41 4E  54 20 54 48 45 20 43 4F  | YOU WANT THE CO|
00001660: 4D 50 55 54 45 52 20 54  4F 22 00 91 32 3A 2F 99  |MPUTER TO"..2:/.|
00001670: 20 22 50 52 49 4E 54 20  53 4F 4D 45 54 48 49 4E  | "PRINT SOMETHIN|
00001680: 47 20 4F 4E 20 54 48 45  20 53 43 52 45 45 4E 2E  |G ON THE SCREEN.|
00001690: 22 00 97 32 44 2F 99 00  C4 32 4E 2F 99 20 22 D4  |"..2D/...2N/. ".|
000016A0: 4F 20 55 53 45 20 54 48  45 20 D0 D2 C9 CE D4 20  |O USE THE ..... |
000016B0: 43 4F 4D 4D 41 4E 44 2C  20 46 49 52 53 54 20 54  |COMMAND, FIRST T|
000016C0: 59 50 45 22 00 F5 32 58  2F 99 20 22 D0 D2 C9 CE  |YPE"..2X/. "....|
000016D0: D4 20 41 4E 44 20 54 48  45 4E 2C 20 42 45 54 57  |. AND THEN, BETW|
000016E0: 45 45 4E 20 51 55 4F 54  41 54 49 4F 4E 20 4D 41  |EEN QUOTATION MA|
000016F0: 52 4B 53 2C 22 00 1F 33  62 2F 99 20 22 54 59 50  |RKS,"..3b/. "TYP|
00001700: 45 20 57 48 41 54 20 59  4F 55 20 57 41 4E 54 20  |E WHAT YOU WANT |
00001710: 50 52 49 4E 54 45 44 20  4F 4E 20 54 48 45 22 00  |PRINTED ON THE".|
00001720: 4D 33 6C 2F 99 20 22 53  43 52 45 45 4E 2E 20 D7  |M3l/. "SCREEN. .|
00001730: 48 41 54 45 56 45 52 20  59 4F 55 20 54 59 50 45  |HATEVER YOU TYPE|
00001740: 20 42 45 54 57 45 45 4E  20 54 48 45 22 00 7D 33  | BETWEEN THE".}3|
00001750: 76 2F 99 20 22 51 55 4F  54 41 54 49 4F 4E 20 4D  |v/. "QUOTATION M|
00001760: 41 52 4B 53 20 57 49 4C  4C 20 42 45 20 50 52 49  |ARKS WILL BE PRI|
00001770: 4E 54 45 44 20 4A 55 53  54 20 41 53 22 00 96 33  |NTED JUST AS"..3|
00001780: 80 2F 99 20 22 59 4F 55  27 56 45 20 54 59 50 45  |./. "YOU'VE TYPE|
00001790: 44 20 49 54 2E 22 00 9C  33 8A 2F 99 00 D0 33 94  |D IT."..3./...3.|
000017A0: 2F 99 20 22 D0 D2 C9 CE  D4 20 22 AA 44 51 24 AA  |/. "..... ".DQ$.|
000017B0: 22 C8 C5 CC CC CF 21 22  AA 44 51 24 3B 3A 8D 31  |".....!".DQ$;:.1|
000017C0: 34 35 30 3A 8B 53 44 B2  32 A7 52 53 B2 31 3A 8E  |450:.SD.2.RS.1:.|
000017D0: 00 DF 33 9E 2F 99 20 22  C8 C5 CC CC CF 21 22 00  |..3./. ".....!".|
000017E0: E5 33 A8 2F 8E 00 FA 33  C8 32 8F 20 2D 2D 2D 2D  |.3./...3.2. ----|
000017F0: 2D 20 53 43 52 45 45 4E  20 33 00 11 34 F0 32 99  |- SCREEN 3..4.2.|
00001800: A3 31 34 29 22 C4 49 52  45 43 54 20 CD 4F 44 45  |.14)".IRECT .ODE|
00001810: 22 00 17 34 FA 32 99 00  3F 34 04 33 99 20 22 D7  |"..4.2..?4.3. ".|
00001820: 48 45 4E 20 55 53 49 4E  47 20 C2 C1 D3 C9 C3 2C  |HEN USING .....,|
00001830: 20 59 4F 55 20 43 41 4E  20 45 4E 54 45 52 22 00  | YOU CAN ENTER".|
00001840: 68 34 0E 33 99 20 22 43  4F 4D 4D 41 4E 44 53 20  |h4.3. "COMMANDS |
00001850: 4C 49 4B 45 20 D0 D2 C9  CE D4 20 41 54 20 41 4E  |LIKE ..... AT AN|
00001860: 59 20 54 49 4D 45 2E 22  00 93 34 18 33 99 20 22  |Y TIME."..4.3. "|
00001870: CA 55 53 54 20 54 59 50  45 20 49 4E 20 54 48 45  |.UST TYPE IN THE|
00001880: 20 43 4F 4D 4D 41 4E 44  20 41 4E 44 20 50 52 45  | COMMAND AND PRE|
00001890: 53 53 22 00 BF 34 22 33  99 20 22 D2 C5 D4 D5 D2  |SS"..4"3. ".....|
000018A0: CE 2C 20 41 4E 44 20 54  48 45 20 C3 31 32 38 20  |., AND THE .128 |
000018B0: 57 49 4C 4C 20 43 41 52  52 59 20 4F 55 54 22 00  |WILL CARRY OUT".|
000018C0: DC 34 2C 33 99 20 22 54  48 45 20 43 4F 4D 4D 41  |.4,3. "THE COMMA|
000018D0: 4E 44 20 41 54 20 4F 4E  43 45 2E 22 00 E2 34 36  |ND AT ONCE."..46|
000018E0: 33 99 00 0C 35 40 33 99  20 22 D5 53 49 4E 47 20  |3...5@3. ".SING |
000018F0: C2 C1 D3 C9 C3 20 49 4E  20 54 48 49 53 20 57 41  |..... IN THIS WA|
00001900: 59 20 49 53 20 43 41 4C  4C 45 44 22 00 25 35 4A  |Y IS CALLED".%5J|
00001910: 33 99 20 22 54 48 45 20  44 49 52 45 43 54 20 4D  |3. "THE DIRECT M|
00001920: 4F 44 45 2E 22 00 2B 35  54 33 8E 00 40 35 B0 36  |ODE.".+5T3..@5.6|
00001930: 8F 20 2D 2D 2D 2D 2D 20  53 43 52 45 45 4E 20 34  |. ----- SCREEN 4|
00001940: 00 58 35 D8 36 99 A3 31  34 29 22 D0 52 4F 47 52  |.X5.6..14)".ROGR|
00001950: 41 4D 20 CD 4F 44 45 22  00 5E 35 E2 36 99 00 89  |AM .ODE".^5.6...|
00001960: 35 EC 36 99 20 22 CF 46  54 45 4E 20 59 4F 55 27  |5.6. ".FTEN YOU'|
00001970: 4C 4C 20 57 41 4E 54 20  54 48 45 20 C3 31 32 38  |LL WANT THE .128|
00001980: 20 54 4F 20 57 41 49 54  22 00 AF 35 F6 36 99 20  | TO WAIT"..5.6. |
00001990: 22 55 4E 54 49 4C 20 59  4F 55 27 56 45 20 47 49  |"UNTIL YOU'VE GI|
000019A0: 56 45 4E 20 49 54 20 53  45 56 45 52 41 4C 22 00  |VEN IT SEVERAL".|
000019B0: DA 35 00 37 99 20 22 49  4E 53 54 52 55 43 54 49  |.5.7. "INSTRUCTI|
000019C0: 4F 4E 53 20 42 45 46 4F  52 45 20 49 54 20 43 41  |ONS BEFORE IT CA|
000019D0: 52 52 49 45 53 20 4F 55  54 22 00 FD 35 0A 37 99  |RRIES OUT"..5.7.|
000019E0: 20 22 41 4E 59 20 4F 46  20 54 48 45 4D 2E 20 D3  | "ANY OF THEM. .|
000019F0: 55 43 48 20 41 20 53 45  54 20 4F 46 22 00 27 36  |UCH A SET OF".'6|
00001A00: 14 37 99 20 22 49 4E 53  54 52 55 43 54 49 4F 4E  |.7. "INSTRUCTION|
00001A10: 53 20 49 53 20 43 41 4C  4C 45 44 20 41 20 50 52  |S IS CALLED A PR|
00001A20: 4F 47 52 41 4D 2E 22 00  2D 36 1E 37 99 00 57 36  |OGRAM.".-6.7..W6|
00001A30: 28 37 99 20 22 D5 53 49  4E 47 20 C2 C1 D3 C9 C3  |(7. ".SING .....|
00001A40: 20 49 4E 20 54 48 49 53  20 57 41 59 20 49 53 20  | IN THIS WAY IS |
00001A50: 43 41 4C 4C 45 44 22 00  71 36 32 37 99 20 22 54  |CALLED".q627. "T|
00001A60: 48 45 20 50 52 4F 47 52  41 4D 20 4D 4F 44 45 2E  |HE PROGRAM MODE.|
00001A70: 22 00 77 36 3C 37 8E 00  8C 36 98 3A 8F 20 2D 2D  |".w6<7...6.:. --|
00001A80: 2D 2D 2D 20 53 43 52 45  45 4E 20 35 00 92 36 CA  |--- SCREEN 5..6.|
00001A90: 3A 99 00 C2 36 D4 3A 99  20 22 C9 4E 20 41 20 50  |:...6.:. ".N A P|
00001AA0: 52 4F 47 52 41 4D 2C 20  45 56 45 52 59 20 49 4E  |ROGRAM, EVERY IN|
00001AB0: 53 54 52 55 43 54 49 4F  4E 20 49 53 20 50 41 52  |STRUCTION IS PAR|
00001AC0: 54 22 00 F0 36 DE 3A 99  20 22 4F 46 20 41 20 50  |T"..6.:. "OF A P|
00001AD0: 52 4F 47 52 41 4D 20 4C  49 4E 45 2E 20 C5 56 45  |ROGRAM LINE. .VE|
00001AE0: 52 59 20 50 52 4F 47 52  41 4D 20 4C 49 4E 45 22  |RY PROGRAM LINE"|
00001AF0: 00 1E 37 E8 3A 99 20 22  53 54 41 52 54 53 20 57  |..7.:. "STARTS W|
00001B00: 49 54 48 20 41 20 4E 55  4D 42 45 52 2C 20 4B 4E  |ITH A NUMBER, KN|
00001B10: 4F 57 4E 20 41 53 20 41  20 4C 49 4E 45 22 00 2E  |OWN AS A LINE"..|
00001B20: 37 F2 3A 99 20 22 4E 55  4D 42 45 52 2E 22 00 34  |7.:. "NUMBER.".4|
00001B30: 37 FC 3A 99 00 62 37 06  3B 99 20 22 D7 48 45 4E  |7.:..b7.;. ".HEN|
00001B40: 20 59 4F 55 20 50 52 45  53 53 20 D2 C5 D4 D5 D2  | YOU PRESS .....|
00001B50: CE 20 41 54 20 54 48 45  20 45 4E 44 20 4F 46 20  |. AT THE END OF |
00001B60: 41 22 00 8F 37 10 3B 99  20 22 50 52 4F 47 52 41  |A"..7.;. "PROGRA|
00001B70: 4D 20 4C 49 4E 45 2C 20  54 48 45 20 43 4F 4D 50  |M LINE, THE COMP|
00001B80: 55 54 45 52 20 52 45 4D  45 4D 42 45 52 53 22 00  |UTER REMEMBERS".|
00001B90: BE 37 1A 3B 99 20 22 54  48 45 20 43 4F 4D 4D 41  |.7.;. "THE COMMA|
00001BA0: 4E 44 20 52 41 54 48 45  52 20 54 48 41 4E 20 43  |ND RATHER THAN C|
00001BB0: 41 52 52 49 4E 47 20 49  54 20 4F 55 54 22 00 EA  |ARRING IT OUT"..|
00001BC0: 37 24 3B 99 20 22 52 49  47 48 54 20 41 57 41 59  |7$;. "RIGHT AWAY|
00001BD0: 2E 20 D7 48 45 4E 20 59  4F 55 27 56 45 20 54 59  |. .HEN YOU'VE TY|
00001BE0: 50 45 44 20 49 4E 20 41  53 22 00 17 38 2E 3B 99  |PED IN AS"..8.;.|
00001BF0: 20 22 4D 41 4E 59 20 4C  49 4E 45 53 20 41 53 20  | "MANY LINES AS |
00001C00: 59 4F 55 20 57 41 4E 54  2C 20 59 4F 55 20 54 59  |YOU WANT, YOU TY|
00001C10: 50 45 20 D2 D5 CE 22 00  42 38 38 3B 99 20 22 41  |PE ...".B88;. "A|
00001C20: 4E 44 20 50 52 45 53 53  20 D2 C5 D4 D5 D2 CE 2C  |ND PRESS ......,|
00001C30: 20 41 4E 44 20 54 48 45  20 43 4F 4D 50 55 54 45  | AND THE COMPUTE|
00001C40: 52 22 00 6E 38 42 3B 99  20 22 57 49 4C 4C 20 43  |R".n8B;. "WILL C|
00001C50: 41 52 52 59 20 4F 55 54  20 59 4F 55 52 20 49 4E  |ARRY OUT YOUR IN|
00001C60: 53 54 52 55 43 54 49 4F  4E 53 20 49 4E 22 00 9B  |STRUCTIONS IN"..|
00001C70: 38 4C 3B 99 20 22 4E 55  4D 45 52 49 43 41 4C 20  |8L;. "NUMERICAL |
00001C80: 4F 52 44 45 52 2E 20 D0  52 45 53 53 20 D2 C5 D4  |ORDER. .RESS ...|
00001C90: D5 D2 CE 20 54 4F 20 52  55 4E 22 00 B1 38 51 3B  |... TO RUN"..8Q;|
00001CA0: 99 20 22 54 48 49 53 20  50 52 4F 47 52 41 4D 3A  |. "THIS PROGRAM:|
00001CB0: 22 00 B7 38 56 3B 99 00  E0 38 60 3B 99 20 22 31  |"..8V;...8`;. "1|
00001CC0: 30 20 D0 D2 C9 CE D4 20  22 AA 44 51 24 AA 22 C9  |0 ..... ".DQ$.".|
00001CD0: 20 C1 CD 20 D7 D2 C9 D4  C9 CE C7 22 AA 44 51 24  | .. .......".DQ$|
00001CE0: 00 07 39 6A 3B 99 20 22  32 30 20 D0 D2 C9 CE D4  |..9j;. "20 .....|
00001CF0: 20 22 AA 44 51 24 AA 22  C1 20 D0 D2 CF C7 D2 C1  | ".DQ$.". ......|
00001D00: CD 2E 22 AA 44 51 24 00  27 39 74 3B 99 20 22 D2  |..".DQ$.'9t;. ".|
00001D10: D5 CE 22 3B 3A 8D 31 34  35 30 3A 8B 53 44 B2 32  |..";:.1450:.SD.2|
00001D20: A7 52 53 B2 31 3A 8E 00  3B 39 7E 3B 99 22 C9 20  |.RS.1:..;9~;.". |
00001D30: C1 CD 20 D7 D2 C9 D4 C9  CE C7 22 00 4D 39 88 3B  |.. .......".M9.;|
00001D40: 99 22 C1 20 D0 D2 CF C7  D2 C1 CD 2E 22 00 53 39  |.". ........".S9|
00001D50: 92 3B 8E 00 68 39 80 3E  8F 20 2D 2D 2D 2D 2D 20  |.;..h9.>. ----- |
00001D60: 53 43 52 45 45 4E 20 36  00 78 39 A8 3E 99 A3 31  |SCREEN 6.x9.>..1|
00001D70: 38 29 22 CC C9 D3 D4 22  00 7E 39 B2 3E 99 00 AA  |8)"....".~9.>...|
00001D80: 39 BC 3E 99 20 22 C9 46  20 59 4F 55 20 57 41 4E  |9.>. ".F YOU WAN|
00001D90: 54 20 54 4F 20 53 45 45  20 41 20 50 52 4F 47 52  |T TO SEE A PROGR|
00001DA0: 41 4D 20 59 4F 55 27 56  45 22 00 D7 39 C6 3E 99  |AM YOU'VE"..9.>.|
00001DB0: 20 22 57 52 49 54 54 45  4E 2C 20 54 59 50 45 20  | "WRITTEN, TYPE |
00001DC0: CC C9 D3 D4 20 41 4E 44  20 50 52 45 53 53 20 D2  |.... AND PRESS .|
00001DD0: C5 D4 D5 D2 CE 2E 22 00  01 3A D0 3E 99 20 22 D4  |......"..:.>. ".|
00001DE0: 48 45 20 43 4F 4D 50 55  54 45 52 20 57 49 4C 4C  |HE COMPUTER WILL|
00001DF0: 20 44 49 53 50 4C 41 59  20 41 4C 4C 20 54 48 45  | DISPLAY ALL THE|
00001E00: 22 00 2A 3A DA 3E 99 20  22 49 4E 53 54 52 55 43  |".*:.>. "INSTRUC|
00001E10: 54 49 4F 4E 53 20 59 4F  55 27 56 45 20 47 49 56  |TIONS YOU'VE GIV|
00001E20: 45 4E 20 49 54 2C 20 49  4E 22 00 43 3A E4 3E 99  |EN IT, IN".C:.>.|
00001E30: 20 22 4E 55 4D 45 52 49  43 41 4C 20 4F 52 44 45  | "NUMERICAL ORDE|
00001E40: 52 2E 22 00 49 3A EE 3E  99 00 76 3A F8 3E 99 20  |R.".I:.>..v:.>. |
00001E50: 22 D0 52 45 53 53 20 D2  C5 D4 D5 D2 CE 20 54 4F  |".RESS ...... TO|
00001E60: 20 4C 49 53 54 20 54 48  45 20 50 52 4F 47 52 41  | LIST THE PROGRA|
00001E70: 4D 20 59 4F 55 22 00 9A  3A 02 3F 99 20 22 52 41  |M YOU"..:.?. "RA|
00001E80: 4E 20 4F 4E 20 54 48 45  20 50 52 45 56 49 4F 55  |N ON THE PREVIOU|
00001E90: 53 20 53 43 52 45 45 4E  2E 22 00 A0 3A 0C 3F 99  |S SCREEN."..:.?.|
00001EA0: 00 C1 3A 16 3F 99 20 22  CC C9 D3 D4 22 3B 3A 8D  |..:.?. "....";:.|
00001EB0: 31 34 35 30 3A 8B 53 44  B2 32 A7 52 53 B2 31 3A  |1450:.SD.2.RS.1:|
00001EC0: 8E 00 C7 3A 20 3F 99 00  F0 3A 2A 3F 99 20 22 31  |...: ?...:*?. "1|
00001ED0: 30 20 D0 D2 C9 CE D4 20  22 AA 44 51 24 AA 22 C9  |0 ..... ".DQ$.".|
00001EE0: 20 C1 CD 20 D7 D2 C9 D4  C9 CE C7 22 AA 44 51 24  | .. .......".DQ$|
00001EF0: 00 17 3B 34 3F 99 20 22  32 30 20 D0 D2 C9 CE D4  |..;4?. "20 .....|
00001F00: 20 22 AA 44 51 24 AA 22  C1 20 D0 D2 CF C7 D2 C1  | ".DQ$.". ......|
00001F10: CD 2E 22 AA 44 51 24 00  1D 3B 3E 3F 8E 00 32 3B  |..".DQ$..;>?..2;|
00001F20: 68 42 8F 20 2D 2D 2D 2D  2D 20 53 43 52 45 45 4E  |hB. ----- SCREEN|
00001F30: 20 37 00 61 3B 86 42 FE  1A 30 2C 30 2C 33 39 2C  | 7.a;.B..0,0,39,|
00001F40: 32 34 3A 8F 20 44 4F 45  53 4E 27 54 20 46 49 54  |24:. DOESN'T FIT|
00001F50: 20 4F 55 54 50 55 54 20  4F 54 48 45 52 57 49 53  | OUTPUT OTHERWIS|
00001F60: 45 00 7D 3B 90 42 99 A3  31 32 29 22 C2 C1 D3 C9  |E.};.B..12)"....|
00001F70: C3 20 C1 52 49 54 48 4D  45 54 49 43 22 00 83 3B  |. .RITHMETIC"..;|
00001F80: 9A 42 99 00 B4 3B A4 42  99 20 22 C9 4E 20 44 49  |.B...;.B. ".N DI|
00001F90: 52 45 43 54 20 4D 4F 44  45 2C 20 59 4F 55 20 43  |RECT MODE, YOU C|
00001FA0: 41 4E 20 55 53 45 20 C2  C1 D3 C9 C3 20 4C 49 4B  |AN USE ..... LIK|
00001FB0: 45 20 41 22 00 C8 3B AE  42 99 20 22 43 41 4C 43  |E A"..;.B. "CALC|
00001FC0: 55 4C 41 54 4F 52 2E 22  00 CE 3B B8 42 99 00 FD  |ULATOR."..;.B...|
00001FD0: 3B C2 42 99 20 22 D4 59  50 45 20 D0 D2 C9 CE D4  |;.B. ".YPE .....|
00001FE0: 20 46 4F 4C 4C 4F 57 45  44 20 42 59 20 54 48 45  | FOLLOWED BY THE|
00001FF0: 20 50 52 4F 42 4C 45 4D  20 59 4F 55 22 00 2B 3C  | PROBLEM YOU".+<|
00002000: CC 42 99 20 22 57 41 4E  54 20 53 4F 4C 56 45 44  |.B. "WANT SOLVED|
00002010: 2E 20 C4 4F 4E 27 54 20  50 55 54 20 54 48 45 20  |. .ON'T PUT THE |
00002020: 50 52 4F 42 4C 45 4D 20  49 4E 22 00 58 3C D6 42  |PROBLEM IN".X<.B|
00002030: 99 20 22 51 55 4F 54 41  54 49 4F 4E 20 4D 41 52  |. "QUOTATION MAR|
00002040: 4B 53 2C 20 4F 52 20 C2  C1 D3 C9 C3 20 57 49 4C  |KS, OR ..... WIL|
00002050: 4C 20 50 52 49 4E 54 22  00 87 3C E0 42 99 20 22  |L PRINT"..<.B. "|
00002060: 54 48 45 20 50 52 4F 42  4C 45 4D 20 49 4E 53 54  |THE PROBLEM INST|
00002070: 45 41 44 20 4F 46 20 54  48 45 20 41 4E 53 57 45  |EAD OF THE ANSWE|
00002080: 52 2E 20 D5 53 45 22 00  B7 3C EA 42 99 20 22 2B  |R. .SE"..<.B. "+|
00002090: 20 54 4F 20 41 44 44 2C  20 2D 20 54 4F 20 53 55  | TO ADD, - TO SU|
000020A0: 42 54 52 41 43 54 2C 20  2A 20 54 4F 20 4D 55 4C  |BTRACT, * TO MUL|
000020B0: 54 49 50 4C 59 2C 22 00  E3 3C F4 42 99 20 22 41  |TIPLY,"..<.B. "A|
000020C0: 4E 44 20 2F 20 54 4F 20  44 49 56 49 44 45 2E 20  |ND / TO DIVIDE. |
000020D0: D5 53 45 20 50 41 52 45  4E 54 48 45 53 45 53 20  |.SE PARENTHESES |
000020E0: 54 4F 22 00 0F 3D FE 42  99 20 22 47 52 4F 55 50  |TO"..=.B. "GROUP|
000020F0: 20 50 41 52 54 53 20 4F  46 20 54 48 45 20 50 52  | PARTS OF THE PR|
00002100: 4F 42 4C 45 4D 20 59 4F  55 20 57 41 4E 54 22 00  |OBLEM YOU WANT".|
00002110: 40 3D 08 43 99 20 22 53  4F 4C 56 45 44 20 46 49  |@=.C. "SOLVED FI|
00002120: 52 53 54 2E 20 D0 52 45  53 53 20 D2 C5 D4 D5 D2  |RST. .RESS .....|
00002130: CE 20 54 4F 20 48 41 56  45 20 C2 C1 D3 C9 C3 22  |. TO HAVE ....."|
00002140: 00 5E 3D 12 43 99 20 22  53 4F 4C 56 45 20 54 48  |.^=.C. "SOLVE TH|
00002150: 45 53 45 20 50 52 4F 42  4C 45 4D 53 3A 22 00 64  |ESE PROBLEMS:".d|
00002160: 3D 1C 43 99 00 8A 3D 26  43 99 20 22 D0 D2 C9 CE  |=.C...=&C. "....|
00002170: D4 20 32 2B 35 22 3B 3A  8D 31 34 35 30 3A 8B 53  |. 2+5";:.1450:.S|
00002180: 44 B2 32 A7 52 53 B2 31  3A 8E 00 95 3D 30 43 99  |D.2.RS.1:...=0C.|
00002190: 20 22 20 37 22 00 BB 3D  3A 43 99 20 22 D0 D2 C9  | " 7"..=:C. "...|
000021A0: CE D4 20 35 2D 31 22 3B  3A 8D 31 34 35 30 3A 8B  |.. 5-1";:.1450:.|
000021B0: 53 44 B2 32 A7 52 53 B2  31 3A 8E 00 C6 3D 44 43  |SD.2.RS.1:...=DC|
000021C0: 99 20 22 20 34 22 00 EC  3D 4E 43 99 20 22 D0 D2  |. " 4"..=NC. "..|
000021D0: C9 CE D4 20 36 2A 33 22  3B 3A 8D 31 34 35 30 3A  |... 6*3";:.1450:|
000021E0: 8B 53 44 B2 32 A7 52 53  B2 31 3A 8E 00 F8 3D 58  |.SD.2.RS.1:...=X|
000021F0: 43 99 20 22 20 31 38 22  00 1F 3E 62 43 99 20 22  |C. " 18"..>bC. "|
00002200: D0 D2 C9 CE D4 20 31 38  2F 32 22 3B 3A 8D 31 34  |..... 18/2";:.14|
00002210: 35 30 3A 8B 53 44 B2 32  A7 52 53 B2 31 3A 8E 00  |50:.SD.2.RS.1:..|
00002220: 2A 3E 6C 43 99 20 22 20  39 22 00 30 3E 76 43 8E  |*>lC. " 9".0>vC.|
00002230: 00 45 3E 50 46 8F 20 2D  2D 2D 2D 2D 20 53 43 52  |.E>PF. ----- SCR|
00002240: 45 45 4E 20 38 00 5A 3E  78 46 99 A3 31 35 29 22  |EEN 8.Z>xF..15)"|
00002250: D6 41 52 49 41 42 4C 45  53 22 00 60 3E 82 46 99  |.ARIABLES".`>.F.|
00002260: 00 8F 3E 8C 46 99 20 22  D3 4F 4D 45 54 49 4D 45  |..>.F. ".OMETIME|
00002270: 53 20 54 48 45 20 4E 55  4D 42 45 52 53 20 49 4E  |S THE NUMBERS IN|
00002280: 20 41 20 50 52 4F 42 4C  45 4D 20 59 4F 55 22 00  | A PROBLEM YOU".|
00002290: BE 3E 96 46 99 20 22 4E  45 45 44 20 54 4F 20 53  |.>.F. "NEED TO S|
000022A0: 4F 4C 56 45 20 4D 41 59  20 43 48 41 4E 47 45 2E  |OLVE MAY CHANGE.|
000022B0: 20 C9 4E 20 C2 C1 D3 C9  C3 20 59 4F 55 22 00 ED  | .N ..... YOU"..|
000022C0: 3E A0 46 99 20 22 43 41  4E 20 57 52 49 54 45 20  |>.F. "CAN WRITE |
000022D0: 54 48 45 20 50 52 4F 42  4C 45 4D 20 55 53 49 4E  |THE PROBLEM USIN|
000022E0: 47 20 41 20 56 41 52 49  41 42 4C 45 22 00 1D 3F  |G A VARIABLE"..?|
000022F0: AA 46 99 20 22 49 4E 53  54 45 41 44 20 4F 46 20  |.F. "INSTEAD OF |
00002300: 41 20 53 50 45 43 49 46  49 43 20 4E 55 4D 42 45  |A SPECIFIC NUMBE|
00002310: 52 2E 20 D4 4F 20 53 45  54 20 55 50 22 00 4B 3F  |R. .O SET UP".K?|
00002320: B4 46 99 20 22 41 20 56  41 52 49 41 42 4C 45 2C  |.F. "A VARIABLE,|
00002330: 20 54 59 50 45 20 49 54  53 20 4E 41 4D 45 20 28  | TYPE ITS NAME (|
00002340: 4F 4E 45 20 4F 52 20 54  57 4F 22 00 7B 3F BE 46  |ONE OR TWO".{?.F|
00002350: 99 20 22 4C 45 54 54 45  52 53 20 4F 52 20 41 20  |. "LETTERS OR A |
00002360: 4C 45 54 54 45 52 20 41  4E 44 20 41 20 4E 55 4D  |LETTER AND A NUM|
00002370: 42 45 52 29 2C 20 54 48  45 4E 22 00 AC 3F C8 46  |BER), THEN"..?.F|
00002380: 99 20 22 3D 2C 20 54 48  45 4E 20 54 48 45 20 4E  |. "=, THEN THE N|
00002390: 55 4D 42 45 52 20 59 4F  55 20 57 41 4E 54 20 54  |UMBER YOU WANT T|
000023A0: 48 45 20 56 41 52 49 41  42 4C 45 22 00 DC 3F D2  |HE VARIABLE"..?.|
000023B0: 46 99 20 22 54 4F 20 45  51 55 41 4C 2E 20 D4 48  |F. "TO EQUAL. .H|
000023C0: 45 4E 20 59 4F 55 20 43  41 4E 20 55 53 45 20 54  |EN YOU CAN USE T|
000023D0: 48 45 20 56 41 52 49 41  42 4C 45 22 00 FD 3F DC  |HE VARIABLE"..?.|
000023E0: 46 99 20 22 4E 41 4D 45  20 4A 55 53 54 20 4C 49  |F. "NAME JUST LI|
000023F0: 4B 45 20 41 20 4E 55 4D  42 45 52 2E 22 00 03 40  |KE A NUMBER."..@|
00002400: E6 46 99 00 2F 40 F0 46  99 20 22 C6 4F 52 20 45  |.F../@.F. ".OR E|
00002410: 58 41 4D 50 4C 45 2C 20  45 4E 54 45 52 20 41 20  |XAMPLE, ENTER A |
00002420: 4E 55 4D 42 45 52 20 46  4F 52 20 54 48 45 22 00  |NUMBER FOR THE".|
00002430: 56 40 FA 46 99 20 22 56  41 52 49 41 42 4C 45 20  |V@.F. "VARIABLE |
00002440: C1 2C 20 54 48 45 4E 20  50 52 45 53 53 20 D2 C5  |., THEN PRESS ..|
00002450: D4 D5 D2 CE 2E 22 00 5C  40 04 47 99 00 6D 40 0E  |.....".\@.G..m@.|
00002460: 47 99 20 22 31 30 20 C1  20 3D 20 22 3B 00 84 40  |G. "10 . = ";..@|
00002470: 10 47 8D 31 32 30 30 3A  8B 53 44 B2 32 A7 52 53  |.G.1200:.SD.2.RS|
00002480: B2 31 3A 8E 00 9F 40 13  47 8B 4B 42 24 B3 22 30  |.1:...@.G.KB$."0|
00002490: 22 B0 4B 42 24 B1 22 39  22 A7 31 38 31 39 32 00  |".KB$."9".18192.|
000024A0: B1 40 15 47 41 B2 C5 28  4B 42 24 29 3A 99 4B 42  |.@.GA..(KB$):.KB|
000024B0: 24 00 C6 40 18 47 99 20  22 32 30 20 D0 D2 C9 CE  |$..@.G. "20 ....|
000024C0: D4 20 C1 2B 31 22 00 E6  40 22 47 99 20 22 D2 D5  |. .+1"..@"G. "..|
000024D0: CE 22 3B 3A 8D 31 34 35  30 3A 8B 53 44 B2 32 A7  |.";:.1450:.SD.2.|
000024E0: 52 53 B2 31 3A 8E 00 EF  40 27 47 99 41 AA 31 00  |RS.1:...@'G.A.1.|
000024F0: F5 40 2C 47 8E 00 0A 41  38 4A 8F 20 2D 2D 2D 2D  |.@,G...A8J. ----|
00002500: 2D 20 53 43 52 45 45 4E  20 39 00 26 41 60 4A 99  |- SCREEN 9.&A`J.|
00002510: A3 31 32 29 22 D3 54 52  49 4E 47 20 D6 41 52 49  |.12)".TRING .ARI|
00002520: 41 42 4C 45 53 22 00 2C  41 6A 4A 99 00 59 41 74  |ABLES".,AjJ..YAt|
00002530: 4A 99 20 22 CE 4F 54 20  41 4C 4C 20 56 41 52 49  |J. ".OT ALL VARI|
00002540: 41 42 4C 45 53 20 53 54  41 4E 44 20 46 4F 52 20  |ABLES STAND FOR |
00002550: 4E 55 4D 42 45 52 53 2E  22 00 86 41 7E 4A 99 20  |NUMBERS."..A~J. |
00002560: 22 C2 C1 D3 C9 C3 20 48  41 53 20 41 20 53 50 45  |"..... HAS A SPE|
00002570: 43 49 41 4C 20 4B 49 4E  44 20 4F 46 20 56 41 52  |CIAL KIND OF VAR|
00002580: 49 41 42 4C 45 22 00 B6  41 88 4A 99 20 22 43 41  |IABLE"..A.J. "CA|
00002590: 4C 4C 45 44 20 41 20 53  54 52 49 4E 47 20 56 41  |LLED A STRING VA|
000025A0: 52 49 41 42 4C 45 20 54  48 41 54 20 43 41 4E 20  |RIABLE THAT CAN |
000025B0: 53 54 41 4E 44 22 00 E5  41 92 4A 99 20 22 46 4F  |STAND"..A.J. "FO|
000025C0: 52 20 54 45 58 54 2E 20  C1 20 53 54 52 49 4E 47  |R TEXT. . STRING|
000025D0: 20 49 53 20 41 4E 59 54  48 49 4E 47 20 59 4F 55  | IS ANYTHING YOU|
000025E0: 20 50 55 54 22 00 15 42  9C 4A 99 20 22 49 4E 20  | PUT"..B.J. "IN |
000025F0: 51 55 4F 54 41 54 49 4F  4E 20 4D 41 52 4B 53 2E  |QUOTATION MARKS.|
00002600: 20 C1 20 53 54 52 49 4E  47 20 56 41 52 49 41 42  | . STRING VARIAB|
00002610: 4C 45 27 53 22 00 40 42  A6 4A 99 20 22 4E 41 4D  |LE'S".@B.J. "NAM|
00002620: 45 20 49 53 20 46 4F 4C  4C 4F 57 45 44 20 42 59  |E IS FOLLOWED BY|
00002630: 20 24 2E 20 D4 4F 20 53  45 54 20 55 50 20 41 22  | $. .O SET UP A"|
00002640: 00 70 42 B0 4A 99 20 22  53 54 52 49 4E 47 20 56  |.pB.J. "STRING V|
00002650: 41 52 49 41 42 4C 45 2C  20 54 59 50 45 20 49 54  |ARIABLE, TYPE IT|
00002660: 53 20 4E 41 4D 45 2C 20  54 48 45 4E 20 3D 2C 22  |S NAME, THEN =,"|
00002670: 00 97 42 BA 4A 99 20 22  54 48 45 4E 20 54 48 45  |..B.J. "THEN THE|
00002680: 20 54 45 58 54 20 59 4F  55 20 57 41 4E 54 20 42  | TEXT YOU WANT B|
00002690: 45 54 57 45 45 4E 22 00  B0 42 C4 4A 99 20 22 51  |ETWEEN"..B.J. "Q|
000026A0: 55 4F 54 41 54 49 4F 4E  20 4D 41 52 4B 53 2E 22  |UOTATION MARKS."|
000026B0: 00 B6 42 CE 4A 99 00 E1  42 D8 4A 99 20 22 D0 52  |..B.J...B.J. ".R|
000026C0: 45 53 53 20 D2 C5 D4 D5  D2 CE 20 54 4F 20 53 45  |ESS ...... TO SE|
000026D0: 45 20 48 4F 57 20 54 48  45 20 53 54 52 49 4E 47  |E HOW THE STRING|
000026E0: 22 00 0C 43 E2 4A 99 20  22 56 41 52 49 41 42 4C  |"..C.J. "VARIABL|
000026F0: 45 20 C1 24 20 57 4F 52  4B 53 20 49 4E 20 54 48  |E .$ WORKS IN TH|
00002700: 49 53 20 45 58 41 4D 50  4C 45 3A 22 00 12 43 EC  |IS EXAMPLE:"..C.|
00002710: 4A 99 00 2D 43 F6 4A 41  24 B2 22 D4 C8 C9 D3 20  |J..-C.JA$.".... |
00002720: C9 D3 20 C1 20 D3 D4 D2  C9 CE C7 2E 22 00 49 43  |.. . .......".IC|
00002730: FB 4A 99 20 22 31 30 20  C1 24 20 3D 20 22 AA 44  |.J. "10 .$ = ".D|
00002740: 51 24 AA 41 24 AA 44 51  24 00 5D 43 00 4B 99 20  |Q$.A$.DQ$.]C.K. |
00002750: 22 32 30 20 D0 D2 C9 CE  D4 20 C1 24 22 00 7D 43  |"20 ..... .$".}C|
00002760: 0A 4B 99 20 22 D2 D5 CE  22 3B 3A 8D 31 34 35 30  |.K. "...";:.1450|
00002770: 3A 8B 53 44 B2 32 A7 52  53 B2 31 3A 8E 00 86 43  |:.SD.2.RS.1:...C|
00002780: 0F 4B 99 20 41 24 00 8C  43 14 4B 8E 00 A2 43 20  |.K. A$..C.K...C |
00002790: 4E 8F 20 2D 2D 2D 2D 2D  20 53 43 52 45 45 4E 20  |N. ----- SCREEN |
000027A0: 31 30 00 C2 43 48 4E 99  A3 39 29 22 D3 45 4D 49  |10..CHN..9)".EMI|
000027B0: 43 4F 4C 4F 4E 53 20 41  4E 44 20 C3 4F 4D 4D 41  |COLONS AND .OMMA|
000027C0: 53 22 00 C8 43 52 4E 99  00 F2 43 5C 4E 99 20 22  |S"..CRN...C\N. "|
000027D0: C2 C1 D3 C9 C3 20 4D 41  4B 45 53 20 55 53 45 20  |..... MAKES USE |
000027E0: 4F 46 20 53 45 4D 49 43  4F 4C 4F 4E 53 20 41 4E  |OF SEMICOLONS AN|
000027F0: 44 22 00 21 44 66 4E 99  20 22 43 4F 4D 4D 41 53  |D".!DfN. "COMMAS|
00002800: 2C 20 42 55 54 20 49 54  20 44 4F 45 53 4E 27 54  |, BUT IT DOESN'T|
00002810: 20 55 53 45 20 54 48 45  4D 20 49 4E 20 54 48 45  | USE THEM IN THE|
00002820: 22 00 40 44 70 4E 99 20  22 53 41 4D 45 20 57 41  |".@DpN. "SAME WA|
00002830: 59 20 C5 4E 47 4C 49 53  48 20 44 4F 45 53 2E 22  |Y .NGLISH DOES."|
00002840: 00 46 44 7A 4E 99 00 75  44 84 4E 99 20 22 D3 45  |.FDzN..uD.N. ".E|
00002850: 4D 49 43 4F 4C 4F 4E 53  20 28 3B 29 20 41 4E 44  |MICOLONS (;) AND|
00002860: 20 43 4F 4D 4D 41 53 20  28 2C 29 20 41 52 45 20  | COMMAS (,) ARE |
00002870: 55 53 45 44 22 00 A2 44  8E 4E 99 20 22 49 4E 20  |USED"..D.N. "IN |
00002880: D0 D2 C9 CE D4 20 53 54  41 54 45 4D 45 4E 54 53  |..... STATEMENTS|
00002890: 20 54 4F 20 54 45 4C 4C  20 54 48 45 20 C3 31 32  | TO TELL THE .12|
000028A0: 38 22 00 CB 44 98 4E 99  20 22 57 48 41 54 20 4B  |8"..D.N. "WHAT K|
000028B0: 49 4E 44 20 4F 46 20 53  50 41 43 49 4E 47 20 59  |IND OF SPACING Y|
000028C0: 4F 55 20 57 41 4E 54 20  49 4E 22 00 FC 44 A2 4E  |OU WANT IN"..D.N|
000028D0: 99 20 22 49 4E 46 4F 52  4D 41 54 49 4F 4E 20 54  |. "INFORMATION T|
000028E0: 4F 20 42 45 20 50 52 49  4E 54 45 44 20 4F 4E 20  |O BE PRINTED ON |
000028F0: 54 48 45 20 53 43 52 45  45 4E 2E 22 00 02 45 AC  |THE SCREEN."..E.|
00002900: 4E 8E 00 18 45 08 52 8F  20 2D 2D 2D 2D 2D 20 53  |N...E.R. ----- S|
00002910: 43 52 45 45 4E 20 31 31  00 1E 45 30 52 99 00 4A  |CREEN 11..E0R..J|
00002920: 45 3A 52 99 20 22 C1 20  53 45 4D 49 43 4F 4C 4F  |E:R. ". SEMICOLO|
00002930: 4E 20 54 45 4C 4C 53 20  54 48 45 20 C3 31 32 38  |N TELLS THE .128|
00002940: 20 54 4F 20 50 52 49 4E  54 22 00 78 45 44 52 99  | TO PRINT".xEDR.|
00002950: 20 22 57 48 41 54 27 53  20 42 45 46 4F 52 45 20  | "WHAT'S BEFORE |
00002960: 41 4E 44 20 41 46 54 45  52 20 54 48 45 20 53 45  |AND AFTER THE SE|
00002970: 4D 49 43 4F 4C 4F 4E 22  00 A7 45 4E 52 99 20 22  |MICOLON"..ENR. "|
00002980: 57 49 54 48 4F 55 54 20  41 4E 59 20 41 44 44 49  |WITHOUT ANY ADDI|
00002990: 54 49 4F 4E 41 4C 20 53  50 41 43 45 53 2E 20 CE  |TIONAL SPACES. .|
000029A0: 55 4D 42 45 52 53 22 00  D2 45 58 52 99 20 22 41  |UMBERS"..EXR. "A|
000029B0: 52 45 20 41 4C 57 41 59  53 20 50 52 49 4E 54 45  |RE ALWAYS PRINTE|
000029C0: 44 20 57 49 54 48 20 41  20 53 50 41 43 45 20 4F  |D WITH A SPACE O|
000029D0: 52 22 00 FE 45 62 52 99  20 22 4D 49 4E 55 53 20  |R"..EbR. "MINUS |
000029E0: 53 49 47 4E 20 42 45 46  4F 52 45 20 41 4E 44 20  |SIGN BEFORE AND |
000029F0: 41 20 53 50 41 43 45 20  41 46 54 45 52 22 00 2D  |A SPACE AFTER".-|
00002A00: 46 6C 52 99 20 22 54 48  45 4D 2E 20 D3 54 52 49  |FlR. "THEM. .TRI|
00002A10: 4E 47 53 20 41 52 45 20  50 52 49 4E 54 45 44 20  |NGS ARE PRINTED |
00002A20: 4A 55 53 54 20 41 53 20  54 48 45 59 22 00 59 46  |JUST AS THEY".YF|
00002A30: 76 52 99 20 22 41 50 50  45 41 52 20 42 45 54 57  |vR. "APPEAR BETW|
00002A40: 45 45 4E 20 54 48 45 20  51 55 4F 54 41 54 49 4F  |EEN THE QUOTATIO|
00002A50: 4E 20 4D 41 52 4B 53 2E  22 00 5F 46 80 52 99 00  |N MARKS."._F.R..|
00002A60: 8D 46 8A 52 99 20 22 D0  52 45 53 53 20 D2 C5 D4  |.F.R. ".RESS ...|
00002A70: D5 D2 CE 20 54 4F 20 53  45 45 20 48 4F 57 20 54  |... TO SEE HOW T|
00002A80: 48 45 20 53 45 4D 49 43  4F 4C 4F 4E 22 00 B6 46  |HE SEMICOLON"..F|
00002A90: 94 52 99 20 22 57 4F 52  4B 53 20 49 4E 20 45 41  |.R. "WORKS IN EA|
00002AA0: 43 48 20 4F 46 20 54 48  45 53 45 20 45 58 41 4D  |CH OF THESE EXAM|
00002AB0: 50 4C 45 53 3A 22 00 BC  46 9E 52 99 00 E4 46 A8  |PLES:"..F.R...F.|
00002AC0: 52 99 20 22 D0 D2 C9 CE  D4 20 31 3B 32 3B 33 22  |R. "..... 1;2;3"|
00002AD0: 3B 3A 8D 31 34 35 30 3A  8B 53 44 B2 32 A7 52 53  |;:.1450:.SD.2.RS|
00002AE0: B2 31 3A 8E 00 F0 46 B0  52 99 20 31 3B 32 3B 33  |.1:...F.R. 1;2;3|
00002AF0: 00 F6 46 B2 52 99 00 2B  47 BC 52 99 20 22 D0 D2  |..F.R..+G.R. "..|
00002B00: C9 CE D4 20 22 AA 44 51  24 AA 22 CA C1 C2 C2 C5  |... ".DQ$.".....|
00002B10: D2 22 AA 44 51 24 AA 22  3B 22 AA 44 51 24 AA 22  |.".DQ$.";".DQ$."|
00002B20: D7 CF C3 CB D9 22 AA 44  51 24 3B 00 42 47 C1 52  |.....".DQ$;.BG.R|
00002B30: 8D 31 34 35 30 3A 8B 53  44 B2 32 A7 52 53 B2 31  |.1450:.SD.2.RS.1|
00002B40: 3A 8E 00 59 47 C4 52 99  20 22 CA C1 C2 C2 C5 D2  |:..YG.R. "......|
00002B50: 22 3B 22 D7 CF C3 CB D9  22 00 5F 47 C6 52 99 00  |";"....."._G.R..|
00002B60: 72 47 D0 52 41 B2 31 30  3A 99 20 22 C1 20 3D 22  |rG.RA.10:. ". ="|
00002B70: 3B 41 00 B0 47 DA 52 99  20 22 D0 D2 C9 CE D4 20  |;A..G.R. "..... |
00002B80: 22 AA 44 51 24 AA 22 D4  D7 CF 20 D4 C9 CD C5 D3  |".DQ$."... .....|
00002B90: 22 AA 44 51 24 AA 22 3B  C1 3B 22 AA 44 51 24 AA  |".DQ$.";.;".DQ$.|
00002BA0: 22 C9 D3 22 AA 44 51 24  AA 22 3B C1 2A 32 22 3B  |"..".DQ$.";.*2";|
00002BB0: 00 C7 47 DF 52 8D 31 34  35 30 3A 8B 53 44 B2 32  |..G.R.1450:.SD.2|
00002BC0: A7 52 53 B2 31 3A 8E 00  E4 47 E2 52 99 20 22 D4  |.RS.1:...G.R. ".|
00002BD0: D7 CF 20 D4 C9 CD C5 D3  22 3B 41 3B 22 C9 D3 22  |.. .....";A;".."|
00002BE0: 3B 41 AC 32 00 EA 47 E4  52 8E 00 00 48 F0 55 8F  |;A.2..G.R...H.U.|
00002BF0: 20 2D 2D 2D 2D 2D 20 53  43 52 45 45 4E 20 31 32  | ----- SCREEN 12|
00002C00: 00 06 48 18 56 99 00 36  48 22 56 99 20 22 C1 20  |..H.V..6H"V. ". |
00002C10: 43 4F 4D 4D 41 20 54 45  4C 4C 53 20 59 4F 55 52  |COMMA TELLS YOUR|
00002C20: 20 43 4F 4D 50 55 54 45  52 20 54 4F 20 53 45 50  | COMPUTER TO SEP|
00002C30: 41 52 41 54 45 22 00 62  48 2C 56 99 20 22 57 48  |ARATE".bH,V. "WH|
00002C40: 41 54 27 53 20 42 45 46  4F 52 45 20 54 48 45 20  |AT'S BEFORE THE |
00002C50: 43 4F 4D 4D 41 20 46 52  4F 4D 20 57 48 41 54 27  |COMMA FROM WHAT'|
00002C60: 53 22 00 8F 48 31 56 99  20 22 41 46 54 45 52 20  |S"..H1V. "AFTER |
00002C70: 49 54 20 42 59 20 54 41  42 42 49 4E 47 20 54 4F  |IT BY TABBING TO|
00002C80: 20 54 48 45 20 4E 45 58  54 20 31 30 54 48 22 00  | THE NEXT 10TH".|
00002C90: 9F 48 36 56 99 20 22 43  4F 4C 55 4D 4E 2E 22 00  |.H6V. "COLUMN.".|
00002CA0: A5 48 40 56 99 00 D6 48  4A 56 99 20 22 D4 48 45  |.H@V...HJV. ".HE|
00002CB0: 20 45 58 41 4D 50 4C 45  53 20 42 45 4C 4F 57 20  | EXAMPLES BELOW |
00002CC0: 41 52 45 20 54 48 45 20  53 41 4D 45 20 41 53 20  |ARE THE SAME AS |
00002CD0: 54 48 4F 53 45 22 00 06  49 54 56 99 20 22 4F 4E  |THOSE"..ITV. "ON|
00002CE0: 20 54 48 45 20 50 52 45  56 49 4F 55 53 20 53 43  | THE PREVIOUS SC|
00002CF0: 52 45 45 4E 2C 20 45 58  43 45 50 54 20 54 48 41  |REEN, EXCEPT THA|
00002D00: 54 20 54 48 45 22 00 31  49 5E 56 99 20 22 53 45  |T THE".1I^V. "SE|
00002D10: 4D 49 43 4F 4C 4F 4E 53  20 48 41 56 45 20 42 45  |MICOLONS HAVE BE|
00002D20: 45 4E 20 52 45 50 4C 41  43 45 44 20 57 49 54 48  |EN REPLACED WITH|
00002D30: 22 00 5D 49 68 56 99 20  22 43 4F 4D 4D 41 53 2E  |".]IhV. "COMMAS.|
00002D40: 20 D0 52 45 53 53 20 D2  C5 D4 D5 D2 CE 20 54 4F  | .RESS ...... TO|
00002D50: 20 53 45 45 20 48 4F 57  20 54 48 45 22 00 7E 49  | SEE HOW THE".~I|
00002D60: 72 56 99 20 22 43 4F 4D  4D 41 20 57 4F 52 4B 53  |rV. "COMMA WORKS|
00002D70: 20 49 4E 20 45 41 43 48  20 4F 4E 45 2E 22 00 84  | IN EACH ONE."..|
00002D80: 49 7C 56 99 00 AC 49 86  56 99 20 22 D0 D2 C9 CE  |I|V...I.V. "....|
00002D90: D4 20 31 2C 32 2C 33 22  3B 3A 8D 31 34 35 30 3A  |. 1,2,3";:.1450:|
00002DA0: 8B 53 44 B2 32 A7 52 53  B2 31 3A 8E 00 B8 49 8E  |.SD.2.RS.1:...I.|
00002DB0: 56 99 20 31 2C 32 2C 33  00 BE 49 90 56 99 00 F3  |V. 1,2,3..I.V...|
00002DC0: 49 9A 56 99 20 22 D0 D2  C9 CE D4 20 22 AA 44 51  |I.V. "..... ".DQ|
00002DD0: 24 AA 22 CA C1 C2 C2 C5  D2 22 AA 44 51 24 AA 22  |$."......".DQ$."|
00002DE0: 2C 22 AA 44 51 24 AA 22  D7 CF C3 CB D9 22 AA 44  |,".DQ$.".....".D|
00002DF0: 51 24 3B 00 0A 4A 9F 56  8D 31 34 35 30 3A 8B 53  |Q$;..J.V.1450:.S|
00002E00: 44 B2 32 A7 52 53 B2 31  3A 8E 00 21 4A A2 56 99  |D.2.RS.1:..!J.V.|
00002E10: 20 22 CA C1 C2 C2 C5 D2  22 2C 22 D7 CF C3 CB D9  | "......",".....|
00002E20: 22 00 27 4A A4 56 99 00  3A 4A AE 56 41 B2 31 30  |".'J.V..:J.VA.10|
00002E30: 3A 99 20 22 C1 20 3D 22  3B 41 00 78 4A B8 56 99  |:. ". =";A.xJ.V.|
00002E40: 20 22 D0 D2 C9 CE D4 20  22 AA 44 51 24 AA 22 D4  | "..... ".DQ$.".|
00002E50: D7 CF 20 D4 C9 CD C5 D3  22 AA 44 51 24 AA 22 2C  |.. .....".DQ$.",|
00002E60: C1 2C 22 AA 44 51 24 AA  22 C9 D3 22 AA 44 51 24  |.,".DQ$."..".DQ$|
00002E70: AA 22 2C C1 2A 32 22 3B  00 8F 4A BD 56 8D 31 34  |.",.*2";..J.V.14|
00002E80: 35 30 3A 8B 53 44 B2 32  A7 52 53 B2 31 3A 8E 00  |50:.SD.2.RS.1:..|
00002E90: AC 4A C0 56 99 20 22 D4  D7 CF 20 D4 C9 CD C5 D3  |.J.V. "... .....|
00002EA0: 22 2C 41 2C 22 C9 D3 22  2C 41 AC 32 00 B2 4A C2  |",A,"..",A.2..J.|
00002EB0: 56 8E 00 C8 4A D8 59 8F  20 2D 2D 2D 2D 2D 20 53  |V...J.Y. ----- S|
00002EC0: 43 52 45 45 4E 20 31 33  00 DA 4A F6 59 99 A3 31  |CREEN 13..J.Y..1|
00002ED0: 37 29 22 D2 C5 CD 41 52  4B 22 00 E0 4A 00 5A 99  |7)"...ARK"..J.Z.|
00002EE0: 00 11 4B 0A 5A 99 20 22  D3 4F 4D 45 54 49 4D 45  |..K.Z. ".OMETIME|
00002EF0: 53 20 49 54 27 53 20 48  41 52 44 20 54 4F 20 46  |S IT'S HARD TO F|
00002F00: 49 47 55 52 45 20 4F 55  54 20 57 48 41 54 20 41  |IGURE OUT WHAT A|
00002F10: 22 00 42 4B 14 5A 99 20  22 50 52 4F 47 52 41 4D  |".BK.Z. "PROGRAM|
00002F20: 20 44 4F 45 53 20 4A 55  53 54 20 42 59 20 4C 4F  | DOES JUST BY LO|
00002F30: 4F 4B 49 4E 47 20 41 54  20 49 54 2E 20 D7 48 45  |OKING AT IT. .HE|
00002F40: 4E 22 00 70 4B 1E 5A 99  20 22 59 4F 55 27 52 45  |N".pK.Z. "YOU'RE|
00002F50: 20 57 52 49 54 49 4E 47  20 41 20 50 52 4F 47 52  | WRITING A PROGR|
00002F60: 41 4D 2C 20 59 4F 55 20  43 41 4E 20 41 44 44 22  |AM, YOU CAN ADD"|
00002F70: 00 9C 4B 28 5A 99 20 22  4C 49 4E 45 53 20 54 48  |..K(Z. "LINES TH|
00002F80: 41 54 20 57 49 4C 4C 20  52 45 4D 49 4E 44 20 59  |AT WILL REMIND Y|
00002F90: 4F 55 20 57 48 41 54 20  54 48 45 22 00 CD 4B 32  |OU WHAT THE"..K2|
00002FA0: 5A 99 20 22 50 52 4F 47  52 41 4D 20 44 4F 45 53  |Z. "PROGRAM DOES|
00002FB0: 20 41 4E 44 20 48 4F 57  20 49 54 20 57 4F 52 4B  | AND HOW IT WORK|
00002FC0: 53 2E 20 CA 55 53 54 20  54 59 50 45 22 00 FB 4B  |S. .UST TYPE"..K|
00002FD0: 3C 5A 99 20 22 41 20 4C  49 4E 45 20 4E 55 4D 42  |<Z. "A LINE NUMB|
00002FE0: 45 52 2C 20 54 48 45 4E  20 D2 C5 CD 20 28 57 48  |ER, THEN ... (WH|
00002FF0: 49 43 48 20 53 54 41 4E  44 53 22 00 2B 4C 46 5A  |ICH STANDS".+LFZ|
00003000: 99 20 22 46 4F 52 20 D2  C5 CD 41 52 4B 29 2C 20  |. "FOR ...ARK), |
00003010: 54 48 45 4E 20 59 4F 55  52 20 52 45 4D 41 52 4B  |THEN YOUR REMARK|
00003020: 2E 20 D7 48 45 4E 20 59  4F 55 22 00 5A 4C 50 5A  |. .HEN YOU".ZLPZ|
00003030: 99 20 22 52 55 4E 20 54  48 45 20 50 52 4F 47 52  |. "RUN THE PROGR|
00003040: 41 4D 2C 20 C2 C1 D3 C9  C3 20 57 49 4C 4C 20 49  |AM, ..... WILL I|
00003050: 47 4E 4F 52 45 20 54 48  45 22 00 87 4C 5A 5A 99  |GNORE THE"..LZZ.|
00003060: 20 22 4C 49 4E 45 2E 20  C2 55 54 20 57 48 45 4E  | "LINE. .UT WHEN|
00003070: 20 59 4F 55 20 4C 49 53  54 20 54 48 45 20 50 52  | YOU LIST THE PR|
00003080: 4F 47 52 41 4D 2C 22 00  A8 4C 64 5A 99 20 22 59  |OGRAM,"..LdZ. "Y|
00003090: 4F 55 52 20 52 45 4D 41  52 4B 20 57 49 4C 4C 20  |OUR REMARK WILL |
000030A0: 41 50 50 45 41 52 2E 22  00 AE 4C 6E 5A 99 00 DB  |APPEAR."..LnZ...|
000030B0: 4C 78 5A 99 20 22 D0 52  45 53 53 20 D2 C5 D4 D5  |LxZ. ".RESS ....|
000030C0: D2 CE 2E 20 D9 4F 55 27  4C 4C 20 53 45 45 20 54  |... .OU'LL SEE T|
000030D0: 48 41 54 20 D2 C5 CD 20  49 53 22 00 EC 4C 82 5A  |HAT ... IS"..L.Z|
000030E0: 99 20 22 49 47 4E 4F 52  45 44 2E 22 00 F2 4C 8C  |. "IGNORED."..L.|
000030F0: 5A 99 00 27 4D 96 5A 99  20 22 31 30 20 D2 C5 CD  |Z..'M.Z. "10 ...|
00003100: 20 D4 C8 C9 D3 20 D0 D2  CF C7 D2 C1 CD 20 D0 D2  | .... ....... ..|
00003110: C9 CE D4 D3 20 22 AA 44  51 24 AA 22 C8 C5 CC CC  |.... ".DQ$."....|
00003120: CF 21 22 AA 44 51 24 00  4A 4D A0 5A 99 20 22 32  |.!".DQ$.JM.Z. "2|
00003130: 30 20 D0 D2 C9 CE D4 20  22 AA 44 51 24 AA 22 C8  |0 ..... ".DQ$.".|
00003140: C5 CC CC CF 21 22 AA 44  51 24 00 6A 4D AA 5A 99  |....!".DQ$.jM.Z.|
00003150: 20 22 D2 D5 CE 22 3B 3A  8D 31 34 35 30 3A 8B 53  | "...";:.1450:.S|
00003160: 44 B2 32 A7 52 53 B2 31  3A 8E 00 79 4D AF 5A 99  |D.2.RS.1:..yM.Z.|
00003170: 20 22 C8 C5 CC CC CF 21  22 00 7F 4D B4 5A 8E 00  | ".....!"..M.Z..|
00003180: 95 4D C0 5D 8F 20 2D 2D  2D 2D 2D 20 53 43 52 45  |.M.]. ----- SCRE|
00003190: 45 4E 20 31 34 00 A5 4D  DE 5D 99 A3 31 38 29 22  |EN 14..M.]..18)"|
000031A0: C7 CF D4 CF 22 00 AB 4D  E8 5D 99 00 D8 4D F2 5D  |...."..M.]...M.]|
000031B0: 99 20 22 D4 48 45 20 C7  CF D4 CF 20 43 4F 4D 4D  |. ".HE .... COMM|
000031C0: 41 4E 44 20 4C 45 54 53  20 59 4F 55 20 43 48 41  |AND LETS YOU CHA|
000031D0: 4E 47 45 20 54 48 45 22  00 08 4E FC 5D 99 20 22  |NGE THE"..N.]. "|
000031E0: 4F 52 44 45 52 20 49 4E  20 57 48 49 43 48 20 54  |ORDER IN WHICH T|
000031F0: 48 45 20 43 4F 4D 50 55  54 45 52 20 46 4F 4C 4C  |HE COMPUTER FOLL|
00003200: 4F 57 53 20 54 48 45 22  00 34 4E 06 5E 99 20 22  |OWS THE".4N.^. "|
00003210: 49 4E 53 54 52 55 43 54  49 4F 4E 53 20 49 4E 20  |INSTRUCTIONS IN |
00003220: 59 4F 55 52 20 50 52 4F  47 52 41 4D 2E 20 C7 CF  |YOUR PROGRAM. ..|
00003230: D4 CF 2C 22 00 61 4E 10  5E 99 20 22 46 4F 4C 4C  |..,".aN.^. "FOLL|
00003240: 4F 57 45 44 20 42 59 20  41 20 4C 49 4E 45 20 4E  |OWED BY A LINE N|
00003250: 55 4D 42 45 52 2C 20 54  45 4C 4C 53 20 54 48 45  |UMBER, TELLS THE|
00003260: 22 00 92 4E 1A 5E 99 20  22 43 4F 4D 50 55 54 45  |"..N.^. "COMPUTE|
00003270: 52 20 54 4F 20 4A 55 4D  50 20 54 4F 20 54 48 41  |R TO JUMP TO THA|
00003280: 54 20 4C 49 4E 45 20 49  4E 53 54 45 41 44 20 4F  |T LINE INSTEAD O|
00003290: 46 22 00 C1 4E 24 5E 99  20 22 47 4F 49 4E 47 20  |F"..N$^. "GOING |
000032A0: 4F 4E 20 54 4F 20 54 48  45 20 4E 45 58 54 20 4C  |ON TO THE NEXT L|
000032B0: 49 4E 45 20 49 4E 20 4E  55 4D 45 52 49 43 41 4C  |INE IN NUMERICAL|
000032C0: 22 00 D0 4E 2E 5E 99 20  22 4F 52 44 45 52 2E 22  |"..N.^. "ORDER."|
000032D0: 00 D6 4E 38 5E 99 00 04  4F 42 5E 99 20 22 D0 52  |..N8^...OB^. ".R|
000032E0: 45 53 53 20 D2 C5 D4 D5  D2 CE 20 54 4F 20 53 45  |ESS ...... TO SE|
000032F0: 45 20 48 4F 57 20 C7 CF  D4 CF 20 57 4F 52 4B 53  |E HOW .... WORKS|
00003300: 20 49 4E 22 00 21 4F 4C  5E 99 20 22 54 48 49 53  | IN".!OL^. "THIS|
00003310: 20 53 41 4D 50 4C 45 20  50 52 4F 47 52 41 4D 3A  | SAMPLE PROGRAM:|
00003320: 22 00 27 4F 56 5E 99 00  4A 4F 60 5E 99 20 22 31  |".'OV^..JO`^. "1|
00003330: 30 20 D0 D2 C9 CE D4 20  22 AA 44 51 24 AA 22 C8  |0 ..... ".DQ$.".|
00003340: C5 CC CC CF 21 22 AA 44  51 24 00 5D 4F 6A 5E 99  |....!".DQ$.]Oj^.|
00003350: 20 22 32 30 20 C7 CF D4  CF 20 34 30 22 00 82 4F  | "20 .... 40"..O|
00003360: 74 5E 99 20 22 33 30 20  D0 D2 C9 CE D4 20 22 AA  |t^. "30 ..... ".|
00003370: 44 51 24 AA 22 C7 CF CF  C4 C2 D9 C5 2E 22 AA 44  |DQ$."........".D|
00003380: 51 24 00 AB 4F 7E 5E 99  20 22 34 30 20 D0 D2 C9  |Q$..O~^. "40 ...|
00003390: CE D4 20 22 AA 44 51 24  AA 22 C8 CF D7 20 C1 D2  |.. ".DQ$."... ..|
000033A0: C5 20 D9 CF D5 3F 22 AA  44 51 24 00 CB 4F 88 5E  |. ...?".DQ$..O.^|
000033B0: 99 20 22 D2 D5 CE 22 3B  3A 8D 31 34 35 30 3A 8B  |. "...";:.1450:.|
000033C0: 53 44 B2 32 A7 52 53 B2  31 3A 8E 00 D9 4F 8A 5E  |SD.2.RS.1:...O.^|
000033D0: 99 22 C8 C5 CC CC CF 21  22 00 EE 4F 8C 5E 99 20  |.".....!"..O.^. |
000033E0: 22 C8 CF D7 20 C1 D2 C5  20 D9 CF D5 3F 22 00 F4  |"... ... ...?"..|
000033F0: 4F 92 5E 8E 00 0A 50 A8  61 8F 20 2D 2D 2D 2D 2D  |O.^...P.a. -----|
00003400: 20 53 43 52 45 45 4E 20  31 35 00 19 50 C6 61 99  | SCREEN 15..P.a.|
00003410: A3 31 38 29 22 C5 CE C4  22 00 1F 50 D0 61 99 00  |.18)"..."..P.a..|
00003420: 4D 50 DA 61 99 20 22 D4  48 45 20 C5 CE C4 20 43  |MP.a. ".HE ... C|
00003430: 4F 4D 4D 41 4E 44 20 54  45 4C 4C 53 20 54 48 45  |OMMAND TELLS THE|
00003440: 20 43 4F 4D 50 55 54 45  52 20 54 4F 22 00 7D 50  | COMPUTER TO".}P|
00003450: E4 61 99 20 22 53 54 4F  50 20 43 41 52 52 59 49  |.a. "STOP CARRYI|
00003460: 4E 47 20 4F 55 54 20 54  48 45 20 49 4E 53 54 52  |NG OUT THE INSTR|
00003470: 55 43 54 49 4F 4E 53 20  49 4E 20 41 22 00 8E 50  |UCTIONS IN A"..P|
00003480: EE 61 99 20 22 50 52 4F  47 52 41 4D 2E 22 00 94  |.a. "PROGRAM."..|
00003490: 50 F8 61 99 00 BD 50 02  62 99 20 22 C1 4C 54 48  |P.a...P.b. ".LTH|
000034A0: 4F 55 47 48 20 59 4F 55  52 20 43 4F 4D 50 55 54  |OUGH YOUR COMPUT|
000034B0: 45 52 20 57 49 4C 4C 20  53 54 4F 50 22 00 EC 50  |ER WILL STOP"..P|
000034C0: 0C 62 99 20 22 45 58 45  43 55 54 49 4E 47 20 43  |.b. "EXECUTING C|
000034D0: 4F 4D 4D 41 4E 44 53 20  57 48 45 4E 20 49 54 20  |OMMANDS WHEN IT |
000034E0: 52 55 4E 53 20 4F 55 54  20 4F 46 22 00 18 51 16  |RUNS OUT OF"..Q.|
000034F0: 62 99 20 22 49 4E 53 54  52 55 43 54 49 4F 4E 53  |b. "INSTRUCTIONS|
00003500: 20 54 4F 20 46 4F 4C 4C  4F 57 2C 20 49 54 27 53  | TO FOLLOW, IT'S|
00003510: 20 41 20 47 4F 4F 44 22  00 46 51 1B 62 99 20 22  | A GOOD".FQ.b. "|
00003520: 49 44 45 41 20 54 4F 20  45 4E 44 20 45 56 45 52  |IDEA TO END EVER|
00003530: 59 20 50 52 4F 47 52 41  4D 20 57 49 54 48 20 41  |Y PROGRAM WITH A|
00003540: 4E 20 C5 CE C4 22 00 5E  51 20 62 99 20 22 43 4F  |N ...".^Q b. "CO|
00003550: 4D 4D 41 4E 44 20 41 4E  59 57 41 59 2E 22 00 64  |MMAND ANYWAY.".d|
00003560: 51 2A 62 8E 00 7A 51 9C  63 8F 20 2D 2D 2D 2D 2D  |Q*b..zQ.c. -----|
00003570: 20 53 43 52 45 45 4E 20  31 36 00 80 51 B2 63 99  | SCREEN 16..Q.c.|
00003580: 00 86 51 B4 63 99 00 B7  51 BA 63 99 20 22 C8 4F  |..Q.c...Q.c. ".O|
00003590: 57 45 56 45 52 2C 20 59  4F 55 20 43 41 4E 20 48  |WEVER, YOU CAN H|
000035A0: 41 56 45 20 49 4E 53 54  52 55 43 54 49 4F 4E 53  |AVE INSTRUCTIONS|
000035B0: 20 41 46 54 45 52 22 00  E8 51 C4 63 99 20 22 41  | AFTER"..Q.c. "A|
000035C0: 4E 20 C5 CE C4 20 43 4F  4D 4D 41 4E 44 20 49 4E  |N ... COMMAND IN|
000035D0: 20 41 20 50 52 4F 47 52  41 4D 2C 20 41 53 20 53  | A PROGRAM, AS S|
000035E0: 48 4F 57 4E 20 49 4E 22  00 17 52 CE 63 99 20 22  |HOWN IN"..R.c. "|
000035F0: 54 48 45 20 45 58 41 4D  50 4C 45 20 42 45 4C 4F  |THE EXAMPLE BELO|
00003600: 57 2E 20 D0 52 45 53 53  20 D2 C5 D4 D5 D2 CE 20  |W. .RESS ...... |
00003610: 54 4F 20 52 55 4E 22 00  23 52 D3 63 99 20 22 49  |TO RUN".#R.c. "I|
00003620: 54 2E 22 00 29 52 D8 63  99 00 4C 52 E2 63 99 20  |T.".)R.c..LR.c. |
00003630: 22 31 30 20 D0 D2 C9 CE  D4 20 22 AA 44 51 24 AA  |"10 ..... ".DQ$.|
00003640: 22 C8 C5 CC CC CF 21 22  AA 44 51 24 00 5F 52 EC  |".....!".DQ$._R.|
00003650: 63 99 20 22 32 30 20 C7  CF D4 CF 20 35 30 22 00  |c. "20 .... 50".|
00003660: 84 52 F6 63 99 20 22 33  30 20 D0 D2 C9 CE D4 20  |.R.c. "30 ..... |
00003670: 22 AA 44 51 24 AA 22 C7  CF CF C4 C2 D9 C5 2E 22  |".DQ$."........"|
00003680: AA 44 51 24 00 93 52 00  64 99 20 22 34 30 20 C5  |.DQ$..R.d. "40 .|
00003690: CE C4 22 00 BC 52 0A 64  99 20 22 35 30 20 D0 D2  |.."..R.d. "50 ..|
000036A0: C9 CE D4 20 22 AA 44 51  24 AA 22 C8 CF D7 20 C1  |... ".DQ$."... .|
000036B0: D2 C5 20 D9 CF D5 3F 22  AA 44 51 24 00 CF 52 14  |.. ...?".DQ$..R.|
000036C0: 64 99 20 22 36 30 20 C7  CF D4 CF 20 33 30 22 00  |d. "60 .... 30".|
000036D0: EF 52 1E 64 99 20 22 D2  D5 CE 22 3B 3A 8D 31 34  |.R.d. "...";:.14|
000036E0: 35 30 3A 8B 53 44 B2 32  A7 52 53 B2 31 3A 8E 00  |50:.SD.2.RS.1:..|
000036F0: FE 52 28 64 99 20 22 C8  C5 CC CC CF 21 22 00 13  |.R(d. ".....!"..|
00003700: 53 32 64 99 20 22 C8 CF  D7 20 C1 D2 C5 20 D9 CF  |S2d. "... ... ..|
00003710: D5 3F 22 00 24 53 3C 64  99 20 22 C7 CF CF C4 C2  |.?".$S<d. ".....|
00003720: D9 C5 2E 22 00 2A 53 46  64 8E 00 40 53 90 65 8F  |...".*SFd..@S.e.|
00003730: 20 2D 2D 2D 2D 2D 20 53  43 52 45 45 4E 20 31 37  | ----- SCREEN 17|
00003740: 00 55 53 AE 65 99 A3 31  35 29 22 D4 48 45 20 C3  |.US.e..15)".HE .|
00003750: 4F 4C 4F 4E 22 00 5B 53  B8 65 99 00 8C 53 C2 65  |OLON".[S.e...S.e|
00003760: 99 20 22 D9 4F 55 20 55  53 45 20 54 48 45 20 43  |. ".OU USE THE C|
00003770: 4F 4C 4F 4E 20 28 3A 29  20 54 4F 20 53 45 50 41  |OLON (:) TO SEPA|
00003780: 52 41 54 45 20 54 57 4F  20 4F 52 22 00 BA 53 CC  |RATE TWO OR"..S.|
00003790: 65 99 20 22 4D 4F 52 45  20 C2 C1 D3 C9 C3 20 43  |e. "MORE ..... C|
000037A0: 4F 4D 4D 41 4E 44 53 20  4F 4E 20 54 48 45 20 53  |OMMANDS ON THE S|
000037B0: 41 4D 45 20 4C 49 4E 45  2E 22 00 C0 53 D6 65 99  |AME LINE."..S.e.|
000037C0: 00 EA 53 E0 65 99 20 22  C2 59 20 55 53 49 4E 47  |..S.e. ".Y USING|
000037D0: 20 43 4F 4C 4F 4E 53 20  59 4F 55 20 43 41 4E 20  | COLONS YOU CAN |
000037E0: 4D 41 4B 45 20 59 4F 55  52 22 00 1A 54 EA 65 99  |MAKE YOUR"..T.e.|
000037F0: 20 22 50 52 4F 47 52 41  4D 53 20 4D 4F 52 45 20  | "PROGRAMS MORE |
00003800: 43 4F 4D 50 41 43 54 2E  20 C6 4F 52 20 45 58 41  |COMPACT. .OR EXA|
00003810: 4D 50 4C 45 2C 20 59 4F  55 22 00 44 54 F4 65 99  |MPLE, YOU".DT.e.|
00003820: 20 22 43 41 4E 20 50 55  54 20 54 48 45 53 45 20  | "CAN PUT THESE |
00003830: 54 57 4F 20 49 4E 53 54  52 55 43 54 49 4F 4E 53  |TWO INSTRUCTIONS|
00003840: 20 2D 2D 22 00 4A 54 FE  65 99 00 5C 54 08 66 99  | --".JT.e..\T.f.|
00003850: 20 22 31 30 20 D8 20 3D  20 31 30 22 00 73 54 12  | "10 . = 10".sT.|
00003860: 66 99 20 22 32 30 20 D0  D2 C9 CE D4 20 D8 20 2A  |f. "20 ..... . *|
00003870: 20 35 22 00 79 54 1C 66  99 00 93 54 26 66 99 20  | 5".yT.f...T&f. |
00003880: 22 4F 4E 20 41 20 53 49  4E 47 4C 45 20 4C 49 4E  |"ON A SINGLE LIN|
00003890: 45 3A 22 00 99 54 30 66  99 00 B8 54 3A 66 99 20  |E:"..T0f...T:f. |
000038A0: 22 31 30 20 D8 20 3D 20  31 30 20 3A D0 D2 C9 CE  |"10 . = 10 :....|
000038B0: D4 20 D8 20 2A 20 35 22  00 BE 54 44 66 99 00 EE  |. . * 5"..TDf...|
000038C0: 54 4E 66 99 20 22 C3 4F  4C 4F 4E 53 20 41 4C 53  |TNf. ".OLONS ALS|
000038D0: 4F 20 4D 41 4B 45 20 49  54 20 45 41 53 59 20 54  |O MAKE IT EASY T|
000038E0: 4F 20 41 44 44 20 52 45  4D 41 52 4B 53 22 00 08  |O ADD REMARKS"..|
000038F0: 55 58 66 99 20 22 54 4F  20 59 4F 55 52 20 50 52  |UXf. "TO YOUR PR|
00003900: 4F 47 52 41 4D 53 3A 22  00 0E 55 62 66 99 00 37  |OGRAMS:"..Ubf..7|
00003910: 55 6C 66 99 20 22 35 30  20 D4 20 3D 20 D2 20 2B  |Ulf. "50 . = . +|
00003920: 20 D3 20 3A D2 C5 CD 20  D4 20 C9 D3 20 D4 C8 C5  | . :... . .. ...|
00003930: 20 D4 CF D4 C1 CC 22 00  3D 55 76 66 8E 00 53 55  | .....".=Uvf..SU|
00003940: 78 69 8F 20 2D 2D 2D 2D  2D 20 53 43 52 45 45 4E  |xi. ----- SCREEN|
00003950: 20 31 38 00 74 55 96 69  99 A3 39 29 22 C5 44 49  | 18.tU.i..9)".DI|
00003960: 54 49 4E 47 20 C2 C1 D3  C9 C3 20 D0 52 4F 47 52  |TING ..... .ROGR|
00003970: 41 4D 53 22 00 7A 55 A0  69 99 00 A9 55 AA 69 99  |AMS".zU.i...U.i.|
00003980: 20 22 C1 53 20 53 48 4F  57 4E 20 49 4E 20 54 48  | ".S SHOWN IN TH|
00003990: 45 20 53 41 4D 50 4C 45  20 50 52 4F 47 52 41 4D  |E SAMPLE PROGRAM|
000039A0: 53 20 59 4F 55 27 56 45  22 00 D7 55 B4 69 99 20  |S YOU'VE"..U.i. |
000039B0: 22 53 45 45 4E 2C 20 49  54 27 53 20 41 20 47 4F  |"SEEN, IT'S A GO|
000039C0: 4F 44 20 49 44 45 41 20  54 4F 20 4E 55 4D 42 45  |OD IDEA TO NUMBE|
000039D0: 52 20 59 4F 55 52 22 00  04 56 BE 69 99 20 22 50  |R YOUR"..V.i. "P|
000039E0: 52 4F 47 52 41 4D 20 4C  49 4E 45 53 20 49 4E 20  |ROGRAM LINES IN |
000039F0: 4D 55 4C 54 49 50 4C 45  53 20 4F 46 20 54 45 4E  |MULTIPLES OF TEN|
00003A00: 20 2D 2D 22 00 32 56 C8  69 99 20 22 54 48 49 53  | --".2V.i. "THIS|
00003A10: 20 57 41 59 2C 20 59 4F  55 27 4C 4C 20 48 41 56  | WAY, YOU'LL HAV|
00003A20: 45 20 52 4F 4F 4D 20 54  4F 20 41 44 44 20 4E 45  |E ROOM TO ADD NE|
00003A30: 57 22 00 60 56 D2 69 99  20 22 4C 49 4E 45 53 20  |W".`V.i. "LINES |
00003A40: 4C 41 54 45 52 20 4F 4E  2E 20 D4 4F 20 49 4E 53  |LATER ON. .O INS|
00003A50: 45 52 54 20 41 20 4E 45  57 20 4C 49 4E 45 2C 22  |ERT A NEW LINE,"|
00003A60: 00 91 56 DC 69 99 20 22  4A 55 53 54 20 43 48 4F  |..V.i. "JUST CHO|
00003A70: 4F 53 45 20 41 20 4E 45  57 20 4C 49 4E 45 20 4E  |OSE A NEW LINE N|
00003A80: 55 4D 42 45 52 20 49 4E  20 42 45 54 57 45 45 4E  |UMBER IN BETWEEN|
00003A90: 22 00 C1 56 E6 69 99 20  22 54 48 45 20 4E 55 4D  |"..V.i. "THE NUM|
00003AA0: 42 45 52 53 20 4F 46 20  54 57 4F 20 4C 49 4E 45  |BERS OF TWO LINE|
00003AB0: 53 20 41 4C 52 45 41 44  59 20 54 48 45 52 45 2E  |S ALREADY THERE.|
00003AC0: 22 00 C7 56 F0 69 99 00  F6 56 FA 69 99 20 22 D4  |"..V.i...V.i. ".|
00003AD0: 4F 20 44 45 4C 45 54 45  20 41 20 4C 49 4E 45 2C  |O DELETE A LINE,|
00003AE0: 20 54 59 50 45 20 49 54  53 20 4C 49 4E 45 20 4E  | TYPE ITS LINE N|
00003AF0: 55 4D 42 45 52 22 00 22  57 04 6A 99 20 22 41 4E  |UMBER"."W.j. "AN|
00003B00: 44 20 50 52 45 53 53 20  D2 C5 D4 D5 D2 CE 2E 20  |D PRESS ....... |
00003B10: D4 4F 20 44 45 4C 45 54  45 20 53 45 56 45 52 41  |.O DELETE SEVERA|
00003B20: 4C 22 00 51 57 06 6A 99  20 22 4C 49 4E 45 53 2C  |L".QW.j. "LINES,|
00003B30: 20 54 59 50 45 20 54 48  45 20 42 45 47 49 4E 4E  | TYPE THE BEGINN|
00003B40: 49 4E 47 20 4C 49 4E 45  20 4E 55 4D 42 45 52 2C  |ING LINE NUMBER,|
00003B50: 22 00 7B 57 08 6A 99 20  22 41 20 48 59 50 48 45  |".{W.j. "A HYPHE|
00003B60: 4E 20 28 2D 29 2C 20 41  4E 44 20 54 48 45 20 45  |N (-), AND THE E|
00003B70: 4E 44 49 4E 47 20 4C 49  4E 45 22 00 9E 57 0A 6A  |NDING LINE"..W.j|
00003B80: 99 20 22 4E 55 4D 42 45  52 2E 20 D4 48 45 4E 20  |. "NUMBER. .HEN |
00003B90: 50 52 45 53 53 20 D2 C5  D4 D5 D2 CE 2E 22 00 A4  |PRESS ......."..|
00003BA0: 57 0E 6A 99 00 D4 57 18  6A 99 20 22 D4 4F 20 52  |W.j...W.j. ".O R|
00003BB0: 45 50 4C 41 43 45 20 41  20 4C 49 4E 45 2C 20 54  |EPLACE A LINE, T|
00003BC0: 59 50 45 20 41 20 4E 45  57 20 4C 49 4E 45 20 54  |YPE A NEW LINE T|
00003BD0: 48 41 54 22 00 FF 57 22  6A 99 20 22 53 54 41 52  |HAT"..W"j. "STAR|
00003BE0: 54 53 20 57 49 54 48 20  54 48 45 20 53 41 4D 45  |TS WITH THE SAME|
00003BF0: 20 4E 55 4D 42 45 52 20  41 53 20 54 48 45 22 00  | NUMBER AS THE".|
00003C00: 25 58 2C 6A 99 20 22 4F  4E 45 20 59 4F 55 20 57  |%X,j. "ONE YOU W|
00003C10: 41 4E 54 20 54 4F 20 52  45 50 4C 41 43 45 2C 20  |ANT TO REPLACE, |
00003C20: 54 48 45 4E 22 00 3B 58  31 6A 99 20 22 50 52 45  |THEN".;X1j. "PRE|
00003C30: 53 53 20 D2 C5 D4 D5 D2  CE 2E 22 00 41 58 36 6A  |SS .......".AX6j|
00003C40: 8E 00 57 58 60 6D 8F 20  2D 2D 2D 2D 2D 20 53 43  |..WX`m. ----- SC|
00003C50: 52 45 45 4E 20 31 39 00  69 58 7E 6D 99 A3 31 37  |REEN 19.iX~m..17|
00003C60: 29 22 D2 45 56 49 45 57  22 00 6F 58 88 6D 99 00  |)".EVIEW".oX.m..|
00003C70: 96 58 92 6D 99 20 22 D4  48 45 53 45 20 41 52 45  |.X.m. ".HESE ARE|
00003C80: 20 54 48 45 20 42 41 53  49 43 53 20 4F 46 20 C2  | THE BASICS OF .|
00003C90: C1 D3 C9 C3 3A 22 00 9C  58 9C 6D 99 00 CD 58 A6  |....:"..X.m...X.|
00003CA0: 6D 99 20 22 C5 4E 54 45  52 20 41 4E 20 49 4E 53  |m. ".NTER AN INS|
00003CB0: 54 52 55 43 54 49 4F 4E  20 57 49 54 48 4F 55 54  |TRUCTION WITHOUT|
00003CC0: 20 41 20 4E 55 4D 42 45  52 20 54 4F 22 00 FB 58  | A NUMBER TO"..X|
00003CD0: B0 6D 99 20 22 48 41 56  45 20 59 4F 55 52 20 43  |.m. "HAVE YOUR C|
00003CE0: 4F 4D 50 55 54 45 52 20  43 41 52 52 59 20 49 54  |OMPUTER CARRY IT|
00003CF0: 20 4F 55 54 20 52 49 47  48 54 22 00 09 59 BA 6D  | OUT RIGHT"..Y.m|
00003D00: 99 20 22 41 57 41 59 2E  22 00 0F 59 C4 6D 99 00  |. "AWAY."..Y.m..|
00003D10: 40 59 CE 6D 99 20 22 C9  4E 20 41 20 50 52 4F 47  |@Y.m. ".N A PROG|
00003D20: 52 41 4D 2C 20 4E 55 4D  42 45 52 20 54 48 45 20  |RAM, NUMBER THE |
00003D30: 49 4E 53 54 52 55 43 54  49 4F 4E 53 20 49 4E 22  |INSTRUCTIONS IN"|
00003D40: 00 6C 59 D8 6D 99 20 22  54 48 45 20 4F 52 44 45  |.lY.m. "THE ORDE|
00003D50: 52 20 59 4F 55 20 57 41  4E 54 20 59 4F 55 52 20  |R YOU WANT YOUR |
00003D60: 43 4F 4D 50 55 54 45 52  20 54 4F 22 00 84 59 E2  |COMPUTER TO"..Y.|
00003D70: 6D 99 20 22 43 41 52 52  59 20 54 48 45 4D 20 4F  |m. "CARRY THEM O|
00003D80: 55 54 2E 22 00 8A 59 EC  6D 8E 00 A0 59 48 71 8F  |UT."..Y.m...YHq.|
00003D90: 20 2D 2D 2D 2D 2D 20 53  43 52 45 45 4E 20 32 30  | ----- SCREEN 20|
00003DA0: 00 A6 59 5E 71 99 00 AC  59 60 71 99 00 D7 59 66  |..Y^q...Y`q...Yf|
00003DB0: 71 99 20 22 D5 53 45 20  D0 D2 C9 CE D4 20 54 4F  |q. ".SE ..... TO|
00003DC0: 20 44 49 53 50 4C 41 59  20 54 48 49 4E 47 53 20  | DISPLAY THINGS |
00003DD0: 4F 4E 20 54 48 45 22 00  FE 59 70 71 99 20 22 53  |ON THE"..Ypq. "S|
00003DE0: 43 52 45 45 4E 20 41 4E  44 20 54 4F 20 55 53 45  |CREEN AND TO USE|
00003DF0: 20 C2 C1 D3 C9 C3 20 4C  49 4B 45 20 41 22 00 12  | ..... LIKE A"..|
00003E00: 5A 7A 71 99 20 22 43 41  4C 43 55 4C 41 54 4F 52  |Zzq. "CALCULATOR|
00003E10: 2E 22 00 18 5A 84 71 99  00 48 5A 8E 71 99 20 22  |."..Z.q..HZ.q. "|
00003E20: D5 53 45 20 CC C9 D3 D4  20 54 4F 20 53 45 45 20  |.SE .... TO SEE |
00003E30: 54 48 45 20 4C 49 4E 45  53 20 4F 46 20 41 20 50  |THE LINES OF A P|
00003E40: 52 4F 47 52 41 4D 2E 22  00 4E 5A 98 71 99 00 78  |ROGRAM.".NZ.q..x|
00003E50: 5A A2 71 99 20 22 D5 53  45 20 56 41 52 49 41 42  |Z.q. ".SE VARIAB|
00003E60: 4C 45 53 20 49 46 20 54  48 45 20 4E 55 4D 42 45  |LES IF THE NUMBE|
00003E70: 52 53 20 49 4E 20 41 22  00 A9 5A AC 71 99 20 22  |RS IN A"..Z.q. "|
00003E80: 50 52 4F 42 4C 45 4D 20  4D 41 59 20 43 48 41 4E  |PROBLEM MAY CHAN|
00003E90: 47 45 2E 20 D5 53 45 20  53 54 52 49 4E 47 20 56  |GE. .SE STRING V|
00003EA0: 41 52 49 41 42 4C 45 53  22 00 BB 5A B6 71 99 20  |ARIABLES"..Z.q. |
00003EB0: 22 46 4F 52 20 54 45 58  54 2E 22 00 C1 5A C0 71  |"FOR TEXT."..Z.q|
00003EC0: 99 00 EC 5A CA 71 99 20  22 D5 53 45 20 D2 C5 CD  |...Z.q. ".SE ...|
00003ED0: 20 46 4F 52 20 52 45 4D  41 52 4B 53 20 41 4E 44  | FOR REMARKS AND|
00003EE0: 20 52 45 4D 49 4E 44 45  52 53 2E 22 00 F2 5A D4  | REMINDERS."..Z.|
00003EF0: 71 99 00 20 5B DE 71 99  20 22 D5 53 45 20 C7 CF  |q.. [.q. ".SE ..|
00003F00: D4 CF 20 54 4F 20 43 48  41 4E 47 45 20 54 48 45  |.. TO CHANGE THE|
00003F10: 20 4F 52 44 45 52 20 49  4E 20 57 48 49 43 48 22  | ORDER IN WHICH"|
00003F20: 00 50 5B E8 71 99 20 22  54 48 45 20 43 4F 4D 50  |.P[.q. "THE COMP|
00003F30: 55 54 45 52 20 46 4F 4C  4C 4F 57 53 20 59 4F 55  |UTER FOLLOWS YOU|
00003F40: 52 20 49 4E 53 54 52 55  43 54 49 4F 4E 53 2E 22  |R INSTRUCTIONS."|
00003F50: 00 56 5B F2 71 8E 00 6B  5B 50 C3 8F 20 2D 2D 2D  |.V[.q..k[P.. ---|
00003F60: 2D 2D 20 47 4C 42 20 49  4E 49 54 00 81 5B 55 C3  |-- GLB INIT..[U.|
00003F70: 8F 20 2D 2D 2D 2D 2D 20  4D 49 53 43 20 49 4E 49  |. ----- MISC INI|
00003F80: 54 00 AD 5B 5A C3 D9 3A  8D 35 30 31 30 30 3A 8D  |T..[Z..:.50100:.|
00003F90: 35 30 33 30 30 3A FE 15  3A 8D 35 30 35 30 30 3A  |50300:..:.50500:|
00003FA0: 8D 35 30 37 30 30 3A 8D  35 30 39 30 30 00 D7 5B  |.50700:.50900..[|
00003FB0: 87 C3 E0 2C 31 39 2C 32  34 2C 22 CF 4E 45 20 4D  |...,19,24,".NE M|
00003FC0: 4F 4D 45 4E 54 20 50 4C  45 41 53 45 2E 2E 2E 22  |OMENT PLEASE..."|
00003FD0: 3A 89 35 31 30 30 30 00  F7 5B B4 C3 8F 20 2D 2D  |:.51000..[... --|
00003FE0: 2D 2D 2D 20 4D 49 53 43  20 56 41 52 2F 43 4F 4E  |--- MISC VAR/CON|
00003FF0: 53 54 20 49 4E 49 54 00  31 5C B8 C3 54 4D B2 32  |ST INIT.1\..TM.2|
00004000: 3A 46 31 B2 32 3A 46 32  B2 38 3A 42 31 B2 37 3A  |:F1.2:F2.8:B1.7:|
00004010: 42 46 B2 31 3A 4C 24 B2  C7 28 31 34 29 3A 55 24  |BF.1:L$..(14):U$|
00004020: B2 C7 28 31 34 32 29 3A  4B 30 24 B2 C7 28 31 31  |..(142):K0$..(11|
00004030: 29 00 69 5C C8 C3 4B 31  24 B2 C7 28 31 32 29 3A  |).i\..K1$..(12):|
00004040: 48 4D 24 B2 C7 28 31 39  29 3A 43 53 24 B2 C7 28  |HM$..(19):CS$..(|
00004050: 31 34 37 29 3A 52 30 24  B2 C7 28 31 34 36 29 3A  |147):R0$..(146):|
00004060: 52 31 24 B2 C7 28 31 38  29 00 9E 5C D2 C3 44 51  |R1$..(18)..\..DQ|
00004070: 24 B2 C7 28 33 34 29 3A  8C 35 30 31 33 30 3A 86  |$..(34):.50130:.|
00004080: 43 24 28 31 36 29 3A 81  49 B2 31 A4 31 36 3A 87  |C$(16):.I.1.16:.|
00004090: 43 3A 43 24 28 49 29 B2  C7 28 43 29 3A 82 00 B4  |C:C$(I)..(C):...|
000040A0: 5C E0 C3 83 20 31 34 34  2C 20 20 35 2C 20 32 38  |\... 144,  5, 28|
000040B0: 2C 31 35 39 00 CA 5C E2  C3 83 20 31 35 36 2C 20  |,159..\... 156, |
000040C0: 33 30 2C 20 33 31 2C 31  35 38 00 E0 5C E4 C3 83  |30, 31,158..\...|
000040D0: 20 31 32 39 2C 31 34 39  2C 31 35 30 2C 31 35 31  | 129,149,150,151|
000040E0: 00 F6 5C E6 C3 83 20 31  35 32 2C 31 35 33 2C 31  |..\... 152,153,1|
000040F0: 35 34 2C 31 35 35 00 2F  5D F0 C3 53 42 B2 35 31  |54,155./]..SB.51|
00004100: 37 31 32 3A 86 55 50 24  28 32 29 3A 55 50 24 28  |712:.UP$(2):UP$(|
00004110: 31 29 B2 22 D0 52 45 53  53 20 D3 D0 C1 C3 C5 C2  |1).".RESS ......|
00004120: C1 D2 20 54 4F 20 43 4F  4E 54 49 4E 55 45 22 00  |.. TO CONTINUE".|
00004130: 55 5D FE C3 55 50 24 28  32 29 B2 22 D0 52 45 53  |U]..UP$(2).".RES|
00004140: 53 20 D2 C5 D4 D5 D2 CE  20 54 4F 20 43 4F 4E 54  |S ...... TO CONT|
00004150: 49 4E 55 45 22 00 9B 5D  04 C4 53 50 24 B2 22 20  |INUE"..]..SP$." |
00004160: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004170: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004180: 20 20 20 20 20 20 20 22  3A 54 24 B2 22 20 20 22  |       ":T$."  "|
00004190: 3A 48 50 24 B2 C7 28 31  33 32 29 00 D3 5D 0A C4  |:HP$..(132)..]..|
000041A0: 53 30 24 B2 C7 28 32 37  29 AA 22 4D 22 3A 53 31  |S0$..(27)."M":S1|
000041B0: 24 B2 C7 28 32 37 29 AA  22 4C 22 3A 8C 35 30 31  |$..(27)."L":.501|
000041C0: 38 36 3A 87 4A 3A 86 53  4B 28 4A 29 3A 53 4B 24  |86:.J:.SK(J):SK$|
000041D0: B2 22 22 00 F7 5D 16 C4  81 49 B2 31 A4 4A 3A 87  |.""..]...I.1.J:.|
000041E0: 4B 3A 53 4B 24 B2 53 4B  24 AA C7 28 4B 29 3A 87  |K:SK$.SK$..(K):.|
000041F0: 53 4B 28 49 29 3A 82 00  2F 5E 20 C4 83 20 36 2C  |SK(I):../^ .. 6,|
00004200: 31 33 33 2C 20 20 31 2C  20 32 37 2C 20 20 32 2C  |133,  1, 27,  2,|
00004210: 20 33 32 2C 20 20 33 2C  20 31 33 2C 20 20 33 2C  | 32,  3, 13,  3,|
00004220: 31 34 35 2C 20 20 34 2C  20 31 37 2C 20 20 35 00  |145,  4, 17,  5.|
00004230: 35 5E 7B C4 8E 00 55 5E  7C C4 8F 20 2D 2D 2D 2D  |5^{...U^|.. ----|
00004240: 2D 20 49 4E 49 54 20 56  49 44 45 4F 2F 47 52 41  |- INIT VIDEO/GRA|
00004250: 50 48 49 43 53 00 77 5E  86 C4 FE 26 3A DE 30 3A  |PHICS.w^...&:.0:|
00004260: E7 30 2C 42 31 3A E7 31  2C 46 31 3A E7 34 2C 42  |.0,B1:.1,F1:.4,B|
00004270: 31 3A E7 35 2C 46 31 00  95 5E A4 C4 99 4C 24 4C  |1:.5,F1..^...L$L|
00004280: 4B 24 53 31 24 C7 28 32  37 29 22 43 22 C7 28 32  |K$S1$.(27)"C".(2|
00004290: 37 29 22 4F 22 00 BA 5E  A9 C4 FE 1A 30 2C 30 2C  |7)"O"..^....0,0,|
000042A0: 33 39 2C 32 34 2C 31 3A  FE 17 31 3A FE 17 32 3A  |39,24,1:..1:..2:|
000042B0: FE 17 33 3A E9 30 3A FE  1C 31 00 CD 5E C2 C4 81  |..3:.0:..1..^...|
000042C0: 49 B2 31 A4 38 3A FE 07  49 2C 30 3A 82 00 EA 5E  |I.1.8:..I,0:...^|
000042D0: C7 C4 FE 02 31 35 3A 97  35 36 35 37 36 2C C2 28  |....15:.56576,.(|
000042E0: 35 36 35 37 36 29 B0 33  3A 8E 00 01 5F 44 C5 8F  |56576).3:..._D..|
000042F0: 20 2D 2D 2D 2D 2D 20 49  4E 49 54 20 53 4F 55 4E  | ----- INIT SOUN|
00004300: 44 00 25 5F 4E C5 81 49  B2 31 A4 33 3A DA 49 2C  |D.%_N..I.1.3:.I,|
00004310: 30 2C 30 3A 82 3A FE 03  30 2C 30 2C 30 2C 30 2C  |0,0:.:..0,0,0,0,|
00004320: 30 3A DB 31 35 00 61 5F  67 C5 FE 04 22 56 31 4F  |0:.15.a_g..."V1O|
00004330: 30 54 30 58 30 56 32 4F  30 54 30 58 30 56 33 4F  |0T0X0V2O0T0X0V3O|
00004340: 30 54 30 58 30 22 3A 8C  35 30 35 33 35 3A 81 49  |0T0X0":.50535:.I|
00004350: B2 30 A4 39 3A 87 41 2C  44 2C 53 2C 52 2C 57 2C  |.0.9:.A,D,S,R,W,|
00004360: 50 00 77 5F 7B C5 FE 0A  49 2C 41 2C 44 2C 53 2C  |P.w_{...I,A,D,S,|
00004370: 52 2C 57 2C 50 3A 82 00  91 5F 8A C5 83 20 20 30  |R,W,P:..._...  0|
00004380: 2C 20 39 2C 20 30 2C 20  30 2C 20 32 2C 31 35 33  |, 9, 0, 0, 2,153|
00004390: 36 00 AB 5F 8C C5 83 20  31 32 2C 20 30 2C 31 32  |6.._... 12, 0,12|
000043A0: 2C 20 30 2C 20 31 2C 20  20 20 30 00 C5 5F 8E C5  |, 0, 1,   0.._..|
000043B0: 83 20 20 30 2C 20 30 2C  31 35 2C 20 30 2C 20 30  |.  0, 0,15, 0, 0|
000043C0: 2C 20 20 20 30 00 DF 5F  90 C5 83 20 20 30 2C 20  |,   0.._...  0, |
000043D0: 35 2C 20 35 2C 20 30 2C  20 33 2C 20 20 20 30 00  |5, 5, 0, 3,   0.|
000043E0: F9 5F 92 C5 83 20 20 39  2C 20 34 2C 20 34 2C 20  |._...  9, 4, 4, |
000043F0: 30 2C 20 30 2C 20 20 20  30 00 13 60 94 C5 83 20  |0, 0,   0..`... |
00004400: 20 30 2C 20 39 2C 20 32  2C 20 31 2C 20 31 2C 20  | 0, 9, 2, 1, 1, |
00004410: 20 20 30 00 2D 60 96 C5  83 20 20 30 2C 20 39 2C  |  0.-`...  0, 9,|
00004420: 20 30 2C 20 30 2C 20 32  2C 20 35 31 32 00 47 60  | 0, 0, 2, 512.G`|
00004430: 98 C5 83 20 20 30 2C 20  39 2C 20 39 2C 20 30 2C  |...  0, 9, 9, 0,|
00004440: 20 32 2C 32 30 34 38 00  61 60 9A C5 83 20 20 38  | 2,2048.a`...  8|
00004450: 2C 20 39 2C 20 34 2C 20  31 2C 20 32 2C 20 35 31  |, 9, 4, 1, 2, 51|
00004460: 32 00 7B 60 9C C5 83 20  20 30 2C 20 39 2C 20 30  |2.{`...  0, 9, 0|
00004470: 2C 20 30 2C 20 30 2C 20  20 20 30 00 81 60 A7 C5  |, 0, 0,   0..`..|
00004480: 8E 00 97 60 0C C6 8F 20  2D 2D 2D 2D 2D 20 54 4F  |...`... ----- TO|
00004490: 43 20 41 52 52 41 59 00  A3 60 16 C6 86 56 4C 24  |C ARRAY..`...VL$|
000044A0: 28 39 29 00 B6 60 1B C6  56 4C 24 28 30 29 B2 22  |(9)..`..VL$(0)."|
000044B0: 54 4F 43 20 30 22 00 D0  60 20 C6 56 4C 24 28 31  |TOC 0"..` .VL$(1|
000044C0: 29 B2 22 C9 4E 54 52 4F  44 55 43 54 49 4F 4E 22  |).".NTRODUCTION"|
000044D0: 00 E6 60 25 C6 56 4C 24  28 32 29 B2 22 D4 48 45  |..`%.VL$(2).".HE|
000044E0: 20 C3 31 32 38 22 00 F9  60 2A C6 56 4C 24 28 33  | .128"..`*.VL$(3|
000044F0: 29 B2 22 C2 C1 D3 C9 C3  22 00 15 61 2F C6 56 4C  |)."....."..a/.VL|
00004500: 24 28 34 29 B2 22 C1 44  56 41 4E 43 45 44 20 C2  |$(4).".DVANCED .|
00004510: C1 D3 C9 C3 22 00 2D 61  34 C6 56 4C 24 28 35 29  |....".-a4.VL$(5)|
00004520: B2 22 C4 49 53 4B 20 D5  53 41 47 45 22 00 4A 61  |.".ISK .SAGE".Ja|
00004530: 39 C6 56 4C 24 28 36 29  B2 22 D3 43 52 45 45 4E  |9.VL$(6).".CREEN|
00004540: 20 C7 52 41 50 48 49 43  53 22 00 67 61 3E C6 56  | .RAPHICS".ga>.V|
00004550: 4C 24 28 37 29 B2 22 D3  50 52 49 54 45 20 C7 52  |L$(7).".PRITE .R|
00004560: 41 50 48 49 43 53 22 00  8A 61 43 C6 56 4C 24 28  |APHICS"..aC.VL$(|
00004570: 38 29 B2 22 D3 4F 55 4E  44 20 C5 46 46 45 43 54  |8).".OUND .FFECT|
00004580: 53 20 26 20 CD 55 53 49  43 22 00 A9 61 48 C6 56  |S & .USIC"..aH.V|
00004590: 4C 24 28 39 29 B2 22 D0  52 4F 47 52 41 4D 4D 49  |L$(9).".ROGRAMMI|
000045A0: 4E 47 20 C8 49 4E 54 53  22 00 AF 61 6F C6 8E 00  |NG .INTS"..ao...|
000045B0: CB 61 D4 C6 8F 20 2D 2D  2D 2D 2D 20 50 49 43 20  |.a... ----- PIC |
000045C0: 41 52 52 41 59 53 20 49  4E 49 54 00 E3 61 DE C6  |ARRAYS INIT..a..|
000045D0: 86 50 4E 24 28 37 29 2C  50 42 28 37 29 2C 50 33  |.PN$(7),PB(7),P3|
000045E0: 28 37 29 00 0A 62 E0 C6  50 4E 24 28 30 29 B2 22  |(7)..b..PN$(0)."|
000045F0: 2E 2E 2E 2E 2E 2E 2E 2E  22 3A 50 42 28 30 29 B2  |........":PB(0).|
00004600: 42 31 3A 50 33 28 30 29  B2 31 00 31 62 E3 C6 50  |B1:P3(0).1.1b..P|
00004610: 4E 24 28 31 29 B2 22 42  4F 4F 4B 22 20 20 20 20  |N$(1)."BOOK"    |
00004620: 3A 50 42 28 31 29 B2 42  31 3A 50 33 28 31 29 B2  |:PB(1).B1:P3(1).|
00004630: 31 00 58 62 E8 C6 50 4E  24 28 32 29 B2 22 4B 45  |1.Xb..PN$(2)."KE|
00004640: 59 42 4F 41 52 44 22 3A  50 42 28 32 29 B2 31 33  |YBOARD":PB(2).13|
00004650: 3A 50 33 28 32 29 B2 32  00 7F 62 ED C6 50 4E 24  |:P3(2).2..b..PN$|
00004660: 28 33 29 B2 22 43 49 52  43 55 53 22 20 20 3A 50  |(3)."CIRCUS"  :P|
00004670: 42 28 33 29 B2 31 33 3A  50 33 28 33 29 B2 32 00  |B(3).13:P3(3).2.|
00004680: A6 62 F2 C6 50 4E 24 28  34 29 B2 22 48 41 52 44  |.b..PN$(4)."HARD|
00004690: 57 41 52 45 22 3A 50 42  28 34 29 B2 31 35 3A 50  |WARE":PB(4).15:P|
000046A0: 33 28 34 29 B2 32 00 CD  62 F7 C6 50 4E 24 28 35  |3(4).2..b..PN$(5|
000046B0: 29 B2 22 43 41 4C 4C 49  4F 50 45 22 3A 50 42 28  |)."CALLIOPE":PB(|
000046C0: 35 29 B2 31 36 3A 50 33  28 35 29 B2 32 00 F4 62  |5).16:P3(5).2..b|
000046D0: FC C6 50 4E 24 28 36 29  B2 22 54 49 54 4C 45 22  |..PN$(6)."TITLE"|
000046E0: 20 20 20 3A 50 42 28 36  29 B2 31 36 3A 50 33 28  |   :PB(6).16:P3(|
000046F0: 36 29 B2 31 00 1C 63 01  C7 50 4E 24 28 37 29 B2  |6).1..c..PN$(7).|
00004700: 22 53 54 41 47 45 22 20  20 20 3A 50 42 28 37 29  |"STAGE"   :PB(7)|
00004710: B2 31 33 3A 50 33 28 37  29 B2 31 32 00 22 63 37  |.13:P3(7).12."c7|
00004720: C7 8E 00 39 63 38 C7 8F  20 2D 2D 2D 2D 2D 20 56  |...9c8.. ----- V|
00004730: 4F 4C 20 33 20 49 4E 49  54 00 4F 63 3D C7 8F 20  |OL 3 INIT.Oc=.. |
00004740: 2D 2D 2D 2D 2D 20 4D 49  53 43 20 49 4E 49 54 00  |----- MISC INIT.|
00004750: 68 63 42 C7 8D 35 31 32  30 30 3A 8D 35 31 33 30  |hcB..51200:.5130|
00004760: 30 3A 89 35 31 34 30 30  00 82 63 00 C8 8F 20 2D  |0:.51400..c... -|
00004770: 2D 2D 2D 2D 20 56 4F 4C  20 4D 45 4E 55 20 49 4E  |---- VOL MENU IN|
00004780: 49 54 00 99 63 05 C8 4E  56 B2 33 3A 4D 4D B2 39  |IT..c..NV.3:MM.9|
00004790: 3A 86 56 4D 24 28 4D 4D  29 00 BC 63 14 C8 56 4D  |:.VM$(MM)..c..VM|
000047A0: 24 28 31 29 B2 22 C7 45  54 54 49 4E 47 20 54 4F  |$(1).".ETTING TO|
000047B0: 20 CB 4E 4F 57 20 C2 C1  D3 C9 C3 22 00 D5 63 19  | .NOW ....."..c.|
000047C0: C8 56 4D 24 28 32 29 B2  22 C4 49 52 45 43 54 20  |.VM$(2).".IRECT |
000047D0: CD 4F 44 45 22 00 EF 63  1E C8 56 4D 24 28 33 29  |.ODE"..c..VM$(3)|
000047E0: B2 22 D0 52 4F 47 52 41  4D 20 CD 4F 44 45 22 00  |.".ROGRAM .ODE".|
000047F0: 0D 64 23 C8 56 4D 24 28  34 29 B2 22 C2 C1 D3 C9  |.d#.VM$(4)."....|
00004800: C3 20 C1 52 49 54 48 4D  45 54 49 43 22 00 24 64  |. .RITHMETIC".$d|
00004810: 28 C8 56 4D 24 28 35 29  B2 22 D6 41 52 49 41 42  |(.VM$(5).".ARIAB|
00004820: 4C 45 53 22 00 47 64 2A  C8 56 4D 24 28 36 29 B2  |LES".Gd*.VM$(6).|
00004830: 22 D3 45 4D 49 43 4F 4C  4F 4E 53 20 41 4E 44 20  |".EMICOLONS AND |
00004840: C3 4F 4D 4D 41 53 22 00  5E 64 2C C8 56 4D 24 28  |.OMMAS".^d,.VM$(|
00004850: 37 29 B2 22 D4 48 45 20  C3 4F 4C 4F 4E 22 00 82  |7).".HE .OLON"..|
00004860: 64 2E C8 56 4D 24 28 38  29 B2 22 C5 44 49 54 49  |d..VM$(8).".DITI|
00004870: 4E 47 20 C2 C1 D3 C9 C3  20 D0 52 4F 47 52 41 4D  |NG ..... .ROGRAM|
00004880: 53 22 00 96 64 30 C8 56  4D 24 28 39 29 B2 22 D2  |S"..d0.VM$(9).".|
00004890: 45 56 49 45 57 22 00 BA  64 32 C8 86 56 41 28 4D  |EVIEW"..d2..VA(M|
000048A0: 4D 29 3A 8C 35 31 32 35  30 3A 81 49 B2 31 A4 4D  |M):.51250:.I.1.M|
000048B0: 4D 3A 87 56 41 28 49 29  3A 82 00 D6 64 4B C8 83  |M:.VA(I):...dK..|
000048C0: 20 31 2C 33 2C 34 2C 37  2C 38 2C 31 30 2C 31 37  | 1,3,4,7,8,10,17|
000048D0: 2C 31 38 2C 31 39 00 DC  64 50 C8 8E 00 F4 64 64  |,18,19..dP....dd|
000048E0: C8 8F 20 2D 2D 2D 2D 2D  20 53 50 52 49 54 45 20  |.. ----- SPRITE |
000048F0: 49 4E 49 54 00 27 65 66  C8 FE 08 32 2C 31 3A 8C  |INIT.'ef...2,1:.|
00004900: 35 31 33 30 32 3A 81 49  B2 31 A4 38 3A 87 43 2C  |51302:.I.1.8:.C,|
00004910: 50 2C 58 2C 59 2C 4D 3A  FE 07 49 2C 30 2C 43 2C  |P,X,Y,M:..I,0,C,|
00004920: 50 2C 58 2C 59 2C 4D 00  3D 65 70 C8 FE 06 49 2C  |P,X,Y,M.=ep...I,|
00004930: 30 23 30 3A FE 06 49 2C  30 2C 30 3A 82 00 4D 65  |0#0:..I,0,0:..Me|
00004940: 76 C8 83 20 33 2C 30 2C  30 2C 30 2C 31 00 5D 65  |v.. 3,0,0,0,1.]e|
00004950: 78 C8 83 20 33 2C 30 2C  30 2C 30 2C 31 00 6D 65  |x.. 3,0,0,0,1.me|
00004960: 7A C8 83 20 33 2C 30 2C  30 2C 30 2C 31 00 7D 65  |z.. 3,0,0,0,1.}e|
00004970: 7C C8 83 20 33 2C 30 2C  30 2C 30 2C 31 00 8D 65  ||.. 3,0,0,0,1..e|
00004980: 7E C8 83 20 33 2C 30 2C  30 2C 30 2C 31 00 9D 65  |~.. 3,0,0,0,1..e|
00004990: 80 C8 83 20 33 2C 30 2C  30 2C 30 2C 31 00 AD 65  |... 3,0,0,0,1..e|
000049A0: 82 C8 83 20 33 2C 30 2C  30 2C 30 2C 31 00 BD 65  |... 3,0,0,0,1..e|
000049B0: 84 C8 83 20 33 2C 30 2C  30 2C 30 2C 31 00 F5 65  |... 3,0,0,0,1..e|
000049C0: 96 C8 53 53 B2 31 3A 53  46 B2 34 3A 53 B2 31 38  |..SS.1:SF.4:S.18|
000049D0: 3A 86 47 55 24 28 53 46  2C 53 53 29 3A 81 53 31  |:.GU$(SF,SS):.S1|
000049E0: B2 30 A4 53 53 3A 81 53  30 B2 31 A4 53 46 3A 8D  |.0.SS:.S0.1.SF:.|
000049F0: 36 30 36 30 30 00 14 66  A4 C8 47 55 24 28 53 30  |60600..f..GU$(S0|
00004A00: 2C 53 31 29 B2 53 24 3A  53 B2 53 AA 31 3A 82 53  |,S1).S$:S.S.1:.S|
00004A10: 30 2C 53 31 00 36 66 AA  C8 8C 35 31 33 37 30 3A  |0,S1.6f...51370:|
00004A20: 81 49 B2 30 A4 53 46 3A  87 53 58 28 49 29 2C 53  |.I.0.SF:.SX(I),S|
00004A30: 59 28 49 29 3A 82 00 44  66 B2 C8 83 20 32 39 35  |Y(I):..Df... 295|
00004A40: 2C 32 30 38 00 52 66 B4  C8 83 20 20 20 30 2C 20  |,208.Rf...   0, |
00004A50: 20 30 00 60 66 B6 C8 83  20 20 32 34 2C 20 20 30  | 0.`f...  24,  0|
00004A60: 00 6E 66 B8 C8 83 20 20  20 30 2C 20 32 31 00 7C  |.nf...   0, 21.||
00004A70: 66 BA C8 83 20 20 32 34  2C 20 32 31 00 82 66 C7  |f...  24, 21..f.|
00004A80: C8 8E 00 9C 66 C8 C8 8F  20 2D 2D 2D 2D 2D 20 56  |....f... ----- V|
00004A90: 4F 4C 20 53 43 52 4E 20  49 4E 49 54 00 BE 66 CA  |OL SCRN INIT..f.|
00004AA0: C8 4D 53 B2 32 30 3A 86  47 4D 28 4D 53 29 2C 47  |.MS.20:.GM(MS),G|
00004AB0: 53 28 4D 53 29 2C 47 50  28 4D 53 29 3A 8E 00 D3  |S(MS),GP(MS):...|
00004AC0: 66 60 EA 8F 20 2D 2D 2D  2D 2D 20 47 4F 54 4F 20  |f`.. ----- GOTO |
00004AD0: 54 4F 43 00 DE 66 6A EA  8A 36 30 30 31 35 00 F0  |TOC..fj..60015..|
00004AE0: 66 6F EA 8D 35 30 30 30  30 3A 89 31 30 35 30 30  |fo..50000:.10500|
00004AF0: 00 0A 67 54 EC 8F 20 2D  2D 2D 2D 2D 20 47 4F 54  |..gT.. ----- GOT|
00004B00: 4F 20 56 4F 4C 20 4D 45  4E 55 00 15 67 5E EC 8A  |O VOL MENU..g^..|
00004B10: 36 30 35 31 35 00 27 67  63 EC 8D 35 30 30 30 30  |60515.'gc..50000|
00004B20: 3A 89 31 30 38 30 30 00  40 67 B8 EC 8F 20 2D 2D  |:.10800.@g... --|
00004B30: 2D 2D 2D 20 47 45 54 20  41 20 53 50 52 49 54 45  |--- GET A SPRITE|
00004B40: 00 75 67 BD EC FE 02 30  3A 4A B2 53 42 AA 36 34  |.ug....0:J.SB.64|
00004B50: AC 53 3A 81 49 B2 30 A4  36 33 3A 97 34 30 33 32  |.S:.I.0.63:.4032|
00004B60: AA 49 2C C2 28 4A AA 49  29 3A 82 49 3A FE 16 38  |.I,.(J.I):.I:..8|
00004B70: 2C 53 24 3A 8E 00 A9 67  1C ED 8F 20 2D 2D 2D 2D  |,S$:...g... ----|
00004B80: 2D 20 53 45 54 55 50 20  54 48 45 20 47 52 41 50  |- SETUP THE GRAP|
00004B90: 48 49 43 53 20 44 49 53  50 4C 41 59 20 41 53 20  |HICS DISPLAY AS |
00004BA0: 52 45 51 55 45 53 54 45  44 00 C6 67 1E ED 8B 47  |REQUESTED..g...G|
00004BB0: 4D B2 31 B0 47 4D B2 33  A7 47 4D B2 47 4D AA 31  |M.1.GM.3.GM.GM.1|
00004BC0: 3A 47 53 B2 32 35 00 F3  67 21 ED FE 1A 30 2C 30  |:GS.25..g!...0,0|
00004BD0: 2C 33 39 2C 32 34 2C 31  3A 47 30 B2 47 53 3A 8B  |,39,24,1:G0.GS:.|
00004BE0: 47 4D B1 31 30 A7 47 30  B2 30 3A 47 4D B2 47 4D  |GM.10.G0.0:GM.GM|
00004BF0: AB 31 30 00 1C 68 26 ED  8B 47 50 B1 B2 30 A7 E7  |.10..h&..GP..0..|
00004C00: 30 2C 50 42 28 47 50 29  3A E7 34 2C 50 42 28 47  |0,PB(GP):.4,PB(G|
00004C10: 50 29 3A E7 33 2C 50 33  28 47 50 29 00 3A 68 28  |P):.3,P3(GP).:h(|
00004C20: ED FE 02 30 3A 8B 47 50  B2 30 B0 47 50 B3 B1 C2  |...0:.GP.0.GP...|
00004C30: 28 31 36 31 39 32 29 A7  FE 18 00 71 68 2A ED 8B  |(16192)....qh*..|
00004C40: 47 4D B3 B1 CC 28 30 29  B0 47 50 B1 30 A7 FE 02  |GM...(0).GP.0...|
00004C50: 31 35 3A 92 35 33 32 36  36 2C 32 35 30 3A 97 35  |15:.53266,250:.5|
00004C60: 33 32 36 35 2C C2 28 35  33 32 36 35 29 AF 32 33  |3265,.(53265).23|
00004C70: 39 00 88 68 2C ED DE 47  4D 2C 31 2C 30 3A 8B 47  |9..h,..GM,1,0:.G|
00004C80: 4D B2 34 A7 DE 33 2C 31  00 A6 68 30 ED 8B 47 50  |M.4..3,1..h0..GP|
00004C90: B3 B2 30 A7 FE 18 8B 47  4D B1 30 A7 97 31 36 31  |..0....GM.0..161|
00004CA0: 39 32 2C 32 35 35 00 C8  68 35 ED FE 19 3A D5 FE  |92,255..h5...:..|
00004CB0: 18 3A FE 11 28 50 4E 24  28 47 50 29 AA 22 2E 43  |.:..(PN$(GP).".C|
00004CC0: 22 29 2C 50 37 31 36 38  00 F0 68 3A ED FE 11 28  |"),P7168..h:...(|
00004CD0: 50 4E 24 28 47 50 29 AA  22 2E 50 22 29 2C 50 38  |PN$(GP).".P"),P8|
00004CE0: 31 39 32 3A 97 31 36 31  39 32 2C 47 50 3A FE 19  |192:.16192,GP:..|
00004CF0: 00 1A 69 3E ED FE 02 31  35 3A 92 35 33 32 36 36  |..i>...15:.53266|
00004D00: 2C 32 35 30 3A 97 35 33  32 36 35 2C C2 28 35 33  |,250:.53265,.(53|
00004D10: 32 36 35 29 B0 31 36 3A  FE 19 00 28 69 44 ED DE  |265).16:...(iD..|
00004D20: 47 4D 2C 2C 47 30 3A 8E  00 3E 69 E4 ED 8F 20 2D  |GM,,G0:..>i... -|
00004D30: 2D 2D 2D 2D 20 42 4F 4F  4B 20 4C 4F 41 44 00 75  |---- BOOK LOAD.u|
00004D40: 69 EE ED 47 50 B2 31 3A  47 4D B2 31 32 3A 47 53  |i..GP.1:GM.12:GS|
00004D50: B2 32 35 3A 8D 36 30 37  30 30 3A 49 24 B2 22 22  |.25:.60700:I$.""|
00004D60: 3A 81 49 B2 31 A4 32 38  3A 49 24 B2 49 24 AA 22  |:.I.1.28:I$.I$."|
00004D70: 20 22 3A 82 49 00 8F 69  F8 ED 81 49 B2 32 A4 32  | ":.I..i...I.2.2|
00004D80: 32 3A E0 2C 36 2C 49 2C  49 24 3A 82 49 3A 8E 00  |2:.,6,I,I$:.I:..|
00004D90: 00 00                                             |..              |

..>.... "I AM A C128 VOLUME 3 SHELL 2.3 
VERSION 04/21/86 13:10.M.... "WRITTEN BY
 BRUCE MORGAN AND EDWIN REICH...... "COP
YRIGHT 1986 ACTIVISION...2.. 11191:. STA
RT AT VOLUME MENU.P.D.. ----- CHECK FOR 
KEYPRESS...L.KB..1:SD.0:.KB$:.KB$.""....
.T..KB$.HP$.10000...V.KB.SK(T(SK$,KB$)).
2.X..KB.3.SD.1:U.KB.0.SD.2.H....KB.60000
,60500:..P.... ----- WAIT FOR A KEYBOARD
 COMMAND... ..208,0:.:.100:..KB..0:....H
.. ----- WAIT FOR ANY KEY.E.R..208,0:.:.
100:..KB..1:....... ----- DELAY FOR (DV)
 LOOPS WHILE CHECKING KEYBOARD.$....208,
0:.DV.DV.0..1:.100:.KB.1..DV.*.....V.6..
 ----- CENTER UP$(UP) ON 24 IN WHITE, DO
ESN'T CHANGE COLOR OR POSITION...8..L(0)
.0.GS.25...:.G(27)"O";:.I.0.7:I(I).B(224
.I)...;..:I..(X):J.B(235):K.M(5):.5,F1:.
.0,24,39,24,1...@...20.C(UP$(UP)).2)UP$(
UP);:.5,K:.235,J:.236,I.B.E..I.0.7:.224.
I,I(I):.:..:U..I.B(4446):J.B(4447).~.J.K
.M(1):.1,F1:.,0,24,SP$:.,20.C(UP$(UP)).2
,24,L$.UP$(UP)...O..1,K:.4446,I:.4447,J:
... .T...P.... ----- CYCLE GUIDE AND WAI
T FOR A KEYPRESS......900:.310:.150:U1.U
P:UP.0:.310:UP.U1:..  ... ----- ENABLE S
PRITES FROM HS().: ...I.1.8:..I,HS(I):.I
:..U X.. ----- DISABLE SPRITES AND SAVE 
ENABLE STATUS IN HS().. B..I.1.8:HS(I).N
.(I,0):..I,0:.I:..O ... ----- POSITION G
UIDE AND CYCLE THROUGH MOVEMENT..!...I.1
.SF:..I,SX(0).SX(I),SY(0).SY(I):.I:.SP.S
S.SP.0.;!...I.1.SF:..GU$(I,SP),I:..I,1:H
S(I).1:.I:SP.SP.1:..Z!... ----- VOLUME S
CREEN LOOP..!...:RS.0:UP.1:GM.GM(CS):GS.
GS(CS):GP.GP(CS):.60700..!..I.TM:.GS..0.
GS.20.I.GS.V!....0,I,39,24,1:.1100:.(RS.
1).0.UP.1:.400..!)..KB..4.CS.CS.1:U.(RS.
254)..2.CS.CS.1.%"....(CS.1.CS.MS):.CS.0
.60500:U60000.E"L.. ----- VOLUME 3 DISPA
TCHER.W"Q.. CS..10 . ...."V.:  . CS . 11
000,12000,13000,14000,15000,16000,17000,
18000,19000,20000.."[.:  ...E"`.. CS.10 
. CS..20 . ....#E.:  .CS.10.21000,22000,
23000,24000,25000,25500,26000,27000,2800
0,29000..#J.:  ....#....U#... ----- FLAS
H CURSOR WHILE WAITING FOR A KEYPRESS..#
....15:CA.B(224).B(225).256.B(236):CO.B(
CA):CB.CO.F#..NA.(CA.1023).55296:NO.B(NA
):.NA,M(5).1:.:CB.(CB.128).255..#F..CA,C
B:.DV.1.10:.100:.KB..1..DV..$N...KB..1:.
CA,CO:.NA,NO:..N$... ----- FLASH CURSOR 
WHILE WAITING FOR A SPECIAL KEY (EXCEPT 
SPACE).K$...:.1200:..KB$." ".SD.0:...$..
. ----- ACCEPT INPUT (A$) OF LENGTH CL A
T CX,CY WITH DELETE AND RETURN..$...236,
CX:.235,CY:I.CY.40:.224,I..(I.256).256:.
225,I.256.4..%...226,B(224):.227,I.256.2
16.^%... ----- ACCEPT INPUT (A$) OF LENG
TH CL AT CURSOR WITH DELETE AND RETURN..
%"..208,0:A$."":.:.1200:.KB$." ".KB.0..%
,..KB.0....G%...((KB$.G(31).KB$.G(129)).
KB$.G(159)).C(A$).CL.....%0..KB$;:A$.A$.
KB$:....&6..KB$.G(20).C(A$).0....C(A$).1
.A$."":U..."&>.A$.H(A$,C(A$).1):.../&B..
KB$;:...6&F....C&H...KB.0:..L&X.. ----- 
ACCEPT CURSOR AND ARROW KEYS..&{...0,GS,
39,23:I.(24.GS).2.GS:.236,19:.235,I:I.I.
40.U&...224,I.(.(I.256).256):.225,I.256.
4:.226,B(224)..&...227,I.256.216:.208,0:
.310.)'..A$.G(145).G(17).G(157).G(29):.C
$(F2)S0$;:.:.1200.R'...(CX.0.CX.KX).T(A$
,KB$).0..KB$;:KB.0.K' ...KB.0:.C$(F1)S1$
;:...'... ----- PROMPT USER FOR RETURN, 
WAIT FOR A SPECIAL NON-SPACE (W/CURSOR).
.'..UP.2:.310:.900:.1250:.:UP.0:.310:..*
(... ----- ACCEPT # INPUT (A) OF LENGTH 
CL AT CX,CY WITH DELETE AND RETURN.G(...
236,CX:.235,CY:I.CY.40:.224,I..(I.256).2
56:.225,I.256.4..(...226,B(224):.227,I.2
56.216.S(... ----- ACCEPT # INPUT (A) OF
 LENGTH CL AT CURSOR WITH DELETE AND RET
URN..(...208,0:A$."":.:.1200:.KB$." ".KB
.0..)...KB.0....9)...(KB$.."0".KB$.."9")
.C(A$).CL..KB$;:A$.A$.KB$.E)...KB$.G(20)
.C(A$).0....C(A$).1.A$."":U...})..A$.H(A
$,C(A$).1):....)...KB$;:....)......)....
KB.0:A.E(A$):...).'. ----- DISPLAY HELP.
.).'..15:.600:HG.L(0):HB.M(4):I.53265:J.
56576.$*.'.K.1.3:HX(K).N.(K,0):HY(K).N.(
K,1):HC(K).N.(K,1):..I*$'.I,B(I).239:.J,
B(J).252:.4,B1:.1.Q*&'..1,293,191:..2,31
7,191:..3,317,212..*)'.K.1.3:..K,1,9:.:.
I,B(I).16.A*.'.:..KB$:..KB$.HP$:KB$."":.
208,0:.I,B(I).239..*3'.K.1.3:..K,HX(K),H
Y(K):..K,,HC(K):...+8'.J,B(J).3:.HG,,GS:
.500.#+='.53265,B(53265).16:.4,HB:..P+<(
. ----- WAIT FOR A MENU COMMAND (MK,MK$)
.Q+F(.:..MK$:MK.0:.MK$.HP$..10000..+P(..
(MK$.HP$):MK.SK(T(SK$,MK$)):..Q+ (. ----
- WAIT FOR A MENU KEY, HILITE ANY NUMBER
 SELECTED..,.(MW.0:.I.1.MN:V$(I).G(48.I)
.".".T$.V$(I):J.C(V$(I)):.J.MW.MW.J.R,.(
.I:MP.20.MW.2:.1,B1:.I.1.MN:V$(I).V$(I).
H(SP$,MW.C(V$(I))).S,.(.,MP,I.5,L$.V$(I)
:.I:.GM,,GS..,.(MI..1:.:.10300:M2.F(MK$)
.48:.MK.0.M2..1.M2..MN....Q,.(.MI...1.MI
..M2..1,MP,5.MI,L$.V$(MI)..,.(MI.M2:.1,M
P,5.M2,L$.V$(MI),1:....-H(..(MK.1.(MI...
1.MK$.G(13))):.1,F1:..;-.). ----- TABLE 
OF CONTENTS.L-.).600:.60900:.1,B1:.,12,3
,"TABLE OF CONTENTS"..-.).,11,20,L$."TYP
E A VOLUME NUMBER":.,13,21,L$."AND PRESS
 RETURN".R-")MN.9:.:.I.1.9:V$(I).VL$(I):
.I..-,).10400:..MK.1...6).MI.NV.60500:U.
1:.("VOLUME.".G(48.MI)).'.0*. ----- VOLU
ME MENU.=.5*.600:.60900:.1,B1.}.:*.,15,3
,L$."VOLUME ".G(48.NV):.,19.C(VL$(NV)).2
,4,L$.VL$(NV)...?*.I.1.MM:V$(I).VM$(I):.
I.V.D*.,14,20,L$."TYPE A NUMBER":.,13,21
,L$."AND PRESS RETURN"../I*MN.MM:.10400:
.MK.60000:CS.VA(MI):.1000.M/.*. ----- VO
LUME 3 SCREENS -------------------------
---------------------.B/.+. ----- SCREEN
 1../ +..9)"GETTING TO KNOW BASIC"../*+.
../4+. "AS YOU KNOW, BASIC IS A PROGRAMM
ING"../>+. "LANGUAGE, A WAY OF COMMUNICA
TING WITH"../H+. "YOUR COMPUTER."../R+..
*0\+. "ONCE YOU'VE LEARNED BASIC'S SIMPL
E".Q0F+. "RULES AND THE FEW WORDS IN ITS
".|0P+. "VOCABULARY, YOU CAN USE IT TO T
ELL"..0Z+. "THE C128 WHAT TO DO -- FROM 
VERY".U0.+. "SIMPLE OPERATIONS, LIKE ADD
ING NUMBERS,"..0.+. "TO LONG, COMPLEX PR
OGRAMS."..0.+..+1.+. "IN FACT, THIS TOUR
 OF YOUR C128 IS A".B1.+. "BASIC PROGRAM
.".H1.+..[1.+. JG.1 . 11194.D1.+JG.1.U1.
+.. "BTST128"..1.+. 4633,00:. 4634,14:. 
4095,3..1.+B..(0)..1.+JG.0..1.+. 50.H1..
. ----- SCREEN 2.Y1./..17)"PRINT"..1./..
.2./. "ONE OF THE BASIC WORDS YOU'LL USE
 MOST".:2&/. "OFTEN IS THE PRINT COMMAND
. YOU USE".J20/. "PRINT WHENEVER YOU WAN
T THE COMPUTER TO"..2:/. "PRINT SOMETHIN
G ON THE SCREEN."..2D/..D2N/. "TO USE TH
E PRINT COMMAND, FIRST TYPE"..2X/. "PRIN
T AND THEN, BETWEEN QUOTATION MARKS,"..3
B/. "TYPE WHAT YOU WANT PRINTED ON THE".
M3L/. "SCREEN. WHATEVER YOU TYPE BETWEEN
 THE".}3V/. "QUOTATION MARKS WILL BE PRI
NTED JUST AS"..3./. "YOU'VE TYPED IT."..
3./..P3./. "PRINT ".DQ$."HELLO!".DQ$;:.1
450:.SD.2.RS.1:...3./. "HELLO!"..3./...3
H2. ----- SCREEN 3..4.2..14)"DIRECT MODE
"..4.2..?4.3. "WHEN USING BASIC, YOU CAN
 ENTER".H4.3. "COMMANDS LIKE PRINT AT AN
Y TIME."..4.3. "JUST TYPE IN THE COMMAND
 AND PRESS"..4"3. "RETURN, AND THE C128 
WILL CARRY OUT"..4,3. "THE COMMAND AT ON
CE."..463...5@3. "USING BASIC IN THIS WA
Y IS CALLED".%5J3. "THE DIRECT MODE.".+5
T3..@5.6. ----- SCREEN 4.X5X6..14)"PROGR
AM MODE".^5.6...5.6. "OFTEN YOU'LL WANT 
THE C128 TO WAIT"..5.6. "UNTIL YOU'VE GI
VEN IT SEVERAL".Z5.7. "INSTRUCTIONS BEFO
RE IT CARRIES OUT"..5.7. "ANY OF THEM. S
UCH A SET OF".'6.7. "INSTRUCTIONS IS CAL
LED A PROGRAM.".-6.7..W6(7. "USING BASIC
 IN THIS WAY IS CALLED".Q627. "THE PROGR
AM MODE.".W6<7...6.:. ----- SCREEN 5..6J
:..B6T:. "IN A PROGRAM, EVERY INSTRUCTIO
N IS PART"..6.:. "OF A PROGRAM LINE. EVE
RY PROGRAM LINE"..7.:. "STARTS WITH A NU
MBER, KNOWN AS A LINE"..7.:. "NUMBER.".4
7.:..B7.;. "WHEN YOU PRESS RETURN AT THE
 END OF A"..7.;. "PROGRAM LINE, THE COMP
UTER REMEMBERS"..7.;. "THE COMMAND RATHE
R THAN CARRING IT OUT"..7$;. "RIGHT AWAY
. WHEN YOU'VE TYPED IN AS"..8.;. "MANY L
INES AS YOU WANT, YOU TYPE RUN".B88;. "A
ND PRESS RETURN, AND THE COMPUTER".N8B;.
 "WILL CARRY OUT YOUR INSTRUCTIONS IN"..
8L;. "NUMERICAL ORDER. PRESS RETURN TO R
UN"..8Q;. "THIS PROGRAM:"..8V;...8`;. "1
0 PRINT ".DQ$."I AM WRITING".DQ$..9J;. "
20 PRINT ".DQ$."A PROGRAM.".DQ$.'9T;. "R
UN";:.1450:.SD.2.RS.1:..;9~;."I AM WRITI
NG".M9.;."A PROGRAM.".S9.;..H9.>. ----- 
SCREEN 6.X9.>..18)"LIST".~9.>...9.>. "IF
 YOU WANT TO SEE A PROGRAM YOU'VE".W9F>.
 "WRITTEN, TYPE LIST AND PRESS RETURN.".
.:P>. "THE COMPUTER WILL DISPLAY ALL THE
".*:Z>. "INSTRUCTIONS YOU'VE GIVEN IT, I
N".C:.>. "NUMERICAL ORDER.".I:.>..V:.>. 
"PRESS RETURN TO LIST THE PROGRAM YOU"..
:.?. "RAN ON THE PREVIOUS SCREEN.". :.?.
.A:.?. "LIST";:.1450:.SD.2.RS.1:..G: ?..
.:*?. "10 PRINT ".DQ$."I AM WRITING".DQ$
..;4?. "20 PRINT ".DQ$."A PROGRAM.".DQ$.
.;>?..2;HB. ----- SCREEN 7.A;.B..0,0,39,
24:. DOESN'T FIT OUTPUT OTHERWISE.};.B..
12)"BASIC ARITHMETIC"..;.B...;.B. "IN DI
RECT MODE, YOU CAN USE BASIC LIKE A".H;.
B. "CALCULATOR.".N;.B...;BB. "TYPE PRINT
 FOLLOWED BY THE PROBLEM YOU".+<LB. "WAN
T SOLVED. DON'T PUT THE PROBLEM IN".X<VB
. "QUOTATION MARKS, OR BASIC WILL PRINT"
..<.B. "THE PROBLEM INSTEAD OF THE ANSWE
R. USE"..<.B. "+ TO ADD, - TO SUBTRACT, 
* TO MULTIPLY,"..<.B. "AND / TO DIVIDE. 
USE PARENTHESES TO"..=.B. "GROUP PARTS O
F THE PROBLEM YOU WANT".@=.C. "SOLVED FI
RST. PRESS RETURN TO HAVE BASIC".^=.C. "
SOLVE THESE PROBLEMS:".D=.C...=&C. "PRIN
T 2+5";:.1450:.SD.2.RS.1:...=0C. " 7"..=
:C. "PRINT 5-1";:.1450:.SD.2.RS.1:..F=DC
. " 4"..=NC. "PRINT 6*3";:.1450:.SD.2.RS
.1:...=XC. " 18"..>BC. "PRINT 18/2";:.14
50:.SD.2.RS.1:..*>LC. " 9".0>VC..E>PF. -
---- SCREEN 8.Z>XF..15)"VARIABLES".`>.F.
..>.F. "SOMETIMES THE NUMBERS IN A PROBL
EM YOU"..>.F. "NEED TO SOLVE MAY CHANGE.
 IN BASIC YOU"..> F. "CAN WRITE THE PROB
LEM USING A VARIABLE"..?.F. "INSTEAD OF 
A SPECIFIC NUMBER. TO SET UP".K?.F. "A V
ARIABLE, TYPE ITS NAME (ONE OR TWO".{?.F
. "LETTERS OR A LETTER AND A NUMBER), TH
EN"..?HF. "=, THEN THE NUMBER YOU WANT T
HE VARIABLE"..?RF. "TO EQUAL. THEN YOU C
AN USE THE VARIABLE"..?.F. "NAME JUST LI
KE A NUMBER."..@.F../@.F. "FOR EXAMPLE, 
ENTER A NUMBER FOR THE".V@.F. "VARIABLE 
A, THEN PRESS RETURN.".\@.G..M@.G. "10 A
 = ";..@.G.1200:.SD.2.RS.1:...@.G.KB$."0
".KB$."9".18192..@.GA.E(KB$):.KB$.F@.G. 
"20 PRINT A+1"..@"G. "RUN";:.1450:.SD.2.
RS.1:...@'G.A.1..@,G...A8J. ----- SCREEN
 9.&A`J..12)"STRING VARIABLES".,AJJ..YAT
J. "NOT ALL VARIABLES STAND FOR NUMBERS.
"..A~J. "BASIC HAS A SPECIAL KIND OF VAR
IABLE"..A.J. "CALLED A STRING VARIABLE T
HAT CAN STAND"..A.J. "FOR TEXT. A STRING
 IS ANYTHING YOU PUT"..B.J. "IN QUOTATIO
N MARKS. A STRING VARIABLE'S".@B.J. "NAM
E IS FOLLOWED BY $. TO SET UP A".PB.J. "
STRING VARIABLE, TYPE ITS NAME, THEN =,"
..B.J. "THEN THE TEXT YOU WANT BETWEEN".
.BDJ. "QUOTATION MARKS."..BNJ...BXJ. "PR
ESS RETURN TO SEE HOW THE STRING"..C.J. 
"VARIABLE A$ WORKS IN THIS EXAMPLE:"..C.
J..-C.JA$."THIS IS A STRING.".IC.J. "10 
A$ = ".DQ$.A$.DQ$.]C.K. "20 PRINT A$".}C
.K. "RUN";:.1450:.SD.2.RS.1:...C.K. A$..
C.K...C N. ----- SCREEN 10.BCHN..9)"SEMI
COLONS AND COMMAS".HCRN...C\N. "BASIC MA
KES USE OF SEMICOLONS AND".!DFN. "COMMAS
, BUT IT DOESN'T USE THEM IN THE".@DPN. 
"SAME WAY ENGLISH DOES.".FDZN..UD.N. "SE
MICOLONS (;) AND COMMAS (,) ARE USED"..D
.N. "IN PRINT STATEMENTS TO TELL THE C12
8".KD.N. "WHAT KIND OF SPACING YOU WANT 
IN"..D.N. "INFORMATION TO BE PRINTED ON 
THE SCREEN."..E.N...E.R. ----- SCREEN 11
..E0R..JE:R. "A SEMICOLON TELLS THE C128
 TO PRINT".XEDR. "WHAT'S BEFORE AND AFTE
R THE SEMICOLON"..ENR. "WITHOUT ANY ADDI
TIONAL SPACES. NUMBERS".REXR. "ARE ALWAY
S PRINTED WITH A SPACE OR"..EBR. "MINUS 
SIGN BEFORE AND A SPACE AFTER".-FLR. "TH
EM. STRINGS ARE PRINTED JUST AS THEY".YF
VR. "APPEAR BETWEEN THE QUOTATION MARKS.
"._F.R...F.R. "PRESS RETURN TO SEE HOW T
HE SEMICOLON"..F.R. "WORKS IN EACH OF TH
ESE EXAMPLES:"..F.R...F.R. "PRINT 1;2;3"
;:.1450:.SD.2.RS.1:...F.R. 1;2;3..F.R..+
G.R. "PRINT ".DQ$."JABBER".DQ$.";".DQ$."
WOCKY".DQ$;.BGAR.1450:.SD.2.RS.1:..YGDR.
 "JABBER";"WOCKY"._GFR..RGPRA.10:. "A ="
;A..GZR. "PRINT ".DQ$."TWO TIMES".DQ$.";
A;".DQ$."IS".DQ$.";A*2";.GG.R.1450:.SD.2
.RS.1:...G.R. "TWO TIMES";A;"IS";A.2..G.
R...H.U. ----- SCREEN 12..H.V..6H"V. "A 
COMMA TELLS YOUR COMPUTER TO SEPARATE".B
H,V. "WHAT'S BEFORE THE COMMA FROM WHAT'
S"..H1V. "AFTER IT BY TABBING TO THE NEX
T 10TH"..H6V. "COLUMN."..H@V..VHJV. "THE
 EXAMPLES BELOW ARE THE SAME AS THOSE"..
ITV. "ON THE PREVIOUS SCREEN, EXCEPT THA
T THE".1I^V. "SEMICOLONS HAVE BEEN REPLA
CED WITH".]IHV. "COMMAS. PRESS RETURN TO
 SEE HOW THE".~IRV. "COMMA WORKS IN EACH
 ONE."..I|V...I.V. "PRINT 1,2,3";:.1450:
.SD.2.RS.1:...I.V. 1,2,3..I.V...I.V. "PR
INT ".DQ$."JABBER".DQ$.",".DQ$."WOCKY".D
Q$;..J.V.1450:.SD.2.RS.1:..!J.V. "JABBER
","WOCKY".'J.V..:J.VA.10:. "A =";A.XJ.V.
 "PRINT ".DQ$."TWO TIMES".DQ$.",A,".DQ$.
"IS".DQ$.",A*2";..J.V.1450:.SD.2.RS.1:..
.J.V. "TWO TIMES",A,"IS",A.2..JBV..HJXY.
 ----- SCREEN 13.ZJ.Y..17)"REMARK"..J.Z.
..K.Z. "SOMETIMES IT'S HARD TO FIGURE OU
T WHAT A".BK.Z. "PROGRAM DOES JUST BY LO
OKING AT IT. WHEN".PK.Z. "YOU'RE WRITING
 A PROGRAM, YOU CAN ADD"..K(Z. "LINES TH
AT WILL REMIND YOU WHAT THE".MK2Z. "PROG
RAM DOES AND HOW IT WORKS. JUST TYPE"..K
<Z. "A LINE NUMBER, THEN REM (WHICH STAN
DS".+LFZ. "FOR REMARK), THEN YOUR REMARK
. WHEN YOU".ZLPZ. "RUN THE PROGRAM, BASI
C WILL IGNORE THE"..LZZ. "LINE. BUT WHEN
 YOU LIST THE PROGRAM,"..LDZ. "YOUR REMA
RK WILL APPEAR."..LNZ...LXZ. "PRESS RETU
RN. YOU'LL SEE THAT REM IS"..L.Z. "IGNOR
ED."..L.Z..'M.Z. "10 REM THIS PROGRAM PR
INTS ".DQ$."HELLO!".DQ$.JM Z. "20 PRINT 
".DQ$."HELLO!".DQ$.JM.Z. "RUN";:.1450:.S
D.2.RS.1:..YM.Z. "HELLO!".M.Z...M.]. --
--- SCREEN 14..M.]..18)"GOTO"..M.]..XM.]
. "THE GOTO COMMAND LETS YOU CHANGE THE"
..N.]. "ORDER IN WHICH THE COMPUTER FOLL
OWS THE".4N.^. "INSTRUCTIONS IN YOUR PRO
GRAM. GOTO,".AN.^. "FOLLOWED BY A LINE N
UMBER, TELLS THE"..N.^. "COMPUTER TO JUM
P TO THAT LINE INSTEAD OF".AN$^. "GOING 
ON TO THE NEXT LINE IN NUMERICAL".PN.^. 
"ORDER.".VN8^...OB^. "PRESS RETURN TO SE
E HOW GOTO WORKS IN".!OL^. "THIS SAMPLE 
PROGRAM:".'OV^..JO`^. "10 PRINT ".DQ$."H
ELLO!".DQ$.]OJ^. "20 GOTO 40"..OT^. "30 
PRINT ".DQ$."GOODBYE.".DQ$..O~^. "40 PRI
NT ".DQ$."HOW ARE YOU?".DQ$.KO.^. "RUN";
:.1450:.SD.2.RS.1:..YO.^."HELLO!"..O.^. 
"HOW ARE YOU?"..O.^...P.A. ----- SCREEN 
15..PFA..18)"END"..PPA..MPZA. "THE END C
OMMAND TELLS THE COMPUTER TO".}P.A. "STO
P CARRYING OUT THE INSTRUCTIONS IN A"..P
.A. "PROGRAM."..P.A...P.B. "ALTHOUGH YOU
R COMPUTER WILL STOP"..P.B. "EXECUTING C
OMMANDS WHEN IT RUNS OUT OF"..Q.B. "INST
RUCTIONS TO FOLLOW, IT'S A GOOD".FQ.B. "
IDEA TO END EVERY PROGRAM WITH AN END".^
Q B. "COMMAND ANYWAY.".DQ*B..ZQ.C. -----
 SCREEN 16..Q.C...Q.C...Q.C. "HOWEVER, Y
OU CAN HAVE INSTRUCTIONS AFTER"..QDC. "A
N END COMMAND IN A PROGRAM, AS SHOWN IN"
..RNC. "THE EXAMPLE BELOW. PRESS RETURN 
TO RUN".#RSC. "IT.".)RXC..LR.C. "10 PRIN
T ".DQ$."HELLO!".DQ$._R.C. "20 GOTO 50".
.R.C. "30 PRINT ".DQ$."GOODBYE.".DQ$..R.
D. "40 END"..R.D. "50 PRINT ".DQ$."HOW A
RE YOU?".DQ$.OR.D. "60 GOTO 30"..R.D. "R
UN";:.1450:.SD.2.RS.1:...R(D. "HELLO!"..
S2D. "HOW ARE YOU?".$S<D. "GOODBYE.".*SF
D..@S.E. ----- SCREEN 17.US.E..15)"THE C
OLON".[S.E...SBE. "YOU USE THE COLON (:)
 TO SEPARATE TWO OR"..SLE. "MORE BASIC C
OMMANDS ON THE SAME LINE."..SVE...S.E. "
BY USING COLONS YOU CAN MAKE YOUR"..T.E.
 "PROGRAMS MORE COMPACT. FOR EXAMPLE, YO
U".DT.E. "CAN PUT THESE TWO INSTRUCTIONS
 --".JT.E..\T.F. "10 X = 10".ST.F. "20 P
RINT X * 5".YT.F...T&F. "ON A SINGLE LIN
E:"..T0F...T:F. "10 X = 10 :PRINT X * 5"
..TDF...TNF. "COLONS ALSO MAKE IT EASY T
O ADD REMARKS"..UXF. "TO YOUR PROGRAMS:"
..UBF..7ULF. "50 T = R + S :REM T IS THE
 TOTAL".=UVF..SUXI. ----- SCREEN 18.TU.I
..9)"EDITING BASIC PROGRAMS".ZU I...U.I.
 "AS SHOWN IN THE SAMPLE PROGRAMS YOU'VE
".WU.I. "SEEN, IT'S A GOOD IDEA TO NUMBE
R YOUR"..V.I. "PROGRAM LINES IN MULTIPLE
S OF TEN --".2VHI. "THIS WAY, YOU'LL HAV
E ROOM TO ADD NEW".`VRI. "LINES LATER ON
. TO INSERT A NEW LINE,"..V.I. "JUST CHO
OSE A NEW LINE NUMBER IN BETWEEN".AV.I. 
"THE NUMBERS OF TWO LINES ALREADY THERE.
".GV.I...V.I. "TO DELETE A LINE, TYPE IT
S LINE NUMBER"."W.J. "AND PRESS RETURN. 
TO DELETE SEVERAL".QW.J. "LINES, TYPE TH
E BEGINNING LINE NUMBER,".{W.J. "A HYPHE
N (-), AND THE ENDING LINE"..W.J. "NUMBE
R. THEN PRESS RETURN."..W.J..TW.J. "TO R
EPLACE A LINE, TYPE A NEW LINE THAT"..W"
J. "STARTS WITH THE SAME NUMBER AS THE".
%X,J. "ONE YOU WANT TO REPLACE, THEN".;X
1J. "PRESS RETURN.".AX6J..WX`M. ----- SC
REEN 19.IX~M..17)"REVIEW".OX.M...X.M. "T
HESE ARE THE BASICS OF BASIC:"..X.M..MX.
M. "ENTER AN INSTRUCTION WITHOUT A NUMBE
R TO"..X.M. "HAVE YOUR COMPUTER CARRY IT
 OUT RIGHT"..Y.M. "AWAY."..YDM..@YNM. "I
N A PROGRAM, NUMBER THE INSTRUCTIONS IN"
.LYXM. "THE ORDER YOU WANT YOUR COMPUTER
 TO"..Y.M. "CARRY THEM OUT."..Y.M.. YHQ.
 ----- SCREEN 20..Y^Q...Y`Q..WYFQ. "USE 
PRINT TO DISPLAY THINGS ON THE"..YPQ. "S
CREEN AND TO USE BASIC LIKE A"..ZZQ. "CA
LCULATOR."..Z.Q..HZ.Q. "USE LIST TO SEE 
THE LINES OF A PROGRAM.".NZ.Q..XZ.Q. "US
E VARIABLES IF THE NUMBERS IN A"..Z.Q. "
PROBLEM MAY CHANGE. USE STRING VARIABLES
"..Z.Q. "FOR TEXT.".AZ.Q...ZJQ. "USE REM
 FOR REMARKS AND REMINDERS."..ZTQ.. [.Q.
 "USE GOTO TO CHANGE THE ORDER IN WHICH"
.P[.Q. "THE COMPUTER FOLLOWS YOUR INSTRU
CTIONS.".V[.Q..K[PC. ----- GLB INIT..[UC
. ----- MISC INIT..[ZCY:.50100:.50300:..
:.50500:.50700:.50900.W[.C.,19,24,"ONE M
OMENT PLEASE...":.51000..[.C. ----- MISC
 VAR/CONST INIT.1\.CTM.2:F1.2:F2.8:B1.7:
BF.1:L$.G(14):U$.G(142):K0$.G(11).I\HCK1
$.G(12):HM$.G(19):CS$.G(147):R0$.G(146):
R1$.G(18)..\RCDQ$.G(34):.50130:.C$(16):.
I.1.16:.C:C$(I).G(C):...\.C. 144,  5, 28
,159.J\.C. 156, 30, 31,158..\.C. 129,149
,150,151..\.C. 152,153,154,155./].CSB.51
712:.UP$(2):UP$(1)."PRESS SPACEBAR TO CO
NTINUE".U].CUP$(2)."PRESS RETURN TO CONT
INUE"..].DSP$."                         
               ":T$."  ":HP$.G(132).S].D
S0$.G(27)."M":S1$.G(27)."L":.50186:.J:.S
K(J):SK$.""..].D.I.1.J:.K:SK$.SK$.G(K):.
SK(I):../^ D. 6,133,  1, 27,  2, 32,  3,
 13,  3,145,  4, 17,  5.5^{D..U^|D. ----
- INIT VIDEO/GRAPHICS.W^.D.&:.0:.0,B1:.1
,F1:.4,B1:.5,F1..^.D.L$LK$S1$G(27)"C"G(2
7)"O"..^.D..0,0,39,24,1:..1:..2:..3:.0:.
.1.M^BD.I.1.8:..I,0:...^GD..15:.56576,B(
56576).3:..._DE. ----- INIT SOUND.%_NE.I
.1.3:ZI,0,0:.:..0,0,0,0,0:.15.A_GE.."V1O
0T0X0V2O0T0X0V3O0T0X0":.50535:.I.0.9:.A,
D,S,R,W,P.W_{E..I,A,D,S,R,W,P:..._.E.  0
, 9, 0, 0, 2,1536.._.E. 12, 0,12, 0, 1, 
  0.E_.E.  0, 0,15, 0, 0,   0.._.E.  0, 
5, 5, 0, 3,   0.._.E.  9, 4, 4, 0, 0,   
0..`.E.  0, 9, 2, 1, 1,   0.-`.E.  0, 9,
 0, 0, 2, 512.G`.E.  0, 9, 9, 0, 2,2048.
A`.E.  8, 9, 4, 1, 2, 512.{`.E.  0, 9, 0
, 0, 0,   0..`.E...`.F. ----- TOC ARRAY.
.`.F.VL$(9)..`.FVL$(0)."TOC 0".P` FVL$(1
)."INTRODUCTION"..`%FVL$(2)."THE C128"..
`*FVL$(3)."BASIC"..A/FVL$(4)."ADVANCED B
ASIC".-A4FVL$(5)."DISK USAGE".JA9FVL$(6)
."SCREEN GRAPHICS".GA>FVL$(7)."SPRITE GR
APHICS"..ACFVL$(8)."SOUND EFFECTS & MUSI
C"..AHFVL$(9)."PROGRAMMING HINTS"..AOF..
KATF. ----- PIC ARRAYS INIT..A.F.PN$(7),
PB(7),P3(7)..B.FPN$(0)."........":PB(0).
B1:P3(0).1.1B.FPN$(1)."BOOK"    :PB(1).B
1:P3(1).1.XB.FPN$(2)."KEYBOARD":PB(2).13
:P3(2).2.B.FPN$(3)."CIRCUS"  :PB(3).13:
P3(3).2..B.FPN$(4)."HARDWARE":PB(4).15:P
3(4).2.MB.FPN$(5)."CALLIOPE":PB(5).16:P3
(5).2..B.FPN$(6)."TITLE"   :PB(6).16:P3(
6).1..C.GPN$(7)."STAGE"   :PB(7).13:P3(7
).12."C7G..9C8G. ----- VOL 3 INIT.OC=G. 
----- MISC INIT.HCBG.51200:.51300:.51400
..C.H. ----- VOL MENU INIT..C.HNV.3:MM.9
:.VM$(MM)..C.HVM$(1)."GETTING TO KNOW BA
SIC".UC.HVM$(2)."DIRECT MODE"..C.HVM$(3)
."PROGRAM MODE"..D#HVM$(4)."BASIC ARITHM
ETIC".$D(HVM$(5)."VARIABLES".GD*HVM$(6).
"SEMICOLONS AND COMMAS".^D,HVM$(7)."THE 
COLON"..D.HVM$(8)."EDITING BASIC PROGRAM
S"..D0HVM$(9)."REVIEW"..D2H.VA(MM):.5125
0:.I.1.MM:.VA(I):..VDKH. 1,3,4,7,8,10,17
,18,19..DPH...DDH. ----- SPRITE INIT.'EF
H..2,1:.51302:.I.1.8:.C,P,X,Y,M:..I,0,C,
P,X,Y,M.=EPH..I,0#0:..I,0,0:..MEVH. 3,0,
0,0,1.]EXH. 3,0,0,0,1.MEZH. 3,0,0,0,1.}E
|H. 3,0,0,0,1..E~H. 3,0,0,0,1..E.H. 3,0,
0,0,1..E.H. 3,0,0,0,1..E.H. 3,0,0,0,1..E
.HSS.1:SF.4:S.18:.GU$(SF,SS):.S1.0.SS:.S
0.1.SF:.60600..F.HGU$(S0,S1).S$:S.S.1:.S
0,S1.6F.H.51370:.I.0.SF:.SX(I),SY(I):..D
F.H. 295,208.RF.H.   0,  0.`F.H.  24,  0
.NF.H.   0, 21.|F.H.  24, 21..FGH...FHH.
 ----- VOL SCRN INIT..FJHMS.20:.GM(MS),G
S(MS),GP(MS):..SF`.. ----- GOTO TOC..FJ.
.60015..FO..50000:.10500..GT.. ----- GOT
O VOL MENU..G^..60515.'GC..50000:.10800.
@G... ----- GET A SPRITE.UG....0:J.SB.64
.S:.I.0.63:.4032.I,B(J.I):.I:..8,S$:...G
... ----- SETUP THE GRAPHICS DISPLAY AS 
REQUESTED.FG...GM.1.GM.3.GM.GM.1:GS.25..
G!...0,0,39,24,1:G0.GS:.GM.10.G0.0:GM.GM
.10..H&..GP..0..0,PB(GP):.4,PB(GP):.3,P3
(GP).:H(...0:.GP.0.GP..B(16192)....QH*..
GM..L(0).GP.0...15:.53266,250:.53265,B(5
3265).239..H,..GM,1,0:.GM.4..3,1..H0..GP
..0....GM.0..16192,255.HH5...:U..:..(PN$
(GP).".C"),P7168..H:...(PN$(GP).".P"),P8
192:.16192,GP:....I>...15:.53266,250:.53
265,B(53265).16:...(ID..GM,,G0:..>I... -
---- BOOK LOAD.UI..GP.1:GM.12:GS.25:.607
00:I$."":.I.1.28:I$.I$." ":.I..I...I.2.2
2:.,6,I,I$:.I:....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL