VOLUME 4
FILE INFORMATION
FILENAME(S): VOLUME 4
FILE TYPE(S): PRG
FILE SIZE: 29.7K
FIRST SEEN: 2025-10-19 22:48:56
APPEARS ON: 1 disk(s)
FILE HASH
10e237a8ffe3eedcb62560810916e0657b93ac343ea3a1ee94e7ec51043f8941
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MICRO MANIAC | VOLUME 4 | PRG | Radd Maxx | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 04 00 57 41 B2 33 33 3A 57 42 B2 33 |.. ...WA.33:WB.3|
00000010: 33 3A 5A 44 B2 31 35 3A 97 38 30 38 2C 32 32 35 |3:ZD.15:.808,225|
00000020: 00 5E 08 05 00 97 35 36 35 37 38 2C C2 28 35 36 |.^....56578,.(56|
00000030: 35 37 38 29 B0 33 3A 97 35 36 35 37 36 2C 28 C2 |578).3:.56576,(.|
00000040: 28 35 36 35 37 36 29 AF 32 35 32 29 B0 31 3A 97 |(56576).252).1:.|
00000050: 36 34 38 2C 31 33 32 3A 97 36 34 39 2C 31 00 8A |648,132:.649,1..|
00000060: 08 07 00 97 35 34 32 39 36 2C 30 3A 81 4C B2 35 |....54296,0:.L.5|
00000070: 34 32 37 32 A4 35 34 32 39 36 3A 97 4C 2C 30 3A |4272.54296:.L,0:|
00000080: 82 3A 4C B2 BB 28 AB 54 49 29 00 AD 08 08 00 42 |.:L..(.TI).....B|
00000090: 43 B2 35 33 32 38 30 3A 97 42 43 2C 38 3A 4D 43 |C.53280:.BC,8:MC|
000000A0: B2 35 33 32 38 31 3A 97 4D 43 2C 31 31 00 D6 08 |.53281:.MC,11...|
000000B0: 0A 00 99 22 93 22 3A 56 B2 35 33 32 34 38 3A 97 |...".":V.53248:.|
000000C0: 56 AA 32 31 2C 30 3A 97 56 AA 32 33 2C 30 3A 97 |V.21,0:.V.23,0:.|
000000D0: 56 AA 32 39 2C 30 00 13 09 0F 00 97 56 AA 34 30 |V.29,0......V.40|
000000E0: 2C 31 34 3A 97 56 AA 34 31 2C 31 3A 97 56 AA 34 |,14:.V.41,1:.V.4|
000000F0: 32 2C 31 3A 97 56 AA 32 38 2C 33 3A 97 56 AA 33 |2,1:.V.28,3:.V.3|
00000100: 39 2C 38 3A 97 56 AA 33 38 2C 31 3A 97 56 AA 33 |9,8:.V.38,1:.V.3|
00000110: 37 2C 30 00 33 09 10 00 97 56 AA 33 33 2C 37 3A |7,0.3....V.33,7:|
00000120: 97 56 AA 34 33 2C 37 3A 97 56 AA 33 32 2C 39 3A |.V.43,7:.V.32,9:|
00000130: 89 34 30 00 4E 09 28 00 55 4C B2 31 30 32 34 AA |.40.N.(.UL.1024.|
00000140: 33 32 37 36 38 3A 43 4C B2 35 35 32 39 36 00 76 |32768:CL.55296.v|
00000150: 09 29 00 99 22 93 11 1C 20 20 20 20 20 20 4D 49 |.).."... MI|
00000160: 43 52 4F 20 4D 41 4E 49 41 43 20 50 52 45 53 45 |CRO MANIAC PRESE|
00000170: 4E 54 53 11 90 22 00 A3 09 2B 00 99 22 20 20 B0 |NTS.."...+.." .|
00000180: AE 20 20 D5 B2 B2 B2 C9 20 D5 B2 C9 D5 B2 C9 20 |. ..... ...... |
00000190: 20 B0 B2 B2 B2 B2 AE 20 B0 AE 20 B0 AE 20 B0 B2 | ...... .. .. ..|
000001A0: B2 B2 AE 00 D0 09 2D 00 99 22 20 20 AB B3 20 20 |......-.." .. |
000001B0: AB DB B1 DB B3 20 AB DB B3 AB DB B3 20 20 AD B1 |..... ...... ..|
000001C0: DB DB B1 BD 20 AB B3 20 AB B3 20 AB DB B1 B1 BD |.... .. .. .....|
000001D0: 00 FB 09 2F 00 99 22 20 20 AB B3 20 20 AB DB B2 |.../.." .. ...|
000001E0: DB B3 20 AB B3 AB B3 AB B3 20 20 20 20 AB B3 20 |.. ...... .. |
000001F0: 20 20 AB DB B2 DB B3 20 AB DB AE 00 26 0A 31 00 | ..... ....&.1.|
00000200: 99 22 20 20 AB B3 20 20 AB DB B1 DB B3 20 AB B3 |." .. ..... ..|
00000210: AD BD AB B3 20 20 20 20 AB B3 20 20 20 AB DB B1 |.... .. ...|
00000220: DB B3 20 AB DB BD 00 53 0A 33 00 99 22 20 20 AB |.. ....S.3.." .|
00000230: B3 20 20 AB B3 20 AB B3 20 AB B3 20 20 AB B3 20 |. .. .. .. .. |
00000240: 20 20 20 AB B3 20 20 20 AB B3 20 AB B3 20 AB DB | .. .. .. ..|
00000250: B2 B2 AE 00 81 0A 35 00 99 22 20 20 AD BD 20 20 |......5.." .. |
00000260: AD BD 20 AD BD 20 AD BD 20 20 AD BD 20 20 20 20 |.. .. .. .. |
00000270: AD BD 20 20 20 AD BD 20 AD BD 20 AD B1 B1 B1 BD |.. .. .. .....|
00000280: 11 00 A1 0A 37 00 99 A6 39 29 22 D5 B2 B2 B2 C9 |....7...9)".....|
00000290: 20 20 20 20 20 D5 B2 B2 B2 C9 20 20 B0 AE 20 B0 | ..... .. .|
000002A0: AE 00 C1 0A 39 00 99 A6 39 29 22 AB DB B1 DB B3 |....9...9)".....|
000002B0: 20 20 20 20 20 AB DB B1 B1 CB 20 20 AB B3 20 AB | ..... .. .|
000002C0: B3 00 E1 0A 3D 00 99 A6 39 29 22 AB B3 20 AD BD |....=...9)".. ..|
000002D0: 20 B0 C0 AE 20 AB DB B2 B2 C9 20 20 AB DB B2 DB | ... ..... ....|
000002E0: B3 00 01 0B 3F 00 99 A6 39 29 22 AB B3 20 B0 AE |....?...9)".. ..|
000002F0: 20 AD C0 BD 20 AB DB B1 DB B3 20 20 AD B1 B1 DB | ... ..... ....|
00000300: B3 00 21 0B 41 00 99 A6 39 29 22 AB DB B2 DB B3 |..!.A...9)".....|
00000310: 20 20 20 20 20 AB DB B2 DB B3 20 20 20 20 20 AB | ..... .|
00000320: B3 00 41 0B 43 00 99 A6 39 29 22 CA B1 B1 B1 CB |..A.C...9)".....|
00000330: 20 20 20 20 20 CA B1 B1 B1 CB 20 20 20 20 20 AD | ..... .|
00000340: BD 00 55 0B 44 00 99 A6 31 36 29 22 11 56 4F 4C |..U.D...16)".VOL|
00000350: 55 4D 45 20 34 00 69 0B 45 00 99 A6 31 36 29 22 |UME 4.i.E...16)"|
00000360: 11 28 43 29 20 31 39 38 33 00 7E 0B 47 00 99 A6 |.(C) 1983.~.G...|
00000370: 31 35 29 22 11 42 52 4F 4B 45 4E 20 42 59 00 97 |15)".BROKEN BY..|
00000380: 0B 49 00 99 A6 31 34 29 22 11 4D 49 43 52 4F 20 |.I...14)".MICRO |
00000390: 4D 41 4E 49 41 43 22 00 AC 0B 4B 00 8B 53 31 B2 |MANIAC"...K..S1.|
000003A0: 30 A7 8D 33 30 30 30 3A 53 31 B2 31 00 BC 0B 4C |0..3000:S1.1...L|
000003B0: 00 8D 33 33 30 30 3A 8D 33 35 30 30 00 C6 0B 4D |..3300:.3500...M|
000003C0: 00 8D 39 30 30 30 00 0D 0C 4E 00 97 4D 43 2C 31 |..9000...N..MC,1|
000003D0: 31 3A 97 56 AA 32 31 2C 30 3A 97 31 39 38 2C 30 |1:.V.21,0:.198,0|
000003E0: 3A 99 22 93 11 11 11 05 20 20 20 20 20 20 20 41 |:."..... A|
000003F0: 54 20 41 4E 59 20 50 4F 49 4E 54 20 49 4E 20 54 |T ANY POINT IN T|
00000400: 48 49 53 20 50 52 4F 47 52 41 4D 2C 22 00 3C 0C |HIS PROGRAM,".<.|
00000410: 50 00 99 22 11 59 4F 55 20 4D 41 59 20 50 55 53 |P..".YOU MAY PUS|
00000420: 48 20 41 4E 59 20 4F 46 20 54 48 45 20 46 4F 4C |H ANY OF THE FOL|
00000430: 4C 4F 57 49 4E 47 20 4B 45 59 53 22 00 6B 0C 51 |LOWING KEYS".k.Q|
00000440: 00 99 22 11 11 20 20 20 20 20 20 12 46 31 92 20 |..".. .F1. |
00000450: 20 54 4F 20 56 49 45 57 20 54 48 45 20 50 52 45 | TO VIEW THE PRE|
00000460: 56 49 4F 55 53 20 50 41 47 45 22 00 99 0C 52 00 |VIOUS PAGE"...R.|
00000470: 99 22 11 20 20 20 20 20 20 12 46 33 92 20 20 54 |.". .F3. T|
00000480: 4F 20 56 49 45 57 20 54 48 45 20 49 4E 44 45 58 |O VIEW THE INDEX|
00000490: 20 4F 52 20 51 55 49 54 22 00 BC 0C 53 00 99 22 | OR QUIT"...S.."|
000004A0: 11 20 20 20 20 20 20 12 53 92 20 20 20 54 4F 20 |. .S. TO |
000004B0: 53 54 4F 50 20 41 20 53 4F 4E 47 22 00 EB 0C 54 |STOP A SONG"...T|
000004C0: 00 99 22 11 11 11 20 20 20 54 48 49 53 20 56 4F |.."... THIS VO|
000004D0: 4C 55 4D 45 20 43 4F 56 45 52 53 20 41 44 56 41 |LUME COVERS ADVA|
000004E0: 4E 43 45 44 20 42 41 53 49 43 22 00 1C 0D 55 00 |NCED BASIC"...U.|
000004F0: 99 22 11 20 41 4E 44 20 57 49 4C 4C 20 52 45 51 |.". AND WILL REQ|
00000500: 55 49 52 45 20 33 30 20 4D 49 4E 55 54 45 53 20 |UIRE 30 MINUTES |
00000510: 54 4F 20 43 4F 4D 50 4C 45 54 45 22 00 32 0D 58 |TO COMPLETE".2.X|
00000520: 00 8D 34 30 30 30 3A 91 41 89 37 38 2C 31 32 30 |..4000:.A.78,120|
00000530: 30 30 00 3B 0D 5B 00 89 31 30 30 00 4A 0D 5C 00 |00.;.[..100.J.\.|
00000540: 41 B2 30 3A 97 31 39 38 2C 30 00 61 0D 5D 00 A1 |A.0:.198,0.a.]..|
00000550: 41 24 3A 8B 41 24 B2 C7 28 31 33 33 29 A7 41 B2 |A$:.A$..(133).A.|
00000560: 31 00 74 0D 5E 00 8B 41 24 B2 C7 28 31 33 34 29 |1.t.^..A$..(134)|
00000570: A7 41 B2 32 00 84 0D 5F 00 8B 43 55 B1 30 A7 8D |.A.2..._..CU.0..|
00000580: 38 30 30 30 00 92 0D 60 00 8B 41 24 B2 22 22 A7 |8000...`..A$."".|
00000590: 39 33 00 9D 0D 61 00 43 55 B2 30 3A 8E 00 CB 0D |93...a.CU.0:....|
000005A0: 64 00 97 56 AA 32 31 2C 30 3A 58 4D B2 33 30 3A |d..V.21,0:XM.30:|
000005B0: 59 4D B2 31 37 31 3A 97 56 AA 31 36 2C 33 31 3A |YM.171:.V.16,31:|
000005C0: 97 42 43 2C 32 3A 97 4D 43 2C 35 00 FC 0D 69 00 |.BC,2:.MC,5...i.|
000005D0: 99 22 93 90 11 20 20 20 48 49 21 20 20 57 45 4C |."... HI! WEL|
000005E0: 43 4F 4D 45 20 42 41 43 4B 21 20 20 49 4E 20 54 |COME BACK! IN T|
000005F0: 48 49 53 20 56 4F 4C 55 4D 45 11 22 00 28 0E 6E |HIS VOLUME.".(.n|
00000600: 00 99 22 20 20 20 20 20 57 45 20 57 49 4C 4C 20 |.." WE WILL |
00000610: 44 49 53 43 55 53 53 20 41 44 56 41 4E 43 45 44 |DISCUSS ADVANCED|
00000620: 20 42 41 53 49 43 11 22 00 6A 0E 73 00 99 22 20 | BASIC.".j.s.." |
00000630: 43 4F 4D 4D 41 4E 44 53 2C 20 49 4E 43 4C 55 44 |COMMANDS, INCLUD|
00000640: 49 4E 47 20 43 4F 4C 4F 52 20 41 4E 44 20 47 52 |ING COLOR AND GR|
00000650: 41 50 48 49 43 53 2E 22 3A 8D 31 31 30 30 30 3A |APHICS.":.11000:|
00000660: 99 22 90 22 3A 8D 34 30 30 30 00 7A 0E BF 00 91 |.".":.4000.z....|
00000670: 41 89 37 38 2C 31 32 30 30 30 00 AA 0E C8 00 97 |A.78,12000......|
00000680: 56 AA 32 31 2C 30 3A 58 4D B2 33 30 3A 59 4D B2 |V.21,0:XM.30:YM.|
00000690: 31 37 31 3A 97 56 AA 31 36 2C 33 31 3A 97 42 43 |171:.V.16,31:.BC|
000006A0: 2C 31 34 3A 97 4D 43 2C 31 31 00 CE 0E CC 00 99 |,14:.MC,11......|
000006B0: 22 93 1E 11 20 20 20 20 20 20 20 20 20 20 20 20 |"... |
000006C0: 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 F1 | ***********"..|
000006D0: 0E CD 00 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
000006E0: 20 20 20 2A 20 05 20 49 4E 50 55 54 20 1E 20 2A | * . INPUT . *|
000006F0: 22 00 13 0F CF 00 99 22 20 20 20 20 20 20 20 20 |"......" |
00000700: 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | **********|
00000710: 2A 11 22 00 5D 0F D0 00 99 22 05 20 20 49 4E 50 |*.".]....". INP|
00000720: 55 54 20 49 53 20 55 53 45 44 20 54 4F 20 49 4E |UT IS USED TO IN|
00000730: 50 55 54 20 4E 45 57 20 44 41 54 41 20 49 4E 54 |PUT NEW DATA INT|
00000740: 4F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |O |
00000750: 1E 20 20 20 20 20 20 B7 B7 B7 B7 B7 22 00 8C 0F |. ....."...|
00000760: D7 00 99 22 05 20 20 41 20 52 55 4E 4E 49 4E 47 |...". A RUNNING|
00000770: 20 50 52 4F 47 52 41 4D 2E 20 20 41 46 54 45 52 | PROGRAM. AFTER|
00000780: 20 54 59 50 49 4E 47 20 54 48 45 22 00 AA 0F DC | TYPING THE"....|
00000790: 00 99 22 20 20 20 9A 20 20 20 20 20 20 20 20 20 |.." . |
000007A0: 20 20 B0 C0 C0 C0 C0 C0 C0 AE 00 F7 0F E1 00 99 | ..............|
000007B0: 22 05 20 20 44 41 54 41 2C 20 50 52 45 53 53 9A |". DATA, PRESS.|
000007C0: 20 DD 05 52 45 54 55 52 4E 9A DD 05 20 54 4F 20 | ..RETURN... TO |
000007D0: 45 4E 54 45 52 20 44 41 54 41 20 20 20 20 9A 20 |ENTER DATA . |
000007E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 AD C0 C0 | ...|
000007F0: C0 C0 C0 C0 BD 05 22 00 15 10 EB 00 99 22 20 20 |......"......" |
00000800: 41 4E 44 20 43 4F 4E 54 49 4E 55 45 2E 11 22 3A |AND CONTINUE..":|
00000810: 8D 36 30 30 30 00 50 10 F0 00 99 22 9E 45 58 41 |.6000.P....".EXA|
00000820: 4D 50 4C 45 20 23 31 20 20 20 20 20 20 20 20 20 |MPLE #1 |
00000830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000840: 20 20 20 20 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 | .........."|
00000850: 00 84 10 FA 00 99 22 31 30 20 50 52 49 4E 54 20 |......"10 PRINT |
00000860: 22 3B C7 28 33 34 29 3B 22 57 48 41 54 20 49 53 |";.(34);"WHAT IS|
00000870: 20 59 4F 55 52 20 41 47 45 22 3B C7 28 33 34 29 | YOUR AGE";.(34)|
00000880: 3B 22 3B 22 00 A7 10 FD 00 99 22 32 30 20 49 4E |;";"......"20 IN|
00000890: 50 55 54 20 41 3A 52 45 4D 20 4E 55 4D 45 52 49 |PUT A:REM NUMERI|
000008A0: 43 20 44 41 54 41 22 00 E1 10 FF 00 99 22 33 30 |C DATA"......"30|
000008B0: 20 3F 20 22 3B C7 28 33 34 29 3B 22 59 4F 55 52 | ? ";.(34);"YOUR|
000008C0: 20 41 47 45 20 49 53 20 22 3B C7 28 33 34 29 3B | AGE IS ";.(34);|
000008D0: 22 3B 41 22 3A 99 22 52 55 4E 22 3A 8D 34 30 31 |";A":."RUN":.401|
000008E0: 30 00 06 11 07 01 43 55 B2 31 3A 43 58 B2 33 3A |0.....CU.1:CX.3:|
000008F0: 43 59 B2 31 38 3A 8D 39 32 3A 91 41 89 31 30 30 |CY.18:.92:.A.100|
00000900: 2C 31 32 30 30 30 00 20 11 0C 01 8B 41 24 B3 B1 |,12000. ....A$..|
00000910: C7 28 31 33 29 A7 8D 34 30 32 30 3A 89 32 36 33 |.(13)..4020:.263|
00000920: 00 36 11 0F 01 52 4F B2 31 39 3A 8D 37 30 30 30 |.6...RO.19:.7000|
00000930: 3A 8D 35 32 35 30 00 68 11 10 01 99 22 13 11 11 |:.5250.h...."...|
00000940: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000950: 11 9E 57 48 41 54 20 49 53 20 59 4F 55 52 20 41 |..WHAT IS YOUR A|
00000960: 47 45 22 3B 3A 85 41 24 00 8A 11 11 01 8B C5 28 |GE";:.A$.......(|
00000970: 41 24 29 B1 31 31 30 B0 C5 28 41 24 29 B3 32 A7 |A$).110..(A$).2.|
00000980: 8D 34 30 32 30 3A 89 32 37 32 00 AD 11 13 01 52 |.4020:.272.....R|
00000990: 4F B2 32 30 3A 8D 37 30 30 30 3A 99 22 59 4F 55 |O.20:.7000:."YOU|
000009A0: 52 20 41 47 45 20 49 53 20 22 3B 41 24 00 D2 11 |R AGE IS ";A$...|
000009B0: 16 01 99 22 11 52 45 41 44 59 2E 91 91 91 22 3A |...".READY....":|
000009C0: 8D 34 30 35 31 3A 91 41 89 31 30 30 2C 31 32 30 |.4051:.A.100,120|
000009D0: 30 30 00 F4 11 18 01 99 22 13 11 11 11 11 11 11 |00......".......|
000009E0: 11 11 11 11 11 11 11 9E 45 58 41 4D 50 4C 45 20 |........EXAMPLE |
000009F0: 23 32 11 22 00 33 12 1A 01 99 22 31 30 20 49 4E |#2.".3...."10 IN|
00000A00: 50 55 54 22 3B C7 28 33 34 29 3B 22 59 4F 55 52 |PUT";.(34);"YOUR|
00000A10: 20 4E 41 4D 45 22 3B C7 28 33 34 29 3B 22 3B 41 | NAME";.(34);";A|
00000A20: 24 3A 52 45 4D 20 53 54 52 49 4E 47 20 44 41 54 |$:REM STRING DAT|
00000A30: 41 20 22 00 82 12 1D 01 99 22 32 30 20 3F 20 22 |A "......"20 ? "|
00000A40: 3B C7 28 33 34 29 3B 22 48 45 4C 4C 4F 20 22 3B |;.(34);"HELLO ";|
00000A50: C7 28 33 34 29 3B 22 3B 41 24 20 20 20 20 20 20 |.(34);";A$ |
00000A60: 20 20 20 20 20 20 20 22 3A 99 22 52 55 4E 20 20 | ":."RUN |
00000A70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A80: 20 22 00 D2 12 1E 01 99 22 20 20 20 20 20 22 3A | "......" ":|
00000A90: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00000AA0: 20 20 20 20 20 20 20 20 20 20 20 22 3A 99 22 20 | ":." |
00000AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AC0: 20 22 3A 99 22 11 20 20 20 20 20 20 20 91 91 91 | ":.". ...|
00000AD0: 91 22 00 DC 12 1F 01 8D 34 30 31 30 00 01 13 21 |."......4010...!|
00000AE0: 01 43 55 B2 31 3A 43 58 B2 33 3A 43 59 B2 31 37 |.CU.1:CX.3:CY.17|
00000AF0: 3A 8D 39 32 3A 91 41 89 31 30 30 2C 31 32 30 30 |:.92:.A.100,1200|
00000B00: 30 00 1B 13 23 01 8B 41 24 B3 B1 C7 28 31 33 29 |0...#..A$...(13)|
00000B10: A7 8D 34 30 32 30 3A 89 32 38 39 00 5A 13 26 01 |..4020:.289.Z.&.|
00000B20: 52 4F B2 31 38 3A 8D 37 30 30 30 3A 8D 35 32 35 |RO.18:.7000:.525|
00000B30: 30 3A 99 22 13 11 11 11 9E 11 11 11 11 11 11 11 |0:."............|
00000B40: 11 11 11 11 11 11 11 11 22 3B 3A 85 22 59 4F 55 |........";:."YOU|
00000B50: 52 20 4E 41 4D 45 22 3B 41 24 00 76 13 28 01 99 |R NAME";A$.v.(..|
00000B60: 22 48 45 4C 4C 4F 20 22 3B 41 24 3A 99 22 11 52 |"HELLO ";A$:.".R|
00000B70: 45 41 44 59 2E 22 00 8D 13 2B 01 8D 34 30 31 34 |EADY."...+..4014|
00000B80: 3A 91 41 89 31 30 30 2C 31 32 30 30 30 00 BC 13 |:.A.100,12000...|
00000B90: 2C 01 97 56 AA 32 31 2C 30 3A 58 4D B2 34 38 3A |,..V.21,0:XM.48:|
00000BA0: 59 4D B2 31 37 31 3A 97 56 AA 31 36 2C 33 31 3A |YM.171:.V.16,31:|
00000BB0: 97 42 43 2C 37 3A 97 4D 43 2C 31 31 00 DF 13 30 |.BC,7:.MC,11...0|
00000BC0: 01 99 22 93 1E 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00000BD0: 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 | ***********".|
00000BE0: 02 14 31 01 99 22 20 20 20 20 20 20 20 20 20 20 |..1.." |
00000BF0: 20 20 20 20 2A 20 20 05 20 47 45 54 1E 20 20 20 | * . GET. |
00000C00: 2A 22 00 23 14 33 01 99 22 20 20 20 20 20 20 20 |*".#.3.." |
00000C10: 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A | *********|
00000C20: 2A 2A 22 00 75 14 36 01 99 22 05 20 20 47 45 54 |**".u.6..". GET|
00000C30: 20 49 53 20 55 53 45 44 20 54 4F 20 47 45 54 20 | IS USED TO GET |
00000C40: 44 41 54 41 20 4F 4E 45 20 43 48 41 52 41 43 54 |DATA ONE CHARACT|
00000C50: 45 52 20 20 20 20 20 20 20 20 20 20 20 20 1E 20 |ER . |
00000C60: 20 20 20 20 20 B7 B7 B7 20 9A 20 20 20 B0 C0 C0 | ... . ...|
00000C70: C0 C0 C0 C0 AE 00 AA 14 3B 01 99 22 05 41 54 20 |........;..".AT |
00000C80: 41 20 54 49 4D 45 2E 20 44 4F 20 4E 4F 54 20 50 |A TIME. DO NOT P|
00000C90: 52 45 53 53 9A 20 DD 05 52 45 54 55 52 4E 9A DD |RESS. ..RETURN..|
00000CA0: 05 20 42 45 43 41 55 53 45 22 00 D4 14 3C 01 99 |. BECAUSE"...<..|
00000CB0: 22 91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00000CC0: 20 20 20 20 20 20 20 20 20 20 9A AD C0 C0 C0 C0 | ......|
00000CD0: C0 C0 BD 22 00 05 15 40 01 99 22 05 20 49 20 44 |..."...@..". I D|
00000CE0: 4F 20 4E 4F 54 20 53 54 4F 50 20 54 48 45 20 50 |O NOT STOP THE P|
00000CF0: 52 4F 47 52 41 4D 2E 20 49 46 20 59 4F 55 20 57 |ROGRAM. IF YOU W|
00000D00: 41 4E 54 11 22 00 34 15 45 01 99 22 20 4D 45 20 |ANT.".4.E.." ME |
00000D10: 54 4F 20 57 41 49 54 20 55 4E 54 49 4C 20 41 20 |TO WAIT UNTIL A |
00000D20: 4B 45 59 20 49 53 20 50 52 45 53 53 45 44 2C 20 |KEY IS PRESSED, |
00000D30: 41 4E 11 22 00 60 15 4F 01 99 22 20 45 58 54 52 |AN.".`.O.." EXTR|
00000D40: 41 20 53 54 41 54 45 4D 45 4E 54 20 49 53 20 52 |A STATEMENT IS R|
00000D50: 45 51 55 49 52 45 44 2E 11 22 3A 8D 36 30 30 30 |EQUIRED..":.6000|
00000D60: 00 9B 15 52 01 99 22 9E 45 58 41 4D 50 4C 45 20 |...R..".EXAMPLE |
00000D70: 23 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |#1 |
00000D80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D90: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 D3 15 53 01 |.........."...S.|
00000DA0: 99 22 9E 31 30 20 3F 22 3B C7 28 33 34 29 3B 22 |.".10 ?";.(34);"|
00000DB0: 48 4F 57 20 4D 41 4E 59 20 51 55 41 52 54 53 20 |HOW MANY QUARTS |
00000DC0: 44 4F 20 59 4F 55 20 48 41 56 45 3F 22 3B C7 28 |DO YOU HAVE?";.(|
00000DD0: 33 34 29 00 F7 15 54 01 99 22 32 30 20 47 45 54 |34)...T.."20 GET|
00000DE0: 20 41 3A 50 3D 41 2A 32 3A 49 46 41 3C 31 20 54 | A:P=A*2:IFA<1 T|
00000DF0: 48 45 4E 20 32 30 22 00 3F 16 59 01 99 22 33 30 |HEN 20".?.Y.."30|
00000E00: 20 3F 20 41 3B 22 3B C7 28 33 34 29 3B 22 51 55 | ? A;";.(34);"QU|
00000E10: 41 52 54 53 20 45 51 55 41 4C 53 22 3B C7 28 33 |ARTS EQUALS";.(3|
00000E20: 34 29 3B 22 3B 22 3B 22 50 3B 22 3B C7 28 33 34 |4);";";"P;";.(34|
00000E30: 29 3B 22 50 49 4E 54 53 22 3B C7 28 33 34 29 00 |);"PINTS";.(34).|
00000E40: 50 16 5E 01 99 22 52 55 4E 22 3A 8D 34 30 31 30 |P.^.."RUN":.4010|
00000E50: 00 75 16 68 01 43 55 B2 31 3A 43 58 B2 33 3A 43 |.u.h.CU.1:CX.3:C|
00000E60: 59 B2 31 38 3A 8D 39 32 3A 91 41 89 32 30 30 2C |Y.18:.92:.A.200,|
00000E70: 31 32 30 30 30 00 8F 16 6D 01 8B 41 24 B3 B1 C7 |12000...m..A$...|
00000E80: 28 31 33 29 A7 8D 34 30 32 30 3A 89 33 36 30 00 |(13)..4020:.360.|
00000E90: 9F 16 72 01 52 4F B2 31 39 3A 8D 37 30 30 30 00 |..r.RO.19:.7000.|
00000EA0: C8 16 73 01 99 22 91 91 9E 91 91 48 4F 57 20 4D |..s..".....HOW M|
00000EB0: 41 4E 59 20 51 55 41 52 54 53 20 44 4F 20 59 4F |ANY QUARTS DO YO|
00000EC0: 55 20 48 41 56 45 3F 22 00 E1 16 74 01 A1 41 24 |U HAVE?"...t..A$|
00000ED0: 3A 41 B2 C5 28 41 24 29 3A 8B 41 B3 31 A7 33 37 |:A..(A$):.A.1.37|
00000EE0: 32 00 EB 16 75 01 50 B2 41 AC 32 00 0C 17 77 01 |2...u.P.A.2...w.|
00000EF0: 99 41 3B 22 51 55 41 52 54 53 20 45 51 55 41 4C |.A;"QUARTS EQUAL|
00000F00: 53 22 3B 50 3B 22 50 49 4E 54 53 22 00 2E 17 79 |S";P;"PINTS"...y|
00000F10: 01 99 22 11 52 45 41 44 59 2E 22 3A 8D 34 30 35 |..".READY.":.405|
00000F20: 31 3A 91 41 89 32 30 30 2C 31 32 30 30 30 00 50 |1:.A.200,12000.P|
00000F30: 17 7C 01 99 22 13 11 11 11 11 11 11 11 11 11 9E |.|.."...........|
00000F40: 11 11 11 11 45 58 41 4D 50 4C 45 20 23 32 11 22 |....EXAMPLE #2."|
00000F50: 00 88 17 7E 01 99 22 31 30 20 3F 22 3B C7 28 33 |...~.."10 ?";.(3|
00000F60: 34 29 3B 22 57 48 41 54 20 49 53 20 59 4F 55 52 |4);"WHAT IS YOUR|
00000F70: 20 46 41 56 4F 52 49 54 45 20 4C 45 54 54 45 52 | FAVORITE LETTER|
00000F80: 3F 22 3B C7 28 33 34 29 00 BA 17 80 01 99 22 32 |?";.(34)......"2|
00000F90: 30 20 47 45 54 20 41 24 3A 20 49 46 20 41 24 3D |0 GET A$: IF A$=|
00000FA0: 22 3B C7 28 33 34 29 3B C7 28 33 34 29 3B 22 54 |";.(34);.(34);"T|
00000FB0: 48 45 4E 20 32 30 20 20 20 22 00 F2 17 82 01 99 |HEN 20 "......|
00000FC0: 22 33 30 20 3F 20 41 24 3B 22 3B C7 28 33 34 29 |"30 ? A$;";.(34)|
00000FD0: 3B 22 20 49 53 20 59 4F 55 52 20 46 41 56 4F 52 |;" IS YOUR FAVOR|
00000FE0: 49 54 45 20 4C 45 54 54 45 52 2E 22 3B C7 28 33 |ITE LETTER.";.(3|
00000FF0: 34 29 00 3D 18 84 01 99 22 52 55 4E 22 3A 99 22 |4).=...."RUN":."|
00001000: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":|
00001020: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00001030: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 52 18 | ".R.|
00001040: 85 01 99 22 11 20 20 20 20 20 20 22 3A 8D 34 30 |...". ":.40|
00001050: 31 30 00 77 18 87 01 43 55 B2 31 3A 43 58 B2 33 |10.w...CU.1:CX.3|
00001060: 3A 43 59 B2 31 38 3A 8D 39 32 3A 91 41 89 32 30 |:CY.18:.92:.A.20|
00001070: 30 2C 31 32 30 30 30 00 91 18 8A 01 8B 41 24 B3 |0,12000......A$.|
00001080: B1 C7 28 31 33 29 A7 8D 34 30 32 30 3A 89 33 39 |..(13)..4020:.39|
00001090: 31 00 C7 18 8C 01 52 4F B2 31 39 3A 8D 37 30 30 |1.....RO.19:.700|
000010A0: 30 3A 99 22 91 91 9E 91 91 57 48 41 54 20 49 53 |0:.".....WHAT IS|
000010B0: 20 59 4F 55 52 20 46 41 56 4F 52 49 54 45 20 4C | YOUR FAVORITE L|
000010C0: 45 54 54 45 52 3F 22 00 DB 18 8D 01 A1 20 41 24 |ETTER?"...... A$|
000010D0: 3A 8B 41 24 B2 22 22 A7 33 39 37 00 F4 18 8E 01 |:.A$."".397.....|
000010E0: 8B 41 24 B2 C7 28 31 33 29 A7 8D 34 30 32 30 3A |.A$..(13)..4020:|
000010F0: 89 33 39 37 00 36 19 8F 01 99 41 24 3B 22 20 49 |.397.6....A$;" I|
00001100: 53 20 59 4F 55 52 20 46 41 56 4F 52 49 54 45 20 |S YOUR FAVORITE |
00001110: 4C 45 54 54 45 52 2E 11 22 3A 99 22 52 45 41 44 |LETTER..":."READ|
00001120: 59 2E 22 3A 8D 34 30 31 34 3A 91 41 89 32 30 30 |Y.":.4014:.A.200|
00001130: 2C 31 32 30 30 30 00 65 19 90 01 97 56 AA 32 31 |,12000.e....V.21|
00001140: 2C 30 3A 58 4D B2 32 33 34 3A 59 4D B2 31 37 31 |,0:XM.234:YM.171|
00001150: 3A 97 56 AA 31 36 2C 30 3A 97 42 43 2C 38 3A 97 |:.V.16,0:.BC,8:.|
00001160: 4D 43 2C 31 31 00 8A 19 94 01 99 22 93 1E 20 20 |MC,11......".. |
00001170: 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A | ******|
00001180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 B1 19 95 01 99 |*********"......|
00001190: 22 20 20 20 20 20 20 20 20 20 20 20 20 2A 20 05 |" * .|
000011A0: 52 45 41 44 20 1E 2A 05 20 44 41 54 41 1E 20 2A |READ .*. DATA. *|
000011B0: 22 00 D4 19 97 01 99 22 20 20 20 20 20 20 20 20 |"......" |
000011C0: 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ************|
000011D0: 2A 2A 2A 22 00 04 1A 99 01 99 22 20 05 20 52 45 |***"......" . RE|
000011E0: 41 44 20 41 4E 44 20 44 41 54 41 20 41 52 45 20 |AD AND DATA ARE |
000011F0: 55 53 45 44 20 54 4F 20 45 4E 54 45 52 20 4C 4F |USED TO ENTER LO|
00001200: 4E 47 11 22 00 33 1A 9B 01 99 22 20 20 4C 49 53 |NG.".3...." LIS|
00001210: 54 53 20 4F 46 20 44 41 54 41 20 49 4E 54 4F 20 |TS OF DATA INTO |
00001220: 41 20 50 52 4F 47 52 41 4D 2E 20 20 49 20 52 45 |A PROGRAM. I RE|
00001230: 41 44 22 00 63 1A 9D 01 99 22 20 20 20 20 20 20 |AD".c...." |
00001240: 20 20 20 20 20 20 20 20 20 20 20 20 1E 20 20 20 | . |
00001250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B7 B7 | ..|
00001260: B7 B7 22 00 B0 1A 9F 01 99 22 05 20 20 54 48 45 |.."......". THE|
00001270: 20 56 41 4C 55 45 53 20 46 52 4F 4D 20 54 48 45 | VALUES FROM THE|
00001280: 20 44 41 54 41 20 53 54 41 54 45 4D 45 4E 54 53 | DATA STATEMENTS|
00001290: 20 20 20 1E 20 20 20 20 20 20 20 20 20 20 20 20 | . |
000012A0: 20 20 20 20 20 20 20 20 20 20 B7 B7 B7 B7 05 22 | ....."|
000012B0: 00 DD 1A A3 01 99 22 20 20 4F 4E 45 20 41 54 20 |......" ONE AT |
000012C0: 41 20 54 49 4D 45 2E 20 20 43 4F 4D 4D 41 53 20 |A TIME. COMMAS |
000012D0: 41 52 45 20 55 53 45 44 20 54 4F 11 22 00 06 1B |ARE USED TO."...|
000012E0: A5 01 99 22 20 20 53 45 50 41 52 41 54 45 20 50 |..." SEPARATE P|
000012F0: 49 45 43 45 53 20 4F 46 20 44 41 54 41 2E 11 22 |IECES OF DATA.."|
00001300: 3A 8D 36 30 30 30 00 36 1B A7 01 99 22 9E 45 58 |:.6000.6....".EX|
00001310: 41 4D 50 4C 45 22 3A 99 22 31 30 20 46 4F 52 20 |AMPLE":."10 FOR |
00001320: 58 3D 30 20 54 4F 20 32 22 3A 99 22 32 4F 20 52 |X=0 TO 2":."2O R|
00001330: 45 41 44 20 4C 22 00 5F 1B AD 01 99 22 33 30 20 |EAD L"._...."30 |
00001340: 3F 22 3B C7 28 33 34 29 3B 22 4C 3D 22 3B C7 28 |?";.(34);"L=";.(|
00001350: 33 34 29 3B 22 3B 4C 3A 4E 45 58 54 20 58 22 00 |34);";L:NEXT X".|
00001360: 83 1B B1 01 99 22 34 30 20 44 41 54 41 20 35 2C |....."40 DATA 5,|
00001370: 31 30 2C 31 35 22 3A 99 22 52 55 4E 22 3A 8D 34 |10,15":."RUN":.4|
00001380: 30 31 30 00 A8 1B B8 01 43 55 B2 31 3A 43 58 B2 |010.....CU.1:CX.|
00001390: 33 3A 43 59 B2 31 38 3A 8D 39 32 3A 91 41 89 33 |3:CY.18:.92:.A.3|
000013A0: 30 30 2C 31 32 30 30 30 00 C2 1B BB 01 8B 41 24 |00,12000......A$|
000013B0: B3 B1 C7 28 31 33 29 A7 8D 34 30 32 30 3A 89 34 |...(13)..4020:.4|
000013C0: 34 30 00 08 1C C0 01 52 4F B2 31 39 3A 8D 37 30 |40.....RO.19:.70|
000013D0: 30 30 3A 99 22 91 9E 91 91 91 4C 3D 35 22 3A 52 |00:.".....L=5":R|
000013E0: 4F B2 32 30 3A 8D 37 30 30 30 3A 99 22 9E 4C 3D |O.20:.7000:.".L=|
000013F0: 31 30 22 3A 52 4F B2 32 31 3A 8D 37 30 30 30 3A |10":RO.21:.7000:|
00001400: 99 22 9E 4C 3D 31 35 22 00 20 1C C1 01 99 22 20 |.".L=15". ...." |
00001410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001420: 00 44 1C C2 01 99 22 52 45 41 44 59 2E 91 91 91 |.D...."READY....|
00001430: 22 3A 8D 34 30 35 35 3A 91 41 89 33 30 30 2C 31 |":.4055:.A.300,1|
00001440: 32 30 30 30 00 6B 1C F4 01 97 56 AA 32 31 2C 30 |2000.k....V.21,0|
00001450: 3A 58 4D B2 37 32 3A 59 4D B2 31 37 31 3A 97 56 |:XM.72:YM.171:.V|
00001460: AA 31 36 2C 30 3A 97 42 43 2C 36 00 92 1C F8 01 |.16,0:.BC,6.....|
00001470: 99 22 93 9B 96 20 20 20 20 20 20 20 20 20 20 2A |."... *|
00001480: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001490: 2A 22 00 BA 1C F9 01 99 22 20 20 20 20 20 20 20 |*"......" |
000014A0: 20 20 20 2A 20 05 47 4F 53 55 42 20 96 2A 20 05 | * .GOSUB .* .|
000014B0: 52 45 54 55 52 4E 20 96 2A 22 00 DF 1C FB 01 99 |RETURN .*"......|
000014C0: 22 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A 2A |" *****|
000014D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 11 22 00 |*************.".|
000014E0: 18 1D FE 01 99 22 05 47 4F 53 55 42 20 49 53 20 |.....".GOSUB IS |
000014F0: 55 53 45 44 20 57 48 45 4E 20 4F 4E 45 20 54 41 |USED WHEN ONE TA|
00001500: 53 4B 20 49 53 20 52 45 50 45 41 54 45 44 96 20 |SK IS REPEATED. |
00001510: B7 B7 B7 B7 B7 20 20 22 00 49 1D 03 02 99 22 05 |..... ".I....".|
00001520: 53 45 56 45 52 41 4C 20 54 49 4D 45 53 20 54 48 |SEVERAL TIMES TH|
00001530: 52 4F 55 47 48 4F 55 54 20 54 48 45 20 50 52 4F |ROUGHOUT THE PRO|
00001540: 47 52 41 4D 2E 20 49 11 22 00 8D 1D 08 02 99 22 |GRAM. I."......"|
00001550: 57 49 4C 4C 20 47 4F 20 54 4F 20 54 48 45 20 53 |WILL GO TO THE S|
00001560: 55 42 52 4F 55 54 49 4E 45 20 41 54 20 54 48 45 |UBROUTINE AT THE|
00001570: 20 20 20 20 20 20 20 96 20 20 20 20 20 20 B7 B7 | . ..|
00001580: 20 20 20 20 20 20 20 20 B7 B7 B7 05 22 00 BC 1D | ...."...|
00001590: 0D 02 99 22 53 50 45 43 49 46 49 45 44 20 4C 49 |..."SPECIFIED LI|
000015A0: 4E 45 20 4E 55 4D 42 45 52 2E 20 20 57 48 45 4E |NE NUMBER. WHEN|
000015B0: 20 49 20 52 45 43 45 49 56 45 11 22 00 F8 1D 12 | I RECEIVE."....|
000015C0: 02 99 22 54 48 45 20 52 45 54 55 52 4E 20 43 4F |.."THE RETURN CO|
000015D0: 4D 4D 41 4E 44 2C 20 49 20 57 49 4C 4C 20 52 45 |MMAND, I WILL RE|
000015E0: 54 55 52 4E 20 54 4F 20 54 48 45 20 20 96 20 20 |TURN TO THE . |
000015F0: B7 B7 B7 B7 B7 B7 05 22 00 1C 1E 17 02 99 22 53 |......."......"S|
00001600: 54 41 54 45 4D 45 4E 54 20 41 46 54 45 52 20 47 |TATEMENT AFTER G|
00001610: 4F 53 55 42 2E 22 3A 8D 36 30 30 30 00 4C 1E 19 |OSUB.":.6000.L..|
00001620: 02 99 22 11 9E 11 11 47 4F 53 55 42 20 20 20 20 |.."....GOSUB |
00001630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001640: 20 20 20 20 20 52 45 54 55 52 4E 22 00 65 1E 1C | RETURN".e..|
00001650: 02 81 58 4D B2 37 32 A4 32 33 37 A9 33 3A 8D 36 |..XM.72.237.3:.6|
00001660: 30 30 30 3A 82 00 7F 1E 26 02 81 58 4D B2 32 33 |000:....&..XM.23|
00001670: 37 A4 37 32 A9 AB 33 3A 8D 36 30 30 30 3A 82 00 |7.72..3:.6000:..|
00001680: 96 1E 2B 02 8D 34 30 30 30 3A 91 41 89 34 30 30 |..+..4000:.A.400|
00001690: 2C 31 32 30 30 30 00 C5 1E 58 02 97 56 AA 32 31 |,12000...X..V.21|
000016A0: 2C 30 3A 58 4D B2 33 30 3A 59 4D B2 31 37 31 3A |,0:XM.30:YM.171:|
000016B0: 97 56 AA 31 36 2C 33 31 3A 97 42 43 2C 37 3A 97 |.V.16,31:.BC,7:.|
000016C0: 4D 43 2C 31 31 00 F8 1E 5D 02 99 22 93 05 11 54 |MC,11...].."...T|
000016D0: 4F 20 53 49 4D 50 4C 49 46 59 20 50 52 4F 47 52 |O SIMPLIFY PROGR|
000016E0: 41 4D 4D 49 4E 47 2C 20 49 20 48 41 56 45 20 53 |AMMING, I HAVE S|
000016F0: 45 56 45 52 41 4C 11 22 00 28 1F 60 02 99 22 42 |EVERAL.".(.`.."B|
00001700: 55 49 4C 54 20 49 4E 20 4E 55 4D 45 52 49 43 20 |UILT IN NUMERIC |
00001710: 46 55 4E 43 54 49 4F 4E 53 2E 20 46 4F 52 20 45 |FUNCTIONS. FOR E|
00001720: 58 41 4D 50 4C 45 2C 22 00 58 1F 62 02 99 22 4D |XAMPLE,".X.b.."M|
00001730: 59 20 49 4E 54 45 47 45 52 20 46 55 4E 43 54 49 |Y INTEGER FUNCTI|
00001740: 4F 4E 20 49 53 20 55 53 45 44 20 54 4F 20 45 4C |ON IS USED TO EL|
00001750: 49 4D 49 4E 41 54 45 22 00 88 1F 67 02 99 22 46 |IMINATE"...g.."F|
00001760: 52 41 43 54 49 4F 4E 53 2E 20 20 54 48 45 53 45 |RACTIONS. THESE|
00001770: 20 41 52 45 20 4D 4F 52 45 20 4F 46 20 4D 59 20 | ARE MORE OF MY |
00001780: 4E 55 4D 45 52 49 43 22 00 A1 1F 6C 02 99 22 46 |NUMERIC"...l.."F|
00001790: 55 4E 43 54 49 4F 4E 53 2E 11 22 3A 8D 36 30 30 |UNCTIONS..":.600|
000017A0: 30 00 CB 1F 71 02 99 22 20 20 20 20 20 20 20 41 |0...q.." A|
000017B0: 42 53 28 58 29 2D 2D 41 42 53 4F 4C 55 54 45 20 |BS(X)--ABSOLUTE |
000017C0: 56 41 4C 55 45 20 4F 46 20 58 22 00 ED 1F 73 02 |VALUE OF X"...s.|
000017D0: 99 22 20 20 20 20 20 20 20 43 4F 53 28 58 29 2D |." COS(X)-|
000017E0: 2D 43 4F 53 49 4E 45 20 4F 46 20 58 22 00 18 20 |-COSINE OF X".. |
000017F0: 75 02 99 22 20 20 20 20 20 20 20 53 49 4E 28 58 |u.." SIN(X|
00001800: 29 2D 2D 53 49 4E 45 20 4F 46 20 58 20 49 4E 20 |)--SINE OF X IN |
00001810: 52 41 44 49 41 4E 53 22 00 40 20 77 02 99 22 20 |RADIANS".@ w.." |
00001820: 20 20 20 20 20 20 53 51 52 28 58 29 2D 2D 53 51 | SQR(X)--SQ|
00001830: 55 41 52 45 20 52 4F 4F 54 20 4F 46 20 58 11 22 |UARE ROOT OF X."|
00001840: 00 7B 20 7B 02 99 22 9E 45 58 41 4D 50 4C 45 20 |.{ {..".EXAMPLE |
00001850: 23 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |#1 |
00001860: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001870: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 93 20 80 02 |..........".. ..|
00001880: 99 22 31 30 20 58 3D 34 2E 39 35 3A 59 3D 38 2E |."10 X=4.95:Y=8.|
00001890: 32 36 22 00 C6 20 85 02 99 22 32 30 20 3F 20 49 |26".. ..."20 ? I|
000018A0: 4E 54 28 58 29 3B 49 4E 54 28 59 29 3A 52 45 4D |NT(X);INT(Y):REM|
000018B0: 20 49 4E 54 45 47 45 52 22 3A 99 22 52 55 4E 22 | INTEGER":."RUN"|
000018C0: 3A 8D 34 30 31 30 00 EB 20 8F 02 43 55 B2 31 3A |:.4010.. ..CU.1:|
000018D0: 43 58 B2 33 3A 43 59 B2 32 30 3A 8D 39 32 3A 91 |CX.3:CY.20:.92:.|
000018E0: 41 89 35 30 30 2C 31 32 30 30 30 00 05 21 94 02 |A.500,12000..!..|
000018F0: 8B 41 24 B3 B1 C7 28 31 33 29 A7 8D 34 30 32 30 |.A$...(13)..4020|
00001900: 3A 89 36 35 35 00 36 21 99 02 52 4F B2 32 31 3A |:.655.6!..RO.21:|
00001910: 8D 37 30 30 30 3A 99 22 9E 91 91 20 34 20 20 38 |.7000:."... 4 8|
00001920: 22 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |":." |
00001930: 20 20 20 20 20 22 00 88 21 9A 02 99 22 52 45 41 | "..!..."REA|
00001940: 44 59 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 |DY. |
00001950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001960: 20 20 20 20 20 05 20 20 20 20 50 52 45 53 53 20 | . PRESS |
00001970: 53 50 41 43 45 20 54 4F 20 56 49 45 57 20 4E 45 |SPACE TO VIEW NE|
00001980: 58 54 20 45 58 41 22 3B 00 9D 21 9E 02 99 22 4D |XT EXA";..!..."M|
00001990: 50 4C 45 91 91 91 22 3A 8D 34 30 31 37 00 E1 21 |PLE...":.4017..!|
000019A0: A3 02 8F 20 50 52 49 4E 54 22 20 05 20 20 20 50 |... PRINT" . P|
000019B0: 52 45 53 53 20 53 50 41 43 45 20 54 4F 20 56 49 |RESS SPACE TO VI|
000019C0: 45 57 20 4E 45 58 54 20 45 58 41 4D 50 4C 45 20 |EW NEXT EXAMPLE |
000019D0: 91 91 91 20 20 22 3B 3A 47 4F 53 55 42 34 30 31 |... ";:GOSUB401|
000019E0: 37 00 06 22 A8 02 99 22 13 11 11 11 11 11 9E 11 |7.."..."........|
000019F0: 11 11 11 11 11 11 11 11 11 11 45 58 41 4D 50 4C |..........EXAMPL|
00001A00: 45 20 23 32 11 22 00 20 22 AD 02 99 22 31 30 20 |E #2.". "..."10 |
00001A10: 58 3D 39 20 20 20 20 20 20 20 20 20 20 20 20 22 |X=9 "|
00001A20: 00 4B 22 AF 02 99 22 32 30 20 3F 20 53 51 52 28 |.K"..."20 ? SQR(|
00001A30: 58 29 3B 53 51 52 28 31 36 29 20 20 20 20 20 20 |X);SQR(16) |
00001A40: 20 20 20 20 20 20 20 20 20 20 22 00 68 22 B1 02 | ".h"..|
00001A50: 99 22 52 55 4E 22 3A 99 22 20 20 20 20 20 20 20 |."RUN":." |
00001A60: 20 22 3A 8D 34 30 31 30 00 8D 22 B5 02 43 55 B2 | ":.4010.."..CU.|
00001A70: 31 3A 43 58 B2 33 3A 43 59 B2 32 30 3A 8D 39 32 |1:CX.3:CY.20:.92|
00001A80: 3A 91 41 89 35 30 30 2C 31 32 30 30 30 00 A7 22 |:.A.500,12000.."|
00001A90: B8 02 8B 41 24 B3 B1 C7 28 31 33 29 A7 8D 34 30 |...A$...(13)..40|
00001AA0: 32 30 3A 89 36 39 33 00 DC 22 B9 02 52 4F B2 32 |20:.693.."..RO.2|
00001AB0: 31 3A 8D 37 30 30 30 3A 99 22 9E 91 91 20 33 20 |1:.7000:."... 3 |
00001AC0: 20 34 22 3A 99 22 20 20 20 20 20 20 20 20 20 20 | 4":." |
00001AD0: 20 20 20 20 20 20 20 20 20 20 20 22 00 00 23 BA | "..#.|
00001AE0: 02 99 22 52 45 41 44 59 2E 91 91 91 22 3A 8D 34 |.."READY....":.4|
00001AF0: 30 35 35 3A 91 41 89 35 30 30 2C 31 32 30 30 30 |055:.A.500,12000|
00001B00: 00 2F 23 BC 02 97 56 AA 32 31 2C 30 3A 58 4D B2 |./#...V.21,0:XM.|
00001B10: 33 30 3A 59 4D B2 31 37 31 3A 97 56 AA 31 36 2C |30:YM.171:.V.16,|
00001B20: 33 31 3A 97 42 43 2C 35 3A 97 4D 43 2C 31 31 00 |31:.BC,5:.MC,11.|
00001B30: 62 23 C1 02 99 22 93 05 11 20 52 4E 44 28 31 29 |b#..."... RND(1)|
00001B40: 20 49 53 20 41 20 4E 55 4D 45 52 49 43 20 46 55 | IS A NUMERIC FU|
00001B50: 4E 43 54 49 4F 4E 20 54 48 41 54 20 57 49 4C 4C |NCTION THAT WILL|
00001B60: 11 22 00 92 23 C3 02 99 22 20 47 45 4E 45 52 41 |."..#..." GENERA|
00001B70: 54 45 20 41 20 52 41 4E 44 4F 4D 20 4E 55 4D 42 |TE A RANDOM NUMB|
00001B80: 45 52 20 42 45 54 57 45 45 4E 20 30 20 26 20 31 |ER BETWEEN 0 & 1|
00001B90: 2E 22 00 BE 23 C5 02 99 22 20 20 20 54 4F 20 47 |."..#..." TO G|
00001BA0: 45 54 20 41 20 52 41 4E 44 4F 4D 20 4E 55 4D 42 |ET A RANDOM NUMB|
00001BB0: 45 52 20 42 45 54 57 45 45 4E 20 32 11 22 00 E7 |ER BETWEEN 2."..|
00001BC0: 23 C7 02 99 22 20 20 20 20 20 4E 55 4D 42 45 52 |#..." NUMBER|
00001BD0: 53 2C 20 55 53 45 20 54 48 49 53 20 46 4F 52 4D |S, USE THIS FORM|
00001BE0: 55 4C 41 3A 11 11 22 00 19 24 C9 02 99 22 20 20 |ULA:.."..$..." |
00001BF0: 20 20 4E 3D 49 4E 54 28 52 4E 44 28 31 29 2A 28 | N=INT(RND(1)*(|
00001C00: 48 49 47 48 2D 4C 4F 57 2B 31 29 2B 28 4C 4F 57 |HIGH-LOW+1)+(LOW|
00001C10: 29 29 22 3A 8D 36 30 30 30 00 55 24 CB 02 99 22 |))":.6000.U$..."|
00001C20: 11 9E 45 58 41 4D 50 4C 45 20 23 31 20 20 20 20 |..EXAMPLE #1 |
00001C30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001C40: 20 20 20 20 20 20 20 20 20 20 B7 B7 B7 B7 B7 B7 | ......|
00001C50: B7 B7 B7 B7 22 00 6C 24 CE 02 99 22 31 30 20 46 |....".l$..."10 F|
00001C60: 4F 52 20 58 3D 30 20 54 4F 20 32 22 00 84 24 D1 |OR X=0 TO 2"..$.|
00001C70: 02 99 22 32 30 20 3F 20 52 4E 44 28 31 29 3A 4E |.."20 ? RND(1):N|
00001C80: 45 58 54 22 00 95 24 D5 02 99 22 52 55 4E 22 3A |EXT"..$..."RUN":|
00001C90: 8D 34 30 31 30 00 BA 24 DD 02 43 55 B2 31 3A 43 |.4010..$..CU.1:C|
00001CA0: 58 B2 33 3A 43 59 B2 31 36 3A 8D 39 32 3A 91 41 |X.3:CY.16:.92:.A|
00001CB0: 89 36 30 30 2C 31 32 30 30 30 00 D4 24 E4 02 8B |.600,12000..$...|
00001CC0: 41 24 B3 B1 C7 28 31 33 29 A7 8D 34 30 32 30 3A |A$...(13)..4020:|
00001CD0: 89 37 33 33 00 F0 24 E9 02 52 4F B2 31 37 3A 8D |.733..$..RO.17:.|
00001CE0: 37 30 30 30 3A 99 22 91 9E 91 91 91 91 91 91 22 |7000:."........"|
00001CF0: 00 03 25 EE 02 81 58 B2 30 A4 32 3A 99 BB 28 31 |..%...X.0.2:..(1|
00001D00: 29 3A 82 00 25 25 F3 02 99 22 11 52 45 41 44 59 |):..%%...".READY|
00001D10: 2E 22 3A 8D 34 30 35 31 3A 91 41 89 36 30 30 2C |.":.4051:.A.600,|
00001D20: 31 32 30 30 30 00 66 25 F8 02 99 22 93 22 3A 99 |12000.f%...".":.|
00001D30: 22 91 9E 45 58 41 4D 50 4C 45 20 23 32 20 20 20 |"..EXAMPLE #2 |
00001D40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001D50: 20 20 20 20 20 20 20 20 20 20 20 B7 B7 B7 B7 B7 | .....|
00001D60: B7 B7 B7 B7 B7 22 00 8B 25 F9 02 99 22 31 30 20 |....."..%..."10 |
00001D70: 52 45 4D 20 54 52 59 20 59 4F 55 52 20 4C 55 43 |REM TRY YOUR LUC|
00001D80: 4B 20 41 54 20 43 52 41 50 53 22 00 BB 25 FA 02 |K AT CRAPS"..%..|
00001D90: 99 22 32 30 20 3F 43 48 52 24 28 31 34 37 29 3A |."20 ?CHR$(147):|
00001DA0: 54 3D 31 3A 44 4E 3D 30 3A 52 45 4D 20 54 3D 23 |T=1:DN=0:REM T=#|
00001DB0: 20 4F 46 20 54 4F 53 53 45 53 22 00 EB 25 FB 02 | OF TOSSES"..%..|
00001DC0: 99 22 91 33 30 20 44 31 3D 49 4E 54 28 52 4E 44 |.".30 D1=INT(RND|
00001DD0: 28 31 29 2A 36 29 2B 31 3A 52 45 4D 20 44 31 3D |(1)*6)+1:REM D1=|
00001DE0: 46 49 52 53 54 20 44 49 43 45 22 00 1B 26 FC 02 |FIRST DICE"..&..|
00001DF0: 99 22 34 30 20 44 32 3D 49 4E 54 28 52 4E 44 28 |."40 D2=INT(RND(|
00001E00: 31 29 2A 36 29 2B 31 3A 52 45 4D 20 44 32 20 49 |1)*6)+1:REM D2 I|
00001E10: 53 20 32 4E 44 20 44 49 43 45 22 00 47 26 FD 02 |S 2ND DICE".G&..|
00001E20: 99 22 91 35 30 20 44 54 3D 44 31 2B 44 32 3A 52 |.".50 DT=D1+D2:R|
00001E30: 45 4D 20 44 54 20 49 53 20 54 4F 54 41 4C 20 4F |EM DT IS TOTAL O|
00001E40: 46 20 44 49 43 45 22 00 8A 26 02 03 99 22 36 30 |F DICE"..&..."60|
00001E50: A0 3F 22 3B C7 28 33 34 29 3B 22 44 31 3D 20 22 |.?";.(34);"D1= "|
00001E60: 3B C7 28 33 34 29 3B 22 3B 44 31 2C 20 22 3B C7 |;.(34);";D1, ";.|
00001E70: 28 33 34 29 3B 22 44 32 3D 20 22 3B C7 28 33 34 |(34);"D2= ";.(34|
00001E80: 29 3B 22 3B 44 32 2C 20 22 3B 00 A8 26 04 03 99 |);";D2, ";..&...|
00001E90: C7 28 33 34 29 3B 22 44 54 3D 20 22 3B C7 28 33 |.(34);"DT= ";.(3|
00001EA0: 34 29 3B 22 3B 44 54 22 00 D2 26 06 03 99 22 37 |4);";DT"..&..."7|
00001EB0: 30 20 49 46 20 44 54 3D 37 20 4F 52 20 44 54 3D |0 IF DT=7 OR DT=|
00001EC0: 31 31 20 54 48 45 4E 20 47 4F 20 54 4F 20 31 31 |11 THEN GO TO 11|
00001ED0: 30 22 00 0B 27 08 03 99 22 38 30 20 49 46 20 54 |0"..'..."80 IF T|
00001EE0: 3D 31 20 54 48 45 4E 20 44 4E 3D 44 54 3A 3F 20 |=1 THEN DN=DT:? |
00001EF0: 22 3B C7 28 33 34 29 3B 22 20 20 20 20 20 20 20 |";.(34);" |
00001F00: 20 54 41 52 47 45 54 3D 20 22 3B 00 2A 27 0C 03 | TARGET= ";.*'..|
00001F10: 99 C7 28 33 34 29 3B 22 3B 20 44 4E 3A 54 3D 54 |..(34);"; DN:T=T|
00001F20: 2B 31 3A 47 4F 54 4F 33 30 22 00 75 27 0F 03 99 |+1:GOTO30".u'...|
00001F30: 22 39 30 20 49 46 20 44 54 3D 44 4E 20 54 48 45 |"90 IF DT=DN THE|
00001F40: 4E 20 3F 20 22 3B C7 28 33 34 29 3B 22 4D 41 54 |N ? ";.(34);"MAT|
00001F50: 43 48 2C 20 41 20 57 49 4E 4E 45 52 11 11 11 11 |CH, A WINNER....|
00001F60: 22 3B C7 28 33 34 29 3B 22 3A 47 4F 20 54 4F 20 |";.(34);":GO TO |
00001F70: 31 33 30 22 3B 00 8B 27 11 03 99 22 3A 52 45 4D |130";..'...":REM|
00001F80: 20 44 4E 3D 54 41 52 47 45 54 22 00 B6 27 13 03 | DN=TARGET"..'..|
00001F90: 99 22 31 30 30 20 54 3D 54 2B 31 3A 47 4F 20 54 |."100 T=T+1:GO T|
00001FA0: 4F 20 33 30 3A 52 45 4D 20 41 4E 4F 54 48 45 52 |O 30:REM ANOTHER|
00001FB0: 20 54 4F 53 53 22 00 F5 27 15 03 99 22 31 31 30 | TOSS"..'..."110|
00001FC0: 20 49 46 54 3D 31 54 48 45 4E 20 3F 44 54 3B 22 | IFT=1THEN ?DT;"|
00001FD0: 3B C7 28 33 34 29 3B 22 41 20 57 49 4E 4E 45 52 |;.(34);"A WINNER|
00001FE0: 11 11 11 22 3B C7 28 33 34 29 3B 22 3A 47 4F 54 |...";.(34);":GOT|
00001FF0: 4F 31 33 30 22 00 32 28 16 03 99 22 31 32 30 20 |O130".2(..."120 |
00002000: 49 46 44 54 3C 3E 44 4E 20 54 48 45 4E 3F 44 54 |IFDT<>DN THEN?DT|
00002010: 3A 22 3B C7 28 33 34 29 3B 22 43 52 41 50 53 2C |:";.(34);"CRAPS,|
00002020: 20 41 20 4C 4F 53 45 52 11 11 11 22 3B C7 28 33 | A LOSER...";.(3|
00002030: 34 29 00 63 28 17 03 99 22 91 31 33 30 20 3F 20 |4).c(...".130 ? |
00002040: 22 3B C7 28 33 34 29 3B 22 41 4E 4F 54 48 45 52 |";.(34);"ANOTHER|
00002050: 20 52 4F 4C 4C 3F 20 28 59 2F 4E 29 22 3B C7 28 | ROLL? (Y/N)";.(|
00002060: 33 34 29 00 93 28 18 03 99 22 31 34 30 20 47 45 |34)..(..."140 GE|
00002070: 54 41 24 3A 20 49 46 20 41 24 3D 22 3B C7 28 33 |TA$: IF A$=";.(3|
00002080: 34 29 3B C7 28 33 34 29 3B 22 54 48 45 4E 20 31 |4);.(34);"THEN 1|
00002090: 34 30 22 00 C1 28 19 03 99 22 31 35 30 20 49 46 |40"..(..."150 IF|
000020A0: 20 41 24 3C 3E 22 3B C7 28 33 34 29 3B 22 4E 22 | A$<>";.(34);"N"|
000020B0: 3B C7 28 33 34 29 3B 22 20 54 48 45 4E 20 31 30 |;.(34);" THEN 10|
000020C0: 22 00 DD 28 1A 03 99 22 31 36 30 20 45 4E 44 22 |"..(..."160 END"|
000020D0: 3A 99 22 52 55 4E 22 3A 8D 34 30 31 30 00 02 29 |:."RUN":.4010..)|
000020E0: 1C 03 43 55 B2 31 3A 43 58 B2 33 3A 43 59 B2 32 |..CU.1:CX.3:CY.2|
000020F0: 30 3A 8D 39 32 3A 91 41 89 37 30 30 2C 31 32 30 |0:.92:.A.700,120|
00002100: 30 30 00 1C 29 1E 03 8B 41 24 B3 B1 C7 28 31 33 |00..)...A$...(13|
00002110: 29 A7 8D 34 30 32 30 3A 89 37 39 36 00 26 29 1F |)..4020:.796.&).|
00002120: 03 8D 34 30 37 30 00 55 29 20 03 97 56 AA 32 31 |..4070.U) ..V.21|
00002130: 2C 30 3A 58 4D B2 34 30 3A 59 4D B2 31 37 31 3A |,0:XM.40:YM.171:|
00002140: 97 56 AA 31 36 2C 33 31 3A 97 42 43 2C 39 3A 97 |.V.16,31:.BC,9:.|
00002150: 4D 43 2C 31 31 00 88 29 25 03 99 22 93 9B 11 05 |MC,11..)%.."....|
00002160: 20 20 20 20 20 45 56 45 52 59 20 53 59 4D 42 4F | EVERY SYMBO|
00002170: 4C 20 49 4E 20 4D 59 20 43 48 41 52 41 43 54 45 |L IN MY CHARACTE|
00002180: 52 20 53 45 54 20 11 22 00 B7 29 28 03 99 22 20 |R SET ."..)(.." |
00002190: 43 4F 52 52 45 53 50 4F 4E 44 53 20 54 4F 20 41 |CORRESPONDS TO A|
000021A0: 20 4E 55 4D 42 45 52 2E 20 20 54 48 49 53 20 53 | NUMBER. THIS S|
000021B0: 45 54 20 4F 46 11 22 00 E5 29 2A 03 99 22 20 20 |ET OF."..)*.." |
000021C0: 4E 55 4D 42 45 52 53 2C 20 57 48 49 43 48 20 49 |NUMBERS, WHICH I|
000021D0: 4E 43 4C 55 44 45 53 20 4D 59 20 4B 45 59 42 4F |NCLUDES MY KEYBO|
000021E0: 41 52 44 11 22 00 2D 2A 2D 03 99 22 43 4F 4E 54 |ARD.".-*-.."CONT|
000021F0: 52 4F 4C 53 2C 20 49 53 20 54 48 45 20 41 53 43 |ROLS, IS THE ASC|
00002200: 49 49 20 43 4F 44 45 20 28 41 53 4B 2D 4B 45 59 |II CODE (ASK-KEY|
00002210: 20 32 29 2E 20 20 20 20 20 20 20 20 20 20 20 20 | 2). |
00002220: 20 99 20 20 20 20 B7 B7 B7 B7 B7 05 22 00 73 2A | . ......".s*|
00002230: 32 03 99 22 20 20 54 4F 20 4F 42 54 41 49 4E 20 |2.." TO OBTAIN |
00002240: 54 48 45 20 43 4F 44 45 20 46 4F 52 20 41 4E 59 |THE CODE FOR ANY|
00002250: 20 43 48 41 52 41 43 54 45 52 2C 20 20 20 20 20 | CHARACTER, |
00002260: 20 20 20 20 99 20 20 20 20 20 20 20 20 B7 B7 B7 | . ...|
00002270: B7 05 22 00 B0 2A 36 03 99 22 20 20 20 20 55 53 |.."..*6.." US|
00002280: 45 20 54 48 45 20 41 53 43 28 22 3B C7 28 33 34 |E THE ASC(";.(34|
00002290: 29 3B 22 58 22 3B C7 28 33 34 29 3B 22 29 20 53 |);"X";.(34);") S|
000022A0: 54 52 49 4E 47 20 46 55 4E 43 54 49 4F 4E 2E 22 |TRING FUNCTION."|
000022B0: 00 D4 2A 39 03 99 22 20 20 20 20 99 20 20 20 20 |..*9.." . |
000022C0: 20 20 20 20 B7 B7 B7 B7 B7 B7 B7 B7 05 22 3A 8D | .........":.|
000022D0: 36 30 30 30 00 0C 2B 3E 03 99 22 9E 45 58 41 4D |6000..+>..".EXAM|
000022E0: 50 4C 45 20 20 20 20 20 20 20 20 20 20 20 20 20 |PLE |
000022F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002300: 20 20 20 20 B7 B7 B7 B7 B7 B7 B7 22 00 47 2B 43 | .......".G+C|
00002310: 03 99 22 31 30 20 3F 20 41 53 43 28 22 3B C7 28 |.."10 ? ASC(";.(|
00002320: 33 34 29 3B C7 28 31 34 37 29 3B C7 28 33 34 29 |34);.(147);.(34)|
00002330: 3B 22 29 3A 52 45 4D 20 53 48 49 46 54 2D 43 4C |;"):REM SHIFT-CL|
00002340: 52 2F 48 4F 4D 45 22 00 7B 2B 46 03 99 22 32 30 |R/HOME".{+F.."20|
00002350: 20 3F 20 41 53 43 28 22 3B C7 28 33 34 29 3B C7 | ? ASC(";.(34);.|
00002360: 28 31 39 33 29 3B C7 28 33 34 29 3B 22 29 3A 52 |(193);.(34);"):R|
00002370: 45 4D 20 53 48 49 46 54 2D 41 22 00 B1 2B 4D 03 |EM SHIFT-A"..+M.|
00002380: 99 22 33 30 20 3F 20 41 53 43 28 22 3B C7 28 33 |."30 ? ASC(";.(3|
00002390: 34 29 3B C7 28 36 31 29 3B C7 28 33 34 29 3B 22 |4);.(61);.(34);"|
000023A0: 29 3A 52 45 4D 20 45 51 55 41 4C 20 53 49 47 4E |):REM EQUAL SIGN|
000023B0: 22 00 C2 2B 52 03 99 22 52 55 4E 22 3A 8D 34 30 |"..+R.."RUN":.40|
000023C0: 31 30 00 E7 2B 5A 03 43 55 B2 31 3A 43 58 B2 33 |10..+Z.CU.1:CX.3|
000023D0: 3A 43 59 B2 31 38 3A 8D 39 32 3A 91 41 89 37 30 |:CY.18:.92:.A.70|
000023E0: 30 2C 31 32 30 30 30 00 01 2C 5F 03 8B 41 24 B3 |0,12000..,_..A$.|
000023F0: B1 C7 28 31 33 29 A7 8D 34 30 32 30 3A 89 38 35 |..(13)..4020:.85|
00002400: 38 00 11 2C 61 03 52 4F B2 31 39 3A 8D 37 30 30 |8..,a.RO.19:.700|
00002410: 30 00 35 2C 66 03 99 22 13 11 11 11 11 9E 11 11 |0.5,f.."........|
00002420: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3B C6 |.............";.|
00002430: 28 22 93 22 29 00 5F 2C 6B 03 99 C6 28 22 C1 22 |(".")._,k...("."|
00002440: 29 3A 99 C6 28 22 3D 22 29 3A 99 22 20 20 20 20 |):..("="):." |
00002450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002460: 81 2C 70 03 99 22 52 45 41 44 59 2E 91 22 3A 8D |.,p.."READY..":.|
00002470: 34 30 35 35 3A 91 41 89 37 30 30 2C 31 32 30 30 |4055:.A.700,1200|
00002480: 30 00 B1 2C 84 03 97 56 AA 32 31 2C 30 3A 58 4D |0..,...V.21,0:XM|
00002490: B2 32 35 3A 59 4D B2 31 35 31 3A 97 56 AA 31 36 |.25:YM.151:.V.16|
000024A0: 2C 33 31 3A 97 42 43 2C 31 34 3A 97 4D 43 2C 31 |,31:.BC,14:.MC,1|
000024B0: 31 00 01 2D 89 03 99 22 93 05 11 20 20 20 20 54 |1..-..."... T|
000024C0: 4F 20 4F 42 54 41 49 4E 20 54 48 45 20 43 48 41 |O OBTAIN THE CHA|
000024D0: 52 41 43 54 45 52 20 46 52 4F 4D 20 54 48 45 20 |RACTER FROM THE |
000024E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000024F0: 20 20 20 20 96 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 05 | . ..........|
00002500: 22 00 50 2D 8C 03 99 22 20 20 41 53 43 49 49 20 |".P-..." ASCII |
00002510: 43 4F 44 45 2C 20 55 53 45 20 54 48 45 20 43 48 |CODE, USE THE CH|
00002520: 52 24 28 58 29 20 53 54 52 49 4E 47 20 20 20 20 |R$(X) STRING |
00002530: 20 20 20 20 20 20 20 96 20 20 20 20 20 20 20 20 | . |
00002540: 20 20 20 20 20 20 20 B7 B7 B7 B7 B7 B7 B7 05 22 | ........"|
00002550: 00 7E 2D 8E 03 99 22 20 20 20 46 55 4E 43 54 49 |.~-..." FUNCTI|
00002560: 4F 4E 53 2E 20 20 54 48 45 20 41 53 43 49 49 20 |ONS. THE ASCII |
00002570: 43 4F 44 45 20 4E 55 4D 42 45 52 53 11 22 00 CC |CODE NUMBERS."..|
00002580: 2D 93 03 99 22 20 20 20 20 20 20 20 20 20 20 20 |-..." |
00002590: 41 52 45 20 30 20 54 48 52 4F 55 47 48 20 32 35 |ARE 0 THROUGH 25|
000025A0: 35 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |5. |
000025B0: 96 20 20 20 20 20 20 20 20 20 20 20 20 B7 20 20 |. . |
000025C0: 20 20 20 20 20 20 20 B7 B7 B7 11 22 00 0E 2E 98 | ...."....|
000025D0: 03 8D 36 30 30 30 3A 99 22 11 9E 45 58 41 4D 50 |..6000:."..EXAMP|
000025E0: 4C 45 20 23 31 20 20 20 20 20 20 20 20 20 20 20 |LE #1 |
000025F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002600: 20 20 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 30 | ..........".0|
00002610: 2E 9D 03 99 22 31 30 20 3F 20 43 48 52 24 28 31 |...."10 ? CHR$(1|
00002620: 39 33 29 3A 52 45 4D 20 53 48 49 46 54 2D 41 22 |93):REM SHIFT-A"|
00002630: 00 54 2E A2 03 99 22 32 30 20 3F 20 43 48 52 24 |.T...."20 ? CHR$|
00002640: 28 36 31 29 3A 52 45 4D 20 45 51 55 41 4C 20 53 |(61):REM EQUAL S|
00002650: 49 47 4E 22 00 75 2E A7 03 99 22 33 30 20 3F 20 |IGN".u...."30 ? |
00002660: 43 48 52 24 28 31 39 31 29 3A 52 45 4D 20 43 4F |CHR$(191):REM CO|
00002670: 4D 4D 2D 42 22 00 86 2E AC 03 99 22 52 55 4E 22 |MM-B"......"RUN"|
00002680: 3A 8D 34 30 31 30 00 B0 2E B4 03 53 4C B2 30 3A |:.4010.....SL.0:|
00002690: 43 55 B2 31 3A 43 58 B2 33 3A 43 59 B2 31 36 3A |CU.1:CX.3:CY.16:|
000026A0: 8D 39 32 3A 91 41 89 38 30 30 2C 31 32 30 30 30 |.92:.A.800,12000|
000026B0: 00 CA 2E BB 03 8B 41 24 B3 B1 C7 28 31 33 29 A7 |......A$...(13).|
000026C0: 8D 34 30 32 30 3A 89 39 34 38 00 09 2F C0 03 52 |.4020:.948../..R|
000026D0: 4F B2 43 59 AA 31 3A 8D 37 30 30 30 3A 99 22 13 |O.CY.1:.7000:.".|
000026E0: 11 11 11 9E 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000026F0: 11 22 3A 99 C7 28 31 39 33 29 3A 99 C7 28 36 31 |.":..(193):..(61|
00002700: 29 3A 99 C7 28 31 39 31 29 00 2B 2F C5 03 99 22 |):..(191).+/..."|
00002710: 11 52 45 41 44 59 2E 22 3A 8D 34 30 31 34 3A 91 |.READY.":.4014:.|
00002720: 41 89 38 30 30 2C 31 32 30 30 30 00 60 2F E8 03 |A.800,12000.`/..|
00002730: 97 56 AA 32 31 2C 30 3A 58 4D B2 33 30 3A 59 4D |.V.21,0:XM.30:YM|
00002740: B2 31 34 31 3A 53 4C B2 34 3A 97 56 AA 31 36 2C |.141:SL.4:.V.16,|
00002750: 33 31 3A 97 42 43 2C 31 30 3A 97 4D 43 2C 31 31 |31:.BC,10:.MC,11|
00002760: 00 92 2F ED 03 99 22 93 9B 20 49 4E 20 41 20 50 |../...".. IN A P|
00002770: 52 49 4E 54 20 53 54 41 54 45 4D 45 4E 54 2C 20 |RINT STATEMENT, |
00002780: 54 48 45 20 43 48 52 24 20 46 55 4E 43 54 49 4F |THE CHR$ FUNCTIO|
00002790: 4E 22 00 C2 2F F2 03 99 22 20 4F 46 20 41 20 43 |N"../..." OF A C|
000027A0: 4F 4E 54 52 4F 4C 20 4B 45 59 20 57 49 4C 4C 20 |ONTROL KEY WILL |
000027B0: 50 45 52 46 4F 52 4D 20 54 48 45 20 53 41 4D 45 |PERFORM THE SAME|
000027C0: 11 22 00 EF 2F F7 03 99 22 20 41 53 20 54 48 45 |."../..." AS THE|
000027D0: 20 43 4F 4E 54 52 4F 4C 20 4B 45 59 20 49 4E 20 | CONTROL KEY IN |
000027E0: 44 49 52 45 43 54 20 4D 4F 44 45 2E 11 11 22 00 |DIRECT MODE...".|
000027F0: 1A 30 FC 03 99 22 9E 31 30 20 3F 20 43 48 52 24 |.0...".10 ? CHR$|
00002800: 28 31 34 37 29 3B 3A 52 45 4D 20 53 48 49 46 54 |(147);:REM SHIFT|
00002810: 2D 43 4C 52 2F 48 4F 4D 45 22 00 31 30 01 04 99 |-CLR/HOME".10...|
00002820: 22 32 30 20 46 4F 52 20 58 3D 30 20 54 4F 20 32 |"20 FOR X=0 TO 2|
00002830: 22 00 5F 30 06 04 99 22 33 30 20 3F 43 48 52 53 |"._0..."30 ?CHRS|
00002840: 28 35 29 3B 3A 47 4F 53 55 42 31 31 30 3A 52 45 |(5);:GOSUB110:RE|
00002850: 4D 20 43 54 52 4C 2D 32 20 57 48 49 54 45 22 00 |M CTRL-2 WHITE".|
00002860: 8C 30 0B 04 99 22 34 30 20 3F 43 48 52 53 28 32 |.0..."40 ?CHRS(2|
00002870: 38 29 3B 3A 47 4F 53 55 42 31 31 30 3A 52 45 4D |8);:GOSUB110:REM|
00002880: 20 43 54 52 4C 2D 33 20 52 45 44 22 00 BB 30 10 | CTRL-3 RED"..0.|
00002890: 04 99 22 35 30 20 3F 43 48 52 53 28 31 35 39 29 |.."50 ?CHRS(159)|
000028A0: 3B 3A 47 4F 53 55 42 31 31 30 3A 52 45 4D 20 43 |;:GOSUB110:REM C|
000028B0: 54 52 4C 2D 34 20 43 59 41 4E 22 00 EB 30 15 04 |TRL-4 CYAN"..0..|
000028C0: 99 22 36 30 3F 43 48 52 53 28 31 35 36 29 3B 3A |."60?CHRS(156);:|
000028D0: 47 4F 53 55 42 31 31 30 3A 52 45 4D 20 43 54 52 |GOSUB110:REM CTR|
000028E0: 4C 2D 35 20 50 55 52 50 4C 45 22 00 1B 31 1A 04 |L-5 PURPLE"..1..|
000028F0: 99 22 91 37 30 20 3F 43 48 52 53 28 33 30 29 3B |.".70 ?CHRS(30);|
00002900: 3A 47 4F 53 55 42 31 31 30 3A 52 45 4D 20 43 54 |:GOSUB110:REM CT|
00002910: 52 4C 2D 36 20 47 52 45 45 4E 22 00 49 31 1F 04 |RL-6 GREEN".I1..|
00002920: 99 22 38 30 20 3F 43 48 52 53 28 33 31 29 3B 3A |."80 ?CHRS(31);:|
00002930: 47 4F 53 55 42 31 31 30 3A 52 45 4D 20 43 54 52 |GOSUB110:REM CTR|
00002940: 4C 2D 37 20 42 4C 55 45 22 00 79 31 24 04 99 22 |L-7 BLUE".y1$.."|
00002950: 39 30 3F 43 48 52 53 28 31 35 38 29 3B 3A 47 4F |90?CHRS(158);:GO|
00002960: 53 55 42 31 31 30 3A 52 45 4D 20 43 54 52 4C 2D |SUB110:REM CTRL-|
00002970: 38 20 59 45 4C 4C 4F 57 22 00 90 31 29 04 99 22 |8 YELLOW"..1).."|
00002980: 91 31 30 30 20 4E 45 58 54 20 58 3A 45 4E 44 22 |.100 NEXT X:END"|
00002990: 00 DF 31 2E 04 99 22 31 31 30 20 3F 22 3B C7 28 |..1..."110 ?";.(|
000029A0: 33 34 29 3B 22 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 |34);"...........|
000029B0: D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 |................|
000029C0: D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 22 3B C7 |.............";.|
000029D0: 28 33 34 29 3B 22 3B 3A 52 45 54 55 52 4E 22 00 |(34);";:RETURN".|
000029E0: F0 31 33 04 99 22 52 55 4E 22 3A 8D 34 30 31 30 |.13.."RUN":.4010|
000029F0: 00 15 32 38 04 43 55 B2 31 3A 43 58 B2 33 3A 43 |..28.CU.1:CX.3:C|
00002A00: 59 B2 31 39 3A 8D 39 32 3A 91 41 89 39 30 30 2C |Y.19:.92:.A.900,|
00002A10: 31 32 30 30 30 00 30 32 3B 04 8B 41 24 B3 B1 C7 |12000.02;..A$...|
00002A20: 28 31 33 29 A7 8D 34 30 32 30 3A 89 31 30 38 30 |(13)..4020:.1080|
00002A30: 00 3A 32 3C 04 8D 36 30 30 30 00 70 32 3D 04 52 |.:2<..6000.p2=.R|
00002A40: 4F B2 30 3A 8D 37 30 30 30 3A 53 4C B2 30 3A 97 |O.0:.7000:SL.0:.|
00002A50: 56 AA 32 31 2C 30 3A 99 C7 28 31 34 37 29 3B 3A |V.21,0:..(147);:|
00002A60: 97 56 AA 32 31 2C 30 3A 97 56 AA 33 33 2C 31 31 |.V.21,0:.V.33,11|
00002A70: 00 7B 32 3E 04 81 58 B2 30 A4 32 00 A9 32 3F 04 |.{2>..X.0.2..2?.|
00002A80: 99 C7 28 35 29 3B 3A 8D 31 30 39 39 3A 99 C7 28 |..(5);:.1099:..(|
00002A90: 32 38 29 3B 3A 8D 31 30 39 39 3A 99 C7 28 31 35 |28);:.1099:..(15|
00002AA0: 39 29 3B 3A 8D 31 30 39 39 00 D8 32 41 04 99 C7 |9);:.1099..2A...|
00002AB0: 28 31 35 36 29 3B 3A 8D 31 30 39 39 3A 99 C7 28 |(156);:.1099:..(|
00002AC0: 33 30 29 3B 3A 8D 31 30 39 39 3A 99 C7 28 33 31 |30);:.1099:..(31|
00002AD0: 29 3B 3A 8D 31 30 39 39 00 ED 32 43 04 99 C7 28 |);:.1099..2C...(|
00002AE0: 31 35 38 29 3B 3A 8D 31 30 39 39 3A 82 00 10 33 |158);:.1099:...3|
00002AF0: 45 04 99 22 11 52 45 41 44 59 2E 22 3A 8D 34 30 |E..".READY.":.40|
00002B00: 30 30 3A 91 41 89 31 30 30 30 2C 31 32 30 30 30 |00:.A.1000,12000|
00002B10: 00 1A 33 4A 04 89 31 31 30 30 00 4D 33 4B 04 99 |..3J..1100.M3K..|
00002B20: 22 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 |"...............|
00002B30: D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 D3 |................|
00002B40: D3 D3 D3 D3 D3 D3 D3 D3 D3 22 3B 3A 8E 00 7C 33 |.........";:..|3|
00002B50: 4C 04 97 56 AA 32 31 2C 30 3A 58 4D B2 36 30 3A |L..V.21,0:XM.60:|
00002B60: 59 4D B2 31 37 31 3A 97 56 AA 31 36 2C 33 31 3A |YM.171:.V.16,31:|
00002B70: 97 42 43 2C 35 3A 97 4D 43 2C 31 31 00 AF 33 51 |.BC,5:.MC,11..3Q|
00002B80: 04 99 22 93 9B 05 4D 59 20 4D 45 4D 4F 52 59 20 |.."...MY MEMORY |
00002B90: 49 53 20 44 49 56 49 44 45 44 20 49 4E 54 4F 20 |IS DIVIDED INTO |
00002BA0: 36 35 2C 35 33 36 20 42 4C 4F 43 4B 53 2E 22 00 |65,536 BLOCKS.".|
00002BB0: DF 33 54 04 99 22 20 20 45 41 43 48 20 42 4C 4F |.3T.." EACH BLO|
00002BC0: 43 4B 20 48 41 53 20 41 20 53 50 45 43 49 46 49 |CK HAS A SPECIFI|
00002BD0: 43 20 4C 4F 43 41 54 49 4F 4E 20 4F 52 11 22 00 |C LOCATION OR.".|
00002BE0: 21 34 56 04 99 22 20 20 41 44 44 52 45 53 53 2E |!4V.." ADDRESS.|
00002BF0: 20 20 50 45 45 4B 20 49 53 20 41 20 4E 55 4D 45 | PEEK IS A NUME|
00002C00: 52 49 43 20 46 55 4E 43 54 49 4F 4E 20 99 20 20 |RIC FUNCTION . |
00002C10: 20 B7 B7 B7 B7 B7 B7 B7 20 20 20 B7 B7 B7 B7 05 | ....... .....|
00002C20: 22 00 60 34 5B 04 99 22 20 20 20 54 4F 20 50 45 |".`4[.." TO PE|
00002C30: 45 4B 2C 20 4F 52 20 4C 4F 4F 4B 2C 20 41 54 20 |EK, OR LOOK, AT |
00002C40: 44 41 54 41 20 43 4F 4E 54 41 49 4E 45 44 20 99 |DATA CONTAINED .|
00002C50: 20 20 20 20 20 20 20 B7 B7 B7 B7 20 05 20 20 22 | .... . "|
00002C60: 00 87 34 60 04 99 22 20 20 20 20 20 20 20 20 20 |..4`.." |
00002C70: 49 4E 20 41 20 53 50 45 43 49 46 49 43 20 41 44 |IN A SPECIFIC AD|
00002C80: 44 52 45 53 53 2E 22 00 99 34 88 04 99 22 13 11 |DRESS."..4..."..|
00002C90: 11 11 11 11 11 11 11 11 22 00 C2 34 8A 04 99 22 |........"..4..."|
00002CA0: 20 20 20 20 20 30 20 20 20 31 20 20 20 32 20 20 | 0 1 2 |
00002CB0: 20 33 20 20 20 34 20 20 20 35 20 20 20 36 20 20 | 3 4 5 6 |
00002CC0: 20 37 00 EF 34 8D 04 99 22 81 20 20 20 B0 C0 C0 | 7..4...". ...|
00002CD0: C0 B2 C0 C0 C0 B2 C0 C0 C0 B2 C0 C0 C0 B2 C0 C0 |................|
00002CE0: C0 B2 C0 C0 C0 B2 C0 C0 C0 B2 C0 C0 C0 AE 22 00 |..............".|
00002CF0: 2B 35 90 04 99 22 20 20 20 DD A0 05 34 37 81 DD |+5..." ...47..|
00002D00: A0 05 35 35 81 DD A0 05 30 81 A0 DD 05 31 37 30 |..55....0....170|
00002D10: 81 DD 05 31 37 37 81 DD 05 31 34 35 81 DD 05 31 |...177...145...1|
00002D20: 37 39 81 DD 05 A0 33 34 81 DD 22 00 58 35 92 04 |79....34..".X5..|
00002D30: 99 22 81 20 20 20 AB C0 C0 C0 DB C0 C0 C0 DB C0 |.". ..........|
00002D40: C0 C0 DB C0 C0 C0 DB C0 C0 C0 DB C0 C0 C0 DB C0 |................|
00002D50: C0 C0 DB C0 C0 C0 B3 22 00 94 35 95 04 99 22 20 |......."..5..." |
00002D60: 20 20 DD 05 A0 30 81 A0 DD 05 A0 30 81 A0 DD 05 | ...0.....0....|
00002D70: A0 30 81 A0 DD A0 05 37 36 81 DD 05 A0 30 81 A0 |.0.....76....0..|
00002D80: DD 05 A0 30 81 A0 DD 05 A0 30 81 A0 DD 05 A0 34 |...0.....0.....4|
00002D90: 81 A0 DD 22 00 C1 35 97 04 99 22 81 20 20 20 AD |..."..5...". .|
00002DA0: C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 C0 B1 |................|
00002DB0: C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 C0 BD |................|
00002DC0: 22 00 ED 35 99 04 99 22 05 20 20 20 20 20 38 20 |"..5...". 8 |
00002DD0: 20 20 39 20 20 20 31 30 20 20 31 31 20 20 31 32 | 9 10 11 12|
00002DE0: 20 20 31 33 20 20 31 34 20 20 31 35 11 00 F7 35 | 13 14 15...5|
00002DF0: 9C 04 8D 36 30 30 30 00 2B 36 9E 04 99 22 9E 31 |...6000.+6...".1|
00002E00: 30 20 3F 20 22 3B C7 28 33 34 29 3B 22 50 45 45 |0 ? ";.(34);"PEE|
00002E10: 4B 28 30 29 3D 22 3B C7 28 33 34 29 3B 22 3B 3A |K(0)=";.(34);";:|
00002E20: 3F 20 50 45 45 4B 28 30 29 2C 22 00 5F 36 A0 04 |? PEEK(0),"._6..|
00002E30: 99 22 32 30 20 3F 20 22 3B C7 28 33 34 29 3B 22 |."20 ? ";.(34);"|
00002E40: 50 45 45 4B 28 31 35 29 3D 22 3B C7 28 33 34 29 |PEEK(15)=";.(34)|
00002E50: 3B 22 3B 3A 3F 20 50 45 45 4B 28 31 35 29 22 00 |;";:? PEEK(15)".|
00002E60: 70 36 A2 04 99 22 52 55 4E 22 3A 8D 34 30 31 30 |p6..."RUN":.4010|
00002E70: 00 96 36 A5 04 43 55 B2 31 3A 43 58 B2 33 3A 43 |..6..CU.1:CX.3:C|
00002E80: 59 B2 32 30 3A 8D 39 32 3A 91 41 89 31 30 30 30 |Y.20:.92:.A.1000|
00002E90: 2C 31 32 30 30 30 00 B1 36 A7 04 8B 41 24 B3 B1 |,12000..6...A$..|
00002EA0: C7 28 31 33 29 A7 8D 34 30 32 30 3A 89 31 31 38 |.(13)..4020:.118|
00002EB0: 39 00 C3 36 A8 04 52 4F B2 43 59 AA 31 3A 8D 37 |9..6..RO.CY.1:.7|
00002EC0: 30 30 30 00 EE 36 AA 04 99 22 13 11 11 11 9E 11 |000..6..."......|
00002ED0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00002EE0: 11 50 45 45 4B 28 30 29 3D 20 34 37 22 2C 00 01 |.PEEK(0)= 47",..|
00002EF0: 37 AC 04 99 22 50 45 45 4B 28 31 35 29 3D 20 34 |7..."PEEK(15)= 4|
00002F00: 22 00 2A 37 AE 04 99 22 11 52 45 41 44 59 2E 20 |".*7...".READY. |
00002F10: 20 20 20 91 91 22 3A 8D 34 30 35 35 3A 91 41 89 | ..":.4055:.A.|
00002F20: 31 30 30 30 2C 31 32 30 30 30 00 5A 37 B0 04 97 |1000,12000.Z7...|
00002F30: 56 AA 32 31 2C 30 3A 58 4D B2 33 35 3A 59 4D B2 |V.21,0:XM.35:YM.|
00002F40: 31 37 31 3A 97 56 AA 31 36 2C 33 31 3A 97 42 43 |171:.V.16,31:.BC|
00002F50: 2C 31 34 3A 97 4D 43 2C 31 31 00 79 37 B5 04 99 |,14:.MC,11.y7...|
00002F60: 22 93 11 1E 22 3B A3 31 34 29 3B 22 2A 2A 2A 2A |"...";.14);"****|
00002F70: 2A 2A 2A 2A 2A 2A 2A 2A 22 00 94 37 BA 04 99 A3 |********"..7....|
00002F80: 31 34 29 3B 22 2A 20 05 20 20 50 4F 4B 45 20 1E |14);"* . POKE .|
00002F90: 20 20 2A 22 00 AE 37 BF 04 99 A3 31 34 29 3B 22 | *"..7....14);"|
00002FA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 11 22 00 F6 |************."..|
00002FB0: 37 C4 04 99 22 05 20 20 50 4F 4B 45 20 49 53 20 |7...". POKE IS |
00002FC0: 55 53 45 44 20 54 4F 20 50 55 54 20 41 20 4E 55 |USED TO PUT A NU|
00002FD0: 4D 42 45 52 20 49 4E 54 4F 20 41 20 1E 20 20 20 |MBER INTO A . |
00002FE0: 20 B7 B7 B7 B7 20 20 20 20 20 20 20 20 20 20 20 | .... |
00002FF0: 20 B7 B7 B7 05 22 00 24 38 C9 04 99 22 20 20 53 | ....".$8..." S|
00003000: 50 45 43 49 46 49 45 44 20 41 44 44 52 45 53 53 |PECIFIED ADDRESS|
00003010: 2E 20 20 46 4F 52 20 45 58 41 4D 50 4C 45 2C 20 |. FOR EXAMPLE, |
00003020: 49 46 11 22 00 6D 38 CE 04 99 22 20 20 41 44 44 |IF.".m8..." ADD|
00003030: 52 45 53 53 20 36 35 30 20 49 53 20 50 4F 4B 45 |RESS 650 IS POKE|
00003040: 44 20 57 49 54 48 20 32 30 30 2C 20 54 48 45 4E |D WITH 200, THEN|
00003050: 20 20 20 20 1E 20 20 20 20 20 20 20 20 20 20 20 | . |
00003060: 20 20 20 20 20 B7 B7 B7 B7 B7 05 20 22 00 B4 38 | ...... "..8|
00003070: D3 04 99 22 20 20 41 4E 59 20 4B 45 59 20 57 49 |..." ANY KEY WI|
00003080: 4C 4C 20 52 45 50 45 41 54 20 49 46 20 48 45 4C |LL REPEAT IF HEL|
00003090: 44 20 44 4F 57 4E 2E 11 11 22 3A 8D 36 30 30 30 |D DOWN...":.6000|
000030A0: 3A 99 22 9E 31 30 20 50 4F 4B 45 20 36 35 30 2C |:.".10 POKE 650,|
000030B0: 32 30 30 22 00 F3 38 DD 04 99 22 32 30 20 3F 20 |200"..8..."20 ? |
000030C0: 22 3B C7 28 33 34 29 3B 22 57 4F 55 4C 44 20 59 |";.(34);"WOULD Y|
000030D0: 4F 55 20 4C 49 4B 45 20 54 4F 20 54 52 59 3F 22 |OU LIKE TO TRY?"|
000030E0: 3B C7 28 33 34 29 3A 99 22 52 55 4E 22 3A 8D 34 |;.(34):."RUN":.4|
000030F0: 30 31 30 00 19 39 EC 04 43 55 B2 31 3A 43 58 B2 |010..9..CU.1:CX.|
00003100: 33 3A 43 59 B2 31 36 3A 8D 39 32 3A 91 41 89 31 |3:CY.16:.92:.A.1|
00003110: 31 30 30 2C 31 32 30 30 30 00 34 39 F1 04 8B 41 |100,12000.49...A|
00003120: 24 B3 B1 C7 28 31 33 29 A7 8D 34 30 32 30 3A 89 |$...(13)..4020:.|
00003130: 31 32 36 30 00 62 39 F6 04 52 4F B2 43 59 AA 31 |1260.b9..RO.CY.1|
00003140: 3A 8D 37 30 30 30 3A 8D 35 32 35 30 3A 99 22 13 |:.7000:.5250:.".|
00003150: 11 9E 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00003160: 11 22 00 92 39 FB 04 97 36 35 30 2C 32 30 30 3A |."..9...650,200:|
00003170: 85 22 57 4F 55 4C 44 20 59 4F 55 20 4C 49 4B 45 |."WOULD YOU LIKE|
00003180: 20 54 4F 20 54 52 59 22 3B 41 24 3A 97 36 35 30 | TO TRY";A$:.650|
00003190: 2C 30 00 C1 39 14 05 97 56 AA 32 31 2C 30 3A 58 |,0..9...V.21,0:X|
000031A0: 4D B2 35 38 3A 59 4D B2 31 36 35 3A 97 56 AA 31 |M.58:YM.165:.V.1|
000031B0: 36 2C 33 31 3A 97 4D 43 2C 31 31 3A 97 42 43 2C |6,31:.MC,11:.BC,|
000031C0: 39 00 F4 39 1F 05 99 22 93 05 11 54 48 45 20 56 |9..9..."...THE V|
000031D0: 41 4C 55 45 20 53 54 4F 52 45 44 20 49 4E 20 41 |ALUE STORED IN A|
000031E0: 44 44 52 45 53 53 20 35 33 32 38 31 20 54 45 4C |DDRESS 53281 TEL|
000031F0: 4C 53 11 22 00 44 3A 21 05 99 22 4D 45 20 54 48 |LS.".D:!.."ME TH|
00003200: 45 20 53 43 52 45 45 4E 20 42 41 43 4B 47 52 4F |E SCREEN BACKGRO|
00003210: 55 4E 44 20 43 4F 4C 4F 52 2E 20 41 44 44 52 45 |UND COLOR. ADDRE|
00003220: 53 53 20 20 20 95 20 20 20 20 20 B7 B7 B7 B7 B7 |SS . .....|
00003230: B7 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 20 B7 B7 B7 |. .......... ...|
00003240: B7 B7 05 22 00 73 3A 25 05 99 22 35 33 32 38 30 |...".s:%.."53280|
00003250: 20 54 45 4C 4C 53 20 4D 45 20 54 48 45 20 53 43 | TELLS ME THE SC|
00003260: 52 45 45 4E 20 42 4F 52 44 45 52 20 43 4F 4C 4F |REEN BORDER COLO|
00003270: 52 2E 22 00 A3 3A 27 05 99 22 20 20 20 20 20 20 |R."..:'.." |
00003280: 20 20 95 20 20 20 20 20 20 20 20 20 20 20 B7 B7 | . ..|
00003290: B7 B7 B7 B7 20 B7 B7 B7 B7 B7 B7 20 B7 B7 B7 B7 |.... ...... ....|
000032A0: B7 05 22 00 CB 3A 29 05 99 22 54 48 45 53 45 20 |.."..:).."THESE |
000032B0: 41 52 45 20 54 48 45 20 56 41 4C 55 45 53 20 54 |ARE THE VALUES T|
000032C0: 4F 20 50 4F 4B 45 20 49 4E 11 22 00 E5 3A 2D 05 |O POKE IN."..:-.|
000032D0: 99 22 46 4F 52 20 43 4F 4C 4F 52 53 2E 11 22 3A |."FOR COLORS..":|
000032E0: 8D 36 30 30 30 00 10 3B 32 05 99 22 20 30 2D 42 |.6000..;2.." 0-B|
000032F0: 4C 41 43 4B 20 20 20 20 36 2D 42 4C 55 45 20 20 |LACK 6-BLUE |
00003300: 20 20 20 31 31 2D 44 41 52 4B 20 47 52 41 59 22 | 11-DARK GRAY"|
00003310: 00 3D 3B 37 05 99 22 20 31 2D 57 48 49 54 45 20 |.=;7.." 1-WHITE |
00003320: 20 20 20 37 2D 59 45 4C 4C 4F 57 20 20 20 31 32 | 7-YELLOW 12|
00003330: 2D 4D 45 44 49 55 4D 20 47 52 41 59 22 00 6A 3B |-MEDIUM GRAY".j;|
00003340: 3C 05 99 22 20 32 2D 52 45 44 20 20 20 20 20 20 |<.." 2-RED |
00003350: 38 2D 4F 52 41 4E 47 45 20 20 20 31 33 2D 4C 49 |8-ORANGE 13-LI|
00003360: 47 48 54 20 47 52 45 45 4E 22 00 96 3B 41 05 99 |GHT GREEN"..;A..|
00003370: 22 20 33 2D 43 59 41 4E 20 20 20 20 20 39 2D 42 |" 3-CYAN 9-B|
00003380: 52 4F 57 4E 20 20 20 20 31 34 2D 4C 49 47 48 54 |ROWN 14-LIGHT|
00003390: 20 42 4C 55 45 22 00 C2 3B 46 05 99 22 20 34 2D | BLUE"..;F.." 4-|
000033A0: 50 55 52 50 4C 45 20 31 30 2D 4C 49 47 48 54 20 |PURPLE 10-LIGHT |
000033B0: 52 45 44 20 31 35 2D 4C 49 47 48 54 20 47 52 41 |RED 15-LIGHT GRA|
000033C0: 59 22 00 D3 3B 4B 05 99 22 20 35 2D 47 52 45 45 |Y"..;K.." 5-GREE|
000033D0: 4E 11 22 00 F9 3B 50 05 99 22 9E 31 30 20 46 4F |N."..;P..".10 FO|
000033E0: 52 20 58 3D 20 30 20 54 4F 20 31 35 3A 3F 43 48 |R X= 0 TO 15:?CH|
000033F0: 52 53 28 31 34 37 29 3B 22 00 1F 3C 55 05 99 22 |RS(147);"..<U.."|
00003400: 32 30 20 50 4F 4B 45 20 35 33 32 38 31 2C 58 3A |20 POKE 53281,X:|
00003410: 50 4F 4B 45 35 33 32 38 30 2C 31 35 2D 58 22 00 |POKE53280,15-X".|
00003420: 69 3C 5A 05 99 22 33 30 20 3F 20 22 3B C7 28 33 |i<Z.."30 ? ";.(3|
00003430: 34 29 3B C7 28 31 39 29 3B C7 28 31 37 29 3B C7 |4);.(19);.(17);.|
00003440: 28 31 37 29 3B C7 28 31 37 29 3B 22 57 4F 57 22 |(17);.(17);"WOW"|
00003450: 3B C7 28 33 34 29 3B 22 3A 52 45 4D 20 43 55 52 |;.(34);":REM CUR|
00003460: 53 4F 52 20 44 4F 57 4E 22 00 8C 3C 5D 05 99 22 |SOR DOWN"..<].."|
00003470: 34 30 20 46 4F 52 20 54 3D 31 20 54 4F 20 31 30 |40 FOR T=1 TO 10|
00003480: 30 3A 4E 45 58 54 3A 4E 45 58 54 22 00 9D 3C 5F |0:NEXT:NEXT"..<_|
00003490: 05 99 22 52 55 4E 22 3A 8D 34 30 31 30 00 C3 3C |.."RUN":.4010..<|
000034A0: 64 05 43 55 B2 31 3A 43 58 B2 33 3A 43 59 B2 32 |d.CU.1:CX.3:CY.2|
000034B0: 32 3A 8D 39 32 3A 91 41 89 31 32 30 30 2C 31 32 |2:.92:.A.1200,12|
000034C0: 30 30 30 00 DE 3C 68 05 8B 41 24 B3 B1 C7 28 31 |000..<h..A$...(1|
000034D0: 33 29 A7 8D 34 30 32 30 3A 89 31 33 38 30 00 F7 |3)..4020:.1380..|
000034E0: 3C 6A 05 52 4F B2 30 3A 53 4C B2 34 3A 8D 37 30 |<j.RO.0:SL.4:.70|
000034F0: 30 30 3A 53 4C B2 30 00 33 3D 6C 05 81 20 58 B2 |00:SL.0.3=l.. X.|
00003500: 30 A4 31 35 3A 99 22 93 22 3B 3A 97 35 33 32 38 |0.15:.".";:.5328|
00003510: 31 2C 58 3A 97 35 33 32 38 30 2C 31 35 AB 58 3A |1,X:.53280,15.X:|
00003520: 99 22 13 11 11 11 57 4F 57 22 3A 81 54 B2 31 A4 |."....WOW":.T.1.|
00003530: 35 30 30 00 4D 3D 6D 05 82 3A 82 3A 99 22 11 05 |500.M=m..:.:."..|
00003540: 52 45 41 44 59 2E 22 3A 99 22 05 22 3B 00 65 3D |READY.":.".";.e=|
00003550: 6E 05 8D 34 30 30 30 3A 91 41 89 31 33 30 30 2C |n..4000:.A.1300,|
00003560: 31 32 30 30 30 00 94 3D 78 05 97 56 AA 32 31 2C |12000..=x..V.21,|
00003570: 30 3A 58 4D B2 35 37 3A 59 4D B2 31 36 35 3A 97 |0:XM.57:YM.165:.|
00003580: 56 AA 31 36 2C 33 31 3A 97 42 43 2C 34 3A 97 4D |V.16,31:.BC,4:.M|
00003590: 43 2C 31 31 00 C4 3D 7D 05 99 22 93 05 20 20 20 |C,11..=}..".. |
000035A0: 4D 59 20 53 43 52 45 45 4E 20 43 41 4E 20 48 4F |MY SCREEN CAN HO|
000035B0: 4C 44 20 31 30 30 30 20 43 48 41 52 41 43 54 45 |LD 1000 CHARACTE|
000035C0: 52 53 11 22 00 F4 3D 82 05 99 22 20 28 34 30 20 |RS."..=..." (40 |
000035D0: 43 4F 4C 55 4D 4E 53 20 42 59 20 32 35 20 52 4F |COLUMNS BY 25 RO|
000035E0: 57 53 29 2E 20 53 43 52 45 45 4E 20 4D 45 4D 4F |WS). SCREEN MEMO|
000035F0: 52 59 11 22 00 24 3E 85 05 99 22 49 53 20 4E 4F |RY.".$>..."IS NO|
00003600: 52 4D 41 4C 4C 59 20 41 44 44 52 45 53 53 45 53 |RMALLY ADDRESSES|
00003610: 20 31 30 32 34 20 54 48 52 4F 55 47 48 20 32 30 | 1024 THROUGH 20|
00003620: 32 33 2E 22 00 74 3E 87 05 99 22 20 20 20 20 41 |23.".t>..." A|
00003630: 4E 59 20 43 48 41 52 41 43 54 45 52 20 43 41 4E |NY CHARACTER CAN|
00003640: 20 42 45 20 50 4F 4B 45 44 20 49 4E 54 4F 20 41 | BE POKED INTO A|
00003650: 20 20 20 20 20 20 20 20 20 20 20 9C 20 20 20 20 | . |
00003660: 20 20 20 20 20 20 20 20 20 20 20 20 20 B7 B7 B7 | ...|
00003670: B7 B7 05 22 00 A2 3E 8C 05 99 22 20 20 53 50 45 |..."..>..." SPE|
00003680: 43 49 46 49 45 44 20 53 43 52 45 45 4E 20 41 44 |CIFIED SCREEN AD|
00003690: 44 52 45 53 53 2E 20 41 4C 53 4F 2C 20 59 4F 55 |DRESS. ALSO, YOU|
000036A0: 11 22 00 D3 3E 91 05 99 22 20 20 20 20 20 4D 55 |."..>..." MU|
000036B0: 53 54 20 53 50 45 43 49 46 59 20 43 48 41 52 41 |ST SPECIFY CHARA|
000036C0: 43 54 45 52 20 43 4F 4C 4F 52 2E 11 22 3A 8D 36 |CTER COLOR..":.6|
000036D0: 30 30 30 00 09 3F 96 05 99 22 9E 31 30 20 52 45 |000..?...".10 RE|
000036E0: 4D 20 53 43 52 45 45 4E 20 4D 45 4D 4F 52 59 20 |M SCREEN MEMORY |
000036F0: 4D 41 50 22 3A 99 22 32 30 20 46 4F 52 20 58 3D |MAP":."20 FOR X=|
00003700: 30 20 54 4F 20 39 39 39 22 00 49 3F A0 05 99 22 |0 TO 999".I?..."|
00003710: 33 30 50 4F 4B 45 20 31 30 32 34 2B 58 2C 32 30 |30POKE 1024+X,20|
00003720: 37 3A 52 45 4D 20 32 30 37 20 49 53 20 53 43 52 |7:REM 207 IS SCR|
00003730: 45 45 4E 20 43 4F 44 45 20 52 45 56 45 52 53 45 |EEN CODE REVERSE|
00003740: 2D 53 48 49 46 54 2D 4F 22 00 73 3F A5 05 99 22 |-SHIFT-O".s?..."|
00003750: 34 30 50 4F 4B 45 20 35 35 32 39 36 2B 58 2C 31 |40POKE 55296+X,1|
00003760: 3A 52 45 4D 43 4F 4C 4F 52 20 49 53 20 57 48 49 |:REMCOLOR IS WHI|
00003770: 54 45 22 00 8F 3F AA 05 99 22 35 30 20 4E 45 58 |TE"..?..."50 NEX|
00003780: 54 22 3A 99 22 52 55 4E 22 3A 8D 34 30 31 30 00 |T":."RUN":.4010.|
00003790: B5 3F B4 05 43 55 B2 31 3A 43 58 B2 33 3A 43 59 |.?..CU.1:CX.3:CY|
000037A0: B2 31 38 3A 8D 39 32 3A 91 41 89 31 33 30 30 2C |.18:.92:.A.1300,|
000037B0: 31 32 30 30 30 00 D0 3F BB 05 8B 41 24 B3 B1 C7 |12000..?...A$...|
000037C0: 28 31 33 29 A7 8D 34 30 32 30 3A 89 31 34 36 30 |(13)..4020:.1460|
000037D0: 00 F1 3F BE 05 52 4F B2 30 3A 53 4C B2 34 3A 8D |..?..RO.0:SL.4:.|
000037E0: 37 30 30 30 3A 53 4C B2 30 3A 97 56 AA 32 31 2C |7000:SL.0:.V.21,|
000037F0: 30 00 19 40 C8 05 81 58 B2 30 A4 39 39 39 3A 97 |0..@...X.0.999:.|
00003800: 33 33 37 39 32 AA 58 2C 32 30 37 3A 97 35 35 32 |33792.X,207:.552|
00003810: 39 36 AA 58 2C 31 20 3A 82 00 48 40 DC 05 99 22 |96.X,1 :..H@..."|
00003820: 13 05 22 3B 3A 97 56 AA 32 31 2C 30 3A 58 4D B2 |..";:.V.21,0:XM.|
00003830: 35 30 3A 59 4D B2 31 37 31 3A 97 56 AA 31 36 2C |50:YM.171:.V.16,|
00003840: 33 31 3A 97 42 43 2C 36 00 69 40 DF 05 97 33 33 |31:.BC,6.i@...33|
00003850: 38 39 31 2C 32 33 31 3A 97 35 35 32 39 36 AA 39 |891,231:.55296.9|
00003860: 39 2C 39 3A 99 22 13 22 3B 00 99 40 E1 05 99 22 |9,9:.".";..@..."|
00003870: 12 CF 3C 31 30 32 34 1D 1D 1D 1D 1D 1D 1D 1D 1D |..<1024.........|
00003880: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00003890: 1D 1D 1D 31 30 36 33 3E 22 00 C3 40 E4 05 99 22 |...1063>"..@..."|
000038A0: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 |............. |
000038B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000038C0: 20 20 22 00 F0 40 E6 05 99 22 13 11 11 11 11 11 | "..@..."......|
000038D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 53 43 52 45 |.......... SCRE|
000038E0: 45 4E 20 4D 45 4D 4F 52 59 20 4D 41 50 20 20 22 |EN MEMORY MAP "|
000038F0: 00 17 41 E8 05 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |..A...".........|
00003900: 1D 20 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |. .............|
00003910: B7 B7 B7 B7 20 20 22 00 47 41 EA 05 99 20 22 1D |.... ".GA... ".|
00003920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003940: 20 20 20 20 20 20 22 00 77 41 EB 05 99 22 91 1D | ".wA..."..|
00003950: 20 55 53 45 20 54 48 49 53 20 45 51 55 41 54 49 | USE THIS EQUATI|
00003960: 4F 4E 20 54 4F 20 50 4C 4F 54 20 41 4E 59 20 50 |ON TO PLOT ANY P|
00003970: 4F 49 4E 54 2E 20 22 00 A6 41 EE 05 99 22 1D 20 |OINT. "..A...". |
00003980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000039A0: 20 20 20 20 20 22 00 D5 41 F0 05 99 22 1D 20 20 | "..A...". |
000039B0: 50 3D 31 30 32 34 2B 28 58 20 50 4F 53 49 54 49 |P=1024+(X POSITI|
000039C0: 4F 4E 29 2B 34 30 2A 28 59 20 50 4F 53 49 54 49 |ON)+40*(Y POSITI|
000039D0: 4F 4E 29 20 22 00 05 42 F8 05 99 20 22 1D 20 20 |ON) "..B... ". |
000039E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000039F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003A00: 20 20 20 20 22 00 34 42 FA 05 99 22 1D 41 44 44 | ".4B...".ADD|
00003A10: 52 45 53 53 20 31 30 32 34 20 49 53 20 54 48 45 |RESS 1024 IS THE|
00003A20: 20 54 4F 50 20 4C 45 46 54 20 4F 46 20 53 43 52 | TOP LEFT OF SCR|
00003A30: 45 45 4E 22 00 64 42 FC 05 99 20 22 1D 20 20 20 |EEN".dB... ". |
00003A40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003A50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003A60: 20 20 20 22 00 93 42 FD 05 99 22 1D 20 20 20 20 | "..B...". |
00003A70: 20 46 4F 52 20 45 58 41 4D 50 4C 45 2C 20 54 48 | FOR EXAMPLE, TH|
00003A80: 45 20 52 45 44 20 42 4F 58 20 49 53 20 49 4E 20 |E RED BOX IS IN |
00003A90: 20 20 22 00 C4 42 FE 05 99 20 22 91 1D 20 20 20 | "..B... ".. |
00003AA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003AC0: 20 20 20 22 00 F3 42 FF 05 99 22 1D 20 43 4F 4C | "..B...". COL|
00003AD0: 55 4D 4E 20 31 39 20 26 20 52 4F 57 20 32 2E 20 |UMN 19 & ROW 2. |
00003AE0: 55 53 49 4E 47 20 54 48 45 20 45 51 55 41 54 49 |USING THE EQUATI|
00003AF0: 4F 4E 22 00 23 43 01 06 99 20 22 1D 20 20 20 20 |ON".#C... ". |
00003B00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003B10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003B20: 20 20 22 00 66 43 03 06 99 22 1D 20 20 20 20 50 | ".fC...". P|
00003B30: 3D 31 30 32 34 20 2B 20 31 39 20 2B 20 28 34 30 |=1024 + 19 + (40|
00003B40: 20 2A 20 32 29 3D 31 31 32 33 2E 20 20 20 20 20 | * 2)=1123. |
00003B50: 20 22 3A 8D 34 30 30 30 3A 91 41 89 31 34 30 30 | ":.4000:.A.1400|
00003B60: 2C 31 32 30 30 30 00 95 43 40 06 97 56 AA 32 31 |,12000..C@..V.21|
00003B70: 2C 30 3A 58 4D B2 34 30 3A 59 4D B2 31 35 31 3A |,0:XM.40:YM.151:|
00003B80: 97 56 AA 31 36 2C 33 31 3A 97 42 43 2C 33 3A 97 |.V.16,31:.BC,3:.|
00003B90: 4D 43 2C 31 31 00 D7 43 45 06 99 22 93 05 11 20 |MC,11..CE.."... |
00003BA0: 20 20 54 48 45 20 43 4F 4C 4F 52 20 4F 46 20 45 | THE COLOR OF E|
00003BB0: 41 43 48 20 43 48 41 52 41 43 54 45 52 20 4F 4E |ACH CHARACTER ON|
00003BC0: 20 54 48 45 20 9F 20 20 20 20 20 20 20 20 20 B7 | THE . .|
00003BD0: B7 B7 B7 B7 20 05 22 00 06 44 4A 06 99 22 20 53 |.... ."..DJ.." S|
00003BE0: 43 52 45 45 4E 20 49 53 20 43 4F 4E 54 52 4F 4C |CREEN IS CONTROL|
00003BF0: 4C 45 44 20 42 59 20 43 4F 4C 4F 52 20 4D 45 4D |LED BY COLOR MEM|
00003C00: 4F 52 59 2E 11 22 00 35 44 4F 06 99 22 20 20 41 |ORY..".5DO.." A|
00003C10: 44 44 52 45 53 53 20 35 35 32 39 36 20 54 48 52 |DDRESS 55296 THR|
00003C20: 4F 55 47 48 20 35 36 32 39 35 20 54 45 4C 4C 53 |OUGH 56295 TELLS|
00003C30: 20 4D 45 11 22 00 83 44 54 06 99 22 20 20 54 48 | ME."..DT.." TH|
00003C40: 45 20 43 4F 4C 4F 52 20 4F 46 20 54 48 45 20 43 |E COLOR OF THE C|
00003C50: 48 41 52 41 43 54 45 52 20 49 4E 20 41 44 44 52 |HARACTER IN ADDR|
00003C60: 45 53 53 9F 20 20 20 20 20 20 20 B7 B7 B7 B7 B7 |ESS. .....|
00003C70: 20 B7 B7 20 B7 B7 B7 20 B7 B7 B7 B7 B7 B7 B7 B7 | .. ... ........|
00003C80: B7 05 22 00 B4 44 59 06 99 22 20 20 31 30 32 34 |.."..DY.." 1024|
00003C90: 20 54 48 52 4F 55 47 48 20 32 30 32 33 2C 20 52 | THROUGH 2023, R|
00003CA0: 45 53 50 45 43 54 49 56 45 4C 59 2E 11 22 3A 8D |ESPECTIVELY..":.|
00003CB0: 36 30 30 30 00 EC 44 5E 06 99 22 9E 45 58 41 4D |6000..D^..".EXAM|
00003CC0: 50 4C 45 20 20 20 20 20 20 20 20 20 20 20 20 20 |PLE |
00003CD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003CE0: 20 20 20 20 B7 B7 B7 B7 B7 B7 B7 22 00 38 45 61 | .......".8Ea|
00003CF0: 06 99 22 31 30 20 43 3D 30 3A 52 45 4D 20 43 20 |.."10 C=0:REM C |
00003D00: 49 53 20 46 4F 52 20 43 4F 4C 4F 52 22 3A 99 22 |IS FOR COLOR":."|
00003D10: 32 30 20 46 4F 52 20 58 3D 30 20 54 4F 20 39 39 |20 FOR X=0 TO 99|
00003D20: 39 22 3A 99 22 33 30 20 50 4F 4B 45 20 31 30 32 |9":."30 POKE 102|
00003D30: 34 2B 58 2C 32 30 37 22 00 7F 45 6D 06 99 22 34 |4+X,207"..Em.."4|
00003D40: 30 20 50 4F 4B 45 20 35 35 32 39 36 2B 58 2C 43 |0 POKE 55296+X,C|
00003D50: 3A 52 45 4D 43 48 41 4E 47 45 20 43 4F 4C 4F 52 |:REMCHANGE COLOR|
00003D60: 22 3A 99 22 35 30 20 49 46 20 43 3D 31 35 20 54 |":."50 IF C=15 T|
00003D70: 48 45 4E 20 43 3D 30 3A 47 4F 54 4F 37 30 22 00 |HEN C=0:GOTO70".|
00003D80: A7 45 72 06 99 22 36 30 20 43 3D 43 2B 31 22 3A |.Er.."60 C=C+1":|
00003D90: 99 22 37 30 20 4E 45 58 54 22 3A 99 22 52 55 4E |."70 NEXT":."RUN|
00003DA0: 22 3A 8D 34 30 31 30 00 CD 45 81 06 43 55 B2 31 |":.4010..E..CU.1|
00003DB0: 3A 43 58 B2 33 3A 43 59 B2 32 30 3A 8D 39 32 3A |:CX.3:CY.20:.92:|
00003DC0: 91 41 89 31 34 30 30 2C 31 32 30 30 30 00 E8 45 |.A.1400,12000..E|
00003DD0: 8B 06 8B 41 24 B3 B1 C7 28 31 33 29 A7 8D 34 30 |...A$...(13)..40|
00003DE0: 32 30 3A 89 31 36 36 35 00 01 46 90 06 52 4F B2 |20:.1665..F..RO.|
00003DF0: 30 3A 53 4C B2 34 3A 8D 37 30 30 30 3A 53 4C B2 |0:SL.4:.7000:SL.|
00003E00: 30 00 09 46 93 06 4A B2 30 00 2E 46 95 06 81 58 |0..F..J.0..F...X|
00003E10: B2 30 A4 39 39 39 3A 97 33 33 37 39 32 AA 58 2C |.0.999:.33792.X,|
00003E20: 32 30 37 3A 97 35 35 32 39 36 AA 58 2C 4A 00 42 |207:.55296.X,J.B|
00003E30: 46 9A 06 8B 4A B2 31 35 A7 4A B2 30 3A 89 31 36 |F...J.15.J.0:.16|
00003E40: 39 35 00 4C 46 9D 06 4A B2 4A AA 31 00 6E 46 9F |95.LF..J.J.1.nF.|
00003E50: 06 82 3A 97 56 AA 32 31 2C 30 3A 8D 34 30 30 30 |..:.V.21,0:.4000|
00003E60: 3A 91 41 89 31 36 30 30 2C 31 32 30 30 30 00 9D |:.A.1600,12000..|
00003E70: 46 A4 06 97 56 AA 32 31 2C 30 3A 58 4D B2 35 35 |F...V.21,0:XM.55|
00003E80: 3A 59 4D B2 31 36 38 3A 97 56 AA 31 36 2C 33 31 |:YM.168:.V.16,31|
00003E90: 3A 97 42 43 2C 34 3A 97 4D 43 2C 31 31 00 CF 46 |:.BC,4:.MC,11..F|
00003EA0: A9 06 99 22 93 05 59 4F 55 20 43 41 4E 20 4E 4F |..."..YOU CAN NO|
00003EB0: 57 20 46 4F 52 4D 20 47 41 4D 45 53 20 46 4F 52 |W FORM GAMES FOR|
00003EC0: 20 59 4F 55 52 20 50 4C 45 41 53 55 52 45 22 00 | YOUR PLEASURE".|
00003ED0: F9 46 B3 06 99 22 20 20 20 20 20 20 20 20 20 20 |.F..." |
00003EE0: 20 20 43 4F 4E 53 49 44 45 52 20 54 48 49 53 21 | CONSIDER THIS!|
00003EF0: 21 11 22 3A 8D 36 30 30 30 00 3F 47 B8 06 99 22 |!.":.6000.?G..."|
00003F00: 9E 31 30 20 3F 20 43 48 52 24 28 31 34 37 29 3B |.10 ? CHR$(147);|
00003F10: 3F 22 3B C7 28 33 34 29 3B 22 57 4F 55 4C 44 20 |?";.(34);"WOULD |
00003F20: 59 4F 55 20 4C 49 4B 45 20 54 4F 20 46 4C 49 50 |YOU LIKE TO FLIP|
00003F30: 20 41 20 43 4F 49 4E 3F 22 3B C7 28 33 34 29 00 | A COIN?";.(34).|
00003F40: 6B 47 BD 06 99 22 32 30 20 47 45 54 20 41 24 3A |kG..."20 GET A$:|
00003F50: 49 46 41 24 3D 22 3B C7 28 33 34 29 3B C7 28 33 |IFA$=";.(34);.(3|
00003F60: 34 29 3B 22 54 48 45 4E 32 30 22 00 96 47 C2 06 |4);"THEN20"..G..|
00003F70: 99 22 33 30 20 49 46 41 24 3D 22 3B C7 28 33 34 |."30 IFA$=";.(34|
00003F80: 29 3B 22 4E 22 3B C7 28 33 34 29 3B 22 54 48 45 |);"N";.(34);"THE|
00003F90: 4E 20 45 4E 44 22 00 C1 47 CC 06 99 22 34 30 20 |N END"..G..."40 |
00003FA0: 3F 20 22 3B C7 28 33 34 29 3B 22 48 45 41 44 53 |? ";.(34);"HEADS|
00003FB0: 20 4F 52 20 54 41 49 4C 53 3F 22 3B C7 28 33 34 | OR TAILS?";.(34|
00003FC0: 29 00 07 48 D1 06 99 22 35 30 20 47 45 54 20 43 |)..H..."50 GET C|
00003FD0: 24 3A 49 46 20 43 24 3C 3E 20 22 3B C7 28 33 34 |$:IF C$<> ";.(34|
00003FE0: 29 3B 22 48 22 C7 28 33 34 29 3B 22 41 4E 44 20 |);"H".(34);"AND |
00003FF0: 43 24 3C 3E 20 22 3B C7 28 33 34 29 3B 22 54 22 |C$<> ";.(34);"T"|
00004000: 3B C7 28 33 34 29 3B 00 15 48 D4 06 99 22 54 48 |;.(34);..H..."TH|
00004010: 45 4E 35 30 22 00 52 48 D6 06 99 22 36 30 20 58 |EN50".RH..."60 X|
00004020: 3D 49 4E 54 28 52 4E 44 28 31 29 2A 28 32 29 2B |=INT(RND(1)*(2)+|
00004030: 31 29 3A 49 46 58 3D 31 54 48 45 4E 3F 22 3B C7 |1):IFX=1THEN?";.|
00004040: 28 33 34 29 3B 22 48 45 41 44 53 22 3B C7 28 33 |(34);"HEADS";.(3|
00004050: 34 29 00 7E 48 DB 06 99 22 91 37 30 20 49 46 20 |4).~H...".70 IF |
00004060: 58 3D 32 A0 54 48 45 4E 3F 22 3B C7 28 33 34 29 |X=2.THEN?";.(34)|
00004070: 3B 22 54 41 49 4C 53 22 3B C7 28 33 34 29 00 BE |;"TAILS";.(34)..|
00004080: 48 E0 06 99 22 38 30 20 49 46 58 3D 31 20 41 4E |H..."80 IFX=1 AN|
00004090: 44 20 43 24 3D 22 3B C7 28 33 34 29 3B 22 48 22 |D C$=";.(34);"H"|
000040A0: 3B C7 28 33 34 29 3B 22 54 48 45 4E 20 47 4F 53 |;.(34);"THEN GOS|
000040B0: 55 42 31 30 30 3A 47 4F 54 4F 20 31 30 22 00 FF |UB100:GOTO 10"..|
000040C0: 48 E5 06 99 22 91 39 30 20 49 46 58 3D 32 20 41 |H...".90 IFX=2 A|
000040D0: 4E 44 20 43 24 3D 22 3B C7 28 33 34 29 3B 22 54 |ND C$=";.(34);"T|
000040E0: 22 3B C7 28 33 34 29 3B 22 54 48 45 4E 20 47 4F |";.(34);"THEN GO|
000040F0: 53 55 42 31 30 30 3A 47 4F 54 4F 20 31 30 22 00 |SUB100:GOTO 10".|
00004100: 46 49 E8 06 99 22 91 39 35 20 3F 20 22 3B C7 28 |FI...".95 ? ";.(|
00004110: 33 34 29 3B 22 59 4F 55 27 52 45 20 41 20 47 4F |34);"YOU'RE A GO|
00004120: 4F 44 20 53 50 4F 52 54 21 22 3B C7 28 33 34 29 |OD SPORT!";.(34)|
00004130: 3B 22 3A 46 4F 52 54 3D 31 54 4F 31 30 30 30 3A |;":FORT=1TO1000:|
00004140: 4E 45 58 54 22 3B 00 57 49 E9 06 99 22 3A 20 47 |NEXT";.WI...": G|
00004150: 4F 54 4F 20 31 30 22 00 78 49 EA 06 99 22 31 30 |OTO 10".xI..."10|
00004160: 30 20 3F A0 43 48 52 24 28 31 34 37 29 3A 3F 20 |0 ?.CHR$(147):? |
00004170: 22 3B C7 28 33 34 29 3B 00 AD 49 EF 06 81 58 B2 |";.(34);..I...X.|
00004180: 30 A4 31 30 3A 99 C7 28 31 37 29 3B 3A 82 3A 99 |0.10:..(17);:.:.|
00004190: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 |" W|
000041A0: 49 4E 4E 45 52 21 22 3B C7 28 33 34 29 00 D0 49 |INNER!";.(34)..I|
000041B0: F4 06 99 22 31 31 30 20 46 4F 52 58 3D 31 54 4F |..."110 FORX=1TO|
000041C0: 31 34 3A 50 4F 4B 45 20 35 33 32 38 30 2C 58 22 |14:POKE 53280,X"|
000041D0: 00 EB 49 F9 06 99 22 31 32 30 20 50 4F 4B 45 20 |..I..."120 POKE |
000041E0: 35 33 32 38 31 2C 31 35 2D 58 22 00 20 4A FE 06 |53281,15-X". J..|
000041F0: 99 22 31 33 30 20 46 4F 52 54 3D 31 54 4F 32 30 |."130 FORT=1TO20|
00004200: 30 3A 4E 45 58 54 3A 4E 45 58 54 3A 52 45 54 55 |0:NEXT:NEXT:RETU|
00004210: 52 4E 22 3A 99 22 52 55 4E 22 3A 8D 34 30 31 30 |RN":."RUN":.4010|
00004220: 00 46 4A 0D 07 43 55 B2 31 3A 43 58 B2 33 3A 43 |.FJ..CU.1:CX.3:C|
00004230: 59 B2 32 31 3A 8D 39 32 3A 91 41 89 31 36 30 30 |Y.21:.92:.A.1600|
00004240: 2C 31 32 30 30 30 00 61 4A 1C 07 8B 41 24 B3 B1 |,12000.aJ...A$..|
00004250: C7 28 31 33 29 A7 8D 34 30 32 30 3A 89 31 38 30 |.(13)..4020:.180|
00004260: 35 00 7A 4A 21 07 52 4F B2 30 3A 53 4C B2 34 3A |5.zJ!.RO.0:SL.4:|
00004270: 8D 37 30 30 30 3A 53 4C B2 30 00 A5 4A 26 07 99 |.7000:SL.0..J&..|
00004280: 22 93 22 3A 99 22 57 4F 55 4C 44 20 59 4F 55 20 |".":."WOULD YOU |
00004290: 4C 49 4B 45 20 54 4F 20 46 4C 49 50 20 41 20 43 |LIKE TO FLIP A C|
000042A0: 4F 49 4E 3F 22 00 BA 4A 2B 07 A1 20 43 24 3A 8B |OIN?"..J+.. C$:.|
000042B0: 43 24 B2 22 22 A7 31 38 33 35 00 CD 4A 30 07 8B |C$."".1835..J0..|
000042C0: 43 24 B2 22 4E 22 A7 20 89 31 39 30 30 00 E4 4A |C$."N". .1900..J|
000042D0: 35 07 99 22 48 45 41 44 53 20 4F 52 20 54 41 49 |5.."HEADS OR TAI|
000042E0: 4C 53 3F 22 00 07 4B 3A 07 A1 20 43 24 3A 8B 20 |LS?"..K:.. C$:. |
000042F0: 43 24 B3 B1 20 22 48 22 AF 20 43 24 B3 B1 20 22 |C$.. "H". C$.. "|
00004300: 54 22 A7 31 38 35 30 00 28 4B 3F 07 58 B2 B5 28 |T".1850.(K?.X..(|
00004310: BB 28 31 29 AC 32 29 AA 31 3A 8B 20 58 B2 31 A7 |.(1).2).1:. X.1.|
00004320: 99 22 48 45 41 44 53 22 00 3A 4B 41 07 8B 58 B2 |."HEADS".:KA..X.|
00004330: 32 A7 99 22 54 41 49 4C 53 22 00 56 4B 44 07 8B |2.."TAILS".VKD..|
00004340: 58 B2 31 AF 43 24 B2 22 48 22 A7 8D 31 38 37 35 |X.1.C$."H"..1875|
00004350: 3A 89 31 38 33 30 00 73 4B 49 07 8B 58 B2 32 AF |:.1830.sKI..X.2.|
00004360: 43 24 B2 22 54 22 A7 20 8D 31 38 37 35 3A 89 31 |C$."T". .1875:.1|
00004370: 38 33 30 00 A3 4B 4C 07 99 20 22 59 4F 55 27 52 |830..KL.. "YOU'R|
00004380: 45 20 41 20 47 4F 4F 44 20 53 50 4F 52 54 21 21 |E A GOOD SPORT!!|
00004390: 22 3A 81 54 B2 31 A4 31 30 30 30 3A 82 3A 89 31 |":.T.1.1000:.:.1|
000043A0: 38 33 30 00 DA 4B 53 07 99 C7 28 31 34 37 29 3A |830..KS...(147):|
000043B0: 81 58 B2 30 A4 31 30 3A 99 C7 28 31 37 29 3B 3A |.X.0.10:..(17);:|
000043C0: 82 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |.:." |
000043D0: 20 20 57 49 4E 4E 45 52 21 22 00 F0 4B 5D 07 81 | WINNER!"..K]..|
000043E0: 58 B2 31 A4 31 34 3A 97 20 35 33 32 38 30 2C 58 |X.1.14:. 53280,X|
000043F0: 00 01 4C 5F 07 97 20 35 33 32 38 31 2C 31 34 AB |..L_.. 53281,14.|
00004400: 58 00 14 4C 62 07 81 54 B2 31 A4 32 30 30 3A 82 |X..Lb..T.1.200:.|
00004410: 3A 82 3A 8E 00 49 4C 6C 07 97 56 AA 32 31 2C 30 |:.:..ILl..V.21,0|
00004420: 3A 58 4D B2 34 35 3A 59 4D B2 31 37 31 3A 97 56 |:XM.45:YM.171:.V|
00004430: AA 31 36 2C 33 31 3A 97 42 43 2C 32 3A 97 4D 43 |.16,31:.BC,2:.MC|
00004440: 2C 36 3A 5A 44 B2 31 30 30 00 7B 4C 71 07 99 22 |,6:ZD.100.{Lq.."|
00004450: 93 05 11 20 45 41 43 48 20 50 52 4F 47 52 41 4D |... EACH PROGRAM|
00004460: 4D 49 4E 47 20 45 58 45 52 43 49 53 45 20 48 41 |MING EXERCISE HA|
00004470: 53 20 53 45 56 45 52 41 4C 11 22 00 AB 4C 76 07 |S SEVERAL."..Lv.|
00004480: 99 22 20 53 4F 4C 55 54 49 4F 4E 53 2E 20 20 54 |." SOLUTIONS. T|
00004490: 52 59 20 54 4F 20 43 48 4F 4F 53 45 20 54 48 45 |RY TO CHOOSE THE|
000044A0: 20 53 48 4F 52 54 45 53 54 11 22 00 D9 4C 7B 07 | SHORTEST."..L{.|
000044B0: 99 22 20 41 4E 44 20 53 49 4D 50 4C 45 53 54 20 |." AND SIMPLEST |
000044C0: 53 4F 4C 55 54 49 4F 4E 2E 20 20 59 4F 55 20 48 |SOLUTION. YOU H|
000044D0: 41 56 45 20 4E 4F 57 11 22 00 F9 4C 80 07 99 22 |AVE NOW."..L..."|
000044E0: 20 43 4F 4D 50 4C 45 54 45 44 20 56 4F 4C 55 4D | COMPLETED VOLUM|
000044F0: 45 20 34 2E 11 11 11 11 22 00 1E 4D 85 07 99 22 |E 4....."..M..."|
00004500: 20 20 20 20 20 20 20 20 20 20 20 59 4F 55 20 41 | YOU A|
00004510: 52 45 20 52 45 41 44 59 20 46 4F 52 11 22 00 45 |RE READY FOR.".E|
00004520: 4D 8A 07 99 22 20 20 20 20 20 20 20 20 49 20 41 |M..." I A|
00004530: 4D 20 54 48 45 20 43 2D 36 34 20 20 56 4F 4C 55 |M THE C-64 VOLU|
00004540: 4D 45 20 35 22 00 64 4D 8F 07 99 22 20 20 20 20 |ME 5".dM..." |
00004550: 20 20 20 20 20 20 20 20 20 20 28 53 50 52 49 54 | (SPRIT|
00004560: 45 53 29 22 00 79 4D 90 07 8B 49 44 B2 30 A7 8D |ES)".yM...ID.0..|
00004570: 35 30 32 30 3A 49 44 B2 31 00 BE 4D 91 07 97 35 |5020:ID.1..M...5|
00004580: 34 32 37 37 2C 39 3A 97 35 34 32 37 38 2C 30 3A |4277,9:.54278,0:|
00004590: 97 35 34 32 38 34 2C 39 3A 97 35 34 32 38 35 2C |.54284,9:.54285,|
000045A0: 30 3A 97 35 34 32 39 36 2C 31 35 3A 97 34 39 31 |0:.54296,15:.491|
000045B0: 36 36 2C 32 3A 97 34 39 31 35 32 2C 33 33 00 F8 |66,2:.49152,33..|
000045C0: 4D 93 07 97 34 39 31 35 33 2C 33 33 3A 97 34 39 |M...49153,33:.49|
000045D0: 31 36 31 2C 31 31 32 3A 97 34 39 31 36 32 2C 32 |161,112:.49162,2|
000045E0: 30 3A 9E 34 39 31 37 30 3A 97 35 34 32 39 36 2C |0:.49170:.54296,|
000045F0: 30 3A 97 31 39 38 2C 30 00 41 4E 94 07 99 22 13 |0:.198,0.AN...".|
00004600: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00004610: 11 11 11 11 11 11 11 20 20 20 50 52 45 53 53 20 |....... PRESS |
00004620: 41 4E 59 20 4B 45 59 20 54 4F 20 51 55 49 54 20 |ANY KEY TO QUIT |
00004630: 28 46 31 3D 52 45 56 45 52 53 45 29 22 3A 8D 39 |(F1=REVERSE)":.9|
00004640: 32 00 53 4E 99 07 91 41 89 31 37 30 30 2C 31 32 |2.SN...A.1700,12|
00004650: 30 30 30 00 81 4E A3 07 97 31 39 38 2C 30 3A 99 |000..N...198,0:.|
00004660: 22 93 11 11 11 11 44 4F 20 59 4F 55 20 57 41 4E |".....DO YOU WAN|
00004670: 54 20 54 4F 20 51 55 49 54 3F 20 28 59 2F 4E 29 |T TO QUIT? (Y/N)|
00004680: 22 00 95 4E A4 07 A1 41 24 3A 8B 41 24 B2 22 22 |"..N...A$:.A$.""|
00004690: A7 31 39 35 36 00 A8 4E A5 07 8B 41 24 B3 B1 22 |.1956..N...A$.."|
000046A0: 59 22 A7 31 32 30 30 30 00 D1 4E CF 07 97 35 36 |Y".12000..N...56|
000046B0: 35 37 38 2C 36 33 3A 97 35 36 35 37 36 2C 31 35 |578,63:.56576,15|
000046C0: 31 3A 97 36 34 38 2C 34 3A 97 38 30 38 2C 32 33 |1:.648,4:.808,23|
000046D0: 37 00 ED 4E D0 07 56 B2 35 33 32 34 38 3A 97 4D |7..N..V.53248:.M|
000046E0: 43 2C 31 31 3A 99 22 93 11 11 11 11 22 00 16 4F |C,11:."....."..O|
000046F0: DA 07 99 22 20 20 20 20 20 20 50 52 45 53 53 20 |..." PRESS |
00004700: 12 35 92 20 54 4F 20 4C 4F 41 44 20 56 4F 4C 55 |.5. TO LOAD VOLU|
00004710: 4D 45 20 35 11 22 00 3F 4F E4 07 99 22 20 20 20 |ME 5.".?O..." |
00004720: 20 20 20 50 52 45 53 53 20 12 36 92 20 54 4F 20 | PRESS .6. TO |
00004730: 4C 4F 41 44 20 56 4F 4C 55 4D 45 20 36 11 22 00 |LOAD VOLUME 6.".|
00004740: 65 4F EE 07 99 22 20 20 20 20 20 20 50 52 45 53 |eO..." PRES|
00004750: 53 20 12 51 92 20 54 4F 20 51 55 49 54 11 11 11 |S .Q. TO QUIT...|
00004760: 11 11 11 11 22 00 8F 4F F8 07 99 22 4C 4F 41 44 |...."..O..."LOAD|
00004770: 20 22 C7 28 33 34 29 22 56 4F 4C 55 4D 45 20 35 | ".(34)"VOLUME 5|
00004780: 22 C7 28 33 34 29 22 2C 38 9D 9D 9D 9D 22 3B 00 |".(34)",8....";.|
00004790: BE 4F 0C 08 A1 41 24 3A 97 31 37 31 37 2C 32 32 |.O...A$:.1717,22|
000047A0: 34 3A 81 58 B2 30 A4 35 30 3A 82 3A 97 31 37 31 |4:.X.0.50:.:.171|
000047B0: 37 2C 33 32 3A 81 58 B2 30 A4 34 30 3A 82 00 E2 |7,32:.X.0.40:...|
000047C0: 4F 20 08 8B C5 28 41 24 29 B3 B1 35 AF C5 28 41 |O ...(A$)..5..(A|
000047D0: 24 29 B3 B1 36 AF 41 24 B3 B1 22 51 22 A7 32 30 |$)..6.A$.."Q".20|
000047E0: 36 30 00 F5 4F 2A 08 8B 41 24 B2 22 51 22 A7 99 |60..O*..A$."Q"..|
000047F0: 22 93 22 3A 80 00 07 50 48 08 99 41 24 3A 99 22 |".":...PH..A$:."|
00004800: 91 91 91 91 22 3A 80 00 23 50 B8 0B 57 30 B2 35 |....":..#P..W0.5|
00004810: 34 32 37 36 3A 57 31 B2 35 34 32 38 33 3A 44 B2 |4276:W1.54283:D.|
00004820: 35 30 30 00 56 50 C7 0B 81 58 B2 30 A4 34 37 37 |500.VP...X.0.477|
00004830: 3A 87 44 3A 97 34 39 31 37 30 AA 58 2C 44 3A 82 |:.D:.49170.X,D:.|
00004840: 3A 81 58 B2 34 39 31 35 32 A4 34 39 31 36 39 3A |:.X.49152.49169:|
00004850: 97 58 2C 30 3A 82 00 82 50 C8 0B 81 58 B2 4F A4 |.X,0:...P...X.O.|
00004860: 31 31 30 3A 87 44 2C 44 45 3A 97 35 30 30 30 30 |110:.D,DE:.50000|
00004870: AA 58 2C 44 3A 97 35 30 32 35 30 AA 58 2C 44 45 |.X,D:.50250.X,DE|
00004880: 3A 82 00 AD 50 CA 0B 81 4A B2 30 A4 37 32 3A 87 |:...P...J.0.72:.|
00004890: 44 2C 44 45 3A 97 35 30 35 30 30 AA 4A 2C 44 3A |D,DE:.50500.J,D:|
000048A0: 97 35 30 37 35 30 AA 4A 2C 44 45 3A 82 00 E0 50 |.50750.J,DE:...P|
000048B0: CC 0B 83 37 36 2C 32 31 2C 31 39 32 2C 31 36 39 |...76,21,192,169|
000048C0: 2C 2C 31 34 31 2C 36 2C 31 39 32 2C 31 36 39 2C |,,141,6,192,169,|
000048D0: 2C 31 34 31 2C 37 2C 31 39 32 2C 31 36 39 2C 30 |,141,7,192,169,0|
000048E0: 00 19 51 CD 0B 83 31 34 31 2C 38 2C 31 39 32 2C |..Q...141,8,192,|
000048F0: 32 33 34 2C 31 37 34 2C 36 2C 31 39 32 2C 31 38 |234,174,6,192,18|
00004900: 39 2C 38 30 2C 31 39 35 2C 31 34 31 2C 31 2C 32 |9,80,195,141,1,2|
00004910: 31 32 2C 31 38 39 2C 37 34 00 51 51 CE 0B 83 31 |12,189,74.QQ...1|
00004920: 39 36 2C 31 34 31 2C 2C 32 31 32 2C 31 38 39 2C |96,141,,212,189,|
00004930: 33 32 2C 32 30 33 2C 31 34 31 2C 33 2C 31 39 32 |32,203,141,3,192|
00004940: 2C 31 36 39 2C 31 2C 31 34 31 2C 31 31 2C 31 39 |,169,1,141,11,19|
00004950: 32 00 88 51 CF 0B 83 31 37 33 2C 2C 31 39 32 2C |2..Q...173,,192,|
00004960: 31 34 31 2C 34 2C 32 31 32 2C 32 33 34 2C 31 37 |141,4,212,234,17|
00004970: 33 2C 31 34 2C 31 39 32 2C 34 31 2C 32 2C 32 34 |3,14,192,41,2,24|
00004980: 30 2C 33 33 2C 31 37 34 00 C1 51 D0 0B 83 37 2C |0,33,174..Q...7,|
00004990: 31 39 32 2C 31 38 39 2C 36 38 2C 31 39 37 2C 31 |192,189,68,197,1|
000049A0: 34 31 2C 38 2C 32 31 32 2C 31 38 39 2C 36 32 2C |41,8,212,189,62,|
000049B0: 31 39 38 2C 31 34 31 2C 37 2C 32 31 32 2C 31 38 |198,141,7,212,18|
000049C0: 39 00 FA 51 D1 0B 83 32 33 32 2C 32 30 33 2C 31 |9..Q...232,203,1|
000049D0: 34 31 2C 34 2C 31 39 32 2C 31 36 39 2C 31 2C 31 |41,4,192,169,1,1|
000049E0: 34 31 2C 31 32 2C 31 39 32 2C 31 37 33 2C 31 2C |41,12,192,173,1,|
000049F0: 31 39 32 2C 31 34 31 2C 31 31 00 33 52 D2 0B 83 |192,141,11.3R...|
00004A00: 32 31 32 2C 32 33 34 2C 31 37 33 2C 31 34 2C 31 |212,234,173,14,1|
00004A10: 39 32 2C 34 31 2C 34 2C 32 34 30 2C 33 37 2C 31 |92,41,4,240,37,1|
00004A20: 37 34 2C 38 2C 31 39 32 2C 31 38 39 2C 35 36 2C |74,8,192,189,56,|
00004A30: 31 39 39 00 6F 52 D3 0B 83 31 34 31 2C 31 35 2C |199.oR...141,15,|
00004A40: 32 31 32 2C 31 38 39 2C 35 30 2C 32 30 30 2C 31 |212,189,50,200,1|
00004A50: 34 31 2C 31 34 2C 32 31 32 2C 31 38 39 2C 31 37 |41,14,212,189,17|
00004A60: 36 2C 32 30 34 2C 31 34 31 2C 35 2C 31 39 32 00 |6,204,141,5,192.|
00004A70: AA 52 D4 0B 83 31 36 39 2C 31 2C 31 34 31 2C 31 |.R...169,1,141,1|
00004A80: 33 2C 31 39 32 2C 31 37 33 2C 32 2C 31 39 32 2C |3,192,173,2,192,|
00004A90: 31 34 31 2C 31 38 2C 32 31 32 2C 32 33 34 2C 32 |141,18,212,234,2|
00004AA0: 33 34 2C 32 33 34 2C 32 33 34 00 E4 52 D5 0B 83 |34,234,234..R...|
00004AB0: 32 33 34 2C 33 32 2C 32 31 36 2C 31 39 33 2C 31 |234,32,216,193,1|
00004AC0: 37 34 2C 36 2C 31 39 32 2C 31 38 39 2C 33 32 2C |74,6,192,189,32,|
00004AD0: 32 30 33 2C 32 30 31 2C 32 35 35 2C 32 30 38 2C |203,201,255,208,|
00004AE0: 31 2C 39 36 00 19 53 D6 0B 83 32 30 36 2C 33 2C |1,96..S...206,3,|
00004AF0: 31 39 32 2C 32 30 38 2C 33 2C 33 32 2C 39 38 2C |192,208,3,32,98,|
00004B00: 31 39 33 2C 31 37 33 2C 31 34 2C 31 39 32 2C 34 |193,173,14,192,4|
00004B10: 31 2C 32 2C 32 34 30 2C 38 00 4F 53 D7 0B 83 32 |1,2,240,8.OS...2|
00004B20: 30 36 2C 34 2C 31 39 32 2C 32 30 38 2C 33 2C 33 |06,4,192,208,3,3|
00004B30: 32 2C 31 34 30 2C 31 39 33 2C 31 37 33 2C 31 34 |2,140,193,173,14|
00004B40: 2C 31 39 32 2C 34 31 2C 34 2C 32 34 30 2C 38 00 |,192,41,4,240,8.|
00004B50: 89 53 D8 0B 83 32 30 36 2C 35 2C 31 39 32 2C 32 |.S...206,5,192,2|
00004B60: 30 38 2C 33 2C 33 32 2C 31 37 38 2C 31 39 33 2C |08,3,32,178,193,|
00004B70: 31 36 35 2C 32 30 33 2C 32 30 31 2C 31 33 2C 32 |165,203,201,13,2|
00004B80: 30 38 2C 32 35 2C 31 37 33 00 C0 53 D9 0B 83 2C |08,25,173..S...,|
00004B90: 31 39 32 2C 34 31 2C 32 35 34 2C 31 34 31 2C 34 |192,41,254,141,4|
00004BA0: 2C 32 31 32 2C 31 37 33 2C 31 2C 31 39 32 2C 34 |,212,173,1,192,4|
00004BB0: 31 2C 32 35 34 2C 31 34 31 2C 31 31 2C 32 31 32 |1,254,141,11,212|
00004BC0: 00 F8 53 DA 0B 83 31 37 33 2C 32 2C 31 39 32 2C |..S...173,2,192,|
00004BD0: 34 31 2C 32 35 34 2C 31 34 31 2C 31 38 2C 32 31 |41,254,141,18,21|
00004BE0: 32 2C 39 36 2C 31 37 33 2C 31 35 2C 31 39 32 2C |2,96,173,15,192,|
00004BF0: 32 34 30 2C 33 2C 33 32 00 37 54 DB 0B 83 32 33 |240,3,32.7T...23|
00004C00: 39 2C 31 39 33 2C 31 37 34 2C 31 30 2C 31 39 32 |9,193,174,10,192|
00004C10: 2C 31 36 30 2C 32 35 35 2C 31 33 36 2C 32 30 38 |,160,255,136,208|
00004C20: 2C 32 35 33 2C 32 30 32 2C 32 30 38 2C 32 34 38 |,253,202,208,248|
00004C30: 2C 31 37 33 2C 31 31 00 70 54 DC 0B 83 31 39 32 |,173,11.pT...192|
00004C40: 2C 32 30 38 2C 31 39 2C 31 37 34 2C 36 2C 31 39 |,208,19,174,6,19|
00004C50: 32 2C 31 38 39 2C 38 30 2C 31 39 35 2C 32 34 30 |2,189,80,195,240|
00004C60: 2C 31 31 2C 31 36 39 2C 31 2C 31 34 31 2C 31 31 |,11,169,1,141,11|
00004C70: 00 A8 54 DD 0B 83 31 39 32 2C 31 37 33 2C 2C 31 |..T...192,173,,1|
00004C80: 39 32 2C 31 34 31 2C 34 2C 32 31 32 2C 31 37 33 |92,141,4,212,173|
00004C90: 2C 31 32 2C 31 39 32 2C 32 30 38 2C 31 39 2C 31 |,12,192,208,19,1|
00004CA0: 37 34 2C 37 2C 31 39 32 00 E1 54 DE 0B 83 31 38 |74,7,192..T...18|
00004CB0: 39 2C 36 38 2C 31 39 37 2C 32 34 30 2C 31 31 2C |9,68,197,240,11,|
00004CC0: 31 36 39 2C 31 2C 31 34 31 2C 31 32 2C 31 39 32 |169,1,141,12,192|
00004CD0: 2C 31 37 33 2C 31 2C 31 39 32 2C 31 34 31 2C 31 |,173,1,192,141,1|
00004CE0: 31 00 1B 55 DF 0B 83 32 31 32 2C 31 37 33 2C 31 |1..U...212,173,1|
00004CF0: 33 2C 31 39 32 2C 32 30 38 2C 31 31 2C 31 36 39 |3,192,208,11,169|
00004D00: 2C 31 2C 31 34 31 2C 31 33 2C 31 39 32 2C 31 37 |,1,141,13,192,17|
00004D10: 33 2C 32 2C 31 39 32 2C 31 34 31 00 55 55 E0 0B |3,2,192,141.UU..|
00004D20: 83 31 38 2C 32 31 32 2C 31 37 34 2C 36 2C 31 39 |.18,212,174,6,19|
00004D30: 32 2C 31 38 39 2C 38 30 2C 31 39 35 2C 32 30 31 |2,189,80,195,201|
00004D40: 2C 32 35 35 2C 32 34 30 2C 33 2C 37 36 2C 31 35 |,255,240,3,76,15|
00004D50: 34 2C 31 39 32 00 89 55 E1 0B 83 31 36 39 2C 2C |4,192..U...169,,|
00004D60: 31 34 31 2C 32 34 2C 32 31 32 2C 31 36 39 2C 2C |141,24,212,169,,|
00004D70: 31 34 31 2C 34 2C 32 31 32 2C 31 36 39 2C 2C 31 |141,4,212,169,,1|
00004D80: 34 31 2C 31 31 2C 32 31 32 00 BF 55 E2 0B 83 31 |41,11,212..U...1|
00004D90: 36 39 2C 2C 31 34 31 2C 31 38 2C 32 31 32 2C 39 |69,,141,18,212,9|
00004DA0: 36 2C 31 37 33 2C 2C 31 39 32 2C 34 31 2C 32 35 |6,173,,192,41,25|
00004DB0: 34 2C 31 34 31 2C 34 2C 32 31 32 2C 31 36 39 00 |4,141,4,212,169.|
00004DC0: F7 55 E3 0B 83 2C 31 34 31 2C 31 31 2C 31 39 32 |.U...,141,11,192|
00004DD0: 2C 32 33 38 2C 36 2C 31 39 32 2C 31 37 34 2C 36 |,238,6,192,174,6|
00004DE0: 2C 31 39 32 2C 31 38 39 2C 38 30 2C 31 39 35 2C |,192,189,80,195,|
00004DF0: 32 30 31 2C 32 35 35 00 30 56 E4 0B 83 32 34 30 |201,255.0V...240|
00004E00: 2C 31 35 2C 31 34 31 2C 31 2C 32 31 32 2C 31 38 |,15,141,1,212,18|
00004E10: 39 2C 37 34 2C 31 39 36 2C 31 34 31 2C 2C 32 31 |9,74,196,141,,21|
00004E20: 32 2C 31 38 39 2C 33 32 2C 32 30 33 2C 31 34 31 |2,189,32,203,141|
00004E30: 00 66 56 E5 0B 83 33 2C 31 39 32 2C 39 36 2C 31 |.fV...3,192,96,1|
00004E40: 37 33 2C 31 2C 31 39 32 2C 34 31 2C 32 35 34 2C |73,1,192,41,254,|
00004E50: 31 34 31 2C 31 31 2C 32 31 32 2C 31 36 39 2C 2C |141,11,212,169,,|
00004E60: 31 34 31 2C 31 32 00 9F 56 E6 0B 83 31 39 32 2C |141,12..V...192,|
00004E70: 32 33 38 2C 37 2C 31 39 32 2C 31 37 34 2C 37 2C |238,7,192,174,7,|
00004E80: 31 39 32 2C 31 38 39 2C 36 38 2C 31 39 37 2C 31 |192,189,68,197,1|
00004E90: 34 31 2C 38 2C 32 31 32 2C 31 38 39 2C 36 32 00 |41,8,212,189,62.|
00004EA0: D8 56 E7 0B 83 31 39 38 2C 31 34 31 2C 37 2C 32 |.V...198,141,7,2|
00004EB0: 31 32 2C 31 38 39 2C 32 33 32 2C 32 30 33 2C 31 |12,189,232,203,1|
00004EC0: 34 31 2C 34 2C 31 39 32 2C 39 36 2C 31 37 33 2C |41,4,192,96,173,|
00004ED0: 32 2C 31 39 32 2C 34 31 00 10 57 E8 0B 83 32 35 |2,192,41..W...25|
00004EE0: 34 2C 31 34 31 2C 31 38 2C 32 31 32 2C 31 36 39 |4,141,18,212,169|
00004EF0: 2C 2C 31 34 31 2C 31 33 2C 31 39 32 2C 32 33 38 |,,141,13,192,238|
00004F00: 2C 38 2C 31 39 32 2C 31 37 34 2C 38 2C 31 39 32 |,8,192,174,8,192|
00004F10: 00 4D 57 E9 0B 83 31 38 39 2C 35 36 2C 31 39 39 |.MW...189,56,199|
00004F20: 2C 31 34 31 2C 31 35 2C 32 31 32 2C 31 38 39 2C |,141,15,212,189,|
00004F30: 35 30 2C 32 30 30 2C 31 34 31 2C 31 34 2C 32 31 |50,200,141,14,21|
00004F40: 32 2C 31 38 39 2C 31 37 36 2C 32 30 34 00 89 57 |2,189,176,204..W|
00004F50: EA 0B 83 31 34 31 2C 35 2C 31 39 32 2C 39 36 2C |...141,5,192,96,|
00004F60: 31 37 34 2C 39 2C 31 39 32 2C 31 36 30 2C 31 32 |174,9,192,160,12|
00004F70: 37 2C 31 33 36 2C 32 30 38 2C 32 35 33 2C 32 30 |7,136,208,253,20|
00004F80: 32 2C 32 30 38 2C 32 34 38 00 BE 57 EB 0B 83 31 |2,208,248..W...1|
00004F90: 37 34 2C 39 2C 31 39 32 2C 31 36 30 2C 31 32 37 |74,9,192,160,127|
00004FA0: 2C 31 33 36 2C 32 30 38 2C 32 35 33 2C 32 30 32 |,136,208,253,202|
00004FB0: 2C 32 30 38 2C 32 34 38 2C 39 36 2C 39 36 00 C4 |,208,248,96,96..|
00004FC0: 57 F8 0B 8F 00 09 58 F9 0B 83 34 35 2C 31 39 38 |W.....X...45,198|
00004FD0: 2C 33 38 2C 31 32 36 2C 33 30 2C 31 34 31 2C 32 |,38,126,30,141,2|
00004FE0: 38 2C 32 31 34 2C 33 34 2C 37 35 2C 33 30 2C 31 |8,214,34,75,30,1|
00004FF0: 34 31 2C 32 32 2C 32 32 37 2C 2C 2C 32 32 2C 32 |41,22,227,,,22,2|
00005000: 32 37 2C 32 35 2C 31 37 37 00 1C 58 FC 0B 83 32 |27,25,177..X...2|
00005010: 35 2C 31 37 37 2C 32 38 2C 32 31 34 00 64 58 FE |5,177,28,214.dX.|
00005020: 0B 83 32 38 2C 32 31 34 2C 33 30 2C 31 34 31 2C |..28,214,30,141,|
00005030: 2C 2C 32 32 2C 32 32 37 2C 32 35 2C 31 37 37 2C |,,22,227,25,177,|
00005040: 32 35 2C 31 37 37 2C 32 38 2C 32 31 34 2C 32 38 |25,177,28,214,28|
00005050: 2C 32 31 34 2C 33 30 2C 31 34 31 2C 2C 2C 33 38 |,214,30,141,,,38|
00005060: 2C 31 32 36 00 AF 58 03 0C 83 33 34 2C 37 35 2C |,126..X...34,75,|
00005070: 32 32 2C 32 32 37 2C 32 31 2C 31 35 34 2C 33 30 |22,227,21,154,30|
00005080: 2C 31 34 31 2C 32 38 2C 32 31 34 2C 32 32 2C 32 |,141,28,214,22,2|
00005090: 32 37 2C 2C 2C 32 32 2C 32 32 37 2C 32 35 2C 31 |27,,,22,227,25,1|
000050A0: 37 37 2C 32 34 2C 36 33 2C 32 35 2C 31 37 37 00 |77,24,63,25,177.|
000050B0: FA 58 08 0C 83 32 38 2C 32 31 34 2C 32 32 2C 32 |.X...28,214,22,2|
000050C0: 32 37 2C 2C 2C 32 32 2C 32 32 37 2C 32 35 2C 31 |27,,,22,227,25,1|
000050D0: 37 37 2C 32 34 2C 36 33 2C 32 35 2C 31 37 37 2C |77,24,63,25,177,|
000050E0: 32 34 2C 36 33 2C 32 35 2C 31 37 37 2C 32 38 2C |24,63,25,177,28,|
000050F0: 32 31 34 2C 32 32 2C 32 32 37 00 44 59 0D 0C 83 |214,22,227.DY...|
00005100: 34 35 2C 31 39 38 2C 34 35 2C 31 39 38 2C 33 38 |45,198,45,198,38|
00005110: 2C 31 32 36 2C 33 38 2C 31 32 36 2C 33 32 2C 39 |,126,38,126,32,9|
00005120: 34 2C 33 32 2C 39 34 2C 2C 2C 32 35 2C 31 37 37 |4,32,94,,,25,177|
00005130: 2C 33 34 2C 37 35 2C 32 35 2C 31 37 37 2C 33 38 |,34,75,25,177,38|
00005140: 2C 31 32 36 00 8A 59 0F 0C 83 32 35 2C 31 37 37 |,126..Y...25,177|
00005150: 2C 34 30 2C 32 30 30 2C 2C 2C 34 30 2C 32 30 30 |,40,200,,,40,200|
00005160: 2C 34 30 2C 32 30 30 2C 33 34 2C 37 35 2C 33 34 |,40,200,34,75,34|
00005170: 2C 37 35 2C 32 38 2C 32 31 34 2C 32 38 2C 32 31 |,75,28,214,28,21|
00005180: 34 2C 2C 2C 32 32 2C 32 32 37 00 CF 59 11 0C 83 |4,,,22,227..Y...|
00005190: 33 30 2C 31 34 31 2C 32 32 2C 32 32 37 2C 33 34 |30,141,22,227,34|
000051A0: 2C 37 35 2C 32 32 2C 32 32 37 2C 33 38 2C 31 32 |,75,22,227,38,12|
000051B0: 36 2C 2C 2C 34 35 2C 31 39 38 2C 33 38 2C 31 32 |6,,,45,198,38,12|
000051C0: 36 2C 33 30 2C 31 34 31 2C 32 38 2C 32 31 34 00 |6,30,141,28,214.|
000051D0: 17 5A 13 0C 83 33 34 2C 37 35 2C 33 30 2C 31 34 |.Z...34,75,30,14|
000051E0: 31 2C 32 32 2C 32 32 37 2C 2C 2C 32 32 2C 32 32 |1,22,227,,,22,22|
000051F0: 37 2C 32 35 2C 31 37 37 2C 32 35 2C 31 37 37 2C |7,25,177,25,177,|
00005200: 32 38 2C 32 31 34 2C 32 38 2C 32 31 34 2C 33 30 |28,214,28,214,30|
00005210: 2C 31 34 31 2C 2C 30 00 62 5A 15 0C 83 32 32 2C |,141,,0.bZ...22,|
00005220: 32 32 37 2C 32 35 2C 31 37 37 2C 32 35 2C 31 37 |227,25,177,25,17|
00005230: 37 2C 32 38 2C 32 31 34 2C 32 38 2C 32 31 34 2C |7,28,214,28,214,|
00005240: 33 30 2C 31 34 31 2C 2C 2C 33 30 2C 31 34 31 2C |30,141,,,30,141,|
00005250: 33 34 2C 37 35 2C 33 30 2C 31 34 31 2C 33 34 2C |34,75,30,141,34,|
00005260: 37 35 00 B2 5A 17 0C 83 33 38 2C 31 32 36 2C 33 |75..Z...38,126,3|
00005270: 30 2C 31 34 31 2C 2C 2C 33 30 2C 31 34 31 2C 33 |0,141,,,30,141,3|
00005280: 34 2C 37 35 2C 33 32 2C 39 34 2C 33 34 2C 37 35 |4,75,32,94,34,75|
00005290: 2C 33 32 2C 39 34 2C 33 34 2C 37 35 2C 33 38 2C |,32,94,34,75,38,|
000052A0: 31 32 36 2C 33 30 2C 31 34 31 2C 32 35 35 2C 32 |126,30,141,255,2|
000052B0: 35 35 00 F7 5A 21 0C 83 30 2C 2C 31 35 2C 37 30 |55..Z!..0,,15,70|
000052C0: 2C 31 37 2C 33 37 2C 31 39 2C 36 33 2C 2C 2C 31 |,17,37,19,63,,,1|
000052D0: 39 2C 36 33 2C 32 30 2C 31 30 30 2C 32 30 2C 31 |9,63,20,100,20,1|
000052E0: 30 30 2C 31 37 2C 33 37 2C 31 37 2C 33 37 2C 31 |00,17,37,17,37,1|
000052F0: 35 2C 37 30 2C 2C 30 00 3F 5B 26 0C 83 31 39 2C |5,70,,0.?[&..19,|
00005300: 36 33 2C 32 30 2C 31 30 30 2C 32 30 2C 31 30 30 |63,20,100,20,100|
00005310: 2C 31 37 2C 33 37 2C 31 37 2C 33 37 2C 31 35 2C |,17,37,17,37,15,|
00005320: 37 30 2C 2C 2C 31 35 2C 37 30 2C 31 34 2C 31 30 |70,,,15,70,14,10|
00005330: 37 2C 31 32 2C 32 31 36 2C 31 31 2C 31 31 34 00 |7,12,216,11,114.|
00005340: 7C 5B 2B 0C 83 30 2C 2C 31 34 2C 31 30 37 2C 31 ||[+..0,,14,107,1|
00005350: 35 2C 37 30 2C 31 37 2C 33 37 2C 31 39 2C 36 33 |5,70,17,37,19,63|
00005360: 2C 2C 2C 31 34 2C 31 30 37 2C 31 35 2C 37 30 2C |,,,14,107,15,70,|
00005370: 31 37 2C 33 37 2C 32 32 2C 32 32 37 00 C4 5B 35 |17,37,22,227..[5|
00005380: 0C 83 30 2C 30 2C 31 32 2C 32 31 36 2C 31 31 2C |..0,0,12,216,11,|
00005390: 31 31 34 2C 31 30 2C 36 30 2C 38 2C 32 33 2C 38 |114,10,60,8,23,8|
000053A0: 2C 31 34 37 2C 2C 2C 31 31 2C 31 31 34 2C 31 30 |,147,,,11,114,10|
000053B0: 2C 36 30 2C 39 2C 31 35 39 2C 37 2C 35 33 2C 37 |,60,9,159,7,53,7|
000053C0: 2C 31 36 33 00 0C 5C 3A 0C 83 30 2C 2C 31 35 2C |,163..\:..0,,15,|
000053D0: 37 30 2C 31 37 2C 33 37 2C 31 39 2C 36 33 2C 2C |70,17,37,19,63,,|
000053E0: 2C 31 39 2C 36 33 2C 31 30 2C 36 30 2C 31 30 2C |,19,63,10,60,10,|
000053F0: 36 30 2C 31 37 2C 33 37 2C 31 37 2C 33 37 2C 31 |60,17,37,17,37,1|
00005400: 35 2C 37 30 2C 2C 2C 31 39 2C 36 33 00 4E 5C 44 |5,70,,,19,63.N\D|
00005410: 0C 83 31 30 2C 36 30 2C 31 30 2C 36 30 2C 31 37 |..10,60,10,60,17|
00005420: 2C 33 37 2C 31 37 2C 33 37 2C 31 35 2C 37 30 2C |,37,17,37,15,70,|
00005430: 2C 2C 39 2C 31 35 39 2C 31 30 2C 36 30 2C 31 31 |,,9,159,10,60,11|
00005440: 2C 31 31 34 2C 31 32 2C 32 31 36 2C 2C 30 00 6D |,114,12,216,,0.m|
00005450: 5C 46 0C 83 39 2C 31 35 39 2C 32 30 2C 31 30 30 |\F..9,159,20,100|
00005460: 2C 31 31 2C 31 31 34 2C 37 2C 31 36 33 00 BA 5C |,11,114,7,163..\|
00005470: 4E 0C 83 32 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 |N..2,2,2,2,2,2,2|
00005480: 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 2C 34 2C 32 |,2,2,2,2,2,2,4,2|
00005490: 2C 32 2C 32 2C 32 2C 32 2C 32 2C 34 2C 32 2C 32 |,2,2,2,2,2,4,2,2|
000054A0: 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 |,2,2,2,2,2,2,2,2|
000054B0: 2C 32 2C 32 2C 32 2C 32 2C 34 00 07 5D 53 0C 83 |,2,2,2,2,4..]S..|
000054C0: 32 2C 32 2C 31 2C 31 2C 31 2C 31 2C 32 2C 32 2C |2,2,1,1,1,1,2,2,|
000054D0: 36 2C 32 2C 32 2C 32 2C 32 2C 32 2C 34 2C 32 2C |6,2,2,2,2,2,4,2,|
000054E0: 32 2C 32 2C 32 2C 32 2C 32 2C 34 2C 32 2C 32 2C |2,2,2,2,2,4,2,2,|
000054F0: 32 2C 32 2C 32 2C 32 2C 34 2C 32 2C 32 2C 32 2C |2,2,2,2,4,2,2,2,|
00005500: 32 2C 32 2C 32 2C 34 00 52 5D 58 0C 83 32 2C 32 |2,2,2,4.R]X..2,2|
00005510: 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 |,2,2,2,2,2,2,2,2|
00005520: 2C 32 2C 32 2C 32 2C 32 2C 34 2C 32 2C 32 2C 32 |,2,2,2,2,4,2,2,2|
00005530: 2C 32 2C 32 2C 32 2C 34 2C 32 2C 32 2C 32 2C 32 |,2,2,2,4,2,2,2,2|
00005540: 2C 32 2C 32 2C 34 2C 32 2C 32 2C 31 2C 31 2C 31 |,2,2,4,2,2,1,1,1|
00005550: 2C 31 00 5D 5D 5D 0C 83 32 2C 32 2C 36 00 A4 5D |,1.]]]..2,2,6..]|
00005560: 67 0C 83 32 2C 34 2C 34 2C 34 2C 32 2C 32 2C 32 |g..2,4,4,4,2,2,2|
00005570: 2C 32 2C 32 2C 32 2C 34 2C 32 2C 32 2C 32 2C 32 |,2,2,2,4,2,2,2,2|
00005580: 2C 32 2C 32 2C 34 2C 32 2C 32 2C 34 2C 34 2C 34 |,2,2,4,2,2,4,4,4|
00005590: 2C 32 2C 32 2C 34 2C 34 2C 34 2C 32 2C 32 2C 36 |,2,2,4,4,4,2,2,6|
000055A0: 2C 32 2C 36 00 E7 5D 6C 0C 83 31 30 2C 34 2C 34 |,2,6..]l..10,4,4|
000055B0: 2C 34 2C 34 2C 34 2C 31 32 2C 34 2C 34 2C 34 2C |,4,4,4,12,4,4,4,|
000055C0: 34 2C 34 2C 34 2C 34 2C 34 2C 34 2C 32 2C 32 2C |4,4,4,4,4,4,2,2,|
000055D0: 32 2C 32 2C 32 2C 32 2C 34 2C 32 2C 32 2C 32 2C |2,2,2,2,4,2,2,2,|
000055E0: 32 2C 32 2C 32 2C 34 00 00 5E 71 0C 83 32 2C 32 |2,2,2,4..^q..2,2|
000055F0: 2C 34 2C 34 2C 34 2C 32 2C 32 2C 34 2C 34 2C 36 |,4,4,4,2,2,4,4,6|
00005600: 00 1D 5E 80 0C 81 58 B2 30 A4 31 30 39 3A 87 44 |..^...X.0.109:.D|
00005610: 3A 97 35 32 30 30 30 AA 58 2C 44 3A 82 00 3B 5E |:.52000.X,D:..;^|
00005620: 9E 0C 81 58 B2 30 A4 37 32 3A 87 44 3A 97 35 32 |...X.0.72:.D:.52|
00005630: 32 30 30 AA 58 2C 44 3A 82 3A 8E 00 77 5E E4 0C |200.X,D:.:..w^..|
00005640: 97 35 34 32 37 37 2C 39 3A 97 35 34 32 37 38 2C |.54277,9:.54278,|
00005650: 30 3A 97 35 34 32 38 34 2C 39 3A 97 35 34 32 38 |0:.54284,9:.5428|
00005660: 35 2C 4F 3A 97 34 39 31 35 32 2C 31 37 3A 97 34 |5,O:.49152,17:.4|
00005670: 39 31 35 33 2C 31 37 00 B4 5E E9 0C 97 34 39 31 |9153,17..^...491|
00005680: 36 31 2C 35 30 3A 97 34 39 31 36 32 2C 32 35 3A |61,50:.49162,25:|
00005690: 97 35 34 32 39 36 2C 31 35 3A 97 34 39 31 36 36 |.54296,15:.49166|
000056A0: 2C 32 3A 9E 34 39 31 37 30 3A 97 35 34 32 39 36 |,2:.49170:.54296|
000056B0: 2C 30 3A 8E 00 D3 5E AC 0D 81 58 B2 30 A4 33 30 |,0:...^...X.0.30|
000056C0: 31 3A 87 44 3A 97 33 34 38 35 30 AA 58 2C 44 3A |1:.D:.34850.X,D:|
000056D0: 82 3A 8E 00 0E 5F B1 0D 83 31 37 33 2C 31 31 2C |.:..._...173,11,|
000056E0: 31 33 36 2C 31 34 31 2C 34 2C 32 31 32 2C 31 36 |136,141,4,212,16|
000056F0: 39 2C 32 35 35 2C 31 34 31 2C 31 30 2C 31 33 36 |9,255,141,10,136|
00005700: 2C 31 36 39 2C 31 35 2C 31 34 31 2C 32 34 00 48 |,169,15,141,24.H|
00005710: 5F B2 0D 83 32 31 32 2C 31 37 33 2C 31 36 2C 32 |_...212,173,16,2|
00005720: 30 38 2C 32 34 30 2C 35 2C 39 2C 31 36 2C 31 34 |08,240,5,9,16,14|
00005730: 31 2C 31 36 2C 32 30 38 2C 31 36 39 2C 32 30 33 |1,16,208,169,203|
00005740: 2C 31 34 31 2C 32 35 31 00 81 5F B3 0D 83 31 33 |,141,251.._...13|
00005750: 35 2C 31 37 33 2C 32 31 2C 32 30 38 2C 39 2C 31 |5,173,21,208,9,1|
00005760: 36 2C 31 34 31 2C 32 31 2C 32 30 38 2C 33 32 2C |6,141,21,208,32,|
00005770: 31 38 31 2C 31 33 36 2C 33 32 2C 31 32 2C 31 33 |181,136,32,12,13|
00005780: 37 00 BC 5F B4 0D 83 33 32 2C 31 38 31 2C 31 33 |7.._...32,181,13|
00005790: 36 2C 33 32 2C 31 32 2C 31 33 37 2C 33 32 2C 31 |6,32,12,137,32,1|
000057A0: 38 31 2C 31 33 36 2C 33 32 2C 31 32 2C 31 33 37 |81,136,32,12,137|
000057B0: 2C 31 36 39 2C 32 30 32 2C 31 34 31 00 F6 5F B5 |,169,202,141.._.|
000057C0: 0D 83 32 35 31 2C 31 33 35 2C 33 32 2C 31 38 31 |..251,135,32,181|
000057D0: 2C 31 33 36 2C 33 32 2C 31 32 2C 31 33 37 2C 33 |,136,32,12,137,3|
000057E0: 32 2C 31 38 31 2C 31 33 36 2C 33 32 2C 31 32 2C |2,181,136,32,12,|
000057F0: 31 33 37 2C 33 32 00 32 60 B6 0D 83 31 38 31 2C |137,32.2`...181,|
00005800: 31 33 36 2C 33 32 2C 31 32 2C 31 33 37 2C 31 36 |136,32,12,137,16|
00005810: 39 2C 32 30 31 2C 31 34 31 2C 32 35 31 2C 31 33 |9,201,141,251,13|
00005820: 35 2C 33 32 2C 31 38 31 2C 31 33 36 2C 33 32 2C |5,32,181,136,32,|
00005830: 31 32 00 6D 60 B7 0D 83 31 33 37 2C 33 32 2C 31 |12.m`...137,32,1|
00005840: 38 31 2C 31 33 36 2C 33 32 2C 31 32 2C 31 33 37 |81,136,32,12,137|
00005850: 2C 33 32 2C 31 38 31 2C 31 33 36 2C 33 32 2C 31 |,32,181,136,32,1|
00005860: 32 2C 31 33 37 2C 31 36 39 2C 32 30 35 00 A9 60 |2,137,169,205..`|
00005870: B8 0D 83 31 34 31 2C 32 35 31 2C 31 33 35 2C 33 |...141,251,135,3|
00005880: 32 2C 31 38 31 2C 31 33 36 2C 31 37 33 2C 38 2C |2,181,136,173,8,|
00005890: 32 30 38 2C 32 30 31 2C 31 35 2C 32 30 38 2C 32 |208,201,15,208,2|
000058A0: 34 36 2C 31 37 33 2C 31 36 00 E4 60 B9 0D 83 32 |46,173,16..`...2|
000058B0: 30 38 2C 34 31 2C 31 36 2C 32 30 38 2C 32 33 39 |08,41,16,208,239|
000058C0: 2C 31 37 33 2C 32 31 2C 32 30 38 2C 34 31 2C 32 |,173,21,208,41,2|
000058D0: 33 39 2C 31 34 31 2C 32 31 2C 32 30 38 2C 31 37 |39,141,21,208,17|
000058E0: 33 2C 31 31 00 1B 61 BA 0D 83 31 33 36 2C 34 31 |3,11..a...136,41|
000058F0: 2C 32 35 34 2C 31 34 31 2C 34 2C 32 31 32 2C 31 |,254,141,4,212,1|
00005900: 36 39 2C 30 2C 31 34 31 2C 34 2C 32 31 32 2C 39 |69,0,141,4,212,9|
00005910: 36 2C 33 32 2C 31 32 2C 31 33 37 00 59 61 BB 0D |6,32,12,137.Ya..|
00005920: 83 33 32 2C 35 30 2C 31 33 37 2C 31 36 39 2C 32 |.32,50,137,169,2|
00005930: 30 36 2C 31 34 31 2C 32 35 32 2C 31 33 35 2C 31 |06,141,252,135,1|
00005940: 37 33 2C 32 35 31 2C 31 33 35 2C 32 30 31 2C 32 |73,251,135,201,2|
00005950: 30 35 2C 32 30 38 2C 34 33 00 91 61 BC 0D 83 31 |05,208,43..a...1|
00005960: 37 33 2C 39 2C 32 30 30 2C 32 30 35 2C 36 2C 31 |73,9,200,205,6,1|
00005970: 33 36 2C 32 34 30 2C 34 34 2C 35 36 2C 31 37 33 |36,240,44,56,173|
00005980: 2C 38 2C 32 30 38 2C 32 33 33 2C 31 36 30 2C 31 |,8,208,233,160,1|
00005990: 36 00 C9 61 BD 0D 83 33 36 2C 31 37 33 2C 36 2C |6..a...36,173,6,|
000059A0: 31 33 36 2C 32 30 31 2C 34 39 2C 32 30 38 2C 36 |136,201,49,208,6|
000059B0: 2C 32 30 36 2C 39 2C 32 30 38 2C 37 36 2C 32 35 |,206,9,208,76,25|
000059C0: 31 2C 31 33 36 2C 31 37 33 00 FE 61 BE 0D 83 36 |1,136,173..a...6|
000059D0: 2C 31 33 36 2C 32 30 35 2C 39 2C 32 30 38 2C 34 |,136,205,9,208,4|
000059E0: 38 2C 36 2C 32 33 38 2C 39 2C 32 30 38 2C 37 36 |8,6,238,9,208,76|
000059F0: 2C 32 35 31 2C 31 33 36 2C 32 30 36 2C 39 00 36 |,251,136,206,9.6|
00005A00: 62 BF 0D 83 32 30 38 2C 37 36 2C 32 35 31 2C 31 |b...208,76,251,1|
00005A10: 33 36 2C 32 33 38 2C 39 2C 32 30 38 2C 32 30 36 |36,238,9,208,206|
00005A20: 2C 38 2C 32 30 38 2C 32 30 38 2C 33 2C 33 32 2C |,8,208,208,3,32,|
00005A30: 33 36 2C 31 33 37 00 72 62 C0 0D 83 33 32 2C 32 |36,137.rb...32,2|
00005A40: 34 2C 31 33 37 2C 31 36 39 2C 32 30 37 2C 31 34 |4,137,169,207,14|
00005A50: 31 2C 32 35 32 2C 31 33 35 2C 39 36 2C 31 37 34 |1,252,135,96,174|
00005A60: 2C 37 2C 31 33 36 2C 31 36 30 2C 31 32 37 2C 31 |,7,136,160,127,1|
00005A70: 33 36 00 B0 62 C1 0D 83 32 30 38 2C 32 35 33 2C |36..b...208,253,|
00005A80: 32 30 32 2C 32 30 38 2C 32 34 38 2C 39 36 2C 31 |202,208,248,96,1|
00005A90: 37 34 2C 38 2C 31 33 36 2C 31 36 30 2C 31 32 37 |74,8,136,160,127|
00005AA0: 2C 31 33 36 2C 32 30 38 2C 32 35 33 2C 32 30 32 |,136,208,253,202|
00005AB0: 00 EB 62 C2 0D 83 32 30 38 2C 32 34 38 2C 39 36 |..b...208,248,96|
00005AC0: 2C 31 37 33 2C 31 36 2C 32 30 38 2C 34 31 2C 32 |,173,16,208,41,2|
00005AD0: 33 39 2C 31 34 31 2C 31 36 2C 32 30 38 2C 31 36 |39,141,16,208,16|
00005AE0: 39 2C 32 35 35 2C 31 34 31 2C 38 00 24 63 C3 0D |9,255,141,8.$c..|
00005AF0: 83 32 30 38 2C 39 36 2C 31 37 33 2C 31 30 2C 31 |.208,96,173,10,1|
00005B00: 33 36 2C 34 31 2C 34 2C 32 34 30 2C 31 35 2C 32 |36,41,4,240,15,2|
00005B10: 34 2C 31 37 33 2C 31 30 2C 31 33 36 2C 31 30 36 |4,173,10,136,106|
00005B20: 2C 31 34 31 00 5E 63 C4 0D 83 31 30 2C 31 33 36 |,141.^c...10,136|
00005B30: 2C 31 37 33 2C 31 30 2C 31 33 36 2C 31 34 31 2C |,173,10,136,141,|
00005B40: 31 2C 32 31 32 2C 39 36 2C 31 36 39 2C 32 35 35 |1,212,96,169,255|
00005B50: 2C 31 34 31 2C 31 30 2C 31 33 36 2C 37 36 00 6A |,141,10,136,76.j|
00005B60: 63 C5 0D 83 35 30 2C 31 33 37 00 B3 63 A0 0F 99 |c...50,137..c...|
00005B70: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00005B80: 11 11 11 11 11 11 11 11 11 20 05 50 52 45 53 53 |......... .PRESS|
00005B90: 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 | ANY KEY TO CONT|
00005BA0: 49 4E 55 45 20 28 46 31 3D 52 45 56 45 52 53 45 |INUE (F1=REVERSE|
00005BB0: 29 91 22 00 BD 63 A1 0F 8D 39 32 3A 8E 00 EC 63 |)."..c...92:...c|
00005BC0: AA 0F 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |..."............|
00005BD0: 11 11 11 11 11 11 11 11 11 11 11 22 3B A3 37 29 |...........";.7)|
00005BE0: 22 9A B0 C0 C0 C0 C0 C0 C0 AE 05 22 00 20 64 AB |"..........". d.|
00005BF0: 0F 99 22 20 50 52 45 53 53 20 9A DD 05 52 45 54 |.." PRESS ...RET|
00005C00: 55 52 4E 9A DD 05 20 54 4F 20 52 55 4E 20 50 52 |URN... TO RUN PR|
00005C10: 4F 47 52 41 4D 20 28 46 31 3D 52 56 53 29 22 3B |OGRAM (F1=RVS)";|
00005C20: 00 54 64 AC 0F 99 22 20 20 20 20 20 20 20 20 9A |.Td..." .|
00005C30: AD C0 C0 C0 C0 C0 C0 BD 20 20 20 20 20 20 20 20 |........ |
00005C40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 05 91 | ..|
00005C50: 91 22 3A 8E 00 86 64 AE 0F 99 22 13 11 11 11 11 |.":...d...".....|
00005C60: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00005C70: 11 11 22 3B A3 37 29 22 20 20 20 20 20 20 20 20 |..";.7)" |
00005C80: 20 20 20 20 20 22 00 BA 64 AF 0F 99 22 20 20 20 | "..d..." |
00005C90: 20 20 20 20 05 50 52 45 53 53 20 53 50 41 43 45 | .PRESS SPACE|
00005CA0: 20 54 4F 20 56 49 45 57 20 4E 45 58 54 20 50 41 | TO VIEW NEXT PA|
00005CB0: 47 45 20 20 20 20 20 20 22 3B 00 DA 64 B0 0F 99 |GE ";..d...|
00005CC0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00005CD0: 20 20 20 20 20 20 20 91 91 22 00 E2 64 B1 0F 8D | .."..d...|
00005CE0: 39 32 00 13 65 B2 0F 8B 41 24 B3 B1 C7 28 33 32 |92..e...A$...(32|
00005CF0: 29 AF 41 24 B3 B1 C7 28 31 33 33 29 AF 41 24 B3 |).A$...(133).A$.|
00005D00: B1 C7 28 31 33 34 29 A7 8D 34 30 32 30 3A 89 34 |..(134)..4020:.4|
00005D10: 30 31 37 00 19 65 B3 0F 8E 00 32 65 B4 0F 97 35 |017..e....2e...5|
00005D20: 34 32 37 37 2C 31 35 3A 97 35 34 32 37 38 2C 31 |4277,15:.54278,1|
00005D30: 33 38 00 5F 65 BE 0F 97 35 34 32 37 32 2C 31 32 |38._e...54272,12|
00005D40: 3A 97 35 34 32 37 33 2C 31 32 38 3A 97 35 34 32 |:.54273,128:.542|
00005D50: 39 36 2C 31 35 3A 97 35 34 32 37 36 2C 31 37 00 |96,15:.54276,17.|
00005D60: 8A 65 C8 0F 81 54 B2 31 A4 33 30 30 3A 82 3A 97 |.e...T.1.300:.:.|
00005D70: 35 34 32 37 36 2C 31 36 3A 97 35 34 32 37 32 2C |54276,16:.54272,|
00005D80: 30 3A 97 35 34 32 37 33 2C 30 00 90 65 D2 0F 8E |0:.54273,0..e...|
00005D90: 00 C2 65 D3 0F 99 22 13 11 11 11 11 11 11 11 11 |..e...".........|
00005DA0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3B |..............";|
00005DB0: A3 37 29 22 20 20 20 20 20 20 20 20 20 20 20 20 |.7)" |
00005DC0: 20 22 00 FB 65 D4 0F 99 22 20 05 20 20 20 50 52 | "..e..." . PR|
00005DD0: 45 53 53 20 53 50 41 43 45 20 54 4F 20 56 49 45 |ESS SPACE TO VIE|
00005DE0: 57 20 4E 45 58 54 20 45 58 41 4D 50 4C 45 20 20 |W NEXT EXAMPLE |
00005DF0: 20 22 3B 3A 8D 34 30 31 36 3A 8E 00 32 66 D7 0F | ";:.4016:..2f..|
00005E00: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00005E10: 11 11 11 11 11 11 11 11 11 22 3B A3 37 29 22 20 |.........";.7)" |
00005E20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00005E30: 20 22 00 60 66 D8 0F 99 A3 37 29 22 20 20 20 20 | ".`f....7)" |
00005E40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00005E50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B | ";|
00005E60: 00 93 66 D9 0F 99 A3 37 29 22 20 20 20 20 05 20 |..f....7)" . |
00005E70: 20 50 52 45 53 53 20 53 50 41 43 45 20 54 4F 20 | PRESS SPACE TO |
00005E80: 56 49 45 57 20 4E 45 58 54 20 50 41 47 45 91 91 |VIEW NEXT PAGE..|
00005E90: 91 22 3B 00 9F 66 DA 0F 8D 34 30 31 37 3A 8E 00 |.";..f...4017:..|
00005EA0: A5 66 E6 0F 8F 00 CA 66 F0 0F 99 C7 28 31 34 37 |.f.....f....(147|
00005EB0: 29 3A 54 B2 31 3A 44 4E B2 30 3A 8F 20 54 3D 23 |):T.1:DN.0:. T=#|
00005EC0: 20 4F 46 20 54 4F 53 53 45 53 00 ED 66 FA 0F 44 | OF TOSSES..f..D|
00005ED0: 31 B2 B5 28 BB 28 31 29 AC 36 29 AA 31 3A 8F 20 |1..(.(1).6).1:. |
00005EE0: 44 31 3D 46 49 52 53 54 20 44 49 43 45 00 11 67 |D1=FIRST DICE..g|
00005EF0: 04 10 44 32 B2 B5 28 BB 28 31 29 AC 36 29 AA 31 |..D2..(.(1).6).1|
00005F00: 3A 8F 20 44 32 20 49 53 20 32 4E 44 20 44 49 43 |:. D2 IS 2ND DIC|
00005F10: 45 00 34 67 0E 10 44 54 B2 44 31 AA 44 32 3A 8F |E.4g..DT.D1.D2:.|
00005F20: 20 44 54 20 49 53 20 54 4F 54 41 4C 20 4F 46 20 | DT IS TOTAL OF |
00005F30: 44 49 43 45 00 59 67 13 10 99 22 44 31 3D 20 22 |DICE.Yg..."D1= "|
00005F40: 3B 44 31 2C 20 22 44 32 3D 20 22 3B 44 32 2C 20 |;D1, "D2= ";D2, |
00005F50: 22 44 54 3D 20 22 3B 44 54 00 77 67 18 10 8B 20 |"DT= ";DT.wg... |
00005F60: 44 54 B2 37 20 B0 20 44 54 B2 31 31 20 A7 20 CB |DT.7 . DT.11 . .|
00005F70: 20 A4 20 34 31 36 30 00 AC 67 22 10 8B 20 54 B2 | . 4160..g".. T.|
00005F80: 31 20 A7 44 4E B2 44 54 3A 99 20 22 20 20 20 20 |1 .DN.DT:. " |
00005F90: 20 20 20 20 54 41 52 47 45 54 3D 20 22 3B 44 4E | TARGET= ";DN|
00005FA0: 3A 54 B2 54 AA 31 3A 89 34 30 39 30 00 DB 67 2C |:T.T.1:.4090..g,|
00005FB0: 10 8B 20 44 54 B2 44 4E 20 A7 20 99 20 22 4D 41 |.. DT.DN . . "MA|
00005FC0: 54 43 48 2C 20 41 20 57 49 4E 4E 45 52 11 11 11 |TCH, A WINNER...|
00005FD0: 11 22 3A CB 20 A4 20 34 31 39 30 00 EE 67 36 10 |.":. . 4190..g6.|
00005FE0: 54 B2 54 AA 31 3A CB 20 A4 20 34 30 39 30 00 10 |T.T.1:. . 4090..|
00005FF0: 68 40 10 8B 54 B2 31 A7 20 99 44 54 3B 22 41 20 |h@..T.1. .DT;"A |
00006000: 57 49 4E 4E 45 52 11 11 11 22 3A 89 34 31 39 30 |WINNER...":.4190|
00006010: 00 35 68 4A 10 8B 44 54 B3 B1 44 4E 20 A7 99 44 |.5hJ..DT..DN ..D|
00006020: 54 3B 22 43 52 41 50 53 2C 20 41 20 4C 4F 53 45 |T;"CRAPS, A LOSE|
00006030: 52 11 11 11 22 00 51 68 5E 10 99 20 22 41 4E 4F |R...".Qh^.. "ANO|
00006040: 54 48 45 52 20 52 4F 4C 4C 3F 20 28 59 2F 4E 29 |THER ROLL? (Y/N)|
00006050: 22 00 68 68 68 10 A1 41 24 3A 20 8B 20 41 24 B2 |".hhh..A$: . A$.|
00006060: 22 22 A7 20 34 32 30 30 00 7D 68 72 10 8B 20 41 |"". 4200.}hr.. A|
00006070: 24 B3 B1 22 4E 22 20 A7 20 34 30 38 30 00 83 68 |$.."N" . 4080..h|
00006080: 7C 10 8E 00 AE 68 9C 13 81 58 B2 30 A4 39 38 3A ||....h...X.0.98:|
00006090: 87 44 2C 44 45 3A 97 35 30 30 30 30 AA 58 2C 44 |.D,DE:.50000.X,D|
000060A0: 3A 97 35 30 32 35 30 AA 58 2C 44 45 3A 82 00 D9 |:.50250.X,DE:...|
000060B0: 68 BA 13 81 58 B2 30 A4 35 38 3A 87 44 2C 44 45 |h...X.0.58:.D,DE|
000060C0: 3A 97 35 30 35 30 30 AA 58 2C 44 3A 97 35 30 37 |:.50500.X,D:.507|
000060D0: 35 30 AA 58 2C 44 45 3A 82 00 F5 68 64 14 81 58 |50.X,DE:...hd..X|
000060E0: B2 30 A4 39 37 3A 87 44 3A 97 35 32 30 30 30 AA |.0.97:.D:.52000.|
000060F0: 58 2C 44 3A 82 00 13 69 6E 14 81 58 B2 30 A4 35 |X,D:...in..X.0.5|
00006100: 38 3A 87 44 3A 97 35 32 32 30 30 AA 58 2C 44 3A |8:.D:.52200.X,D:|
00006110: 82 3A 8E 00 45 69 82 14 99 22 13 11 11 11 11 11 |.:..Ei..."......|
00006120: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00006130: 11 22 3B A3 37 29 22 20 20 20 9A B0 C0 C0 C0 C0 |.";.7)" ......|
00006140: C0 C0 AE 05 22 00 71 69 83 14 99 22 20 20 20 20 |....".qi..." |
00006150: 50 52 45 53 53 9A 20 DD 05 52 45 54 55 52 4E 9A |PRESS. ..RETURN.|
00006160: DD 05 20 54 4F 20 43 4F 4E 54 49 4E 55 45 20 22 |.. TO CONTINUE "|
00006170: 3B 00 9A 69 84 14 99 22 20 20 9A 20 20 20 20 20 |;..i..." . |
00006180: 20 20 20 20 20 20 20 20 20 20 20 20 AD C0 C0 C0 | ....|
00006190: C0 C0 C0 BD 20 91 91 22 3A 8E 00 CF 69 70 17 97 |.... ..":...ip..|
000061A0: 56 AA 30 2C 58 4D 3A 97 56 AA 31 2C 59 4D 3A 97 |V.0,XM:.V.1,YM:.|
000061B0: 56 AA 32 2C 58 4D AB 31 34 3A 97 56 AA 33 2C 59 |V.2,XM.14:.V.3,Y|
000061C0: 4D AA 31 39 3A 97 56 AA 34 2C 58 4D AA 31 36 00 |M.19:.V.4,XM.16.|
000061D0: F4 69 73 17 97 56 AA 35 2C 59 4D AA 32 31 3A 97 |.is..V.5,YM.21:.|
000061E0: 56 AA 36 2C 58 4D AB 31 36 3A 97 56 AA 37 2C 59 |V.6,XM.16:.V.7,Y|
000061F0: 4D AA 32 31 00 11 6A 75 17 97 56 AA 32 33 2C 32 |M.21..ju..V.23,2|
00006200: 3A 97 56 AA 32 39 2C 32 3A 97 56 AA 32 31 2C 31 |:.V.29,2:.V.21,1|
00006210: 35 00 17 6A 84 17 8E 00 30 6A 58 1B 47 4C B2 52 |5..j....0jX.GL.R|
00006220: 4F AC 38 AA 34 39 3A 97 33 34 38 32 32 2C 47 4C |O.8.49:.34822,GL|
00006230: 00 51 6A 62 1B 97 56 AA 38 2C C2 28 56 AA 36 29 |.Qjb..V.8,.(V.6)|
00006240: AA 32 3A 97 56 AA 39 2C C2 28 56 AA 37 29 AA 31 |.2:.V.9,.(V.7).1|
00006250: 30 00 71 6A 6C 1B 97 33 34 38 32 33 2C 33 3A 97 |0.qjl..34823,3:.|
00006260: 33 34 38 32 34 2C 33 3A 97 33 34 38 32 37 2C 33 |34824,3:.34827,3|
00006270: 33 00 91 6A 76 1B 97 35 34 32 37 37 2C 39 3A 97 |3..jv..54277,9:.|
00006280: 35 34 32 37 38 2C 36 34 3A 9E 33 34 38 35 30 3A |54278,64:.34850:|
00006290: 8E 00 A0 6A 80 1B 47 4C B2 52 4F AC 38 AA 34 39 |...j..GL.RO.8.49|
000062A0: 00 D3 6A 8A 1B 81 46 50 B2 30 A4 33 3A 97 33 34 |..j...FP.0.3:.34|
000062B0: 38 31 32 2C 32 30 36 3A 97 56 AA 39 2C C2 28 56 |812,206:.V.9,.(V|
000062C0: AA 39 29 AB 31 3A 97 56 AA 38 2C C2 28 56 AA 38 |.9).1:.V.8,.(V.8|
000062D0: 29 AB 31 00 E4 6A 8C 1B 97 33 34 38 31 32 2C 32 |).1..j...34812,2|
000062E0: 30 37 3A 82 00 F3 6A 8F 1B 97 33 34 38 31 31 2C |07:...j...34811,|
000062F0: 32 30 32 00 26 6B 94 1B 81 46 50 B2 30 A4 33 3A |202.&k...FP.0.3:|
00006300: 97 33 34 38 31 32 2C 32 30 36 3A 97 56 AA 39 2C |.34812,206:.V.9,|
00006310: C2 28 56 AA 39 29 AB 31 3A 97 56 AA 38 2C C2 28 |.(V.9).1:.V.8,.(|
00006320: 56 AA 38 29 AB 31 00 37 6B 99 1B 97 33 34 38 31 |V.8).1.7k...3481|
00006330: 32 2C 32 30 37 3A 82 00 46 6B 9E 1B 97 33 34 38 |2,207:..Fk...348|
00006340: 31 31 2C 32 30 31 00 7B 6B A3 1B 97 33 34 38 31 |11,201.{k...3481|
00006350: 32 2C 32 30 36 3A 8B C2 28 56 AA 38 29 AB 36 B3 |2,206:..(V.8).6.|
00006360: 30 A7 97 56 AA 31 36 2C C2 28 56 AA 31 36 29 AF |0..V.16,.(V.16).|
00006370: 31 35 3A 97 56 AA 38 2C 32 35 35 00 98 6B A8 1B |15:.V.8,255..k..|
00006380: 97 56 AA 38 2C C2 28 56 AA 38 29 AB 36 3A 97 33 |.V.8,.(V.8).6:.3|
00006390: 34 38 31 32 2C 32 30 37 00 C0 6B AD 1B 50 52 B2 |4812,207..k..PR.|
000063A0: C2 28 56 AA 39 29 3A 8B 50 52 B1 47 4C A7 97 56 |.(V.9):.PR.GL..V|
000063B0: AA 39 2C 50 52 AB 31 AA 32 AC 28 53 4C B2 34 29 |.9,PR.1.2.(SL.4)|
000063C0: 00 E8 6B AE 1B 50 52 B2 C2 28 56 AA 39 29 3A 8B |..k..PR..(V.9):.|
000063D0: 50 52 B3 47 4C A7 97 56 AA 39 2C 50 52 AA 31 AB |PR.GL..V.9,PR.1.|
000063E0: 32 AC 28 53 4C B2 34 29 00 FD 6B AF 1B 8B C2 28 |2.(SL.4)..k....(|
000063F0: 56 AA 38 29 B1 32 35 A7 89 37 30 37 35 00 17 6C |V.8).25..7075..l|
00006400: B0 1B 8B 28 C2 28 56 AA 31 36 29 AF 31 36 29 B1 |...(.(V.16).16).|
00006410: 30 A7 89 37 30 37 35 00 3E 6C B2 1B 97 56 AA 32 |0..7075.>l...V.2|
00006420: 31 2C C2 28 56 AA 32 31 29 AF 31 35 3A 97 33 34 |1,.(V.21).15:.34|
00006430: 38 31 31 2C 32 30 35 3A 53 4C B2 30 3A 8E 00 59 |811,205:SL.0:..Y|
00006440: 6C 40 1F 55 4C B2 31 30 32 34 AA 33 32 37 36 38 |l@.UL.1024.32768|
00006450: 3A 43 4C B2 35 35 32 39 36 00 6C 6C 4A 1F 43 50 |:CL.55296.llJ.CP|
00006460: B2 55 4C AA 43 58 AA 34 30 AC 43 59 00 7F 6C 4F |.UL.CX.40.CY..lO|
00006470: 1F 43 4F B2 43 4C AA 43 58 AA 34 30 AC 43 59 00 |.CO.CL.CX.40.CY.|
00006480: 91 6C 54 1F 97 43 50 2C 32 32 34 3A 97 43 4F 2C |.lT..CP,224:.CO,|
00006490: 31 00 A0 6C 5E 1F 81 54 B2 30 A4 31 30 30 3A 82 |1..l^..T.0.100:.|
000064A0: 00 B7 6C 68 1F 97 43 50 2C 33 32 3A 81 54 B2 30 |..lh..CP,32:.T.0|
000064B0: A4 35 30 3A 82 3A 8E 00 E0 6C 28 23 4E 4D B2 33 |.50:.:...l(#NM.3|
000064C0: 32 37 36 38 3A 81 58 B2 30 A4 36 32 3A 87 44 3A |2768:.X.0.62:.D:|
000064D0: 97 32 31 30 AC 36 34 AA 58 AA 4E 4D 2C 44 3A 82 |.210.64.X.NM,D:.|
000064E0: 00 00 6D 32 23 81 58 B2 30 A4 36 32 3A 87 44 3A |..m2#.X.0.62:.D:|
000064F0: 97 32 31 31 AC 36 34 AA 58 AA 4E 4D 2C 44 3A 82 |.211.64.X.NM,D:.|
00006500: 00 2D 6D 3C 23 81 5A 58 B2 32 30 30 A4 32 30 37 |.-m<#.ZX.200.207|
00006510: 3A 81 58 B2 30 A4 36 32 3A 87 44 3A 97 5A 58 AC |:.X.0.62:.D:.ZX.|
00006520: 36 34 AA 58 AA 4E 4D 2C 44 3A 82 3A 82 00 78 6D |64.X.NM,D:.:..xm|
00006530: 8C 23 83 30 2C 2C 2C 2C 34 32 2C 2C 2C 31 37 30 |.#.0,,,,42,,,170|
00006540: 2C 31 32 38 2C 31 37 30 2C 31 37 30 2C 31 32 38 |,128,170,170,128|
00006550: 2C 31 37 30 2C 31 37 30 2C 31 36 30 2C 33 2C 32 |,170,170,160,3,2|
00006560: 35 35 2C 32 34 30 2C 33 2C 36 30 2C 32 34 30 2C |55,240,3,60,240,|
00006570: 33 2C 36 30 2C 32 34 30 00 C5 6D A0 23 83 31 35 |3,60,240..m.#.15|
00006580: 2C 32 35 35 2C 32 35 32 2C 36 33 2C 32 30 37 2C |,255,252,63,207,|
00006590: 32 35 35 2C 36 33 2C 36 33 2C 32 35 35 2C 36 33 |255,63,63,255,63|
000065A0: 2C 32 30 37 2C 32 35 35 2C 36 33 2C 32 35 35 2C |,207,255,63,255,|
000065B0: 32 35 35 2C 31 32 2C 32 35 35 2C 36 30 2C 31 35 |255,12,255,60,15|
000065C0: 2C 2C 32 35 32 00 F2 6D AA 23 83 33 2C 32 35 35 |,,252..m.#.3,255|
000065D0: 2C 32 34 30 2C 2C 32 35 35 2C 31 39 32 2C 2C 36 |,240,,255,192,,6|
000065E0: 33 2C 2C 2C 36 30 2C 2C 2C 36 30 2C 2C 2C 36 30 |3,,,60,,,60,,,60|
000065F0: 2C 30 00 36 6E B4 23 83 30 2C 34 32 2C 30 2C 2C |,0.6n.#.0,42,0,,|
00006600: 34 32 2C 2C 2C 34 32 2C 2C 2C 34 32 2C 2C 2C 34 |42,,,42,,,42,,,4|
00006610: 32 2C 2C 2C 34 32 2C 2C 2C 34 32 2C 2C 2C 33 38 |2,,,42,,,42,,,38|
00006620: 2C 2C 2C 32 31 2C 2C 2C 33 38 2C 2C 2C 34 32 2C |,,,21,,,38,,,42,|
00006630: 2C 2C 34 32 2C 30 00 72 6E BE 23 83 30 2C 33 34 |,,42,0.rn.#.0,34|
00006640: 2C 2C 2C 33 34 2C 2C 2C 33 34 2C 2C 2C 33 34 2C |,,,34,,,34,,,34,|
00006650: 2C 2C 33 34 2C 2C 2C 33 34 2C 2C 2C 33 34 2C 30 |,,34,,,34,,,34,0|
00006660: 2C 30 2C 31 36 32 2C 31 32 38 2C 30 2C 38 31 2C |,0,162,128,0,81,|
00006670: 36 34 00 BA 6E D2 23 83 30 2C 2C 31 35 2C 2C 2C |64..n.#.0,,15,,,|
00006680: 33 31 2C 2C 2C 36 33 2C 2C 2C 31 32 37 2C 2C 2C |31,,,63,,,127,,,|
00006690: 32 35 35 2C 35 31 2C 31 2C 32 34 30 2C 32 31 39 |255,51,1,240,219|
000066A0: 2C 31 2C 32 34 30 2C 31 31 31 2C 33 2C 32 32 34 |,1,240,111,3,224|
000066B0: 2C 31 39 31 2C 33 2C 32 32 34 00 F5 6E DC 23 83 |,191,3,224..n.#.|
000066C0: 32 32 33 2C 37 2C 31 39 32 2C 31 32 37 2C 31 34 |223,7,192,127,14|
000066D0: 33 2C 31 39 32 2C 33 31 2C 32 32 33 2C 31 32 38 |3,192,31,223,128|
000066E0: 2C 33 2C 32 35 35 2C 2C 31 2C 32 35 34 2C 2C 2C |,3,255,,1,254,,,|
000066F0: 32 35 32 2C 30 00 0E 6F E6 23 83 30 2C 2C 2C 2C |252,0..o.#.0,,,,|
00006700: 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 30 00 52 |,,,,,,,,,,,,,0.R|
00006710: 6F FA 23 83 30 2C 2C 31 35 2C 2C 2C 33 31 2C 2C |o.#.0,,15,,,31,,|
00006720: 2C 36 33 2C 2C 2C 31 32 37 2C 2C 2C 32 35 35 2C |,63,,,127,,,255,|
00006730: 2C 31 2C 32 34 30 2C 2C 31 2C 32 34 30 2C 2C 33 |,1,240,,1,240,,3|
00006740: 2C 32 32 34 2C 2C 33 2C 32 32 34 2C 2C 37 2C 31 |,224,,3,224,,7,1|
00006750: 39 32 00 8F 6F 04 24 83 36 2C 37 2C 31 39 32 2C |92..o.$.6,7,192,|
00006760: 33 2C 31 35 2C 31 32 38 2C 33 31 2C 32 35 35 2C |3,15,128,31,255,|
00006770: 2C 33 2C 32 35 34 2C 2C 33 31 2C 32 35 33 2C 2C |,3,254,,31,253,,|
00006780: 33 2C 32 34 30 2C 2C 33 31 2C 31 32 38 2C 30 00 |3,240,,31,128,0.|
00006790: A2 6F 09 24 83 30 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C |.o.$.0,,,,,,,,,,|
000067A0: 2C 30 00 ED 6F 18 24 83 30 2C 2C 31 35 2C 2C 2C |,0..o.$.0,,15,,,|
000067B0: 33 31 2C 2C 2C 36 33 2C 2C 2C 31 32 37 2C 2C 2C |31,,,63,,,127,,,|
000067C0: 32 35 35 2C 2C 31 2C 32 34 30 2C 2C 31 2C 32 34 |255,,1,240,,1,24|
000067D0: 30 2C 2C 33 2C 32 32 34 2C 2C 33 2C 32 32 34 2C |0,,3,224,,3,224,|
000067E0: 2C 37 2C 31 39 32 2C 2C 37 2C 31 39 32 00 2E 70 |,7,192,,7,192..p|
000067F0: 22 24 83 30 2C 31 35 2C 31 32 38 2C 2C 33 31 2C |"$.0,15,128,,31,|
00006800: 2C 2C 32 35 35 2C 2C 33 2C 32 35 35 2C 2C 2C 32 |,,255,,3,255,,,2|
00006810: 35 35 2C 2C 31 2C 31 38 32 2C 2C 33 2C 31 30 38 |55,,1,182,,3,108|
00006820: 2C 2C 2C 32 31 36 2C 2C 2C 2C 2C 2C 2C 30 00 72 |,,,216,,,,,,,0.r|
00006830: 70 40 24 83 30 2C 2C 31 35 2C 2C 2C 33 31 2C 2C |p@$.0,,15,,,31,,|
00006840: 2C 36 33 2C 2C 2C 31 32 37 2C 2C 2C 32 35 35 2C |,63,,,127,,,255,|
00006850: 2C 31 2C 32 34 30 2C 2C 33 2C 32 34 30 2C 2C 33 |,1,240,,3,240,,3|
00006860: 2C 32 32 34 2C 2C 37 2C 31 39 32 2C 2C 37 2C 31 |,224,,7,192,,7,1|
00006870: 39 32 00 B7 70 4A 24 83 30 2C 37 2C 31 39 32 2C |92..pJ$.0,7,192,|
00006880: 2C 37 2C 31 39 32 2C 2C 37 2C 31 39 32 2C 2C 36 |,7,192,,7,192,,6|
00006890: 33 2C 32 32 34 2C 2C 31 31 31 2C 32 34 30 2C 2C |3,224,,111,240,,|
000068A0: 31 30 39 2C 31 37 36 2C 2C 31 33 2C 31 37 36 2C |109,176,,13,176,|
000068B0: 2C 31 33 2C 31 37 36 00 C7 70 54 24 83 30 2C 2C |,13,176..pT$.0,,|
000068C0: 2C 2C 2C 2C 2C 2C 30 00 0F 71 68 24 83 32 34 30 |,,,,,,0..qh$.240|
000068D0: 2C 2C 2C 32 34 38 2C 2C 2C 32 35 32 2C 2C 2C 32 |,,,248,,,252,,,2|
000068E0: 35 34 2C 2C 2C 32 35 35 2C 2C 2C 31 35 2C 31 32 |54,,,255,,,15,12|
000068F0: 38 2C 2C 37 2C 31 39 32 2C 2C 33 2C 32 32 34 2C |8,,7,192,,3,224,|
00006900: 2C 31 2C 32 34 30 2C 2C 31 2C 32 34 30 2C 30 00 |,1,240,,1,240,0.|
00006910: 53 71 72 24 83 31 2C 32 34 30 2C 2C 33 2C 32 32 |Sqr$.1,240,,3,22|
00006920: 34 2C 2C 37 2C 31 39 32 2C 2C 31 35 2C 31 32 38 |4,,7,192,,15,128|
00006930: 2C 2C 33 31 2C 2C 2C 36 32 2C 2C 2C 31 32 34 2C |,,31,,,62,,,124,|
00006940: 2C 2C 31 32 37 2C 31 32 38 2C 2C 36 33 2C 31 39 |,,127,128,,63,19|
00006950: 32 2C 30 00 64 71 7C 24 83 33 31 2C 31 32 38 2C |2,0.dq|$.31,128,|
00006960: 2C 2C 2C 30 00 A2 71 F4 24 83 30 2C 2C 31 35 2C |,,,0..q.$.0,,15,|
00006970: 2C 2C 33 31 2C 2C 2C 36 33 2C 2C 2C 31 32 37 2C |,,31,,,63,,,127,|
00006980: 2C 2C 32 35 35 2C 2C 31 2C 32 34 30 2C 2C 33 2C |,,255,,1,240,,3,|
00006990: 32 32 34 2C 2C 37 2C 31 39 32 2C 2C 31 35 2C 31 |224,,7,192,,15,1|
000069A0: 32 38 00 E5 71 08 25 83 30 2C 31 35 2C 31 32 38 |28..q.%.0,15,128|
000069B0: 2C 2C 31 35 2C 31 32 38 2C 2C 37 2C 31 39 32 2C |,,15,128,,7,192,|
000069C0: 2C 33 2C 32 32 34 2C 2C 31 2C 32 34 30 2C 2C 2C |,3,224,,1,240,,,|
000069D0: 32 34 38 2C 2C 2C 31 32 34 2C 2C 2C 36 32 2C 2C |248,,,124,,,62,,|
000069E0: 31 2C 32 35 34 00 FD 71 1C 25 83 30 2C 33 2C 32 |1,254..q.%.0,3,2|
000069F0: 35 32 2C 2C 31 2C 32 34 38 2C 2C 2C 30 00 3D 72 |52,,1,248,,,0.=r|
00006A00: 30 25 83 36 2C 2C 2C 36 2C 2C 2C 36 2C 2C 2C 36 |0%.6,,,6,,,6,,,6|
00006A10: 2C 2C 2C 36 2C 2C 2C 32 35 35 2C 32 34 30 2C 2C |,,,6,,,255,240,,|
00006A20: 32 35 35 2C 32 34 30 2C 2C 36 2C 2C 2C 36 2C 2C |255,240,,6,,,6,,|
00006A30: 2C 36 2C 2C 2C 36 2C 2C 2C 36 2C 2C 30 00 5F 72 |,6,,,6,,,6,,0._r|
00006A40: 3A 25 83 30 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C |:%.0,,,,,,,,,,,,|
00006A50: 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 30 00 |,,,,,,,,,,,,,,0.|
00006A60: 9A 72 58 25 83 31 39 32 2C 34 38 2C 2C 39 36 2C |.rX%.192,48,,96,|
00006A70: 39 36 2C 2C 34 38 2C 31 39 32 2C 2C 32 35 2C 31 |96,,48,192,,25,1|
00006A80: 32 38 2C 2C 31 35 2C 2C 2C 36 2C 2C 2C 31 35 2C |28,,15,,,6,,,15,|
00006A90: 2C 2C 32 35 2C 31 32 38 2C 30 00 B7 72 6C 25 83 |,,25,128,0..rl%.|
00006AA0: 34 38 2C 31 39 32 2C 2C 39 36 2C 39 36 2C 2C 31 |48,192,,96,96,,1|
00006AB0: 39 32 2C 34 38 2C 30 00 DC 72 76 25 83 30 2C 2C |92,48,0..rv%.0,,|
00006AC0: 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C |,,,,,,,,,,,,,,,,|
00006AD0: 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 30 00 19 73 0F |,,,,,,,,,,,0..s.|
00006AE0: 27 97 33 34 38 30 38 2C 32 31 30 3A 97 33 34 38 |'.34808,210:.348|
00006AF0: 30 39 2C 32 31 31 3A 97 33 34 38 31 30 2C 32 30 |09,211:.34810,20|
00006B00: 34 3A 97 33 34 38 31 31 2C 32 30 35 3A 97 33 34 |4:.34811,205:.34|
00006B10: 38 31 32 2C 32 30 37 3A 8E 00 65 73 10 27 83 31 |812,207:..es.'.1|
00006B20: 34 2C 31 30 37 2C 31 37 2C 33 37 2C 31 36 2C 34 |4,107,17,37,16,4|
00006B30: 37 2C 31 34 2C 31 30 37 2C 31 36 2C 34 37 2C 31 |7,14,107,16,47,1|
00006B40: 39 2C 36 33 2C 31 37 2C 33 37 2C 32 38 2C 32 31 |9,63,17,37,28,21|
00006B50: 34 2C 32 35 2C 31 37 37 2C 32 34 2C 36 33 2C 32 |4,25,177,24,63,2|
00006B60: 31 2C 31 35 34 00 AE 73 1A 27 83 31 39 2C 36 33 |1,154..s.'.19,63|
00006B70: 2C 31 37 2C 33 37 2C 31 36 2C 34 37 2C 31 39 2C |,17,37,16,47,19,|
00006B80: 36 33 2C 31 37 2C 33 37 2C 31 36 2C 34 37 2C 31 |63,17,37,16,47,1|
00006B90: 37 2C 33 37 2C 32 31 2C 31 35 34 2C 31 39 2C 36 |7,37,21,154,19,6|
00006BA0: 33 2C 33 32 2C 39 34 2C 32 38 2C 32 31 34 00 FA |3,32,94,28,214..|
00006BB0: 73 24 27 83 32 35 2C 31 37 37 2C 32 34 2C 36 33 |s$'.25,177,24,63|
00006BC0: 2C 32 31 2C 31 35 34 2C 31 39 2C 36 33 2C 31 37 |,21,154,19,63,17|
00006BD0: 2C 33 37 2C 32 38 2C 32 31 34 2C 32 35 2C 31 37 |,37,28,214,25,17|
00006BE0: 37 2C 32 34 2C 36 33 2C 32 31 2C 31 35 34 2C 31 |7,24,63,21,154,1|
00006BF0: 39 2C 36 33 2C 31 37 2C 33 37 00 45 74 2E 27 83 |9,63,17,37.Et.'.|
00006C00: 31 36 2C 34 37 2C 32 35 2C 31 37 37 2C 32 34 2C |16,47,25,177,24,|
00006C10: 36 33 2C 32 31 2C 31 35 34 2C 31 39 2C 36 33 2C |63,21,154,19,63,|
00006C20: 31 37 2C 33 37 2C 31 36 2C 34 37 2C 31 34 2C 31 |17,37,16,47,14,1|
00006C30: 30 37 2C 39 2C 31 35 39 2C 31 30 2C 32 30 35 2C |07,9,159,10,205,|
00006C40: 31 32 2C 33 32 00 90 74 38 27 83 31 32 2C 32 31 |12,32..t8'.12,21|
00006C50: 36 2C 31 34 2C 31 30 37 2C 31 36 2C 34 37 2C 31 |6,14,107,16,47,1|
00006C60: 37 2C 33 37 2C 31 36 2C 34 37 2C 31 37 2C 33 37 |7,37,16,47,17,37|
00006C70: 2C 31 39 2C 36 33 2C 31 37 2C 33 37 2C 31 34 2C |,19,63,17,37,14,|
00006C80: 31 30 37 2C 31 36 2C 34 37 2C 31 32 2C 32 31 36 |107,16,47,12,216|
00006C90: 00 DD 74 42 27 83 31 34 2C 31 30 37 2C 31 32 2C |..tB'.14,107,12,|
00006CA0: 32 31 36 2C 31 34 2C 31 30 37 2C 31 36 2C 34 37 |216,14,107,16,47|
00006CB0: 2C 31 32 2C 32 31 36 2C 32 35 2C 31 37 37 2C 31 |,12,216,25,177,1|
00006CC0: 39 2C 36 33 2C 31 39 2C 36 33 2C 31 36 2C 34 37 |9,63,19,63,16,47|
00006CD0: 2C 31 36 2C 34 37 2C 31 32 2C 32 31 36 00 27 75 |,16,47,12,216.'u|
00006CE0: 4C 27 83 31 37 2C 33 37 2C 31 36 2C 34 37 2C 31 |L'.17,37,16,47,1|
00006CF0: 34 2C 31 30 37 2C 31 36 2C 34 37 2C 31 37 2C 33 |4,107,16,47,17,3|
00006D00: 37 2C 31 34 2C 31 30 37 2C 31 39 2C 36 33 2C 32 |7,14,107,19,63,2|
00006D10: 31 2C 31 35 34 2C 31 39 2C 36 33 2C 31 36 2C 34 |1,154,19,63,16,4|
00006D20: 37 2C 31 37 2C 33 37 00 6F 75 56 27 83 31 34 2C |7,17,37.ouV'.14,|
00006D30: 31 30 37 2C 31 32 2C 32 31 36 2C 31 34 2C 31 30 |107,12,216,14,10|
00006D40: 37 2C 31 32 2C 32 31 36 2C 31 34 2C 31 30 37 2C |7,12,216,14,107,|
00006D50: 31 36 2C 34 37 2C 31 37 2C 33 37 2C 32 31 2C 31 |16,47,17,37,21,1|
00006D60: 35 34 2C 31 39 2C 36 33 2C 32 31 2C 31 35 34 00 |54,19,63,21,154.|
00006D70: BB 75 60 27 83 32 34 2C 36 33 2C 32 35 2C 31 37 |.u`'.24,63,25,17|
00006D80: 37 2C 31 39 2C 36 33 2C 32 31 2C 31 35 34 2C 31 |7,19,63,21,154,1|
00006D90: 37 2C 33 37 2C 31 36 2C 34 37 2C 31 39 2C 36 33 |7,37,16,47,19,63|
00006DA0: 2C 31 37 2C 33 37 2C 31 34 2C 31 30 37 2C 31 34 |,17,37,14,107,14|
00006DB0: 2C 31 30 37 2C 31 32 2C 32 31 36 00 C8 75 6A 27 |,107,12,216..uj'|
00006DC0: 83 32 35 35 2C 32 35 35 00 14 76 74 27 83 36 2C |.255,255..vt'.6,|
00006DD0: 31 36 2C 34 2C 32 30 38 2C 36 2C 31 36 2C 34 2C |16,4,208,6,16,4,|
00006DE0: 32 30 38 2C 36 2C 31 30 38 2C 34 2C 32 30 38 2C |208,6,108,4,208,|
00006DF0: 36 2C 31 30 38 2C 34 2C 32 30 38 2C 37 2C 35 33 |6,108,4,208,7,53|
00006E00: 2C 2C 2C 36 2C 31 30 38 2C 34 2C 32 30 38 2C 36 |,,,6,108,4,208,6|
00006E10: 2C 31 30 38 00 5E 76 7E 27 83 34 2C 32 30 38 2C |,108.^v~'.4,208,|
00006E20: 37 2C 35 33 2C 34 2C 32 30 38 2C 37 2C 35 33 2C |7,53,4,208,7,53,|
00006E30: 34 2C 32 30 38 2C 38 2C 32 33 2C 2C 2C 37 2C 35 |4,208,8,23,,,7,5|
00006E40: 33 2C 2C 2C 36 2C 31 36 2C 36 2C 31 30 38 2C 2C |3,,,6,16,6,108,,|
00006E50: 2C 35 2C 31 30 33 2C 36 2C 31 36 2C 2C 30 00 A4 |,5,103,6,16,,0..|
00006E60: 76 88 27 83 36 2C 31 30 38 2C 38 2C 31 34 37 2C |v.'.6,108,8,147,|
00006E70: 38 2C 32 33 2C 2C 2C 37 2C 35 33 2C 36 2C 31 30 |8,23,,,7,53,6,10|
00006E80: 38 2C 36 2C 31 36 2C 2C 2C 36 2C 31 30 38 2C 39 |8,6,16,,,6,108,9|
00006E90: 2C 31 35 39 2C 38 2C 32 33 2C 39 2C 31 35 39 2C |,159,8,23,9,159,|
00006EA0: 38 2C 32 33 00 EE 76 92 27 83 31 31 2C 31 31 34 |8,23..v.'.11,114|
00006EB0: 2C 39 2C 31 35 39 2C 31 31 2C 31 31 34 2C 36 2C |,9,159,11,114,6,|
00006EC0: 31 30 38 2C 31 30 2C 32 30 35 2C 38 2C 31 34 37 |108,10,205,8,147|
00006ED0: 2C 31 30 2C 32 30 35 2C 36 2C 31 30 38 2C 38 2C |,10,205,6,108,8,|
00006EE0: 31 34 37 2C 37 2C 35 33 2C 38 2C 31 34 37 00 1B |147,7,53,8,147..|
00006EF0: 77 9C 27 83 38 2C 32 33 2C 38 2C 31 34 37 2C 39 |w.'.8,23,8,147,9|
00006F00: 2C 31 35 39 2C 34 2C 32 30 38 2C 36 2C 31 30 38 |,159,4,208,6,108|
00006F10: 2C 34 2C 32 30 38 2C 33 2C 35 34 00 64 77 D8 27 |,4,208,3,54.dw.'|
00006F20: 83 34 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 |.4,1,1,1,1,1,1,1|
00006F30: 2C 31 2C 31 2C 31 2C 31 2C 31 2C 34 2C 31 2C 31 |,1,1,1,1,1,4,1,1|
00006F40: 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 |,1,1,1,1,1,1,1,1|
00006F50: 2C 31 2C 31 2C 32 2C 31 2C 31 2C 31 2C 31 2C 31 |,1,1,2,1,1,1,1,1|
00006F60: 2C 31 2C 32 00 AB 77 E2 27 83 31 2C 31 2C 31 2C |,1,2..w.'.1,1,1,|
00006F70: 31 2C 31 2C 31 2C 32 2C 31 2C 31 2C 31 2C 31 2C |1,1,1,2,1,1,1,1,|
00006F80: 31 2C 31 2C 32 2C 31 2C 31 2C 31 2C 31 2C 31 2C |1,1,2,1,1,1,1,1,|
00006F90: 31 2C 34 2C 31 2C 31 2C 31 2C 31 2C 32 2C 31 2C |1,4,1,1,1,1,2,1,|
00006FA0: 31 2C 31 2C 31 2C 31 2C 31 2C 34 00 EE 77 EC 27 |1,1,1,1,1,4..w.'|
00006FB0: 83 31 2C 31 2C 31 2C 31 2C 32 2C 31 2C 31 2C 31 |.1,1,1,1,2,1,1,1|
00006FC0: 2C 31 2C 31 2C 31 2C 34 2C 31 2C 31 2C 31 2C 31 |,1,1,1,4,1,1,1,1|
00006FD0: 2C 34 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 |,4,1,1,1,1,1,1,1|
00006FE0: 2C 31 2C 31 2C 31 2C 31 2C 31 2C 34 2C 32 00 3A |,1,1,1,1,1,4,2.:|
00006FF0: 78 F6 27 83 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C |x.'.1,1,1,1,1,1,|
00007000: 31 2C 31 2C 32 2C 36 2C 31 2C 31 2C 31 2C 31 2C |1,1,2,6,1,1,1,1,|
00007010: 31 2C 31 2C 31 2C 31 2C 32 2C 36 2C 32 2C 34 2C |1,1,1,1,2,6,2,4,|
00007020: 32 2C 32 2C 34 2C 32 2C 32 2C 31 34 2C 34 2C 34 |2,2,4,2,2,14,4,4|
00007030: 2C 32 2C 36 2C 34 2C 34 2C 32 00 6F 78 00 28 83 |,2,6,4,4,2.ox.(.|
00007040: 36 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C |6,1,1,1,1,1,1,1,|
00007050: 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C 31 2C |1,1,1,1,1,1,1,1,|
00007060: 31 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 00 |1,2,2,2,2,2,2,2.|
00007070: 7F 78 F8 2A 99 22 13 11 11 11 11 11 11 11 22 00 |.x.*."........".|
00007080: AF 78 0C 2B 99 22 20 20 20 20 20 20 20 20 20 20 |.x.+." |
00007090: 20 20 20 12 9E BF BF BF BF BF BF BF BF BF BF BF | .............|
000070A0: BF BF BF BF BF BF BF BF BF BF BF BF BF BF BF 00 |................|
000070B0: DE 78 16 2B 99 22 20 20 20 20 20 20 20 20 20 20 |.x.+." |
000070C0: 20 20 12 9E BF BF BF BF BF BF BF BF 1D 1D 1D 1D | ..............|
000070D0: 1D 1D 1D 1D 1D 1D 1D BF BF BF BF BF BF BF 00 0D |................|
000070E0: 79 20 2B 99 22 20 20 20 20 20 20 20 20 20 20 20 |y +." |
000070F0: 12 05 B0 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................|
00007100: B2 B2 B2 B2 AE 9E BF BF BF BF BF BF BF 00 3C 79 |..............<y|
00007110: 2A 2B 99 22 20 20 20 20 20 20 20 20 20 20 12 9E |*+." ..|
00007120: BF 05 AB DB B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 |................|
00007130: B1 B1 B1 DB B3 9E BF BF BF BF BF BF 00 6B 79 34 |.............ky4|
00007140: 2B 99 22 20 20 20 20 20 20 20 20 20 12 BF BF 05 |+." ....|
00007150: AB B3 9E BF BF BF BF 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00007160: 1D 1D 05 AB B3 9E BF BF BF BF BF 00 99 79 3E 2B |.............y>+|
00007170: 99 22 20 20 20 20 20 20 20 20 12 BF BF BF 05 AB |." ......|
00007180: B3 9E BF BF BF 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00007190: BF 05 AB B3 9E BF BF BF BF 00 CA 79 48 2B 99 22 |...........yH+."|
000071A0: 20 20 20 20 20 20 20 12 BF BF BF BF 05 AB B3 9E | .........|
000071B0: BF BF 1D 1D 92 1C A2 A2 A2 20 20 20 20 20 20 12 |......... .|
000071C0: 9E BF BF 05 AB B3 9E BF BF BF 00 FA 79 52 2B 99 |............yR+.|
000071D0: 22 20 20 20 20 20 20 12 BF BF BF BF BF 05 AB B3 |" .........|
000071E0: 9E BF 92 1C 20 20 CE 20 20 CE 20 20 20 20 20 12 |.... . . .|
000071F0: 9E BF BF BF 05 AB B3 9E BF BF 00 25 7A 5C 2B 99 |...........%z\+.|
00007200: 22 20 20 20 20 20 12 BF BF BF BF BF BF BF BF 1D |" ..........|
00007210: 1D 1C A9 20 20 20 92 20 20 20 20 20 12 9E BF BF |... . ....|
00007220: BF BF BF BF BF 00 50 7A 66 2B 99 22 20 20 20 20 |......Pzf+." |
00007230: 12 BF BF BF BF BF BF BF BF 1D 1D 1C A9 D1 20 20 |.............. |
00007240: 92 90 D7 12 1D 1D 1D 1D 9E BF BF BF BF BF BF BF |................|
00007250: 00 79 7A 70 2B 99 22 20 20 20 12 BF BF BF BF BF |.yzp+." ......|
00007260: BF BF BF 1D 1D 1C A9 CE CE 20 92 A9 20 20 20 20 |......... .. |
00007270: 12 9E BF BF BF BF BF BF BF 00 A1 7A 7A 2B 99 22 |...........zz+."|
00007280: 20 20 20 12 BF BF BF BF BF BF BF 1D 1D 1C A9 20 | ............ |
00007290: 20 20 92 A9 20 20 20 20 12 9E BF BF BF BF BF BF | .. ........|
000072A0: BF 00 C9 7A 84 2B 99 22 20 20 20 12 BF BF BF BF |...z.+." .....|
000072B0: BF BF 1D 1D 1D 1C C0 C0 C0 92 90 D7 20 20 20 20 |............ |
000072C0: 12 9E BF BF BF BF BF BF BF 00 F0 7A 8E 2B 99 22 |...........z.+."|
000072D0: 20 20 20 12 BF BF BF BF BF 92 20 20 20 20 20 20 | ....... |
000072E0: 20 20 20 20 20 12 BF BF BF BF BF BF BF 22 3A 8E | ........":.|
000072F0: 00 2E 7B E0 2E 97 35 34 32 39 36 2C 30 3A 97 56 |..{...54296,0:.V|
00007300: AA 32 31 2C 30 3A 97 42 43 2C 34 3A 97 4D 43 2C |.21,0:.BC,4:.MC,|
00007310: 31 31 3A 99 22 93 05 11 20 20 20 20 20 20 20 20 |11:."... |
00007320: 20 20 20 20 20 20 20 49 4E 44 45 58 20 22 00 4E | INDEX ".N|
00007330: 7B EA 2E 99 22 11 20 20 20 20 20 31 29 20 20 20 |{...". 1) |
00007340: 20 49 4E 54 52 4F 44 55 43 54 49 4F 4E 22 00 70 | INTRODUCTION".p|
00007350: 7B F4 2E 99 22 20 20 20 20 20 32 29 20 20 20 20 |{..." 2) |
00007360: 49 4E 50 55 54 20 53 54 41 54 45 4D 45 4E 54 22 |INPUT STATEMENT"|
00007370: 00 90 7B FE 2E 99 22 20 20 20 20 20 33 29 20 20 |..{..." 3) |
00007380: 20 20 47 45 54 20 53 54 41 54 45 4D 45 4E 54 22 | GET STATEMENT"|
00007390: 00 BB 7B 08 2F 99 22 20 20 20 20 20 34 29 20 20 |..{./." 4) |
000073A0: 20 20 52 45 41 44 20 41 4E 44 20 44 41 54 41 20 | READ AND DATA |
000073B0: 53 54 41 54 45 4D 45 4E 54 53 22 00 E9 7B 12 2F |STATEMENTS"..{./|
000073C0: 99 22 20 20 20 20 20 35 29 20 20 20 20 47 4F 53 |." 5) GOS|
000073D0: 55 42 20 41 4E 44 20 52 45 54 55 52 4E 20 53 54 |UB AND RETURN ST|
000073E0: 41 54 45 4D 45 4E 54 53 22 00 0D 7C 1C 2F 99 22 |ATEMENTS"..|./."|
000073F0: 20 20 20 20 20 36 29 20 20 20 20 4E 55 4D 45 52 | 6) NUMER|
00007400: 49 43 20 46 55 4E 43 54 49 4F 4E 53 22 00 37 7C |IC FUNCTIONS".7||
00007410: 26 2F 99 22 20 20 20 20 20 37 29 20 20 20 20 52 |&/." 7) R|
00007420: 41 4E 44 4F 4D 20 4E 55 4D 45 52 49 43 20 46 55 |ANDOM NUMERIC FU|
00007430: 4E 43 54 49 4F 4E 22 00 54 7C 30 2F 99 22 20 20 |NCTION".T|0/." |
00007440: 20 20 20 38 29 20 20 20 20 41 53 43 49 49 20 43 | 8) ASCII C|
00007450: 4F 44 45 22 00 7E 7C 3A 2F 99 22 20 20 20 20 20 |ODE".~|:/." |
00007460: 39 29 20 20 20 20 43 48 52 24 28 58 29 20 53 54 |9) CHR$(X) ST|
00007470: 52 49 4E 47 20 46 55 4E 43 54 49 4F 4E 22 00 A6 |RING FUNCTION"..|
00007480: 7C 44 2F 99 22 20 20 20 20 31 30 29 20 20 20 20 ||D/." 10) |
00007490: 55 53 49 4E 47 20 43 48 52 24 28 58 29 20 53 54 |USING CHR$(X) ST|
000074A0: 52 49 4E 47 53 22 00 CE 7C 4E 2F 99 22 20 20 20 |RINGS"..|N/." |
000074B0: 20 31 31 29 20 20 20 20 50 45 45 4B 20 4E 55 4D | 11) PEEK NUM|
000074C0: 45 52 49 43 20 46 55 4E 43 54 49 4F 4E 22 00 EF |ERIC FUNCTION"..|
000074D0: 7C 58 2F 99 22 20 20 20 20 31 32 29 20 20 20 20 ||X/." 12) |
000074E0: 50 4F 4B 45 20 53 54 41 54 45 4D 45 4E 54 22 00 |POKE STATEMENT".|
000074F0: 1C 7D 62 2F 99 22 20 20 20 20 31 33 29 20 20 20 |.}b/." 13) |
00007500: 20 53 43 52 45 45 4E 20 42 4F 52 44 45 52 20 26 | SCREEN BORDER &|
00007510: 20 42 41 43 4B 47 52 4F 55 4E 44 22 00 40 7D 6C | BACKGROUND".@}l|
00007520: 2F 99 22 20 20 20 20 31 34 29 20 20 20 20 53 43 |/." 14) SC|
00007530: 52 45 45 4E 20 4D 45 4D 4F 52 59 20 4D 41 50 22 |REEN MEMORY MAP"|
00007540: 00 6A 7D 71 2F 99 22 20 20 20 20 31 35 29 20 20 |.j}q/." 15) |
00007550: 20 20 53 43 52 45 45 4E 20 43 4F 4C 4F 52 20 4D | SCREEN COLOR M|
00007560: 45 4D 4F 52 59 20 4D 41 50 22 00 90 7D 76 2F 99 |EMORY MAP"..}v/.|
00007570: 22 20 20 20 20 31 36 29 20 20 20 20 47 41 4D 45 |" 16) GAME|
00007580: 53 20 46 4F 52 20 45 4E 4A 4F 59 4D 45 4E 54 22 |S FOR ENJOYMENT"|
00007590: 00 B0 7D 80 2F 99 22 20 20 20 20 31 37 29 20 20 |..}./." 17) |
000075A0: 20 20 43 4F 4E 43 4C 55 53 49 4F 4E 11 11 11 22 | CONCLUSION..."|
000075B0: 00 E4 7D 0C 30 85 22 20 20 20 20 20 20 20 45 4E |..}.0." EN|
000075C0: 54 45 52 20 50 41 47 45 20 23 20 28 51 3D 51 55 |TER PAGE # (Q=QU|
000075D0: 49 54 29 22 3B 41 24 3A 8B 41 24 B2 22 51 22 89 |IT)";A$:.A$."Q".|
000075E0: 31 39 35 35 00 14 7E 16 30 41 B2 C5 28 41 24 29 |1955..~.0A..(A$)|
000075F0: 3A 8B 41 B3 31 B0 41 B1 31 37 A7 31 32 30 30 30 |:.A.1.A.17.12000|
00007600: 3A 8B 41 B1 31 35 A7 41 B2 41 AB 31 35 3A 89 31 |:.A.15.A.A.15:.1|
00007610: 32 33 33 30 00 31 7E 1B 30 8B 41 B1 31 35 AF 41 |2330.1~.0.A.15.A|
00007620: B3 31 38 A7 41 B2 41 AB 31 35 3A 89 31 32 33 33 |.18.A.A.15:.1233|
00007630: 30 00 45 7E 20 30 8B 41 B2 30 AF 41 B3 31 38 A7 |0.E~ 0.A.0.A.18.|
00007640: 31 32 30 30 30 00 8E 7E 25 30 91 41 89 31 30 30 |12000..~%0.A.100|
00007650: 2C 32 30 30 2C 33 30 30 2C 34 30 30 2C 35 30 30 |,200,300,400,500|
00007660: 2C 36 30 30 2C 37 30 30 2C 38 30 30 2C 39 30 30 |,600,700,800,900|
00007670: 2C 31 30 30 30 2C 31 31 30 30 2C 31 32 30 30 2C |,1000,1100,1200,|
00007680: 31 33 30 30 2C 31 34 30 30 2C 31 36 30 30 00 9F |1300,1400,1600..|
00007690: 7E 2A 30 91 41 89 31 37 30 30 2C 31 39 30 30 00 |~*0.A.1700,1900.|
000076A0: 00 00 |.. |
.. ...WA.33:WB.33:ZD.15:.808,225.^....56
578,B(56578).3:.56576,(B(56576).252).1:.
648,132:.649,1......54296,0:.L.54272.542
96:.L,0:.:L..(.TI).....BC.53280:.BC,8:MC
.53281:.MC,11.V....".":V.53248:.V.21,0:.
V.23,0:.V.29,0......V.40,14:.V.41,1:.V.4
2,1:.V.28,3:.V.39,8:.V.38,1:.V.37,0.3...
.V.33,7:.V.43,7:.V.32,9:.40.N.(.UL.1024.
32768:CL.55296.V.).."... MICRO MANI
AC PRESENTS.."...+.." .. U...I U.IU.I
...... .. .. ......P.-.." .. ..... ..
.... ...... .. .. ......../.." .. ...
.. ...... .. ..... ....&.1.." ..
..... ...... .. ..... ....S.3.." .
. .. .. .. .. .. .. .. ........5.
." .. .. .. .. .. .. .. .. .....
....7...9)"U...I U...I .. ...A.9...
9)"..... ....K .. .....=...9)".. ..
... ....I ........?...9)".. .. ... ...
.. ......!.A...9)"..... ..... .
..A.C...9)"J...K J...K ...U.D...
16)".VOLUME 4.I.E...16)".(C) 1983.~.G...
15)".BROKEN BY...I...14)".MICRO MANIAC".
..K..S1.0..3000:S1.1...L..3300:.3500.F.M
..9000...N..MC,11:.V.21,0:.198,0:.".....
AT ANY POINT IN THIS PROGRAM,".<.
P..".YOU MAY PUSH ANY OF THE FOLLOWING K
EYS".K.Q..".. .F1. TO VIEW THE PRE
VIOUS PAGE"...R..". .F3. TO VIEW T
HE INDEX OR QUIT"...S..". .S. TO
STOP A SONG"...T.."... THIS VOLUME COV
ERS ADVANCED BASIC"...U..". AND WILL REQ
UIRE 30 MINUTES TO COMPLETE".2.X..4000:.
A.78,12000.;.[..100.J.\.A.0:.198,0.A.]..
A$:.A$.G(133).A.1.T.^..A$.G(134).A.2..._
..CU.0..8000...`..A$."".93...A.CU.0:..K.
D..V.21,0:XM.30:YM.171:.V.16,31:.BC,2:.M
C,5...I.."... HI! WELCOME BACK! IN T
HIS VOLUME.".(.N.." WE WILL DISCUSS
ADVANCED BASIC.".J.S.." COMMANDS, INCLUD
ING COLOR AND GRAPHICS.":.11000:.".":.40
00.Z....A.78,12000...H..V.21,0:XM.30:YM.
171:.V.16,31:.BC,14:.MC,11.N.L.."...
***********"...M.."
* . INPUT . *"...O.." **
*********.".].P..". INPUT IS USED TO IN
PUT NEW DATA INTO . .
...."...W..". A RUNNING PROGRAM. AFTER
TYPING THE"......" . ......
........". DATA, PRESS. ..RETURN... TO
ENTER DATA . .........".
....." AND CONTINUE..":.6000.P....".EXA
MPLE #1 ...
......."......"10 PRINT ";G(34);"WHAT IS
YOUR AGE";G(34);";"......"20 INPUT A:RE
M NUMERIC DATA"......"30 ? ";G(34);"YOUR
AGE IS ";G(34);";A":."RUN":.4010.....CU
.1:CX.3:CY.18:.92:.A.100,12000. ....A$..
G(13)..4020:.263.6...RO.19:.7000:.5250.H
....".....................WHAT IS YOUR A
GE";:.A$......E(A$).110.E(A$).2..4020:.2
72.....RO.20:.7000:."YOUR AGE IS ";A$.R.
...".READY....":.4051:.A.100,12000......
"...............EXAMPLE #2.".3...."10 IN
PUT";G(34);"YOUR NAME";G(34);";A$:REM ST
RING DATA "......"20 ? ";G(34);"HELLO ";
G(34);";A$ ":."RUN
".R...." ":."
":." ":.".
...."......4010...!.CU.1:CX.3:CY.17
:.92:.A.100,12000...#..A$..G(13)..4020:.
289.Z.&.RO.18:.7000:.5250:."............
........";:."YOUR NAME";A$.V.(.."HELLO "
;A$:.".READY."...+..4014:.A.100,12000...
,..V.21,0:XM.48:YM.171:.V.16,31:.BC,7:.M
C,11...0..".. ***********".
..1.." * . GET. *".#.3..
" ***********".U.6..". GET
IS USED TO GET DATA ONE CHARACTER
. ... . ...........;..".AT
A TIME. DO NOT PRESS. ..RETURN... BECAUS
E".T.<..". ......
..."...@..". I DO NOT STOP THE PROGRAM.
IF YOU WANT.".4.E.." ME TO WAIT UNTIL A
KEY IS PRESSED, AN.".`.O.." EXTRA STATEM
ENT IS REQUIRED..":.6000...R..".EXAMPLE
#1 ........
..".S.S..".10 ?";G(34);"HOW MANY QUARTS
DO YOU HAVE?";G(34)...T.."20 GET A:P=A*2
:IFA<1 THEN 20".?.Y.."30 ? A;";G(34);"QU
ARTS EQUALS";G(34);";";"P;";G(34);"PINTS
";G(34).P.^.."RUN":.4010.U.H.CU.1:CX.3:C
Y.18:.92:.A.200,12000...M..A$..G(13)..40
20:.360...R.RO.19:.7000.H.S..".....HOW M
ANY QUARTS DO YOU HAVE?"...T..A$:A.E(A$)
:.A.1.372...U.P.A.2...W..A;"QUARTS EQUAL
S";P;"PINTS"...Y..".READY.":.4051:.A.200
,12000.P.|.."...............EXAMPLE #2."
...~.."10 ?";G(34);"WHAT IS YOUR FAVORIT
E LETTER?";G(34)......"20 GET A$: IF A$=
";G(34);G(34);"THEN 20 "......"30 ? A$
;";G(34);" IS YOUR FAVORITE LETTER.";G(3
4).=...."RUN":."
":." ".R.
...". ":.4010.W...CU.1:CX.3:CY.18:.
92:.A.200,12000......A$..G(13)..4020:.39
1.G...RO.19:.7000:.".....WHAT IS YOUR FA
VORITE LETTER?"...... A$:.A$."".397.....
.A$.G(13)..4020:.397.6....A$;" IS YOUR F
AVORITE LETTER..":."READY.":.4014:.A.200
,12000.E....V.21,0:XM.234:YM.171:.V.16,0
:.BC,8:.MC,11......".. ******
*********"......" * .READ .*.
DATA. *".T...." ************
***"......" . READ AND DATA ARE USED TO
ENTER LONG.".3...." LISTS OF DATA INTO
A PROGRAM. I READ".C...."
. ...."......". THE
VALUES FROM THE DATA STATEMENTS .
....."......" ONE AT
A TIME. COMMAS ARE USED TO."......" SE
PARATE PIECES OF DATA..":.6000.6....".EX
AMPLE":."10 FOR X=0 TO 2":."2O READ L"._
...."30 ?";G(34);"L=";G(34);";L:NEXT X".
....."40 DATA 5,10,15":."RUN":.4010.....
CU.1:CX.3:CY.18:.92:.A.300,12000.B....A$
..G(13)..4020:.440.....RO.19:.7000:."...
..L=5":RO.20:.7000:.".L=10":RO.21:.7000:
.".L=15". .A.." ".D.B.."R
EADY....":.4055:.A.300,12000.K....V.21,0
:XM.72:YM.171:.V.16,0:.BC,6......"...
******************"......"
* .GOSUB .* .RETURN .*"......"
******************."......".GOSUB IS
USED WHEN ONE TASK IS REPEATED. ..... "
.I....".SEVERAL TIMES THROUGHOUT THE PRO
GRAM. I."......"WILL GO TO THE SUBROUTIN
E AT THE . .. ...."...
..."SPECIFIED LINE NUMBER. WHEN I RECEI
VE."......"THE RETURN COMMAND, I WILL RE
TURN TO THE . ......."......"STATEMENT
AFTER GOSUB.":.6000.L...."....GOSUB
RETURN".E....XM.72.
237.3:.6000:...&..XM.237.72..3:.6000:..
..+..4000:.A.400,12000.E.X..V.21,0:XM.30
:YM.171:.V.16,31:.BC,7:.MC,11...].."...T
O SIMPLIFY PROGRAMMING, I HAVE SEVERAL."
.(.`.."BUILT IN NUMERIC FUNCTIONS. FOR E
XAMPLE,".X.B.."MY INTEGER FUNCTION IS US
ED TO ELIMINATE"...G.."FRACTIONS. THESE
ARE MORE OF MY NUMERIC"...L.."FUNCTIONS
..":.6000.K.Q.." ABS(X)--ABSOLUTE
VALUE OF X"...S.." COS(X)--COSINE
OF X".. U.." SIN(X)--SINE OF X IN
RADIANS".@ W.." SQR(X)--SQUARE ROO
T OF X.".{ {..".EXAMPLE #1
..........".. ..."10 X=4
.95:Y=8.26".F ..."20 ? INT(X);INT(Y):REM
INTEGER":."RUN":.4010.. ..CU.1:CX.3:CY.
20:.92:.A.500,12000..!...A$..G(13)..4020
:.655.6!..RO.21:.7000:."... 4 8":."
"..!..."READY.
. PRESS SPACE TO
VIEW NEXT EXA";..!..."MPLE...":.4017..!
... PRINT" . PRESS SPACE TO VIEW NEXT
EXAMPLE ... ";:GOSUB4017.."..."........
..........EXAMPLE #2.". "..."10 X=9
".K"..."20 ? SQR(X);SQR(16)
".H"..."RUN":." ":.4010
.."..CU.1:CX.3:CY.20:.92:.A.500,12000.."
...A$..G(13)..4020:.693.."..RO.21:.7000:
."... 3 4":." "..#.
.."READY....":.4055:.A.500,12000./#...V.
21,0:XM.30:YM.171:.V.16,31:.BC,5:.MC,11.
B#A.."... RND(1) IS A NUMERIC FUNCTION T
HAT WILL."..#C.." GENERATE A RANDOM NUMB
ER BETWEEN 0 & 1."..#E.." TO GET A RAN
DOM NUMBER BETWEEN 2."..#G.." NUMBER
S, USE THIS FORMULA:.."..$I.." N=INT(
RND(1)*(HIGH-LOW+1)+(LOW))":.6000.U$K.."
..EXAMPLE #1
..........".L$N.."10 FOR X=0 TO 2"..$Q
.."20 ? RND(1):NEXT"..$U.."RUN":.4010..$
..CU.1:CX.3:CY.16:.92:.A.600,12000.T$...
A$..G(13)..4020:.733..$..RO.17:.7000:.".
......."..%...X.0.2:..(1):..%%...".READY
.":.4051:.A.600,12000.F%...".":."..EXAMP
LE #2 .....
....."..%..."10 REM TRY YOUR LUCK AT CRA
PS"..%..."20 ?CHR$(147):T=1:DN=0:REM T=#
OF TOSSES"..%...".30 D1=INT(RND(1)*6)+1
:REM D1=FIRST DICE"..&..."40 D2=INT(RND(
1)*6)+1:REM D2 IS 2ND DICE".G&...".50 DT
=D1+D2:REM DT IS TOTAL OF DICE"..&..."60
?";G(34);"D1= ";G(34);";D1, ";G(34);"D2
= ";G(34);";D2, ";..&...G(34);"DT= ";G(3
4);";DT".R&..."70 IF DT=7 OR DT=11 THEN
GO TO 110"..'..."80 IF T=1 THEN DN=DT:?
";G(34);" TARGET= ";.*'...G(34);"
; DN:T=T+1:GOTO30".U'..."90 IF DT=DN THE
N ? ";G(34);"MATCH, A WINNER....";G(34);
":GO TO 130";..'...":REM DN=TARGET"..'..
."100 T=T+1:GO TO 30:REM ANOTHER TOSS"..
'..."110 IFT=1THEN ?DT;";G(34);"A WINNER
...";G(34);":GOTO130".2(..."120 IFDT<>DN
THEN?DT:";G(34);"CRAPS, A LOSER...";G(3
4).C(...".130 ? ";G(34);"ANOTHER ROLL? (
Y/N)";G(34)..(..."140 GETA$: IF A$=";G(3
4);G(34);"THEN 140".A(..."150 IF A$<>";G
(34);"N";G(34);" THEN 10"..(..."160 END"
:."RUN":.4010..)..CU.1:CX.3:CY.20:.92:.A
.700,12000..)...A$..G(13)..4020:.796.&).
..4070.U) ..V.21,0:XM.40:YM.171:.V.16,31
:.BC,9:.MC,11..)%..".... EVERY SYMBO
L IN MY CHARACTER SET ."..)(.." CORRESPO
NDS TO A NUMBER. THIS SET OF."..)*.."
NUMBERS, WHICH INCLUDES MY KEYBOARD.".-*
-.."CONTROLS, IS THE ASCII CODE (ASK-KEY
2). . ......".S*2.." TO
OBTAIN THE CODE FOR ANY CHARACTER,
. ....."..*6.." USE THE AS
C(";G(34);"X";G(34);") STRING FUNCTION."
.T*9.." . .........":.6000..+>
..".EXAMPLE
.......".G+C.."10 ? ASC(";G(34);G(14
7);G(34);"):REM SHIFT-CLR/HOME".{+F.."20
? ASC(";G(34);G(193);G(34);"):REM SHIFT
-A"..+M.."30 ? ASC(";G(34);G(61);G(34);"
):REM EQUAL SIGN".B+R.."RUN":.4010..+Z.C
U.1:CX.3:CY.18:.92:.A.700,12000..,_..A$.
.G(13)..4020:.858..,A.RO.19:.7000.5,F.."
.....................";F(".")._,K..F("A"
):.F("="):." "..,P.."RE
ADY..":.4055:.A.700,12000..,...V.21,0:XM
.25:YM.151:.V.16,31:.BC,14:.MC,11..-..."
... TO OBTAIN THE CHARACTER FROM THE
. ..........".P-..."
ASCII CODE, USE THE CHR$(X) STRING
. ........".~-..."
FUNCTIONS. THE ASCII CODE NUMBERS.".L
-..." ARE 0 THROUGH 255.
. . ...."....
..6000:."..EXAMPLE #1
..........".0...."10 ? CHR$(1
93):REM SHIFT-A".T...."20 ? CHR$(61):REM
EQUAL SIGN".U...."30 ? CHR$(191):REM CO
MM-B"......"RUN":.4010.....SL.0:CU.1:CX.
3:CY.16:.92:.A.800,12000.J....A$..G(13).
.4020:.948../..RO.CY.1:.7000:.".........
.........":.G(193):.G(61):.G(191).+/E.."
.READY.":.4014:.A.800,12000.`/...V.21,0:
XM.30:YM.141:SL.4:.V.16,31:.BC,10:.MC,11
../...".. IN A PRINT STATEMENT, THE CHR$
FUNCTION".B/..." OF A CONTROL KEY WILL
PERFORM THE SAME."../..." AS THE CONTROL
KEY IN DIRECT MODE..."..0...".10 ? CHR$
(147);:REM SHIFT-CLR/HOME".10..."20 FOR
X=0 TO 2"._0..."30 ?CHRS(5);:GOSUB110:RE
M CTRL-2 WHITE"..0..."40 ?CHRS(28);:GOSU
B110:REM CTRL-3 RED"..0..."50 ?CHRS(159)
;:GOSUB110:REM CTRL-4 CYAN"..0..."60?CHR
S(156);:GOSUB110:REM CTRL-5 PURPLE"..1..
.".70 ?CHRS(30);:GOSUB110:REM CTRL-6 GRE
EN".I1..."80 ?CHRS(31);:GOSUB110:REM CTR
L-7 BLUE".Y1$.."90?CHRS(158);:GOSUB110:R
EM CTRL-8 YELLOW"..1)..".100 NEXT X:END"
..1..."110 ?";G(34);"SSSSSSSSSSSSSSSSSSS
SSSSSSSSSSSSSSSSSSSSS";G(34);";:RETURN".
.13.."RUN":.4010..28.CU.1:CX.3:CY.19:.92
:.A.900,12000.02;..A$..G(13)..4020:.1080
.:2<..6000.P2=.RO.0:.7000:SL.0:.V.21,0:.
G(147);:.V.21,0:.V.33,11.{2>..X.0.2..2?.
.G(5);:.1099:.G(28);:.1099:.G(159);:.109
9.X2A..G(156);:.1099:.G(30);:.1099:.G(31
);:.1099..2C..G(158);:.1099:...3E..".REA
DY.":.4000:.A.1000,12000..3J..1100.M3K..
"SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS
S";:..|3L..V.21,0:XM.60:YM.171:.V.16,31:
.BC,5:.MC,11..3Q.."...MY MEMORY IS DIVID
ED INTO 65,536 BLOCKS."..3T.." EACH BLO
CK HAS A SPECIFIC LOCATION OR.".!4V.."
ADDRESS. PEEK IS A NUMERIC FUNCTION .
....... .....".`4[.." TO PEEK, OR L
OOK, AT DATA CONTAINED . .... . "
..4`.." IN A SPECIFIC ADDRESS.".
.4..."..........".B4..." 0 1 2
3 4 5 6 7..4...". ...........
......................".+5..." . .47..
.55.. .0. ..170...177...145...179... 34
..".X5...". ..........................
......."..5..." .. 0. .. 0. .. 0. . .7
6... 0. .. 0. .. 0. .. 4. .".A5...". .
................................"..5..."
. 8 9 10 11 12 13 14 15...5
...6000.+6...".10 ? ";G(34);"PEEK(0)=";G
(34);";:? PEEK(0),"._6 .."20 ? ";G(34);"
PEEK(15)=";G(34);";:? PEEK(15)".P6..."RU
N":.4010..6..CU.1:CX.3:CY.20:.92:.A.1000
,12000..6...A$..G(13)..4020:.1189.C6..RO
.CY.1:.7000..6..."......................
.PEEK(0)= 47",..7..."PEEK(15)= 4".*7..."
.READY. ..":.4055:.A.1000,12000.Z7...
V.21,0:XM.35:YM.171:.V.16,31:.BC,14:.MC,
11.Y7..."...";.14);"************"..7....
14);"* . POKE . *"..7....14);"********
****."..7D..". POKE IS USED TO PUT A NU
MBER INTO A . .... ....".$
8I.." SPECIFIED ADDRESS. FOR EXAMPLE,
IF.".M8N.." ADDRESS 650 IS POKED WITH 2
00, THEN . ...... "..8
S.." ANY KEY WILL REPEAT IF HELD DOWN..
.":.6000:.".10 POKE 650,200"..8..."20 ?
";G(34);"WOULD YOU LIKE TO TRY?";G(34):.
"RUN":.4010..9..CU.1:CX.3:CY.16:.92:.A.1
100,12000.49...A$..G(13)..4020:.1260.B9.
.RO.CY.1:.7000:.5250:.".................
."..9...650,200:."WOULD YOU LIKE TO TRY"
;A$:.650,0.A9...V.21,0:XM.58:YM.165:.V.1
6,31:.MC,11:.BC,9..9..."...THE VALUE STO
RED IN ADDRESS 53281 TELLS.".D:!.."ME TH
E SCREEN BACKGROUND COLOR. ADDRESS .
...... .......... ......".S:%.."53280
TELLS ME THE SCREEN BORDER COLOR."..:'.
." . ...... ...... ....
..".K:).."THESE ARE THE VALUES TO POKE I
N."..:-.."FOR COLORS..":.6000..;2.." 0-B
LACK 6-BLUE 11-DARK GRAY".=;7.."
1-WHITE 7-YELLOW 12-MEDIUM GRAY".J;
<.." 2-RED 8-ORANGE 13-LIGHT GREE
N"..;A.." 3-CYAN 9-BROWN 14-LIGHT
BLUE".B;F.." 4-PURPLE 10-LIGHT RED 15-L
IGHT GRAY".S;K.." 5-GREEN."..;P..".10 FO
R X= 0 TO 15:?CHRS(147);"..<U.."20 POKE
53281,X:POKE53280,15-X".I<Z.."30 ? ";G(3
4);G(19);G(17);G(17);G(17);"WOW";G(34);"
:REM CURSOR DOWN"..<].."40 FOR T=1 TO 10
0:NEXT:NEXT"..<_.."RUN":.4010.C<D.CU.1:C
X.3:CY.22:.92:.A.1200,12000..<H..A$..G(1
3)..4020:.1380..<J.RO.0:SL.4:.7000:SL.0.
3=L.. X.0.15:.".";:.53281,X:.53280,15.X:
."....WOW":.T.1.500.M=M..:.:."..READY.":
.".";.E=N..4000:.A.1300,12000..=X..V.21,
0:XM.57:YM.165:.V.16,31:.BC,4:.MC,11.D=}
..".. MY SCREEN CAN HOLD 1000 CHARACTE
RS."..=..." (40 COLUMNS BY 25 ROWS). SCR
EEN MEMORY.".$>..."IS NORMALLY ADDRESSES
1024 THROUGH 2023.".T>..." ANY CHARA
CTER CAN BE POKED INTO A .
......"..>..." SPECIFIED S
CREEN ADDRESS. ALSO, YOU.".S>..." MU
ST SPECIFY CHARACTER COLOR..":.6000..?..
.".10 REM SCREEN MEMORY MAP":."20 FOR X=
0 TO 999".I? .."30POKE 1024+X,207:REM 20
7 IS SCREEN CODE REVERSE-SHIFT-O".S?..."
40POKE 55296+X,1:REMCOLOR IS WHITE"..?..
."50 NEXT":."RUN":.4010..?..CU.1:CX.3:CY
.18:.92:.A.1300,12000.P?...A$..G(13)..40
20:.1460..?..RO.0:SL.4:.7000:SL.0:.V.21,
0..@H..X.0.999:.33792.X,207:.55296.X,1 :
..H@..."..";:.V.21,0:XM.50:YM.171:.V.16,
31:.BC,6.I@...33891,231:.55296.99,9:."."
;..@...".O<1024.........................
...1063>".C@...".............
"..@..."................ SCRE
EN MEMORY MAP "..A...".......... .....
............ ".GA... ".
".WA...".. USE THI
S EQUATION TO PLOT ANY POINT. "..A...".
".U
A...". P=1024+(X POSITION)+40*(Y POSITI
ON) "..B... ".
".4B...".ADDRESS 1024 IS THE
TOP LEFT OF SCREEN".DB... ".
"..B...".
FOR EXAMPLE, THE RED BOX IS IN ".DB..
. "..
"..B...". COLUMN 19 & ROW 2. USING TH
E EQUATION".#C... ".
".FC...". P=1024 +
19 + (40 * 2)=1123. ":.4000:.A.1400
,12000..C@..V.21,0:XM.40:YM.151:.V.16,31
:.BC,3:.MC,11.WCE.."... THE COLOR OF E
ACH CHARACTER ON THE . ..... .".
.DJ.." SCREEN IS CONTROLLED BY COLOR MEM
ORY..".5DO.." ADDRESS 55296 THROUGH 562
95 TELLS ME."..DT.." THE COLOR OF THE C
HARACTER IN ADDRESS. ..... .. ...
.........."..DY.." 1024 THROUGH 2023, R
ESPECTIVELY..":.6000..D^..".EXAMPLE
.......".8EA
.."10 C=0:REM C IS FOR COLOR":."20 FOR X
=0 TO 999":."30 POKE 1024+X,207".EM.."4
0 POKE 55296+X,C:REMCHANGE COLOR":."50 I
F C=15 THEN C=0:GOTO70"..ER.."60 C=C+1":
."70 NEXT":."RUN":.4010.ME..CU.1:CX.3:CY
.20:.92:.A.1400,12000..E...A$..G(13)..40
20:.1665..F..RO.0:SL.4:.7000:SL.0..F..J.
0..F...X.0.999:.33792.X,207:.55296.X,J.B
F...J.15.J.0:.1695.LF..J.J.1.NF...:.V.21
,0:.4000:.A.1600,12000..F...V.21,0:XM.55
:YM.168:.V.16,31:.BC,4:.MC,11.OF..."..YO
U CAN NOW FORM GAMES FOR YOUR PLEASURE".
.F..." CONSIDER THIS!!.":.600
0.?G...".10 ? CHR$(147);?";G(34);"WOULD
YOU LIKE TO FLIP A COIN?";G(34).KG..."20
GET A$:IFA$=";G(34);G(34);"THEN20"..GB.
."30 IFA$=";G(34);"N";G(34);"THEN END".A
GL.."40 ? ";G(34);"HEADS OR TAILS?";G(34
)..HQ.."50 GET C$:IF C$<> ";G(34);"H"G(3
4);"AND C$<> ";G(34);"T";G(34);..HT.."TH
EN50".RHV.."60 X=INT(RND(1)*(2)+1):IFX=1
THEN?";G(34);"HEADS";G(34).~H...".70 IF
X=2 THEN?";G(34);"TAILS";G(34)..H..."80
IFX=1 AND C$=";G(34);"H";G(34);"THEN GOS
UB100:GOTO 10"..H...".90 IFX=2 AND C$=";
G(34);"T";G(34);"THEN GOSUB100:GOTO 10".
FI...".95 ? ";G(34);"YOU'RE A GOOD SPORT
!";G(34);":FORT=1TO1000:NEXT";.WI...": G
OTO 10".XI..."100 ? CHR$(147):? ";G(34);
..I...X.0.10:.G(17);:.:." W
INNER!";G(34).PI..."110 FORX=1TO14:POKE
53280,X"..I..."120 POKE 53281,15-X". J..
."130 FORT=1TO200:NEXT:NEXT:RETURN":."RU
N":.4010.FJ..CU.1:CX.3:CY.21:.92:.A.1600
,12000.AJ...A$..G(13)..4020:.1805.ZJ!.RO
.0:SL.4:.7000:SL.0..J&..".":."WOULD YOU
LIKE TO FLIP A COIN?"..J+.. C$:.C$."".18
35.MJ0..C$."N". .1900..J5.."HEADS OR TAI
LS?"..K:.. C$:. C$.. "H". C$.. "T".1850.
(K?.X..(.(1).2).1:. X.1.."HEADS".:KA..X.
2.."TAILS".VKD..X.1.C$."H"..1875:.1830.S
KI..X.2.C$."T". .1875:.1830..KL.. "YOU'R
E A GOOD SPORT!!":.T.1.1000:.:.1830.ZKS.
.G(147):.X.0.10:.G(17);:.:."
WINNER!"..K]..X.1.14:. 53280,X..L_.. 5
3281,14.X..LB..T.1.200:.:.:..ILL..V.21,0
:XM.45:YM.171:.V.16,31:.BC,2:.MC,6:ZD.10
0.{LQ.."... EACH PROGRAMMING EXERCISE HA
S SEVERAL."..LV.." SOLUTIONS. TRY TO CH
OOSE THE SHORTEST.".YL{.." AND SIMPLEST
SOLUTION. YOU HAVE NOW."..L..." COMPLET
ED VOLUME 4....."..M..." YOU A
RE READY FOR.".EM..." I AM THE C-
64 VOLUME 5".DM..." (SPRIT
ES)".YM...ID.0..5020:ID.1..M...54277,9:.
54278,0:.54284,9:.54285,0:.54296,15:.491
66,2:.49152,33..M...49153,33:.49161,112:
.49162,20:.49170:.54296,0:.198,0.AN...".
....................... PRESS ANY KEY
TO QUIT (F1=REVERSE)":.92.SN...A.1700,12
000..N...198,0:.".....DO YOU WANT TO QUI
T? (Y/N)"..N...A$:.A$."".1956..N...A$.."
Y".12000.QNO..56578,63:.56576,151:.648,4
:.808,237..NP.V.53248:.MC,11:."....."..O
Z.." PRESS .5. TO LOAD VOLUME 5.".?
O..." PRESS .6. TO LOAD VOLUME 6.".
EO..." PRESS .Q. TO QUIT......."..O
..."LOAD "G(34)"VOLUME 5"G(34)",8....";.
.O...A$:.1717,224:.X.0.50:.:.1717,32:.X.
0.40:...O ..E(A$)..5.E(A$)..6.A$.."Q".20
60..O*..A$."Q"..".":...PH..A$:."....":..
#P..W0.54276:W1.54283:D.500.VPG..X.0.477
:.D:.49170.X,D:.:.X.49152.49169:.X,0:...
PH..X.O.110:.D,DE:.50000.X,D:.50250.X,DE
:...PJ..J.0.72:.D,DE:.50500.J,D:.50750.J
,DE:...PL..76,21,192,169,,141,6,192,169,
,141,7,192,169,0..QM..141,8,192,234,174,
6,192,189,80,195,141,1,212,189,74.QQN..1
96,141,,212,189,32,203,141,3,192,169,1,1
41,11,192..QO..173,,192,141,4,212,234,17
3,14,192,41,2,240,33,174.AQP..7,192,189,
68,197,141,8,212,189,62,198,141,7,212,18
9..QQ..232,203,141,4,192,169,1,141,12,19
2,173,1,192,141,11.3RR..212,234,173,14,1
92,41,4,240,37,174,8,192,189,56,199.ORS.
.141,15,212,189,50,200,141,14,212,189,17
6,204,141,5,192..RT..169,1,141,13,192,17
3,2,192,141,18,212,234,234,234,234..RU..
234,32,216,193,174,6,192,189,32,203,201,
255,208,1,96..SV..206,3,192,208,3,32,98,
193,173,14,192,41,2,240,8.OSW..206,4,192
,208,3,32,140,193,173,14,192,41,4,240,8.
.SX..206,5,192,208,3,32,178,193,165,203,
201,13,208,25,173..SY..,192,41,254,141,4
,212,173,1,192,41,254,141,11,212..SZ..17
3,2,192,41,254,141,18,212,96,173,15,192,
240,3,32.7T...239,193,174,10,192,160,255
,136,208,253,202,208,248,173,11.PT...192
,208,19,174,6,192,189,80,195,240,11,169,
1,141,11..T...192,173,,192,141,4,212,173
,12,192,208,19,174,7,192..T...189,68,197
,240,11,169,1,141,12,192,173,1,192,141,1
1..U...212,173,13,192,208,11,169,1,141,1
3,192,173,2,192,141.UU...18,212,174,6,19
2,189,80,195,201,255,240,3,76,154,192..U
...169,,141,24,212,169,,141,4,212,169,,1
41,11,212..U...169,,141,18,212,96,173,,1
92,41,254,141,4,212,169..U...,141,11,192
,238,6,192,174,6,192,189,80,195,201,255.
0V...240,15,141,1,212,189,74,196,141,,21
2,189,32,203,141.FV...3,192,96,173,1,192
,41,254,141,11,212,169,,141,12..V...192,
238,7,192,174,7,192,189,68,197,141,8,212
,189,62.XV...198,141,7,212,189,232,203,1
41,4,192,96,173,2,192,41..W...254,141,18
,212,169,,141,13,192,238,8,192,174,8,192
.MW...189,56,199,141,15,212,189,50,200,1
41,14,212,189,176,204..W...141,5,192,96,
174,9,192,160,127,136,208,253,202,208,24
8..W...174,9,192,160,127,136,208,253,202
,208,248,96,96.DW.....X...45,198,38,126,
30,141,28,214,34,75,30,141,22,227,,,22,2
27,25,177..X...25,177,28,214.DX...28,214
,30,141,,,22,227,25,177,25,177,28,214,28
,214,30,141,,,38,126..X...34,75,22,227,2
1,154,30,141,28,214,22,227,,,22,227,25,1
77,24,63,25,177..X...28,214,22,227,,,22,
227,25,177,24,63,25,177,24,63,25,177,28,
214,22,227.DY...45,198,45,198,38,126,38,
126,32,94,32,94,,,25,177,34,75,25,177,38
,126..Y...25,177,40,200,,,40,200,40,200,
34,75,34,75,28,214,28,214,,,22,227.OY...
30,141,22,227,34,75,22,227,38,126,,,45,1
98,38,126,30,141,28,214..Z...34,75,30,14
1,22,227,,,22,227,25,177,25,177,28,214,2
8,214,30,141,,0.BZ...22,227,25,177,25,17
7,28,214,28,214,30,141,,,30,141,34,75,30
,141,34,75..Z...38,126,30,141,,,30,141,3
4,75,32,94,34,75,32,94,34,75,38,126,30,1
41,255,255..Z!..0,,15,70,17,37,19,63,,,1
9,63,20,100,20,100,17,37,17,37,15,70,,0.
?[&..19,63,20,100,20,100,17,37,17,37,15,
70,,,15,70,14,107,12,216,11,114.|[+..0,,
14,107,15,70,17,37,19,63,,,14,107,15,70,
17,37,22,227.D[5..0,0,12,216,11,114,10,6
0,8,23,8,147,,,11,114,10,60,9,159,7,53,7
,163..\:..0,,15,70,17,37,19,63,,,19,63,1
0,60,10,60,17,37,17,37,15,70,,,19,63.N\D
..10,60,10,60,17,37,17,37,15,70,,,9,159,
10,60,11,114,12,216,,0.M\F..9,159,20,100
,11,114,7,163..\N..2,2,2,2,2,2,2,2,2,2,2
,2,2,4,2,2,2,2,2,2,4,2,2,2,2,2,2,2,2,2,2
,2,2,2,2,4..]S..2,2,1,1,1,1,2,2,6,2,2,2,
2,2,4,2,2,2,2,2,2,4,2,2,2,2,2,2,4,2,2,2,
2,2,2,4.R]X..2,2,2,2,2,2,2,2,2,2,2,2,2,2
,4,2,2,2,2,2,2,4,2,2,2,2,2,2,4,2,2,1,1,1
,1.]]]..2,2,6..]G..2,4,4,4,2,2,2,2,2,2,4
,2,2,2,2,2,2,4,2,2,4,4,4,2,2,4,4,4,2,2,6
,2,6..]L..10,4,4,4,4,4,12,4,4,4,4,4,4,4,
4,4,2,2,2,2,2,2,4,2,2,2,2,2,2,4..^Q..2,2
,4,4,4,2,2,4,4,6..^...X.0.109:.D:.52000.
X,D:..;^...X.0.72:.D:.52200.X,D:.:..W^..
.54277,9:.54278,0:.54284,9:.54285,O:.491
52,17:.49153,17..^...49161,50:.49162,25:
.54296,15:.49166,2:.49170:.54296,0:..S^.
..X.0.301:.D:.34850.X,D:.:..._...173,11,
136,141,4,212,169,255,141,10,136,169,15,
141,24.H_...212,173,16,208,240,5,9,16,14
1,16,208,169,203,141,251.._...135,173,21
,208,9,16,141,21,208,32,181,136,32,12,13
7.._...32,181,136,32,12,137,32,181,136,3
2,12,137,169,202,141.._...251,135,32,181
,136,32,12,137,32,181,136,32,12,137,32.2
`...181,136,32,12,137,169,201,141,251,13
5,32,181,136,32,12.M`...137,32,181,136,3
2,12,137,32,181,136,32,12,137,169,205..`
...141,251,135,32,181,136,173,8,208,201,
15,208,246,173,16..`...208,41,16,208,239
,173,21,208,41,239,141,21,208,173,11..A.
..136,41,254,141,4,212,169,0,141,4,212,9
6,32,12,137.YA...32,50,137,169,206,141,2
52,135,173,251,135,201,205,208,43..A...1
73,9,200,205,6,136,240,44,56,173,8,208,2
33,160,16.IA...36,173,6,136,201,49,208,6
,206,9,208,76,251,136,173..A...6,136,205
,9,208,48,6,238,9,208,76,251,136,206,9.6
B...208,76,251,136,238,9,208,206,8,208,2
08,3,32,36,137.RB...32,24,137,169,207,14
1,252,135,96,174,7,136,160,127,136..BA..
208,253,202,208,248,96,174,8,136,160,127
,136,208,253,202..BB..208,248,96,173,16,
208,41,239,141,16,208,169,255,141,8.$CC.
.208,96,173,10,136,41,4,240,15,24,173,10
,136,106,141.^CD..10,136,173,10,136,141,
1,212,96,169,255,141,10,136,76.JCE..50,1
37..C .."........................ .PRESS
ANY KEY TO CONTINUE (F1=REVERSE)."..C..
.92:...C...".......................";.7)
"..........". D..." PRESS ...RETURN... T
O RUN PROGRAM (F1=RVS)";.TD..." .
........ ...":...D.
..".......................";.7)"
"..D..." .PRESS SPACE TO VIEW
NEXT PAGE ";.ZD..."
.."..D...92..E...A$..G(32).A$..G(
133).A$..G(134)..4020:.4017..E....2E...5
4277,15:.54278,138._E...54272,12:.54273,
128:.54296,15:.54276,17..EH..T.1.300:.:.
54276,16:.54272,0:.54273,0..ER...BES..".
......................";.7)"
"..ET.." . PRESS SPACE TO VIEW NEXT E
XAMPLE ";:.4016:..2FW.."..............
.........";.7)" ".`FX..
.7)" ";
..FY...7)" . PRESS SPACE TO VIEW NEX
T PAGE...";..FZ..4017:...F....JF...G(147
):T.1:DN.0:. T=# OF TOSSES..F..D1..(.(1)
.6).1:. D1=FIRST DICE..G..D2..(.(1).6).1
:. D2 IS 2ND DICE.4G..DT.D1.D2:. DT IS T
OTAL OF DICE.YG..."D1= ";D1, "D2= ";D2,
"DT= ";DT.WG... DT.7 . DT.11 . K . 4160.
.G".. T.1 .DN.DT:. " TARGET= ";DN
:T.T.1:.4090..G,.. DT.DN . . "MATCH, A W
INNER....":K . 4190..G6.T.T.1:K . 4090..
H@..T.1. .DT;"A WINNER...":.4190.5HJ..DT
..DN ..DT;"CRAPS, A LOSER...".QH^.. "ANO
THER ROLL? (Y/N)".HHH..A$: . A$."". 4200
.}HR.. A$.."N" . 4080..H|....H...X.0.98:
.D,DE:.50000.X,D:.50250.X,DE:..YH...X.0.
58:.D,DE:.50500.X,D:.50750.X,DE:...HD..X
.0.97:.D:.52000.X,D:...IN..X.0.58:.D:.52
200.X,D:.:..EI..."......................
.";.7)" ..........".QI..." PRESS. .
.RETURN... TO CONTINUE ";..I..." .
........ ..":..OIP..V.0,XM:.
V.1,YM:.V.2,XM.14:.V.3,YM.19:.V.4,XM.16.
.IS..V.5,YM.21:.V.6,XM.16:.V.7,YM.21..JU
..V.23,2:.V.29,2:.V.21,15..J....0JX.GL.R
O.8.49:.34822,GL.QJB..V.8,B(V.6).2:.V.9,
B(V.7).10.QJL..34823,3:.34824,3:.34827,3
3..JV..54277,9:.54278,64:.34850:.. J..GL
.RO.8.49.SJ...FP.0.3:.34812,206:.V.9,B(V
.9).1:.V.8,B(V.8).1..J...34812,207:...J.
..34811,202.&K...FP.0.3:.34812,206:.V.9,
B(V.9).1:.V.8,B(V.8).1.7K...34812,207:..
FK...34811,201.{K...34812,206:.B(V.8).6.
0..V.16,B(V.16).15:.V.8,255..K...V.8,B(V
.8).6:.34812,207..K..PR.B(V.9):.PR.GL..V
.9,PR.1.2.(SL.4)..K..PR.B(V.9):.PR.GL..V
.9,PR.1.2.(SL.4)..K...B(V.8).25..7075..L
...(B(V.16).16).0..7075.>L...V.21,B(V.21
).15:.34811,205:SL.0:..YL@.UL.1024.32768
:CL.55296.LLJ.CP.UL.CX.40.CY.LO.CO.CL.C
X.40.CY..LT..CP,224:.CO,1. L^..T.0.100:.
..LH..CP,32:.T.0.50:.:...L(#NM.32768:.X.
0.62:.D:.210.64.X.NM,D:...M2#.X.0.62:.D:
.211.64.X.NM,D:..-M<#.ZX.200.207:.X.0.62
:.D:.ZX.64.X.NM,D:.:..XM.#.0,,,,42,,,170
,128,170,170,128,170,170,160,3,255,240,3
,60,240,3,60,240.EM #.15,255,252,63,207,
255,63,63,255,63,207,255,63,255,255,12,2
55,60,15,,252..M.#.3,255,240,,255,192,,6
3,,,60,,,60,,,60,0.6N.#.0,42,0,,42,,,42,
,,42,,,42,,,42,,,42,,,38,,,21,,,38,,,42,
,,42,0.RN.#.0,34,,,34,,,34,,,34,,,34,,,3
4,,,34,0,0,162,128,0,81,64..NR#.0,,15,,,
31,,,63,,,127,,,255,51,1,240,219,1,240,1
11,3,224,191,3,224..N.#.223,7,192,127,14
3,192,31,223,128,3,255,,1,254,,,252,0..O
.#.0,,,,,,,,,,,,,,,,,0.RO.#.0,,15,,,31,,
,63,,,127,,,255,,1,240,,1,240,,3,224,,3,
224,,7,192..O.$.6,7,192,3,15,128,31,255,
,3,254,,31,253,,3,240,,31,128,0..O.$.0,,
,,,,,,,,,0..O.$.0,,15,,,31,,,63,,,127,,,
255,,1,240,,1,240,,3,224,,3,224,,7,192,,
7,192..P"$.0,15,128,,31,,,255,,3,255,,,2
55,,1,182,,3,108,,,216,,,,,,,0.RP@$.0,,1
5,,,31,,,63,,,127,,,255,,1,240,,3,240,,3
,224,,7,192,,7,192..PJ$.0,7,192,,7,192,,
7,192,,63,224,,111,240,,109,176,,13,176,
,13,176.GPT$.0,,,,,,,,0..QH$.240,,,248,,
,252,,,254,,,255,,,15,128,,7,192,,3,224,
,1,240,,1,240,0.SQR$.1,240,,3,224,,7,192
,,15,128,,31,,,62,,,124,,,127,128,,63,19
2,0.DQ|$.31,128,,,,0..Q.$.0,,15,,,31,,,6
3,,,127,,,255,,1,240,,3,224,,7,192,,15,1
28..Q.%.0,15,128,,15,128,,7,192,,3,224,,
1,240,,,248,,,124,,,62,,1,254..Q.%.0,3,2
52,,1,248,,,0.=R0%.6,,,6,,,6,,,6,,,6,,,2
55,240,,255,240,,6,,,6,,,6,,,6,,,6,,0._R
:%.0,,,,,,,,,,,,,,,,,,,,,,,,,,0..RX%.192
,48,,96,96,,48,192,,25,128,,15,,,6,,,15,
,,25,128,0..RL%.48,192,,96,96,,192,48,0.
.RV%.0,,,,,,,,,,,,,,,,,,,,,,,,,,,,,0..S.
'.34808,210:.34809,211:.34810,204:.34811
,205:.34812,207:..ES.'.14,107,17,37,16,4
7,14,107,16,47,19,63,17,37,28,214,25,177
,24,63,21,154..S.'.19,63,17,37,16,47,19,
63,17,37,16,47,17,37,21,154,19,63,32,94,
28,214..S$'.25,177,24,63,21,154,19,63,17
,37,28,214,25,177,24,63,21,154,19,63,17,
37.ET.'.16,47,25,177,24,63,21,154,19,63,
17,37,16,47,14,107,9,159,10,205,12,32..T
8'.12,216,14,107,16,47,17,37,16,47,17,37
,19,63,17,37,14,107,16,47,12,216..TB'.14
,107,12,216,14,107,16,47,12,216,25,177,1
9,63,19,63,16,47,16,47,12,216.'UL'.17,37
,16,47,14,107,16,47,17,37,14,107,19,63,2
1,154,19,63,16,47,17,37.OUV'.14,107,12,2
16,14,107,12,216,14,107,16,47,17,37,21,1
54,19,63,21,154..U`'.24,63,25,177,19,63,
21,154,17,37,16,47,19,63,17,37,14,107,14
,107,12,216.HUJ'.255,255..VT'.6,16,4,208
,6,16,4,208,6,108,4,208,6,108,4,208,7,53
,,,6,108,4,208,6,108.^V~'.4,208,7,53,4,2
08,7,53,4,208,8,23,,,7,53,,,6,16,6,108,,
,5,103,6,16,,0..V.'.6,108,8,147,8,23,,,7
,53,6,108,6,16,,,6,108,9,159,8,23,9,159,
8,23..V.'.11,114,9,159,11,114,6,108,10,2
05,8,147,10,205,6,108,8,147,7,53,8,147..
W.'.8,23,8,147,9,159,4,208,6,108,4,208,3
,54.DWX'.4,1,1,1,1,1,1,1,1,1,1,1,1,4,1,1
,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,2..W.
'.1,1,1,1,1,1,2,1,1,1,1,1,1,2,1,1,1,1,1,
1,4,1,1,1,1,2,1,1,1,1,1,1,4..W.'.1,1,1,1
,2,1,1,1,1,1,1,4,1,1,1,1,4,1,1,1,1,1,1,1
,1,1,1,1,1,4,2.:X.'.1,1,1,1,1,1,1,1,2,6,
1,1,1,1,1,1,1,1,2,6,2,4,2,2,4,2,2,14,4,4
,2,6,4,4,2.OX.(.6,1,1,1,1,1,1,1,1,1,1,1,
1,1,1,1,1,2,2,2,2,2,2,2.X.*."........".
.X.+." .....................
.........X.+." ..............
................Y +." ........
......................<Y*+." ..
.............................KY4+."
.................................Y>+
." ..............................
..JYH+." .................. .
............YR+." ............. N
N ............%Z\+." ..........
... . ..........PZF+." ........
.....Q ..W..............YZP+." ......
.......NN .. ...........ZZ+." .....
....... .. ..........IZ.+." .....
...........W ...........Z.+." .....
.. ........":...{...54296,0:.V
.21,0:.BC,4:.MC,11:."... I
NDEX ".N{...". 1) INTRODUCTION".P
{..." 2) INPUT STATEMENT"..{..."
3) GET STATEMENT"..{./." 4)
READ AND DATA STATEMENTS"..{./." 5
) GOSUB AND RETURN STATEMENTS"..|./."
6) NUMERIC FUNCTIONS".7|&/."
7) RANDOM NUMERIC FUNCTION".T|0/."
8) ASCII CODE".~|:/." 9) CH
R$(X) STRING FUNCTION"..|D/." 10)
USING CHR$(X) STRINGS".N|N/." 11)
PEEK NUMERIC FUNCTION"..|X/." 12)
POKE STATEMENT"..}B/." 13) SCREEN
BORDER & BACKGROUND".@}L/." 14) SC
REEN MEMORY MAP".J}Q/." 15) SCREEN
COLOR MEMORY MAP"..}V/." 16) GAME
S FOR ENJOYMENT"..}./." 17) CONCLU
SION..."..}.0." ENTER PAGE # (Q=QU
IT)";A$:.A$."Q".1955..~.0A.E(A$):.A.1.A.
17.12000:.A.15.A.A.15:.12330.1~.0.A.15.A
.18.A.A.15:.12330.E~ 0.A.0.A.18.12000..~
%0.A.100,200,300,400,500,600,700,800,900
,1000,1100,1200,1300,1400,1600..~*0.A.17
00,1900...
> CLICK IMAGE PREVIEW FOR FULL MODAL