BLACKBOX
FILE INFORMATION
FILENAME(S): BLACKBOX
FILE TYPE(S): PRG
FILE SIZE: 4.9K
FIRST SEEN: 2025-11-02 22:11:37
APPEARS ON: 4 disk(s)
FILE HASH
5c7118f5b5c9fa765b83821303b505b5276ddd35f65ddc9c319361ec6f25a8ba
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ZOC PD SERVICE | BLACKBOX | PRG | Treasure Chest - ToGuMi | 9 | 9 | DOWNLOAD FILE |
| S PIELE | BLACKBOX | PRG | Treasure Chest - Wolfgang Rauprich | 10 | 0 | DOWNLOAD FILE |
| SPIELE | BLACKBOX | PRG | Treasure Chest - Wolfgang Rauprich | 10 | 0 | DOWNLOAD FILE |
| FREESOFYT DISK N | BLACKBOX | PRG | Treasure Chest - Wolfgang Rauprich | 9 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 64 00 8F 20 2A 20 42 4C 41 43 4B 20 |....d.. * BLACK |
00000010: 42 4F 58 20 46 4F 52 20 27 36 34 27 00 37 08 69 |BOX FOR '64'.7.i|
00000020: 00 97 35 33 32 38 30 2C 31 3A 97 35 33 32 38 31 |..53280,1:.53281|
00000030: 2C 31 3A 99 22 90 22 00 51 08 6E 00 96 20 A5 53 |,1:.".".Q.n.. .S|
00000040: 28 49 29 B2 31 32 36 36 AA 38 30 AC 49 AA 32 AC |(I).1266.80.I.2.|
00000050: 4A 00 6D 08 78 00 86 20 42 28 37 2C 37 29 2C 47 |J.m.x.. B(7,7),G|
00000060: 28 34 2C 31 29 2C 4D 28 33 31 2C 31 29 00 A4 08 |(4,1),M(31,1)...|
00000070: 82 00 53 59 24 B2 22 C1 CD D3 D6 D8 FF CE DB DF |..SY$.".........|
00000080: CB DC C9 C8 C3 CA D5 D7 22 3A 42 4C 24 B2 22 20 |........":BL$." |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 20 20 20 22 00 D3 08 8C 00 99 22 93 22 3A 85 22 | "......".":."|
000000B0: 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 3B 41 24 |INSTRUCTIONS";A$|
000000C0: 3A 8B C8 28 41 24 2C 31 29 B2 22 59 22 A7 8D 31 |:..(A$,1)."Y"..1|
000000D0: 36 35 30 00 F1 08 96 00 81 20 4B B2 30 A4 34 3A |650...... K.0.4:|
000000E0: 47 28 4B 2C 30 29 B2 AB 31 3A 82 4B 3A 53 59 B2 |G(K,0)..1:.K:SY.|
000000F0: 30 00 02 09 A0 00 8D 33 38 30 3A 8F 2A 42 4F 41 |0......380:.*BOA|
00000100: 52 44 00 18 09 AA 00 8D 36 30 30 3A 8F 2A 46 49 |RD......600:.*FI|
00000110: 4C 4C 20 42 4F 41 52 44 00 37 09 B4 00 99 22 13 |LL BOARD.7....".|
00000120: 22 3B 42 4C 24 3B 22 13 22 3B 3A 85 41 24 3A 99 |";BL$;".";:.A$:.|
00000130: 42 4C 24 3B 22 91 22 00 5D 09 BE 00 8B 41 24 B2 |BL$;".".]....A$.|
00000140: 22 52 22 A7 99 22 93 22 3B 3A 8D 36 36 30 3A 89 |"R"..".";:.660:.|
00000150: 31 38 30 3A 8F 2A 52 45 46 52 45 53 48 00 88 09 |180:.*REFRESH...|
00000160: C8 00 8B 28 C5 28 41 24 29 B1 30 29 AF 28 C5 28 |...(.(A$).0).(.(|
00000170: 41 24 29 B3 33 33 29 A7 8D 37 33 30 3A 89 31 38 |A$).33)..730:.18|
00000180: 30 3A 8F 2A 4D 4F 56 45 00 A0 09 D2 00 8B 41 24 |0:.*MOVE......A$|
00000190: B2 22 51 22 89 32 35 30 3A 8F 2A 53 43 4F 52 45 |."Q".250:.*SCORE|
000001A0: 00 BE 09 DC 00 41 B2 C6 28 C8 28 41 24 2C 31 29 |.....A..(.(A$,1)|
000001B0: 29 3A 42 B2 C5 28 C9 28 41 24 2C 31 29 29 00 EF |):B..(.(A$,1))..|
000001C0: 09 E6 00 8B 28 41 B1 36 34 29 AF 28 41 B3 37 33 |....(A.64).(A.73|
000001D0: 29 AF 28 42 B1 30 29 AF 28 42 B3 39 29 A7 8D 31 |).(B.0).(B.9)..1|
000001E0: 35 32 30 3A 89 31 38 30 3A 8F 2A 42 41 4C 4C 00 |520:.180:.*BALL.|
000001F0: 00 0A F0 00 99 22 48 55 48 3F 22 3A 89 31 38 30 |....."HUH?":.180|
00000200: 00 1A 0A FA 00 53 43 B2 4E 3A 47 41 B2 47 41 AA |.....SC.N:GA.GA.|
00000210: 31 3A 8B 4E B2 30 89 32 38 30 00 4F 0A 04 01 81 |1:.N.0.280.O....|
00000220: 20 4B B2 30 A4 20 4E AB 31 3A 8B 20 28 4D 28 4B | K.0. N.1:. (M(K|
00000230: 2C 31 29 B1 30 29 AF 28 4D 28 4B 2C 30 29 B3 B1 |,1).0).(M(K,0)..|
00000240: 4D 28 4B 2C 31 29 29 A7 53 43 B2 53 43 AA 31 00 |M(K,1)).SC.SC.1.|
00000250: 56 0A 0E 01 82 4B 00 7D 0A 18 01 81 20 4B B2 30 |V....K.}.... K.0|
00000260: A4 34 3A 8B 20 47 28 4B 2C 30 29 B2 AB 31 20 A7 |.4:. G(K,0)..1 .|
00000270: 20 53 43 B2 53 43 AA 35 3A 89 33 30 30 00 A0 0A | SC.SC.5:.300...|
00000280: 22 01 8B 31 B3 B1 28 42 28 47 28 4B 2C 30 29 2C |"..1..(B(G(K,0),|
00000290: 47 28 4B 2C 31 29 29 29 A7 53 43 B2 53 43 AA 35 |G(K,1))).SC.SC.5|
000002A0: 00 B0 0A 2C 01 82 4B 3A 54 54 B2 54 54 AA 53 43 |...,..K:TT.TT.SC|
000002B0: 00 E3 0A 36 01 99 22 13 22 3B A3 32 30 29 3B 22 |...6..".";.20);"|
000002C0: 53 43 4F 52 45 3D 22 3B 53 43 3A 99 A3 32 30 29 |SCORE=";SC:..20)|
000002D0: 3B 22 41 46 54 45 52 22 3B 47 41 3B 22 47 41 4D |;"AFTER";GA;"GAM|
000002E0: 45 53 22 00 FE 0A 40 01 99 A3 32 30 29 3B 22 41 |ES"...@...20);"A|
000002F0: 56 45 52 41 47 45 3D 22 3B 54 54 AD 47 41 00 10 |VERAGE=";TT.GA..|
00000300: 0B 4A 01 81 49 B2 30 A4 37 3A 81 4A B2 30 A4 37 |.J..I.0.7:.J.0.7|
00000310: 00 4D 0B 54 01 8B 20 42 28 49 2C 4A 29 A7 58 B2 |.M.T.. B(I,J).X.|
00000320: A5 53 28 49 29 3A 97 20 58 2C 31 30 38 3A 97 20 |.S(I):. X,108:. |
00000330: 58 AA 31 2C 31 32 33 3A 97 20 58 AA 34 30 2C 31 |X.1,123:. X.40,1|
00000340: 32 34 3A 97 20 58 AA 34 31 2C 31 32 36 00 72 0B |24:. X.41,126.r.|
00000350: 5E 01 42 28 49 2C 4A 29 B2 30 3A 82 4A 3A 82 49 |^.B(I,J).0:.J:.I|
00000360: 3A 85 22 13 50 4C 41 59 20 41 47 41 49 4E 22 3B |:.".PLAY AGAIN";|
00000370: 41 24 00 88 0B 68 01 8B 20 C8 28 41 24 2C 31 29 |A$...h.. .(A$,1)|
00000380: B3 B1 22 59 22 A7 20 80 00 95 0B 72 01 4E B2 30 |.."Y". ....r.N.0|
00000390: 3A 89 31 35 30 00 A7 0B 7C 01 8F 2A 50 52 49 4E |:.150...|..*PRIN|
000003A0: 54 20 42 4F 41 52 44 00 C3 0B 86 01 99 22 93 11 |T BOARD......"..|
000003B0: 11 20 20 20 41 20 42 20 43 20 44 20 45 20 46 20 |. A B C D E F |
000003C0: 47 20 48 00 DC 0B 90 01 99 22 20 20 20 33 20 33 |G H......" 3 3|
000003D0: 20 33 20 32 20 32 20 32 20 32 20 32 00 0B 0C 9A | 3 2 2 2 2 2....|
000003E0: 01 99 22 20 20 20 32 20 31 20 30 20 39 20 38 20 |.." 2 1 0 9 8 |
000003F0: 37 20 36 20 35 22 3A 99 22 20 20 A4 A4 A4 A4 A4 |7 6 5":." .....|
00000400: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 00 35 0C A4 01 |............5...|
00000410: 99 22 20 A7 CF D0 CF D0 CF D0 CF D0 CF D0 CF D0 |." .............|
00000420: CF D0 CF D0 A5 20 20 20 20 20 20 12 42 4C 41 43 |..... .BLAC|
00000430: 4B 42 4F 58 22 00 51 0C AE 01 99 22 31 A7 CC BA |KBOX".Q...."1...|
00000440: CC BA CC BA CC BA CC BA CC BA CC BA CC BA A5 32 |...............2|
00000450: 34 00 7A 0C B8 01 99 22 20 A7 CF D0 CF D0 CF D0 |4.z...." .......|
00000460: CF D0 CF D0 CF D0 CF D0 CF D0 A5 20 20 20 20 DA |........... .|
00000470: 3D 52 45 46 4C 45 43 54 45 44 00 96 0C C2 01 99 |=REFLECTED......|
00000480: 22 32 A7 CC BA CC BA CC BA CC BA CC BA CC BA CC |"2..............|
00000490: BA CC BA A5 32 33 00 BE 0C CC 01 99 22 20 A7 CF |....23......" ..|
000004A0: D0 CF D0 CF D0 CF D0 CF D0 CF D0 CF D0 CF D0 A5 |................|
000004B0: 20 20 20 20 A6 3D 41 42 53 4F 52 42 45 44 00 DA | .=ABSORBED..|
000004C0: 0C D6 01 99 22 33 A7 CC BA CC BA CC BA CC BA CC |...."3..........|
000004D0: BA CC BA CC BA CC BA A5 32 32 00 08 0D E0 01 99 |........22......|
000004E0: 22 20 A7 CF D0 CF D0 CF D0 CF D0 CF D0 CF D0 CF |" ..............|
000004F0: D0 CF D0 A5 20 20 20 20 52 3D 52 45 46 52 45 53 |.... R=REFRES|
00000500: 48 20 53 43 52 45 45 4E 00 24 0D EA 01 99 22 34 |H SCREEN.$...."4|
00000510: A7 CC BA CC BA CC BA CC BA CC BA CC BA CC BA CC |................|
00000520: BA A5 32 31 00 4D 0D F4 01 99 22 20 A7 CF D0 CF |..21.M...." ....|
00000530: D0 CF D0 CF D0 CF D0 CF D0 CF D0 CF D0 A5 20 20 |.............. |
00000540: 20 20 51 3D 51 55 49 54 20 47 41 4D 45 00 69 0D | Q=QUIT GAME.i.|
00000550: FE 01 99 22 35 A7 CC BA CC BA CC BA CC BA CC BA |..."5...........|
00000560: CC BA CC BA CC BA A5 32 30 00 97 0D 08 02 99 22 |.......20......"|
00000570: 20 A7 CF D0 CF D0 CF D0 CF D0 CF D0 CF D0 CF D0 | ...............|
00000580: CF D0 A5 20 20 20 20 58 23 3D 50 55 54 2F 54 41 |... X#=PUT/TA|
00000590: 4B 45 20 42 41 4C 4C 00 C0 0D 12 02 99 22 36 A7 |KE BALL......"6.|
000005A0: CC BA CC BA CC BA CC BA CC BA CC BA CC BA CC BA |................|
000005B0: A5 31 39 20 20 20 20 41 54 20 52 4F 57 20 23 2C |.19 AT ROW #,|
000005C0: 00 E8 0D 1C 02 99 22 20 A7 CF D0 CF D0 CF D0 CF |......" ........|
000005D0: D0 CF D0 CF D0 CF D0 CF D0 A5 A0 A0 A0 A0 A0 20 |............... |
000005E0: 43 4F 4C 55 4D 4E 20 58 00 04 0E 26 02 99 22 37 |COLUMN X...&.."7|
000005F0: A7 CC BA CC BA CC BA CC BA CC BA CC BA CC BA CC |................|
00000600: BA A5 31 38 00 31 0E 30 02 99 22 20 A7 CF D0 CF |..18.1.0.." ....|
00000610: D0 CF D0 CF D0 CF D0 CF D0 CF D0 CF D0 A5 20 20 |.............. |
00000620: 20 20 23 3D 53 45 4E 44 20 50 52 4F 42 45 20 49 | #=SEND PROBE I|
00000630: 4E 00 74 0E 3A 02 99 22 38 A7 CC BA CC BA CC BA |N.t.:.."8.......|
00000640: CC BA CC BA CC BA CC BA CC BA A5 31 37 20 20 20 |...........17 |
00000650: 41 54 20 45 44 47 45 20 43 45 4C 4C 20 23 22 3A |AT EDGE CELL #":|
00000660: 99 22 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |." ............|
00000670: A3 A3 A3 A3 00 8D 0E 44 02 99 22 20 20 20 30 20 |.......D.." 0 |
00000680: 31 20 31 20 31 20 31 20 31 20 31 20 31 00 AA 0E |1 1 1 1 1 1 1...|
00000690: 4E 02 99 22 20 20 20 39 20 30 20 31 20 32 20 33 |N.." 9 0 1 2 3|
000006A0: 20 34 20 35 20 36 13 22 3A 8E 00 BB 0E 58 02 8F | 4 5 6.":....X..|
000006B0: 2A 46 49 4C 4C 20 42 4F 41 52 44 00 C8 0E 62 02 |*FILL BOARD...b.|
000006C0: 5A B2 BB 28 AB 54 49 29 00 D3 0E 6C 02 81 4B B2 |Z..(.TI)...l..K.|
000006D0: 30 A4 34 00 EF 0E 76 02 49 B2 B5 28 38 AC BB 28 |0.4...v.I..(8..(|
000006E0: 31 29 29 3A 4A B2 B5 28 38 AC BB 28 31 29 29 00 |1)):J..(8..(1)).|
000006F0: FF 0E 80 02 8B 42 28 49 2C 4A 29 89 36 33 30 00 |.....B(I,J).630.|
00000700: 12 0F 8A 02 42 28 49 2C 4A 29 B2 31 3A 82 20 4B |....B(I,J).1:. K|
00000710: 3A 8E 00 27 0F 94 02 8F 2A 52 45 46 52 45 53 48 |:..'....*REFRESH|
00000720: 20 53 43 52 45 45 4E 00 3A 0F 9E 02 8D 33 38 30 | SCREEN.:....380|
00000730: 3A 53 59 B2 30 3A 8F 2A 2A 2A 00 48 0F A8 02 8B |:SY.0:.***.H....|
00000740: 20 4E B2 30 89 37 30 30 00 73 0F B2 02 81 20 4B | N.0.700.s.... K|
00000750: B2 30 A4 4E AB 31 3A 49 44 B2 4D 28 4B 2C 30 29 |.0.N.1:ID.M(K,0)|
00000760: 3A 4F 44 B2 4D 28 4B 2C 31 29 3A 8D 31 33 37 30 |:OD.M(K,1):.1370|
00000770: 3A 82 4B 00 92 0F BC 02 81 20 4B B2 30 A4 34 3A |:.K...... K.0.4:|
00000780: 49 B2 47 28 4B 2C 30 29 3A 8B 49 B2 AB 31 89 37 |I.G(K,0):.I..1.7|
00000790: 32 30 00 CB 0F C6 02 4A B2 47 28 4B 2C 31 29 3A |20.....J.G(K,1):|
000007A0: 58 B2 A5 53 28 49 29 3A 97 20 58 2C 38 35 3A 97 |X..S(I):. X,85:.|
000007B0: 20 58 AA 31 2C 37 33 3A 97 20 58 AA 34 30 2C 37 | X.1,73:. X.40,7|
000007C0: 34 3A 97 20 58 AA 34 31 2C 37 35 00 D5 0F D0 02 |4:. X.41,75.....|
000007D0: 82 20 4B 3A 8E 00 E0 0F DA 02 8F 2A 4D 4F 56 45 |. K:.......*MOVE|
000007E0: 00 0E 10 E4 02 56 B2 B5 28 28 C5 28 41 24 29 AA |.....V..((.(A$).|
000007F0: 37 29 AD 38 29 3A 91 20 56 20 8D 20 39 39 30 2C |7).8):. V . 990,|
00000800: 31 30 30 30 2C 31 30 31 30 2C 31 30 32 30 00 1F |1000,1010,1020..|
00000810: 10 EE 02 4D 28 4E 2C 30 29 B2 C5 28 41 24 29 00 |...M(N,0)..(A$).|
00000820: 29 10 F8 02 8D 31 31 39 30 00 3D 10 02 03 8B 20 |)....1190.=.... |
00000830: 43 20 A7 20 56 B2 30 3A 89 31 30 33 30 00 4F 10 |C . V.0:.1030.O.|
00000840: 0C 03 8B 20 4C 20 B0 20 52 20 89 20 38 39 30 00 |... L . R . 890.|
00000850: 6D 10 16 03 91 20 56 20 8D 20 31 31 35 30 2C 31 |m.... V . 1150,1|
00000860: 31 36 30 2C 31 31 37 30 2C 31 31 38 30 00 78 10 |160,1170,1180.x.|
00000870: 20 03 8D 20 31 31 39 30 00 8C 10 2A 03 8B 20 43 | .. 1190...*.. C|
00000880: 20 A7 20 56 B2 30 3A 89 31 30 33 30 00 A5 10 34 | . V.0:.1030...4|
00000890: 03 8B 20 4C 20 AF 20 52 20 A7 20 8D 31 30 35 30 |.. L . R . .1050|
000008A0: 3A 89 38 35 30 00 BC 10 3E 03 8B 20 4C 20 A7 20 |:.850...>.. L . |
000008B0: 8D 20 31 30 38 30 3A 89 20 38 35 30 00 CD 10 48 |. 1080:. 850...H|
000008C0: 03 8B 20 52 20 A7 20 8D 20 31 31 31 30 00 E1 10 |.. R . . 1110...|
000008D0: 52 03 8D 20 39 35 30 3A 8B 20 51 20 89 20 39 30 |R.. 950:. Q . 90|
000008E0: 30 00 FF 10 5C 03 91 20 56 20 8D 20 31 31 35 30 |0...\.. V . 1150|
000008F0: 2C 31 31 36 30 2C 31 31 37 30 2C 31 31 38 30 00 |,1160,1170,1180.|
00000900: 13 11 66 03 8D 20 39 35 30 3A 8B 20 51 20 89 20 |..f.. 950:. Q . |
00000910: 39 30 30 00 1C 11 70 03 89 38 30 30 00 34 11 7A |900...p..800.4.z|
00000920: 03 56 B2 56 AB 32 3A 8B 20 56 B3 31 20 A7 20 56 |.V.V.2:. V.1 . V|
00000930: B2 56 AA 34 00 51 11 84 03 8B 20 56 B2 32 20 A7 |.V.4.Q.... V.2 .|
00000940: 20 4D 28 4E 2C 31 29 B2 33 32 AB 59 3A 89 39 34 | M(N,1).32.Y:.94|
00000950: 30 00 6D 11 8E 03 8B 20 56 B2 33 20 A7 20 4D 28 |0.m.... V.3 . M(|
00000960: 4E 2C 31 29 B2 58 AA 31 3A 89 39 34 30 00 89 11 |N,1).X.1:.940...|
00000970: 98 03 8B 20 56 B2 34 20 A7 20 4D 28 4E 2C 31 29 |... V.4 . M(N,1)|
00000980: B2 59 AA 39 3A 89 39 34 30 00 A1 11 A2 03 8B 20 |.Y.9:.940...... |
00000990: 56 B2 31 20 A7 20 4D 28 4E 2C 31 29 B2 32 34 AB |V.1 . M(N,1).24.|
000009A0: 58 00 C7 11 AC 03 49 44 B2 4D 28 4E 2C 30 29 3A |X.....ID.M(N,0):|
000009B0: 4F 44 B2 4D 28 4E 2C 31 29 3A 8D 31 33 37 30 3A |OD.M(N,1):.1370:|
000009C0: 4E B2 4E AA 31 3A 8E 00 E9 11 B6 03 51 B2 28 28 |N.N.1:......Q.((|
000009D0: 58 B2 30 29 AF 28 56 B2 32 29 29 B0 28 28 59 B2 |X.0).(V.2)).((Y.|
000009E0: 30 29 AF 28 56 B2 33 29 29 00 0F 12 C0 03 51 B2 |0).(V.3)).....Q.|
000009F0: 51 20 B0 20 28 28 58 B2 37 29 AF 28 56 B2 34 29 |Q . ((X.7).(V.4)|
00000A00: 29 B0 28 28 59 B2 37 29 AF 28 56 B2 31 29 29 00 |).((Y.7).(V.1)).|
00000A10: 15 12 CA 03 8E 00 1E 12 D4 03 8F 2A 2A 2A 00 33 |...........***.3|
00000A20: 12 DE 03 58 B2 C5 28 41 24 29 AB 31 3A 59 B2 AB |...X..(A$).1:Y..|
00000A30: 31 3A 8E 00 47 12 E8 03 58 B2 38 3A 59 B2 C5 28 |1:..G...X.8:Y..(|
00000A40: 41 24 29 AB 39 3A 8E 00 5C 12 F2 03 58 B2 32 34 |A$).9:..\...X.24|
00000A50: AB C5 28 41 24 29 3A 59 B2 38 3A 8E 00 72 12 FC |..(A$):Y.8:..r..|
00000A60: 03 58 B2 AB 31 3A 59 B2 33 32 AB C5 28 41 24 29 |.X..1:Y.32..(A$)|
00000A70: 3A 8E 00 7B 12 06 04 8F 2A 2A 2A 00 A5 12 10 04 |:..{....***.....|
00000A80: 4D 28 4E 2C 31 29 B2 30 3A 4F 44 B2 30 3A 49 44 |M(N,1).0:OD.0:ID|
00000A90: B2 4D 28 4E 2C 30 29 3A 8D 31 33 37 30 3A 4E B2 |.M(N,0):.1370:N.|
00000AA0: 4E AA 31 3A 8E 00 AE 12 1A 04 8F 2A 2A 2A 00 C6 |N.1:.......***..|
00000AB0: 12 24 04 56 B2 56 AA 32 3A 8B 20 56 B1 34 20 A7 |.$.V.V.2:. V.4 .|
00000AC0: 20 56 B2 56 AB 34 00 CC 12 2E 04 8E 00 D5 12 38 | V.V.4.........8|
00000AD0: 04 8F 2A 2A 2A 00 EB 12 42 04 56 B2 56 AB 31 3A |..***...B.V.V.1:|
00000AE0: 8B 20 56 B2 30 20 A7 20 56 B2 34 00 F1 12 4C 04 |. V.0 . V.4...L.|
00000AF0: 8E 00 FA 12 56 04 8F 2A 2A 2A 00 10 13 60 04 56 |....V..***...`.V|
00000B00: B2 56 AA 31 3A 8B 20 56 B2 35 20 A7 20 56 B2 31 |.V.1:. V.5 . V.1|
00000B10: 00 16 13 6A 04 8E 00 1F 13 74 04 8F 2A 2A 2A 00 |...j.....t..***.|
00000B20: 2B 13 7E 04 59 B2 59 AA 31 3A 8E 00 37 13 88 04 |+.~.Y.Y.1:..7...|
00000B30: 58 B2 58 AB 31 3A 8E 00 43 13 92 04 59 B2 59 AB |X.X.1:..C...Y.Y.|
00000B40: 31 3A 8E 00 4F 13 9C 04 58 B2 58 AA 31 3A 8E 00 |1:..O...X.X.1:..|
00000B50: 58 13 A6 04 8F 2A 2A 2A 00 76 13 B0 04 91 20 56 |X....***.v.... V|
00000B60: 20 89 20 31 32 31 30 2C 31 32 35 30 2C 31 32 39 | . 1210,1250,129|
00000B70: 30 2C 31 33 33 30 00 97 13 BA 04 43 B2 42 28 58 |0,1330.....C.B(X|
00000B80: 2C 59 AA 31 29 3A 8B 20 58 B2 30 20 A7 20 4C B2 |,Y.1):. X.0 . L.|
00000B90: 30 3A 89 31 32 33 30 00 A8 13 C4 04 4C B2 42 28 |0:.1230.....L.B(|
00000BA0: 58 AB 31 2C 59 AA 31 29 00 BA 13 CE 04 8B 20 58 |X.1,Y.1)...... X|
00000BB0: B2 37 20 A7 20 52 B2 30 3A 8E 00 CD 13 D8 04 52 |.7 . R.0:......R|
00000BC0: B2 42 28 58 AA 31 2C 59 AA 31 29 3A 8E 00 EE 13 |.B(X.1,Y.1):....|
00000BD0: E2 04 43 B2 42 28 58 AB 31 2C 59 29 3A 8B 20 59 |..C.B(X.1,Y):. Y|
00000BE0: B2 30 20 A7 20 4C B2 30 3A 89 31 32 37 30 00 FF |.0 . L.0:.1270..|
00000BF0: 13 EC 04 4C B2 42 28 58 AB 31 2C 59 AB 31 29 00 |...L.B(X.1,Y.1).|
00000C00: 11 14 F6 04 8B 20 59 B2 37 20 A7 20 52 B2 30 3A |..... Y.7 . R.0:|
00000C10: 8E 00 24 14 00 05 52 B2 42 28 58 AB 31 2C 59 AA |..$...R.B(X.1,Y.|
00000C20: 31 29 3A 8E 00 45 14 0A 05 43 B2 42 28 58 2C 59 |1):..E...C.B(X,Y|
00000C30: AB 31 29 3A 8B 20 58 B2 37 20 A7 20 4C B2 30 3A |.1):. X.7 . L.0:|
00000C40: 89 31 33 31 30 00 56 14 14 05 4C B2 42 28 58 AA |.1310.V...L.B(X.|
00000C50: 31 2C 59 AB 31 29 00 68 14 1E 05 8B 20 58 B2 30 |1,Y.1).h.... X.0|
00000C60: 20 A7 20 52 B2 30 3A 8E 00 7B 14 28 05 52 B2 42 | . R.0:..{.(.R.B|
00000C70: 28 58 AB 31 2C 59 AB 31 29 3A 8E 00 9C 14 32 05 |(X.1,Y.1):....2.|
00000C80: 43 B2 42 28 58 AA 31 2C 59 29 3A 8B 20 59 B2 37 |C.B(X.1,Y):. Y.7|
00000C90: 20 A7 20 4C B2 30 3A 89 31 33 35 30 00 AD 14 3C | . L.0:.1350...<|
00000CA0: 05 4C B2 42 28 58 AA 31 2C 59 AA 31 29 00 BF 14 |.L.B(X.1,Y.1)...|
00000CB0: 46 05 8B 20 59 B2 30 20 A7 20 52 B2 30 3A 8E 00 |F.. Y.0 . R.0:..|
00000CC0: D2 14 50 05 52 B2 42 28 58 AA 31 2C 59 AB 31 29 |..P.R.B(X.1,Y.1)|
00000CD0: 3A 8E 00 D8 14 5A 05 8F 00 EB 14 64 05 8B 20 4F |:....Z.....d.. O|
00000CE0: 44 B3 B1 30 20 89 20 31 34 30 30 00 0E 15 6E 05 |D..0 . 1400...n.|
00000CF0: 41 44 B2 49 44 3A 8D 31 34 35 30 3A 97 20 50 31 |AD.ID:.1450:. P1|
00000D00: 2C 33 32 3A 97 20 50 32 2C 31 30 32 3A 8E 00 21 |,32:. P2,102:..!|
00000D10: 15 78 05 8B 20 4F 44 B3 B1 49 44 20 89 31 34 32 |.x.. OD..ID .142|
00000D20: 30 00 43 15 82 05 41 44 B2 49 44 3A 8D 31 34 35 |0.C...AD.ID:.145|
00000D30: 30 3A 97 20 50 31 2C 33 32 3A 97 20 50 32 2C 39 |0:. P1,32:. P2,9|
00000D40: 30 3A 8E 00 70 15 8C 05 41 44 B2 49 44 3A 8D 31 |0:..p...AD.ID:.1|
00000D50: 34 35 30 3A 53 59 B2 53 59 AA 31 3A 53 B2 C6 28 |450:SY.SY.1:S..(|
00000D60: CA 28 53 59 24 2C 53 59 2C 31 29 29 AB 31 32 38 |.(SY$,SY,1)).128|
00000D70: 00 83 15 96 05 97 20 50 31 2C 33 32 3A 97 20 50 |...... P1,32:. P|
00000D80: 32 2C 53 00 A4 15 A0 05 41 44 B2 4F 44 3A 8D 31 |2,S.....AD.OD:.1|
00000D90: 34 35 30 3A 97 20 50 31 2C 33 32 3A 97 20 50 32 |450:. P1,32:. P2|
00000DA0: 2C 53 3A 8E 00 AD 15 AA 05 8F 2A 2A 2A 00 D3 15 |,S:.......***...|
00000DB0: B4 05 91 28 B5 28 41 44 AA 37 29 AD 38 29 89 20 |...(.(AD.7).8). |
00000DC0: 31 34 38 30 2C 31 34 39 30 2C 31 35 30 30 2C 31 |1480,1490,1500,1|
00000DD0: 35 31 30 00 E6 15 BE 05 90 3A 8F 2A 45 52 52 4F |510......:.*ERRO|
00000DE0: 52 20 54 52 41 50 00 02 16 C8 05 50 31 B2 31 32 |R TRAP.....P1.12|
00000DF0: 32 33 AA 38 30 AC 41 44 3A 50 32 B2 50 31 AA 31 |23.80.AD:P2.P1.1|
00000E00: 3A 8E 00 1E 16 D2 05 50 31 B2 31 39 36 39 AA 32 |:......P1.1969.2|
00000E10: AC 41 44 3A 50 32 B2 50 31 AB 34 30 3A 8E 00 3A |.AD:P2.P1.40:..:|
00000E20: 16 DC 05 50 31 B2 33 32 34 34 AB 38 30 AC 41 44 |...P1.3244.80.AD|
00000E30: 3A 50 32 B2 50 31 AB 31 3A 8E 00 56 16 E6 05 50 |:P2.P1.1:..V...P|
00000E40: 31 B2 31 32 31 31 AB 32 AC 41 44 3A 50 32 B2 50 |1.1211.2.AD:P2.P|
00000E50: 31 AA 34 30 3A 8E 00 5C 16 F0 05 8F 00 71 16 FA |1.40:..\.....q..|
00000E60: 05 4A B2 41 AB 36 35 3A 49 B2 42 AB 31 3A 51 B2 |.J.A.65:I.B.1:Q.|
00000E70: 30 00 7D 16 04 06 81 20 4B B2 30 A4 34 00 A0 16 |0.}.... K.0.4...|
00000E80: 0E 06 8B 20 28 47 28 4B 2C 30 29 B3 B1 49 29 B0 |... (G(K,0)..I).|
00000E90: 28 47 28 4B 2C 31 29 B3 B1 4A 29 89 31 35 38 30 |(G(K,1)..J).1580|
00000EA0: 00 D1 16 18 06 58 B2 A5 53 28 49 29 3A 97 20 58 |.....X..S(I):. X|
00000EB0: 2C 37 39 3A 97 20 58 AA 31 2C 38 30 3A 97 20 58 |,79:. X.1,80:. X|
00000EC0: AA 34 30 2C 37 36 3A 97 20 58 AA 34 31 2C 31 32 |.40,76:. X.41,12|
00000ED0: 32 00 E7 16 22 06 51 B2 31 3A 47 28 4B 2C 30 29 |2...".Q.1:G(K,0)|
00000EE0: B2 AB 31 3A 4B B2 34 00 F7 16 2C 06 82 20 4B 3A |..1:K.4...,.. K:|
00000EF0: 8B 20 51 20 A7 20 8E 00 02 17 36 06 81 4B B2 30 |. Q . ....6..K.0|
00000F00: A4 34 00 19 17 40 06 8B 20 47 28 4B 2C 30 29 B3 |.4...@.. G(K,0).|
00000F10: B1 AB 31 20 89 31 36 33 30 00 49 17 4A 06 58 B2 |..1 .1630.I.J.X.|
00000F20: A5 53 28 49 29 3A 97 20 58 2C 38 35 3A 97 20 58 |.S(I):. X,85:. X|
00000F30: AA 31 2C 37 33 3A 97 20 58 AA 34 30 2C 37 34 3A |.1,73:. X.40,74:|
00000F40: 97 20 58 AA 34 31 2C 37 35 00 67 17 54 06 47 28 |. X.41,75.g.T.G(|
00000F50: 4B 2C 30 29 B2 49 3A 47 28 4B 2C 31 29 B2 4A 3A |K,0).I:G(K,1).J:|
00000F60: 4B B2 34 3A 51 B2 31 00 77 17 5E 06 82 20 4B 3A |K.4:Q.1.w.^.. K:|
00000F70: 8B 20 51 20 A7 20 8E 00 91 17 68 06 99 22 4C 49 |. Q . ....h.."LI|
00000F80: 53 54 20 46 55 4C 4C 2C 20 53 4F 52 52 59 22 3A |ST FULL, SORRY":|
00000F90: 8E 00 9F 17 72 06 8F 2A 2A 2A 49 4E 53 54 2E 00 |....r..***INST..|
00000FA0: CD 17 7C 06 99 22 93 49 20 57 49 4C 4C 20 48 49 |..|..".I WILL HI|
00000FB0: 44 45 20 35 20 42 41 4C 4C 53 20 57 49 54 48 49 |DE 5 BALLS WITHI|
00000FC0: 4E 20 41 4E 20 38 D6 38 20 42 4F 58 2C 00 F6 17 |N AN 8.8 BOX,...|
00000FD0: 86 06 99 22 59 4F 55 20 4D 55 53 54 20 44 45 44 |..."YOU MUST DED|
00000FE0: 55 43 45 20 54 48 45 49 52 20 4C 4F 43 41 54 49 |UCE THEIR LOCATI|
00000FF0: 4F 4E 53 20 42 59 00 23 18 90 06 99 22 50 52 4F |ONS BY.#...."PRO|
00001000: 42 49 4E 47 20 46 52 4F 4D 20 54 48 45 20 53 49 |BING FROM THE SI|
00001010: 44 45 53 2E 20 20 54 59 50 45 20 41 20 4E 55 4D |DES. TYPE A NUM|
00001020: 42 45 52 00 50 18 9A 06 99 22 54 4F 20 53 45 4E |BER.P...."TO SEN|
00001030: 44 20 49 4E 20 41 20 50 52 4F 42 45 2E 20 20 49 |D IN A PROBE. I|
00001040: 46 20 54 48 45 20 50 52 4F 42 45 20 48 49 54 53 |F THE PROBE HITS|
00001050: 00 7C 18 A4 06 99 22 41 20 42 41 4C 4C 20 48 45 |.|...."A BALL HE|
00001060: 41 44 2D 4F 4E 2C 20 49 54 20 49 53 20 41 42 53 |AD-ON, IT IS ABS|
00001070: 4F 52 42 45 44 3B 20 49 46 20 49 54 00 A8 18 AE |ORBED; IF IT....|
00001080: 06 99 22 48 49 54 53 20 41 20 47 4C 41 4E 43 49 |.."HITS A GLANCI|
00001090: 4E 47 20 42 4C 4F 57 2C 20 49 54 20 49 53 20 44 |NG BLOW, IT IS D|
000010A0: 45 46 4C 45 43 54 45 44 00 CF 18 B8 06 99 22 39 |EFLECTED......"9|
000010B0: 30 20 44 45 47 52 45 45 53 3B 20 54 57 4F 20 44 |0 DEGREES; TWO D|
000010C0: 45 46 4C 45 43 54 49 4F 4E 53 20 4F 52 20 41 00 |EFLECTIONS OR A.|
000010D0: FC 18 C2 06 99 22 44 45 46 4C 45 43 54 49 4F 4E |....."DEFLECTION|
000010E0: 20 42 45 46 4F 52 45 20 47 45 54 54 49 4E 47 20 | BEFORE GETTING |
000010F0: 4F 4E 20 54 48 45 20 42 4F 41 52 44 00 15 19 CC |ON THE BOARD....|
00001100: 06 99 22 4D 41 4B 45 20 41 20 52 45 46 4C 45 43 |.."MAKE A REFLEC|
00001110: 54 49 4F 4E 2E 00 40 19 D6 06 99 22 49 20 4D 41 |TION..@...."I MA|
00001120: 52 4B 20 41 42 53 4F 52 50 54 49 4F 4E 53 20 42 |RK ABSORPTIONS B|
00001130: 59 20 A6 2C 20 52 45 46 4C 45 43 54 49 4F 4E 53 |Y ., REFLECTIONS|
00001140: 00 6B 19 E0 06 99 22 42 59 20 DA 2C 20 41 4E 44 |.k...."BY ., AND|
00001150: 20 44 45 46 4C 45 43 54 49 4F 4E 53 20 42 59 20 | DEFLECTIONS BY |
00001160: 50 55 54 54 49 4E 47 20 54 48 45 00 94 19 EA 06 |PUTTING THE.....|
00001170: 99 22 53 41 4D 45 20 53 59 4D 42 4F 4C 20 42 59 |."SAME SYMBOL BY|
00001180: 20 42 4F 54 48 20 49 4E 50 55 54 20 26 20 4F 55 | BOTH INPUT & OU|
00001190: 54 50 55 54 00 BF 19 F4 06 99 22 43 45 4C 4C 53 |TPUT......"CELLS|
000011A0: 2E 20 20 41 4C 4C 20 54 48 49 53 20 57 49 4C 4C |. ALL THIS WILL|
000011B0: 20 42 45 43 4F 4D 45 20 43 4C 45 41 52 45 52 00 | BECOME CLEARER.|
000011C0: DD 19 FE 06 99 22 57 49 54 48 20 53 4F 4D 45 20 |....."WITH SOME |
000011D0: 53 41 4D 50 4C 45 20 47 41 4D 45 53 2E 00 08 1A |SAMPLE GAMES....|
000011E0: 08 07 99 22 54 59 50 45 20 41 20 4C 45 54 54 45 |..."TYPE A LETTE|
000011F0: 52 2D 4E 55 4D 42 45 52 20 50 41 49 52 20 54 4F |R-NUMBER PAIR TO|
00001200: 20 50 4C 41 43 45 20 41 00 35 1A 12 07 99 22 42 | PLACE A.5...."B|
00001210: 41 4C 4C 20 4F 4E 20 54 48 45 20 53 43 52 45 45 |ALL ON THE SCREE|
00001220: 4E 20 28 45 58 41 4D 50 4C 45 53 3A 20 20 41 31 |N (EXAMPLES: A1|
00001230: 2C 20 47 34 2C 00 5D 1A 1C 07 99 22 48 37 2C 20 |, G4,.]...."H7, |
00001240: 45 43 54 2E 29 2E 20 20 54 59 50 45 20 52 20 54 |ECT.). TYPE R T|
00001250: 4F 20 52 45 46 52 45 53 48 20 54 48 45 00 8A 1A |O REFRESH THE...|
00001260: 26 07 99 22 53 43 52 45 45 4E 20 44 49 53 50 4C |&.."SCREEN DISPL|
00001270: 41 59 2C 20 41 4E 44 20 51 20 54 4F 20 51 55 49 |AY, AND Q TO QUI|
00001280: 54 20 47 55 45 53 53 49 4E 47 00 B3 1A 30 07 99 |T GUESSING...0..|
00001290: 22 41 4E 44 20 53 45 45 20 54 48 45 20 41 43 54 |"AND SEE THE ACT|
000012A0: 55 41 4C 20 53 45 54 2D 55 50 20 41 4E 44 20 59 |UAL SET-UP AND Y|
000012B0: 4F 55 52 00 E0 1A 3A 07 99 22 53 43 4F 52 45 2E |OUR...:.."SCORE.|
000012C0: 20 20 59 4F 55 20 47 45 54 20 35 20 50 4F 49 4E | YOU GET 5 POIN|
000012D0: 54 53 20 46 4F 52 20 45 41 43 48 20 42 41 4C 4C |TS FOR EACH BALL|
000012E0: 00 0C 1B 44 07 99 22 54 48 41 54 20 59 4F 55 20 |...D.."THAT YOU |
000012F0: 4D 49 53 53 45 44 20 47 55 45 53 53 49 4E 47 2C |MISSED GUESSING,|
00001300: 20 41 4E 44 20 31 20 50 4F 49 4E 54 00 3A 1B 4E | AND 1 POINT.:.N|
00001310: 07 99 22 46 4F 52 20 45 41 43 48 20 53 59 4D 42 |.."FOR EACH SYMB|
00001320: 4F 4C 20 59 4F 55 20 47 4F 54 20 41 52 4F 55 4E |OL YOU GOT AROUN|
00001330: 44 20 54 48 45 20 45 44 47 45 00 64 1B 58 07 99 |D THE EDGE.d.X..|
00001340: 22 4F 46 20 54 48 45 20 53 43 52 45 45 4E 2C 20 |"OF THE SCREEN, |
00001350: 54 52 59 20 54 4F 20 4D 49 4E 49 4D 49 5A 45 20 |TRY TO MINIMIZE |
00001360: 59 4F 55 52 00 97 1B 62 07 99 22 53 43 4F 52 45 |YOUR...b.."SCORE|
00001370: 2E 20 20 47 4F 4F 44 20 4C 55 43 4B 21 20 12 48 |. GOOD LUCK! .H|
00001380: 49 54 20 41 20 4B 45 59 20 54 4F 20 50 4C 41 59 |IT A KEY TO PLAY|
00001390: 22 3A 41 24 B2 22 22 00 AD 1B 6C 07 A1 41 24 3A |":A$.""...l..A$:|
000013A0: 8B 20 41 24 B2 22 22 89 20 31 39 30 30 00 B3 1B |. A$."". 1900...|
000013B0: 76 07 8E 00 00 00 31 30 |v.....10 |
....D.. * BLACK BOX FOR '64'.7.I..53280,
1:.53281,1:.".".Q.N.. .S(I).1266.80.I.2.
J.M.X.. B(7,7),G(4,1),M(31,1).....SY$."A
MSVX.N..K.IHCJUW":BL$."
".S....".":."INSTRUCTIONS";A$:.H(A$,1
)."Y"..1650...... K.0.4:G(K,0)..1:.K:SY.
0... ..380:.*BOARD......600:.*FILL BOARD
.7....".";BL$;".";:.A$:.BL$;".".]....A$.
"R"..".";:.660:.180:.*REFRESH...H..(E(A$
).0).(E(A$).33)..730:.180:.*MOVE. .R..A$
."Q".250:.*SCORE.....A.F(H(A$,1)):B.E(I(
A$,1))......(A.64).(A.73).(B.0).(B.9)..1
520:.180:.*BALL......"HUH?":.180.....SC.
N:GA.GA.1:.N.0.280.O.... K.0. N.1:. (M(K
,1).0).(M(K,0)..M(K,1)).SC.SC.1.V....K.}
.... K.0.4:. G(K,0)..1 . SC.SC.5:.300. .
"..1..(B(G(K,0),G(K,1))).SC.SC.5...,..K:
TT.TT.SC...6..".";.20);"SCORE=";SC:..20)
;"AFTER";GA;"GAMES"...@...20);"AVERAGE="
;TT.GA...J..I.0.7:.J.0.7.M.T.. B(I,J).X.
.S(I):. X,108:. X.1,123:. X.40,124:. X.4
1,126.R.^.B(I,J).0:.J:.I:.".PLAY AGAIN";
A$...H.. H(A$,1).."Y". ....R.N.0:.150...
|..*PRINT BOARD.C...."... A B C D E F
G H......" 3 3 3 2 2 2 2 2......" 2
1 0 9 8 7 6 5":." .................5...
." .OPOPOPOPOPOPOPOP. .BLACKBOX".Q.
..."1.L.L.L.L.L.L.L.L..24.Z...." .OPOPOP
OPOPOPOPOP. Z=REFLECTED...B.."2.L.L.L
.L.L.L.L.L..23...L.." .OPOPOPOPOPOPOPOP.
.=ABSORBED.Z.V.."3.L.L.L.L.L.L.L.L..
22......" .OPOPOPOPOPOPOPOP. R=REFRES
H SCREEN.$...."4.L.L.L.L.L.L.L.L..21.M..
.." .OPOPOPOPOPOPOPOP. Q=QUIT GAME.I.
..."5.L.L.L.L.L.L.L.L..20......" .OPOPOP
OPOPOPOPOP. X#=PUT/TAKE BALL......"6.
L.L.L.L.L.L.L.L..19 AT ROW #,......"
.OPOPOPOPOPOPOPOP. COLUMN X...&.."7
.L.L.L.L.L.L.L.L..18.1.0.." .OPOPOPOPOPO
POPOP. #=SEND PROBE IN.T.:.."8.L.L.L.
L.L.L.L.L..17 AT EDGE CELL #":." ....
...............D.." 0 1 1 1 1 1 1 1...
N.." 9 0 1 2 3 4 5 6.":....X..*FILL BO
ARD.H.B.Z..(.TI).S.L..K.0.4...V.I..(8..(
1)):J..(8..(1))......B(I,J).630.....B(I,
J).1:. K:..'....*REFRESH SCREEN.:....380
:SY.0:.***.H.... N.0.700.S.... K.0.N.1:I
D.M(K,0):OD.M(K,1):.1370:.K...... K.0.4:
I.G(K,0):.I..1.720.K.F.J.G(K,1):X..S(I):
. X,85:. X.1,73:. X.40,74:. X.41,75.U.P.
. K:....Z..*MOVE.....V..((E(A$).7).8):.
V . 990,1000,1010,1020.....M(N,0).E(A$).
)....1190.=.... C . V.0:.1030.O.... L .
R . 890.M.... V . 1150,1160,1170,1180.X.
.. 1190...*.. C . V.0:.1030...4.. L . R
. .1050:.850...>.. L . . 1080:. 850.M.H
.. R . . 1110...R.. 950:. Q . 900...\..
V . 1150,1160,1170,1180...F.. 950:. Q .
900...P..800.4.Z.V.V.2:. V.1 . V.V.4.Q..
.. V.2 . M(N,1).32.Y:.940.M.... V.3 . M(
N,1).X.1:.940...... V.4 . M(N,1).Y.9:.94
0...... V.1 . M(N,1).24.X.G...ID.M(N,0):
OD.M(N,1):.1370:N.N.1:......Q.((X.0).(V.
2)).((Y.0).(V.3)).....Q.Q . ((X.7).(V.4)
).((Y.7).(V.1))...J.....T..***.3...X.E(A
$).1:Y..1:..G...X.8:Y.E(A$).9:..\...X.24
.E(A$):Y.8:..R...X..1:Y.32.E(A$):..{....
***.....M(N,1).0:OD.0:ID.M(N,0):.1370:N.
N.1:.......***.F.$.V.V.2:. V.4 . V.V.4.L
.....U.8..***...B.V.V.1:. V.0 . V.4...L.
....V..***...`.V.V.1:. V.5 . V.1...J....
.T..***.+.~.Y.Y.1:..7...X.X.1:..C...Y.Y.
1:..O...X.X.1:..X....***.V.... V . 1210,
1250,1290,1330.....C.B(X,Y.1):. X.0 . L.
0:.1230...D.L.B(X.1,Y.1)...N.. X.7 . R.0
:..M.X.R.B(X.1,Y.1):......C.B(X.1,Y):. Y
.0 . L.0:.1270.....L.B(X.1,Y.1)...... Y.
7 . R.0:..$...R.B(X.1,Y.1):..E...C.B(X,Y
.1):. X.7 . L.0:.1310.V...L.B(X.1,Y.1).H
.... X.0 . R.0:..{.(.R.B(X.1,Y.1):....2.
C.B(X.1,Y):. Y.7 . L.0:.1350...<.L.B(X.1
,Y.1)...F.. Y.0 . R.0:..R.P.R.B(X.1,Y.1)
:..X.Z.....D.. OD..0 . 1400...N.AD.ID:.1
450:. P1,32:. P2,102:..!.X.. OD..ID .142
0.C...AD.ID:.1450:. P1,32:. P2,90:..P...
AD.ID:.1450:SY.SY.1:S.F(J(SY$,SY,1)).128
...... P1,32:. P2,S... .AD.OD:.1450:. P1
,32:. P2,S:.......***.S....(.(AD.7).8).
1480,1490,1500,1510......:.*ERROR TRAP..
.H.P1.1223.80.AD:P2.P1.1:....R.P1.1969.2
.AD:P2.P1.40:..:...P1.3244.80.AD:P2.P1.1
:..V...P1.1211.2.AD:P2.P1.40:..\.....Q..
.J.A.65:I.B.1:Q.0.}.... K.0.4. .... (G(K
,0)..I).(G(K,1)..J).1580.Q...X..S(I):. X
,79:. X.1,80:. X.40,76:. X.41,122...".Q.
1:G(K,0)..1:K.4...,.. K:. Q . ....6..K.0
.4...@.. G(K,0)...1 .1630.I.J.X..S(I):.
X,85:. X.1,73:. X.40,74:. X.41,75.G.T.G(
K,0).I:G(K,1).J:K.4:Q.1.W.^.. K:. Q . ..
..H.."LIST FULL, SORRY":....R..***INST..
M.|..".I WILL HIDE 5 BALLS WITHIN AN 8V8
BOX,......"YOU MUST DEDUCE THEIR LOCATI
ONS BY.#...."PROBING FROM THE SIDES. TY
PE A NUMBER.P...."TO SEND IN A PROBE. I
F THE PROBE HITS.|...."A BALL HEAD-ON, I
T IS ABSORBED; IF IT......"HITS A GLANCI
NG BLOW, IT IS DEFLECTED.O...."90 DEGREE
S; TWO DEFLECTIONS OR A...B.."DEFLECTION
BEFORE GETTING ON THE BOARD...L.."MAKE
A REFLECTION..@.V.."I MARK ABSORPTIONS B
Y ., REFLECTIONS.K...."BY Z, AND DEFLECT
IONS BY PUTTING THE......"SAME SYMBOL BY
BOTH INPUT & OUTPUT......"CELLS. ALL T
HIS WILL BECOME CLEARER......"WITH SOME
SAMPLE GAMES......."TYPE A LETTER-NUMBER
PAIR TO PLACE A.5...."BALL ON THE SCREE
N (EXAMPLES: A1, G4,.]...."H7, ECT.).
TYPE R TO REFRESH THE...&.."SCREEN DISPL
AY, AND Q TO QUIT GUESSING...0.."AND SEE
THE ACTUAL SET-UP AND YOUR...:.."SCORE.
YOU GET 5 POINTS FOR EACH BALL...D.."T
HAT YOU MISSED GUESSING, AND 1 POINT.:.N
.."FOR EACH SYMBOL YOU GOT AROUND THE ED
GE.D.X.."OF THE SCREEN, TRY TO MINIMIZE
YOUR...B.."SCORE. GOOD LUCK! .HIT A KEY
TO PLAY":A$.""...L..A$:. A$."". 1900...
V.....10
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL