DIGITHUNT.BAS
FILE INFORMATION
FILENAME(S): DIGITHUNT.BAS
FILE TYPE(S): PRG
FILE SIZE: 15K
FIRST SEEN: 2025-11-30 18:12:09
APPEARS ON: 1 disk(s)
FILE HASH
a8c50f3c8188dec33747309a13dca04784c488cdf905a627de00a32e92e75339
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 60 S 2 | DIGITHUNT.BAS | PRG | Sailor, Ganheden | 13 | 17 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 0A 00 8F 40 20 53 31 30 32 34 00 18 |.......@ S1024..|
00000010: 08 14 00 8F 40 20 30 32 00 24 08 1E 00 8F 40 20 |....@ 02.$....@ |
00000020: 52 3D 43 53 00 6F 08 28 00 9C 3A 86 20 41 28 39 |R=CS.o.(..:. A(9|
00000030: 2C 39 29 2C 58 28 39 29 2C 59 28 39 29 2C 50 54 |,9),X(9),Y(9),PT|
00000040: 28 39 29 2C 52 58 28 38 31 29 2C 52 59 28 38 31 |(9),RX(81),RY(81|
00000050: 29 2C 52 4E 28 39 29 2C 43 4E 28 39 29 2C 42 4E |),RN(9),CN(9),BN|
00000060: 28 39 29 2C 52 43 28 39 29 2C 43 43 28 39 29 00 |(9),RC(9),CC(9).|
00000070: BC 08 32 00 86 20 42 43 28 39 29 2C 52 50 28 39 |..2.. BC(9),RP(9|
00000080: 29 2C 43 50 28 39 29 2C 42 50 28 39 29 2C 4E 52 |),CP(9),BP(9),NR|
00000090: 28 39 29 2C 4E 43 28 39 29 2C 4E 42 28 39 29 2C |(9),NC(9),NB(9),|
000000A0: 4C 56 28 39 29 2C 55 56 28 39 29 2C 4B 56 28 39 |LV(9),UV(9),KV(9|
000000B0: 29 2C 56 56 28 39 29 2C 43 28 37 29 00 DF 08 3C |),VV(9),C(7)...<|
000000C0: 00 86 20 52 46 28 37 29 2C 4D 31 24 28 33 29 2C |.. RF(7),M1$(3),|
000000D0: 4D 32 24 28 33 29 2C 42 54 24 28 39 2C 32 29 00 |M2$(3),BT$(9,2).|
000000E0: 1A 09 46 00 83 32 35 35 2C 30 2C 35 36 2C 36 39 |..F..255,0,56,69|
000000F0: 2C 31 33 30 2C 36 39 2C 35 36 2C 30 2C 32 32 34 |,130,69,56,0,224|
00000100: 2C 31 34 34 2C 31 34 34 2C 31 34 34 2C 32 32 34 |,144,144,144,224|
00000110: 2C 31 32 38 2C 36 34 2C 36 33 00 52 09 50 00 83 |,128,64,63.R.P..|
00000120: 32 35 35 2C 31 36 2C 31 34 34 2C 31 36 2C 31 36 |255,16,144,16,16|
00000130: 2C 31 36 2C 31 34 34 2C 31 36 2C 31 36 2C 31 36 |,16,144,16,16,16|
00000140: 2C 31 36 2C 31 36 2C 33 32 2C 36 34 2C 31 32 38 |,16,16,32,64,128|
00000150: 2C 30 00 68 09 5A 00 81 49 B2 38 33 32 A4 38 39 |,0.h.Z..I.832.89|
00000160: 34 3A 97 49 2C 30 3A 82 00 83 09 64 00 81 49 B2 |4:.I,0:....d..I.|
00000170: 38 33 32 A4 38 37 37 A9 33 3A 87 4A 3A 97 49 2C |832.877.3:.J:.I,|
00000180: 4A 3A 82 00 9E 09 6E 00 81 49 B2 38 33 33 A4 38 |J:....n..I.833.8|
00000190: 37 38 A9 33 3A 87 4A 3A 97 49 2C 4A 3A 82 00 DB |78.3:.J:.I,J:...|
000001A0: 09 78 00 97 35 33 32 38 37 2C 30 3A 97 35 33 32 |.x..53287,0:.532|
000001B0: 34 38 2C 35 30 3A 97 35 33 32 34 39 2C 31 39 34 |48,50:.53249,194|
000001C0: 3A 97 35 33 32 36 34 2C 31 3A 97 32 30 34 30 2C |:.53264,1:.2040,|
000001D0: 31 33 3A 97 35 33 32 36 39 2C 31 00 F5 09 82 00 |13:.53269,1.....|
000001E0: 96 A5 58 28 59 29 B2 B5 28 BC 28 59 29 AD BC 28 |..X(Y)..(.(Y)..(|
000001F0: 32 29 29 AA 31 00 45 0A 8C 00 53 4C 24 B2 22 13 |2)).1.E...SL$.".|
00000200: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000210: 11 11 11 11 11 11 22 3A 43 4C 24 B2 22 20 20 20 |......":CL$." |
00000220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000240: 20 20 20 20 22 00 8A 0A 96 00 42 53 24 B2 22 9D | ".....BS$.".|
00000250: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000260: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000270: 9D 9D 9D 9D 9D 9D 11 22 3A 43 53 B2 35 35 33 38 |.......":CS.5538|
00000280: 36 3A 54 53 B2 31 31 31 34 3A 00 AB 0A A0 00 43 |6:TS.1114:.....C|
00000290: 4C 24 B2 22 12 9B 22 AA 53 4C 24 AA 43 4C 24 AA |L$."..".SL$.CL$.|
000002A0: 42 53 24 AA 43 4C 24 AA 42 53 24 00 E7 0A AA 00 |BS$.CL$.BS$.....|
000002B0: 43 4C 24 B2 43 4C 24 AA 22 90 1D 20 20 20 20 20 |CL$.CL$.".. |
000002C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002E0: 20 9B 91 91 91 1D 22 00 1A 0B B4 00 43 28 31 29 | .....".....C(1)|
000002F0: B2 31 31 3A 43 28 32 29 B2 31 32 3A 43 28 33 29 |.11:C(2).12:C(3)|
00000300: B2 31 35 3A 43 28 34 29 B2 31 3A 43 28 35 29 B2 |.15:C(4).1:C(5).|
00000310: 31 35 3A 43 28 36 29 B2 31 32 00 40 0B BE 00 97 |15:C(6).12.@....|
00000320: 35 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 |53280,0:.53281,0|
00000330: 3A 44 42 24 B2 22 11 9D 9D 9D 9D 9D 9D 9D 9D 22 |:DB$."........."|
00000340: 00 8B 0B C8 00 42 4F 24 B2 22 9F 12 D5 C0 C0 C0 |.....BO$."......|
00000350: C0 C0 C0 C9 22 AA 44 42 24 AA 22 DD 20 20 20 20 |....".DB$.". |
00000360: 20 20 DD 22 AA 44 42 24 AA 22 CA C0 C0 C0 C0 C0 | .".DB$."......|
00000370: C0 CB 22 AA 44 42 24 AA 22 1D 90 20 20 20 20 20 |..".DB$.".. |
00000380: 20 20 20 91 9D 20 9D 91 20 9D 22 00 B1 0B D2 00 | .. .. .".....|
00000390: 42 4F 24 B2 42 4F 24 AA 22 9D 9D 9D 9D 9D 9D 9D |BO$.BO$.".......|
000003A0: 9F 22 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 30 3A |.":.15,8,15,"I0:|
000003B0: 22 00 CD 0B DC 00 9F 32 2C 38 2C 32 2C 22 42 45 |"......2,8,2,"BE|
000003C0: 53 54 20 54 49 4D 45 53 2C 50 2C 52 22 00 ED 0B |ST TIMES,P,R"...|
000003D0: E6 00 84 31 35 2C 41 24 2C 41 24 3A 8B 41 24 B3 |...15,A$,A$:.A$.|
000003E0: B1 22 4F 4B 22 A7 A0 32 3A 89 32 35 30 00 20 0C |."OK"..2:.250. .|
000003F0: F0 00 81 49 B2 31 A4 39 3A 84 32 2C 42 54 24 28 |...I.1.9:.2,BT$(|
00000400: 49 2C 31 29 2C 42 54 24 28 49 2C 30 29 2C 42 54 |I,1),BT$(I,0),BT|
00000410: 24 28 49 2C 32 29 3A 82 3A A0 32 3A 89 32 37 30 |$(I,2):.:.2:.270|
00000420: 00 5F 0C FA 00 81 49 B2 31 A4 39 3A 42 54 24 28 |._....I.1.9:BT$(|
00000430: 49 2C 31 29 B2 22 30 30 36 30 30 30 22 3A 42 54 |I,1)."006000":BT|
00000440: 24 28 49 2C 30 29 B2 22 2D 2D 2D 2D 2D 2D 2D 2D |$(I,0)."--------|
00000450: 2D 22 3A 42 54 24 28 49 2C 32 29 B2 22 35 22 00 |-":BT$(I,2)."5".|
00000460: 6D 0C 04 01 82 3A 8D 33 39 34 30 3A 8A 00 AD 0C |m....:.3940:....|
00000470: 0E 01 A0 31 35 3A 97 35 33 32 37 32 2C 32 31 3A |...15:.53272,21:|
00000480: 99 22 93 08 9E 20 20 20 20 20 20 20 20 20 20 20 |."... |
00000490: 44 20 49 20 47 20 49 20 54 20 48 20 55 20 4E 20 |D I G I T H U N |
000004A0: 54 20 20 20 20 20 20 20 20 20 20 20 22 00 E8 0C |T "...|
000004B0: 18 01 8D 33 36 39 30 3A 99 22 13 11 11 9B 22 A6 |...3690:."....".|
000004C0: 33 29 22 12 20 20 4C 45 56 45 4C 20 20 54 49 4D |3)". LEVEL TIM|
000004D0: 45 20 20 20 20 20 20 4E 41 4D 45 20 20 20 20 45 |E NAME E|
000004E0: 52 52 4F 52 53 97 B8 22 00 15 0D 22 01 99 A6 34 |RRORS.."..."...4|
000004F0: 29 22 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |)"..............|
00000500: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000510: B8 B8 B8 9B 22 00 43 0D 2C 01 4A 4A 24 B2 22 20 |....".C.,.JJ$." |
00000520: 20 20 22 3A 81 49 B2 31 A4 39 3A 41 24 B2 42 54 | ":.I.1.9:A$.BT|
00000530: 24 28 49 2C 31 29 3A 8B 49 B2 53 4B A7 97 31 39 |$(I,1):.I.SK..19|
00000540: 39 2C 31 00 6B 0D 36 01 99 A6 36 29 49 22 9D 2E |9,1.k.6...6)I"..|
00000550: 20 20 22 3B 3A 8B C5 28 CA 28 41 24 2C 33 2C 32 | ";:..(.(A$,3,2|
00000560: 29 29 B3 31 30 A7 99 22 20 22 3B 00 99 0D 40 01 |)).10.." ";...@.|
00000570: 99 C5 28 CA 28 41 24 2C 33 2C 32 29 29 22 9D 3A |..(.(A$,3,2))".:|
00000580: 22 CA 28 41 24 2C 35 2C 32 29 4A 4A 24 42 54 24 |".(A$,5,2)JJ$BT$|
00000590: 28 49 2C 30 29 4A 4A 24 3B 00 B3 0D 4A 01 8B C5 |(I,0)JJ$;...J...|
000005A0: 28 42 54 24 28 49 2C 32 29 29 B3 31 30 A7 99 22 |(BT$(I,2)).10.."|
000005B0: 20 22 3B 00 CF 0D 54 01 99 42 54 24 28 49 2C 32 | ";...T..BT$(I,2|
000005C0: 29 22 20 22 3A 82 3A 8B 53 4B A7 34 30 35 30 00 |)" ":.:.SK.4050.|
000005D0: FC 0D 5E 01 97 32 31 34 2C 31 33 3A 99 3A 99 22 |..^..214,13:.:."|
000005E0: 9E 20 20 20 20 20 20 20 20 20 20 20 20 20 53 45 |. SE|
000005F0: 54 54 49 4E 47 20 55 50 2E 2E 2E 22 00 06 0E 68 |TTING UP..."...h|
00000600: 01 8D 31 38 33 30 00 36 0E 72 01 8D 31 35 35 30 |..1830.6.r..1550|
00000610: 3A 81 4A B2 31 A4 33 3A 81 49 B2 31 A4 33 3A 58 |:.J.1.3:.I.1.3:X|
00000620: 28 49 AA 4A AC 33 AB 33 29 B2 52 28 4A 29 AC 33 |(I.J.3.3).R(J).3|
00000630: AB 33 3A 82 3A 82 00 66 0E 7C 01 8D 31 35 35 30 |.3:.:..f.|..1550|
00000640: 3A 81 4A B2 31 A4 33 3A 81 49 B2 31 A4 33 3A 59 |:.J.1.3:.I.1.3:Y|
00000650: 28 49 AA 4A AC 33 AB 33 29 B2 52 28 4A 29 AC 33 |(I.J.3.3).R(J).3|
00000660: AB 33 3A 82 3A 82 00 9B 0E 86 01 81 49 B2 30 A4 |.3:.:.......I.0.|
00000670: 36 A9 33 3A 8D 31 35 35 30 3A 81 4A B2 31 A4 33 |6.3:.1550:.J.1.3|
00000680: 3A 58 28 49 AA 4A 29 B2 58 28 49 AA 4A 29 AA 52 |:X(I.J).X(I.J).R|
00000690: 28 4A 29 3A 82 3A 8D 31 35 35 30 00 BD 0E 90 01 |(J):.:.1550.....|
000006A0: 81 4A B2 31 A4 33 3A 59 28 49 AA 4A 29 B2 59 28 |.J.1.3:Y(I.J).Y(|
000006B0: 49 AA 4A 29 AA 52 28 4A 29 3A 82 3A 82 00 EA 0E |I.J).R(J):.:....|
000006C0: 9A 01 97 32 31 34 2C 31 33 3A 99 3A 99 22 05 20 |...214,13:.:.". |
000006D0: 20 20 20 20 20 20 20 20 20 20 20 20 53 45 54 54 | SETT|
000006E0: 49 4E 47 20 55 50 2E 2E 2E 22 00 16 0F A4 01 81 |ING UP..."......|
000006F0: 58 B2 31 A4 39 3A 81 59 B2 31 A4 39 3A 87 51 3A |X.1.9:.Y.1.9:.Q:|
00000700: 41 28 58 28 58 29 2C 59 28 59 29 29 B2 AB 5A 28 |A(X(X),Y(Y))..Z(|
00000710: 51 29 3A 82 3A 82 00 51 0F AE 01 83 31 2C 35 2C |Q):.:..Q....1,5,|
00000720: 39 2C 38 2C 34 2C 36 2C 37 2C 32 2C 33 2C 38 2C |9,8,4,6,7,2,3,8,|
00000730: 36 2C 33 2C 31 2C 32 2C 37 2C 35 2C 34 2C 39 2C |6,3,1,2,7,5,4,9,|
00000740: 37 2C 32 2C 34 2C 33 2C 39 2C 35 2C 38 2C 36 2C |7,2,4,3,9,5,8,6,|
00000750: 31 00 8C 0F B8 01 83 32 2C 31 2C 38 2C 35 2C 33 |1......2,1,8,5,3|
00000760: 2C 39 2C 36 2C 37 2C 34 2C 34 2C 39 2C 35 2C 37 |,9,6,7,4,4,9,5,7|
00000770: 2C 36 2C 32 2C 33 2C 31 2C 38 2C 36 2C 33 2C 37 |,6,2,3,1,8,6,3,7|
00000780: 2C 34 2C 31 2C 38 2C 32 2C 39 2C 35 00 C7 0F C2 |,4,1,8,2,9,5....|
00000790: 01 83 35 2C 38 2C 32 2C 39 2C 37 2C 34 2C 31 2C |..5,8,2,9,7,4,1,|
000007A0: 33 2C 36 2C 33 2C 34 2C 36 2C 32 2C 38 2C 31 2C |3,6,3,4,6,2,8,1,|
000007B0: 39 2C 35 2C 37 2C 39 2C 37 2C 31 2C 36 2C 35 2C |9,5,7,9,7,1,6,5,|
000007C0: 33 2C 34 2C 38 2C 32 00 D6 0F CC 01 97 31 39 38 |3,4,8,2......198|
000007D0: 2C 30 3A 49 B2 31 00 10 10 D6 01 97 32 31 34 2C |,0:I.1......214,|
000007E0: 31 33 3A 99 3A 99 22 9F 53 4B 49 4C 4C 20 4C 45 |13:.:.".SKILL LE|
000007F0: 56 45 4C 20 28 31 2D 39 29 20 4F 52 20 43 4C 52 |VEL (1-9) OR CLR|
00000800: 20 54 4F 20 43 4C 45 41 52 20 54 49 4D 45 53 22 | TO CLEAR TIMES"|
00000810: 00 23 10 E0 01 A1 41 24 3A 8B 54 49 B3 31 30 A7 |.#....A$:.TI.10.|
00000820: 35 31 30 00 3F 10 EA 01 97 35 35 38 36 39 2C 43 |510.?....55869,C|
00000830: 28 49 29 3A 97 35 35 38 37 31 2C 43 28 49 29 00 |(I):.55871,C(I).|
00000840: 83 10 F4 01 97 35 35 38 37 37 2C 43 28 49 29 3A |.....55877,C(I):|
00000850: 97 35 35 38 37 38 2C 43 28 49 29 3A 97 35 35 38 |.55878,C(I):.558|
00000860: 37 39 2C 43 28 49 29 3A 49 B2 49 AA 31 3A 54 49 |79,C(I):I.I.1:TI|
00000870: 24 B2 22 30 30 30 30 30 30 22 3A 8B 49 B1 36 A7 |$."000000":.I.6.|
00000880: 49 B2 31 00 B1 10 FE 01 53 4B B2 C5 28 41 24 29 |I.1.....SK..(A$)|
00000890: 3A 8B 28 53 4B B1 39 B0 53 4B B3 31 29 AF 41 24 |:.(SK.9.SK.1).A$|
000008A0: B3 B1 22 93 22 AF 41 24 B3 B1 22 13 22 A7 34 38 |..".".A$..".".48|
000008B0: 30 00 C9 10 08 02 8B 41 24 B2 22 93 22 B0 41 24 |0......A$.".".A$|
000008C0: B2 22 13 22 A7 33 39 39 30 00 DF 10 12 02 54 49 |.".".3990.....TI|
000008D0: 24 B2 22 31 36 30 30 30 30 22 3A 89 32 38 30 00 |$."160000":.280.|
000008E0: 0A 11 1C 02 97 35 33 32 37 32 2C 32 31 3A 97 35 |.....53272,21:.5|
000008F0: 33 32 38 30 2C 31 31 3A 97 35 33 32 38 31 2C 31 |3280,11:.53281,1|
00000900: 31 3A 97 35 33 32 36 39 2C 30 00 3A 11 26 02 58 |1:.53269,0.:.&.X|
00000910: 24 B2 22 90 DD 9B A6 9E DD 9B A6 9E DD 9B A6 90 |$.".............|
00000920: DD 9B A6 9E DD 9B A6 9E DD 9B A6 90 DD 9B A6 9E |................|
00000930: DD 9B A6 9E DD 9B A6 90 DD 22 00 69 11 30 02 59 |.........".i.0.Y|
00000940: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 90 AB |$." ..|
00000950: 9E C0 DB C0 DB C0 90 DB 9E C0 DB C0 DB C0 90 DB |................|
00000960: 9E C0 DB C0 DB C0 90 B3 22 00 92 11 3A 02 5A 24 |........"...:.Z$|
00000970: B2 22 20 20 20 20 20 20 20 20 20 20 20 90 AB C0 |." ...|
00000980: DB C0 DB C0 DB C0 DB C0 DB C0 DB C0 DB C0 DB C0 |................|
00000990: B3 22 00 C6 11 44 02 99 22 93 12 9B 1D 20 20 20 |."...D..".... |
000009A0: 20 20 20 20 20 20 20 20 44 20 49 20 47 20 49 20 | D I G I |
000009B0: 54 20 48 20 55 20 4E 20 54 20 20 20 20 20 20 20 |T H U N T |
000009C0: 20 20 90 92 AF 22 00 F7 11 4E 02 99 22 90 1D 12 | ..."...N.."...|
000009D0: 1D AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000009E0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000009F0: AF AF AF AF AF AF 22 00 1D 12 58 02 99 22 05 20 |......"...X..". |
00000A00: 20 20 20 20 20 20 20 20 20 20 20 41 20 42 20 43 | A B C|
00000A10: 20 44 20 45 20 46 20 47 20 48 20 49 22 00 44 12 | D E F G H I".D.|
00000A20: 62 02 99 22 90 20 20 20 20 20 20 20 20 20 20 20 |b..". |
00000A30: B0 C0 B2 C0 B2 C0 B2 C0 B2 C0 B2 C0 B2 C0 B2 C0 |................|
00000A40: B2 C0 AE 22 00 5F 12 6C 02 99 22 20 20 20 20 20 |..."._.l.." |
00000A50: 20 20 20 20 20 05 52 22 3B 58 24 3A 99 59 24 00 | .R";X$:.Y$.|
00000A60: 7A 12 76 02 99 22 20 20 20 20 20 20 20 20 20 20 |z.v.." |
00000A70: 05 53 22 3B 58 24 3A 99 59 24 00 95 12 80 02 99 |.S";X$:.Y$......|
00000A80: 22 20 20 20 20 20 20 20 20 20 20 05 54 22 3B 58 |" .T";X|
00000A90: 24 3A 99 5A 24 00 B0 12 8A 02 99 22 20 20 20 20 |$:.Z$......" |
00000AA0: 20 20 20 20 20 20 05 55 22 3B 58 24 3A 99 59 24 | .U";X$:.Y$|
00000AB0: 00 CB 12 94 02 99 22 20 20 20 20 20 20 20 20 20 |......" |
00000AC0: 20 05 56 22 3B 58 24 3A 99 59 24 00 E6 12 9E 02 | .V";X$:.Y$.....|
00000AD0: 99 22 20 20 20 20 20 20 20 20 20 20 05 57 22 3B |." .W";|
00000AE0: 58 24 3A 99 5A 24 00 01 13 A8 02 99 22 20 20 20 |X$:.Z$......" |
00000AF0: 20 20 20 20 20 20 20 05 58 22 3B 58 24 3A 99 59 | .X";X$:.Y|
00000B00: 24 00 1C 13 B2 02 99 22 20 20 20 20 20 20 20 20 |$......" |
00000B10: 20 20 05 59 22 3B 58 24 3A 99 59 24 00 57 13 BC | .Y";X$:.Y$.W..|
00000B20: 02 99 22 20 20 20 20 20 20 20 20 20 20 05 5A 22 |.." .Z"|
00000B30: 3B 58 24 3A 99 22 20 20 20 20 20 20 20 20 20 20 |;X$:." |
00000B40: 20 90 AD C0 B1 C0 B1 C0 B1 C0 B1 C0 B1 C0 B1 C0 | ...............|
00000B50: B1 C0 B1 C0 BD 05 22 00 7F 13 C6 02 99 43 4C 24 |......"......CL$|
00000B60: 3B 22 12 9B 20 20 20 20 20 20 20 20 20 20 20 20 |;".. |
00000B70: 20 4F 4E 45 20 4D 4F 4D 45 4E 54 2E 2E 2E 22 00 | ONE MOMENT...".|
00000B80: AB 13 D0 02 99 22 12 20 20 20 49 27 4D 20 54 48 |.....". I'M TH|
00000B90: 49 4E 4B 49 4E 47 20 4F 46 20 41 20 47 4F 4F 44 |INKING OF A GOOD|
00000BA0: 20 50 55 5A 5A 4C 45 2E 2E 2E 22 00 D5 13 DA 02 | PUZZLE...".....|
00000BB0: 97 31 39 38 33 2C 31 36 30 3A 97 32 30 32 33 2C |.1983,160:.2023,|
00000BC0: 31 36 30 3A 97 35 36 32 35 35 2C 30 3A 97 35 36 |160:.56255,0:.56|
00000BD0: 32 39 35 2C 30 00 07 14 E4 02 97 32 31 34 2C 31 |295,0......214,1|
00000BE0: 32 3A 99 3A 99 22 90 42 45 53 54 20 54 49 4D 45 |2:.:.".BEST TIME|
00000BF0: 22 3A 99 22 1D 22 42 4F 24 3B 3A 41 24 B2 42 54 |":."."BO$;:A$.BT|
00000C00: 24 28 53 4B 2C 31 29 00 29 14 EE 02 99 22 9F 22 |$(SK,1).)...."."|
00000C10: C5 28 CA 28 41 24 2C 33 2C 32 29 29 22 9D 3A 22 |.(.(A$,3,2))".:"|
00000C20: CA 28 41 24 2C 35 2C 32 29 00 46 14 F8 02 97 32 |.(A$,5,2).F....2|
00000C30: 31 34 2C 31 32 3A 99 3A 99 A3 33 32 29 22 90 45 |14,12:.:..32)".E|
00000C40: 52 52 4F 52 53 22 00 53 14 02 03 99 A3 33 31 29 |RRORS".S.....31)|
00000C50: 42 4F 24 00 7D 14 0C 03 99 22 90 11 22 3B 3A 8B |BO$.}...."..";:.|
00000C60: 42 54 24 28 53 4B 2C 30 29 B2 22 2D 2D 2D 2D 2D |BT$(SK,0)."-----|
00000C70: 2D 2D 2D 2D 22 A7 99 22 97 11 1D 22 3B 00 A3 14 |----".."...";...|
00000C80: 16 03 99 42 54 24 28 53 4B 2C 30 29 3A 99 22 13 |...BT$(SK,0):.".|
00000C90: 90 11 11 11 11 11 11 11 11 11 11 1D 1D 4C 49 4D |.............LIM|
00000CA0: 49 54 22 00 C8 14 20 03 99 22 1D 1D 22 C5 28 CA |IT"... .."..".(.|
00000CB0: 28 54 42 24 2C 33 2C 32 29 29 22 9D 3A 22 CA 28 |(TB$,3,2))".:".(|
00000CC0: 54 42 24 2C 35 2C 32 29 00 13 15 2A 03 8D 31 39 |TB$,5,2)...*..19|
00000CD0: 35 30 3A 8F 20 49 46 53 4B 3D 31 30 54 48 45 4E |50:. IFSK=10THEN|
00000CE0: 46 4F 52 49 3D 31 54 4F 39 3A 46 4F 52 49 49 3D |FORI=1TO9:FORII=|
00000CF0: 31 54 4F 39 3A 41 28 49 2C 49 49 29 3D 41 42 53 |1TO9:A(I,II)=ABS|
00000D00: 28 41 28 49 2C 49 49 29 29 3A 4E 45 58 54 3A 4E |(A(I,II)):NEXT:N|
00000D10: 45 58 54 00 3A 15 34 03 99 43 4C 24 3B 22 12 9B |EXT.:.4..CL$;"..|
00000D20: 20 20 20 20 20 20 20 20 20 20 20 20 20 49 27 56 | I'V|
00000D30: 45 20 47 4F 54 20 49 54 21 22 00 4E 15 3E 03 8D |E GOT IT!".N.>..|
00000D40: 31 37 35 30 3A 58 31 B2 35 3A 59 31 B2 35 00 58 |1750:X1.5:Y1.5.X|
00000D50: 15 48 03 8D 31 32 39 30 00 5E 15 52 03 3A 00 70 |.H..1290.^.R.:.p|
00000D60: 15 5C 03 8F 20 20 20 4D 41 49 4E 20 4C 4F 4F 50 |.\.. MAIN LOOP|
00000D70: 00 76 15 66 03 3A 00 B8 15 70 03 8B 4E 55 B3 31 |.v.f.:...p..NU.1|
00000D80: A7 8D 33 38 38 30 3A 99 43 4C 24 22 12 20 20 20 |..3880:.CL$". |
00000D90: 20 20 20 20 20 59 4F 55 20 57 49 4E 20 57 49 54 | YOU WIN WIT|
00000DA0: 48 20 4F 4E 4C 59 22 53 43 22 45 52 52 4F 52 53 |H ONLY"SC"ERRORS|
00000DB0: 22 3B 3A 89 31 34 38 30 00 F4 15 7A 03 8B C5 28 |";:.1480...z...(|
00000DC0: 54 49 24 29 B1 31 30 30 30 30 A7 99 22 13 11 11 |TI$).10000.."...|
00000DD0: 11 11 11 1D 22 42 4F 24 22 13 11 11 11 11 11 22 |...."BO$"......"|
00000DE0: A6 33 31 29 42 4F 24 3A 54 49 24 B2 22 30 30 30 |.31)BO$:TI$."000|
00000DF0: 30 30 30 22 00 2A 16 84 03 99 22 13 11 11 11 11 |000".*....".....|
00000E00: 1D 1D 1D 90 92 54 49 4D 45 1D 1D 1D 1D 1D 1D 1D |.....TIME.......|
00000E10: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000E20: 1D 41 43 43 55 52 41 43 59 22 00 3F 16 8E 03 97 |.ACCURACY".?....|
00000E30: 43 53 AA 32 AC 58 31 AA 38 30 AC 59 31 2C 31 00 |CS.2.X1.80.Y1,1.|
00000E40: 49 16 98 03 8D 33 38 36 30 00 79 16 A2 03 8D 33 |I....3860.y....3|
00000E50: 35 38 30 3A 8B 41 28 58 31 2C 59 31 29 B1 30 A7 |580:.A(X1,Y1).0.|
00000E60: 8B 41 24 B1 22 30 22 AF 41 24 B3 B2 22 39 22 A7 |.A$."0".A$.."9".|
00000E70: 54 52 25 B2 54 52 25 AA 31 00 B4 16 AC 03 8F 20 |TR%.TR%.1...... |
00000E80: 49 46 41 24 3D 22 3F 22 4F 52 41 24 3D 22 2F 22 |IFA$="?"ORA$="/"|
00000E90: 54 48 45 4E 53 43 3D 53 43 2B 31 3A 58 4D 3D 31 |THENSC=SC+1:XM=1|
00000EA0: 3A 47 4F 53 55 42 33 36 34 30 3A 54 52 25 3D 54 |:GOSUB3640:TR%=T|
00000EB0: 52 25 2B 31 00 C7 16 B6 03 8B 54 49 24 B1 54 42 |R%+1......TI$.TB|
00000EC0: 24 A7 8D 33 39 37 30 00 12 17 C0 03 41 B2 C6 28 |$..3970.....A..(|
00000ED0: 41 24 29 3A 58 32 B2 58 31 3A 59 32 B2 59 31 3A |A$):X2.X1:Y2.Y1:|
00000EE0: 8F 50 4F 4B 45 31 39 38 33 2C 31 36 30 3A 50 4F |.POKE1983,160:PO|
00000EF0: 4B 45 32 30 32 33 2C 31 36 30 3A 50 4F 4B 45 35 |KE2023,160:POKE5|
00000F00: 36 32 35 35 2C 30 3A 50 4F 4B 45 35 36 32 39 35 |6255,0:POKE56295|
00000F10: 2C 30 00 31 17 CA 03 8B 41 B1 B2 36 35 AF 41 B3 |,0.1....A..65.A.|
00000F20: B2 37 33 A7 58 32 B2 41 AB 36 34 3A 89 31 33 32 |.73.X2.A.64:.132|
00000F30: 30 00 50 17 D4 03 8B 41 B1 B2 38 32 AF 41 B3 B2 |0.P....A..82.A..|
00000F40: 39 30 A7 59 32 B2 41 AB 38 31 3A 89 31 33 32 30 |90.Y2.A.81:.1320|
00000F50: 00 66 17 DE 03 8B 41 B2 31 33 33 A7 8D 32 32 38 |.f....A.133..228|
00000F60: 30 3A 89 38 34 30 00 7C 17 E8 03 8B 41 B2 31 33 |0:.840.|....A.13|
00000F70: 34 A7 8D 32 36 35 30 3A 89 38 34 30 00 92 17 F2 |4..2650:.840....|
00000F80: 03 8B 41 B2 31 33 35 A7 8D 32 35 35 30 3A 89 38 |..A.135..2550:.8|
00000F90: 34 30 00 A2 17 FC 03 8B 41 B2 31 33 36 A7 32 38 |40......A.136.28|
00000FA0: 36 30 00 D6 17 06 04 8B 41 B2 34 37 AF 41 28 58 |60......A.47.A(X|
00000FB0: 31 2C 59 31 29 B1 30 A7 46 46 25 B2 31 3A 8D 31 |1,Y1).0.FF%.1:.1|
00000FC0: 36 38 30 3A 53 43 B2 53 43 AA 32 3A 8D 33 38 36 |680:SC.SC.2:.386|
00000FD0: 30 3A 89 38 38 30 00 FF 17 10 04 8B 41 B2 36 33 |0:.880......A.63|
00000FE0: A7 8D 31 37 39 30 3A 53 43 B2 53 43 AA 32 3A 46 |..1790:SC.SC.2:F|
00000FF0: 46 25 B2 31 3A 8D 33 38 36 30 3A 89 38 38 30 00 |F%.1:.3860:.880.|
00001000: 17 18 1A 04 8B 41 B2 31 37 A7 59 32 B2 59 31 AA |.....A.17.Y2.Y1.|
00001010: 31 3A 89 31 33 32 30 00 2F 18 24 04 8B 41 B2 32 |1:.1320./.$..A.2|
00001020: 39 A7 58 32 B2 58 31 AA 31 3A 89 31 33 32 30 00 |9.X2.X1.1:.1320.|
00001030: 48 18 2E 04 8B 41 B2 31 34 35 A7 59 32 B2 59 31 |H....A.145.Y2.Y1|
00001040: AB 31 3A 89 31 33 32 30 00 61 18 38 04 8B 41 B2 |.1:.1320.a.8..A.|
00001050: 31 35 37 A7 58 32 B2 58 31 AB 31 3A 89 31 33 32 |157.X2.X1.1:.132|
00001060: 30 00 70 18 42 04 8B 41 B2 38 31 A7 31 33 37 30 |0.p.B..A.81.1370|
00001070: 00 83 18 4C 04 8B 41 B3 34 39 B0 41 B1 35 37 A7 |...L..A.49.A.57.|
00001080: 38 38 30 00 9E 18 56 04 41 B2 41 AB 34 38 3A 8B |880...V.A.A.48:.|
00001090: 41 28 58 31 2C 59 31 29 B3 30 A7 38 38 30 00 B9 |A(X1,Y1).0.880..|
000010A0: 18 60 04 8B 41 28 58 31 2C 59 31 29 B2 41 A7 8D |.`..A(X1,Y1).A..|
000010B0: 31 36 38 30 3A 89 38 38 30 00 D7 18 6A 04 58 32 |1680:.880...j.X2|
000010C0: B2 58 31 3A 59 32 B2 59 31 3A 53 43 B2 53 43 AA |.X1:Y2.Y1:SC.SC.|
000010D0: 31 3A 8D 33 38 36 30 00 F2 18 74 04 8B 28 52 4E |1:.3860...t..(RN|
000010E0: 28 59 31 29 AF 50 54 28 41 29 29 B2 30 A7 31 31 |(Y1).PT(A)).0.11|
000010F0: 37 30 00 12 19 7E 04 4A B2 31 3A 81 49 B2 31 A4 |70...~.J.1:.I.1.|
00001100: 39 3A 8B 41 28 49 2C 59 31 29 B2 AB 41 A7 58 32 |9:.A(I,Y1)..A.X2|
00001110: B2 49 00 29 19 88 04 82 3A 49 B2 59 31 3A 8D 32 |.I.)....:I.Y1:.2|
00001120: 38 32 30 3A 89 31 32 34 30 00 44 19 92 04 8B 28 |820:.1240.D....(|
00001130: 43 4E 28 58 31 29 AF 50 54 28 41 29 29 B2 30 A7 |CN(X1).PT(A)).0.|
00001140: 31 32 30 30 00 64 19 9C 04 4A B2 32 3A 81 49 B2 |1200.d...J.2:.I.|
00001150: 31 A4 39 3A 8B 41 28 58 31 2C 49 29 B2 AB 41 A7 |1.9:.A(X1,I)..A.|
00001160: 59 32 B2 49 00 7B 19 A6 04 82 3A 49 B2 58 31 3A |Y2.I.{....:I.X1:|
00001170: 8D 32 38 32 30 3A 89 31 32 34 30 00 A5 19 B0 04 |.2820:.1240.....|
00001180: 42 B2 4B 56 28 58 31 29 AA 55 56 28 59 31 29 3A |B.KV(X1).UV(Y1):|
00001190: 8B 28 42 4E 28 42 29 AF 50 54 28 41 29 29 B2 30 |.(BN(B).PT(A)).0|
000011A0: A7 31 32 33 30 00 E4 19 BA 04 81 49 B2 56 56 28 |.1230......I.VV(|
000011B0: 42 29 AA 31 A4 56 56 28 42 29 AA 33 3A 81 4A B2 |B).1.VV(B).3:.J.|
000011C0: 55 56 28 42 29 AA 31 A4 55 56 28 42 29 AA 33 3A |UV(B).1.UV(B).3:|
000011D0: 8B 41 28 49 2C 4A 29 B2 AB 41 A7 58 32 B2 49 3A |.A(I,J)..A.X2.I:|
000011E0: 59 32 B2 4A 00 01 1A C4 04 82 4A 2C 49 3A 4A B2 |Y2.J......J,I:J.|
000011F0: 33 3A 49 B2 42 3A 8D 32 38 32 30 3A 89 31 32 34 |3:I.B:.2820:.124|
00001200: 30 00 3D 1A CE 04 4D 31 24 28 31 29 B2 22 12 3E |0.=...M1$(1).".>|
00001210: 3E 3E 20 49 20 48 41 56 45 20 41 20 44 49 46 46 |>> I HAVE A DIFF|
00001220: 45 52 45 4E 54 20 44 49 47 49 54 20 54 48 45 52 |ERENT DIGIT THER|
00001230: 45 22 3A 58 32 B2 30 3A 89 31 32 35 30 00 6C 1A |E":X2.0:.1250.l.|
00001240: D8 04 4D 31 24 28 31 29 B2 22 12 3E 3E 3E 20 22 |..M1$(1).".>>> "|
00001250: AA 42 24 AA 43 24 AA 22 20 41 4C 52 45 41 44 59 |.B$.C$." ALREADY|
00001260: 20 48 41 53 20 41 22 AA C4 28 41 29 00 93 1A E2 | HAS A"..(A)....|
00001270: 04 99 43 4C 24 3B 4D 31 24 28 31 29 3A 8B 58 32 |..CL$;M1$(1):.X2|
00001280: B1 30 A7 97 43 53 AA 32 AC 58 32 AA 38 30 AC 59 |.0..CS.2.X2.80.Y|
00001290: 32 2C 30 00 9E 1A EC 04 8D 20 33 35 38 30 00 BA |2,0...... 3580..|
000012A0: 1A F6 04 8B 58 32 B1 30 A7 97 43 53 AA 32 AC 58 |....X2.0..CS.2.X|
000012B0: 32 AA 38 30 AC 59 32 2C 31 35 00 C9 1A 00 05 8D |2.80.Y2,15......|
000012C0: 31 32 39 30 3A 89 39 36 30 00 FB 1A 0A 05 99 43 |1290:.960......C|
000012D0: 4C 24 3B 22 12 20 20 51 3A 51 55 49 54 20 20 3F |L$;". Q:QUIT ?|
000012E0: 3A 52 45 56 45 41 4C 20 52 4E 44 20 20 2F 3A 52 |:REVEAL RND /:R|
000012F0: 45 56 45 41 4C 20 54 48 49 53 22 00 2C 1B 14 05 |EVEAL THIS".,...|
00001300: 99 22 12 20 20 46 31 3A 50 52 49 4E 54 20 20 46 |.". F1:PRINT F|
00001310: 33 3A 4C 4F 41 44 20 20 46 35 3A 53 41 56 45 20 |3:LOAD F5:SAVE |
00001320: 20 46 37 3A 48 49 4E 54 22 3B 3A 8E 00 4E 1B 1E | F7:HINT";:..N..|
00001330: 05 8F 20 20 20 4D 4F 56 45 20 43 55 52 53 4F 52 |.. MOVE CURSOR|
00001340: 2C 20 43 48 45 43 4B 20 42 4F 55 4E 44 53 00 7B |, CHECK BOUNDS.{|
00001350: 1B 28 05 97 43 53 AA 32 AC 58 31 AA 38 30 AC 59 |.(..CS.2.X1.80.Y|
00001360: 31 2C 31 35 3A 58 31 B2 58 32 3A 59 31 B2 59 32 |1,15:X1.X2:Y1.Y2|
00001370: 3A 8B 58 31 B3 31 A7 58 31 B2 39 00 8A 1B 32 05 |:.X1.1.X1.9...2.|
00001380: 8B 58 31 B1 39 A7 58 31 B2 31 00 99 1B 3C 05 8B |.X1.9.X1.1...<..|
00001390: 59 31 B3 31 A7 59 31 B2 39 00 A8 1B 46 05 8B 59 |Y1.1.Y1.9...F..Y|
000013A0: 31 B1 39 A7 59 31 B2 31 00 B1 1B 50 05 89 38 38 |1.9.Y1.1...P..88|
000013B0: 30 00 E0 1B 5A 05 99 43 4C 24 3B 22 12 51 55 49 |0...Z..CL$;".QUI|
000013C0: 54 3F 20 20 46 31 3A 59 45 53 20 20 46 33 3A 53 |T? F1:YES F3:S|
000013D0: 48 4F 57 20 47 52 49 44 20 20 46 37 3A 4E 4F 22 |HOW GRID F7:NO"|
000013E0: 00 F4 1B 64 05 A1 41 24 3A 8B 41 24 B2 22 22 A7 |...d..A$:.A$."".|
000013F0: 31 33 38 30 00 07 1C 6E 05 8B 41 24 B2 22 59 22 |1380...n..A$."Y"|
00001400: A7 41 24 B2 22 85 22 00 1A 1C 78 05 8B 41 24 B2 |.A$."."...x..A$.|
00001410: 22 4E 22 A7 41 24 B2 22 88 22 00 2D 1C 82 05 8B |"N".A$.".".-....|
00001420: 41 24 B2 C7 28 31 33 36 29 A7 38 34 30 00 41 1C |A$..(136).840.A.|
00001430: 8C 05 8B 41 24 B2 C7 28 31 33 33 29 A7 31 34 37 |...A$..(133).147|
00001440: 30 00 56 1C 96 05 8B 41 24 B3 B1 C7 28 31 33 34 |0.V....A$...(134|
00001450: 29 A7 31 33 38 30 00 7F 1C A0 05 81 59 B2 31 A4 |).1380......Y.1.|
00001460: 39 3A 81 58 B2 31 A4 39 3A 97 54 53 AA 32 AC 58 |9:.X.1.9:.TS.2.X|
00001470: AA 38 30 AC 59 2C 34 38 AA 41 28 58 2C 59 29 00 |.80.Y,48.A(X,Y).|
00001480: A4 1C AA 05 8B 41 28 58 2C 59 29 B3 30 A7 97 54 |.....A(X,Y).0..T|
00001490: 53 AA 32 AC 58 AA 38 30 AC 59 2C 34 38 AB 41 28 |S.2.X.80.Y,48.A(|
000014A0: 58 2C 59 29 00 AD 1C B4 05 82 58 2C 59 00 BB 1C |X,Y)......X,Y...|
000014B0: BE 05 99 43 4C 24 3B 22 91 22 3B 00 CC 1C C8 05 |...CL$;".";.....|
000014C0: 8B 53 43 B2 31 A7 20 99 22 9D 20 22 00 D2 1C D2 |.SC.1. .". "....|
000014D0: 05 99 00 04 1D DC 05 97 43 53 AA 32 AC 58 31 AA |........CS.2.X1.|
000014E0: 38 30 AC 59 31 2C 31 35 3A 99 A6 31 33 29 22 12 |80.Y1,15:..13)".|
000014F0: 50 4C 41 59 20 41 47 41 49 4E 3F 20 20 28 59 2F |PLAY AGAIN? (Y/|
00001500: 4E 29 13 22 00 22 1D E6 05 A1 41 24 3A 8B 41 24 |N)."."....A$:.A$|
00001510: B3 B1 22 59 22 AF 41 24 B3 B1 22 4E 22 A7 31 35 |.."Y".A$.."N".15|
00001520: 31 30 00 33 1D F0 05 8B 41 24 B2 22 4E 22 A7 33 |10.3....A$."N".3|
00001530: 36 34 30 00 39 1D FA 05 8A 00 5A 1D 04 06 8F 20 |640.9.....Z.... |
00001540: 20 20 43 4F 4D 50 55 54 45 20 50 45 52 4D 55 54 | COMPUTE PERMUT|
00001550: 41 54 49 4F 4E 20 4F 46 20 33 00 73 1D 0E 06 52 |ATION OF 3.s...R|
00001560: 28 31 29 B2 31 3A 52 28 32 29 B2 32 3A 52 28 33 |(1).1:R(2).2:R(3|
00001570: 29 B2 33 00 9E 1D 18 06 52 B2 B5 28 BB 28 54 49 |).3.....R..(.(TI|
00001580: 29 AC 32 29 AA 32 3A 53 B2 52 28 31 29 3A 52 28 |).2).2:S.R(1):R(|
00001590: 31 29 B2 52 28 52 29 3A 52 28 52 29 B2 53 00 CB |1).R(R):R(R).S..|
000015A0: 1D 22 06 52 B2 B5 28 BB 28 54 49 29 AC 32 29 AC |.".R..(.(TI).2).|
000015B0: 32 AA 31 3A 53 B2 52 28 32 29 3A 52 28 32 29 B2 |2.1:S.R(2):R(2).|
000015C0: 52 28 52 29 3A 52 28 52 29 B2 53 00 F6 1D 2C 06 |R(R):R(R).S...,.|
000015D0: 52 B2 B5 28 BB 28 54 49 29 AC 32 29 AA 31 3A 53 |R..(.(TI).2).1:S|
000015E0: B2 52 28 33 29 3A 52 28 33 29 B2 52 28 52 29 3A |.R(3):R(3).R(R):|
000015F0: 52 28 52 29 B2 53 00 FC 1D 36 06 8E 00 1B 1E 40 |R(R).S...6.....@|
00001600: 06 8F 20 20 20 52 45 4D 4F 56 45 20 53 51 55 41 |.. REMOVE SQUA|
00001610: 52 45 20 41 54 20 28 58 2C 59 29 00 60 1E 4A 06 |RE AT (X,Y).`.J.|
00001620: 4E B2 AB 41 28 58 2C 59 29 3A 41 28 58 2C 59 29 |N..A(X,Y):A(X,Y)|
00001630: B2 4E 3A 4E 55 B2 4E 55 AA 31 3A 50 54 B2 50 54 |.N:NU.NU.1:PT.PT|
00001640: 28 4E 29 3A 42 B2 4B 56 28 58 29 AA 55 56 28 59 |(N):B.KV(X).UV(Y|
00001650: 29 3A 42 53 B2 4C 56 28 58 29 AA 56 56 28 59 29 |):BS.LV(X).VV(Y)|
00001660: 00 91 1E 54 06 52 4E 28 59 29 B2 52 4E 28 59 29 |...T.RN(Y).RN(Y)|
00001670: AB 50 54 3A 43 4E 28 58 29 B2 43 4E 28 58 29 AB |.PT:CN(X).CN(X).|
00001680: 50 54 3A 42 4E 28 42 29 B2 42 4E 28 42 29 AB 50 |PT:BN(B).BN(B).P|
00001690: 54 00 BF 1E 5E 06 52 43 28 59 29 B2 52 43 28 59 |T...^.RC(Y).RC(Y|
000016A0: 29 AB 31 3A 43 43 28 58 29 B2 43 43 28 58 29 AB |).1:CC(X).CC(X).|
000016B0: 31 3A 42 43 28 42 29 B2 42 43 28 42 29 AB 31 00 |1:BC(B).BC(B).1.|
000016C0: FA 1E 68 06 52 50 28 59 29 B2 52 50 28 59 29 AB |..h.RP(Y).RP(Y).|
000016D0: 50 54 28 58 29 3A 43 50 28 58 29 B2 43 50 28 58 |PT(X):CP(X).CP(X|
000016E0: 29 AB 50 54 28 59 29 3A 42 50 28 42 29 B2 42 50 |).PT(Y):BP(B).BP|
000016F0: 28 42 29 AB 50 54 28 42 53 29 00 34 1F 72 06 4E |(B).PT(BS).4.r.N|
00001700: 52 28 4E 29 B2 4E 52 28 4E 29 AB 50 54 28 59 29 |R(N).NR(N).PT(Y)|
00001710: 3A 4E 43 28 4E 29 B2 4E 43 28 4E 29 AB 50 54 28 |:NC(N).NC(N).PT(|
00001720: 58 29 3A 4E 42 28 4E 29 B2 4E 42 28 4E 29 AB 50 |X):NB(N).NB(N).P|
00001730: 54 28 42 29 00 3A 1F 7C 06 8E 00 5C 1F 86 06 8F |T(B).:.|...\....|
00001740: 20 20 20 46 49 4C 4C 20 49 4E 20 53 51 55 41 52 | FILL IN SQUAR|
00001750: 45 20 41 54 20 28 58 31 2C 59 31 29 00 A9 1F 90 |E AT (X1,Y1)....|
00001760: 06 4E B2 41 28 58 31 2C 59 31 29 3A 41 28 58 31 |.N.A(X1,Y1):A(X1|
00001770: 2C 59 31 29 B2 AB 4E 3A 4E 55 B2 4E 55 AB 31 3A |,Y1)..N:NU.NU.1:|
00001780: 50 54 B2 50 54 28 4E 29 3A 42 B2 4B 56 28 58 31 |PT.PT(N):B.KV(X1|
00001790: 29 AA 55 56 28 59 31 29 3A 42 53 B2 4C 56 28 58 |).UV(Y1):BS.LV(X|
000017A0: 31 29 AA 56 56 28 59 31 29 00 DE 1F 9A 06 52 4E |1).VV(Y1).....RN|
000017B0: 28 59 31 29 B2 52 4E 28 59 31 29 AA 50 54 3A 43 |(Y1).RN(Y1).PT:C|
000017C0: 4E 28 58 31 29 B2 43 4E 28 58 31 29 AA 50 54 3A |N(X1).CN(X1).PT:|
000017D0: 42 4E 28 42 29 B2 42 4E 28 42 29 AA 50 54 00 10 |BN(B).BN(B).PT..|
000017E0: 20 A4 06 52 43 28 59 31 29 B2 52 43 28 59 31 29 | ..RC(Y1).RC(Y1)|
000017F0: AA 31 3A 43 43 28 58 31 29 B2 43 43 28 58 31 29 |.1:CC(X1).CC(X1)|
00001800: AA 31 3A 42 43 28 42 29 B2 42 43 28 42 29 AA 31 |.1:BC(B).BC(B).1|
00001810: 00 51 20 AE 06 52 50 28 59 31 29 B2 52 50 28 59 |.Q ..RP(Y1).RP(Y|
00001820: 31 29 AA 50 54 28 58 31 29 3A 43 50 28 58 31 29 |1).PT(X1):CP(X1)|
00001830: B2 43 50 28 58 31 29 AA 50 54 28 59 31 29 3A 42 |.CP(X1).PT(Y1):B|
00001840: 50 28 42 29 B2 42 50 28 42 29 AA 50 54 28 42 53 |P(B).BP(B).PT(BS|
00001850: 29 00 8D 20 B8 06 4E 52 28 4E 29 B2 4E 52 28 4E |).. ..NR(N).NR(N|
00001860: 29 AA 50 54 28 59 31 29 3A 4E 43 28 4E 29 B2 4E |).PT(Y1):NC(N).N|
00001870: 43 28 4E 29 AA 50 54 28 58 31 29 3A 4E 42 28 4E |C(N).PT(X1):NB(N|
00001880: 29 B2 4E 42 28 4E 29 AA 50 54 28 42 29 00 A7 20 |).NB(N).PT(B).. |
00001890: C2 06 97 54 53 AA 32 AC 58 31 AA 38 30 AC 59 31 |...TS.2.X1.80.Y1|
000018A0: 2C 34 38 AA 4E 3A 8E 00 C6 20 CC 06 8F 20 20 20 |,48.N:... ... |
000018B0: 41 44 44 20 4E 55 4D 42 45 52 53 20 54 4F 20 44 |ADD NUMBERS TO D|
000018C0: 49 53 50 4C 41 59 00 E9 20 D6 06 81 59 B2 31 A4 |ISPLAY.. ...Y.1.|
000018D0: 39 3A 81 58 B2 31 A4 39 3A 97 54 53 AA 32 AC 58 |9:.X.1.9:.TS.2.X|
000018E0: AA 38 30 AC 59 2C 31 30 32 00 0E 21 E0 06 8B 41 |.80.Y,102..!...A|
000018F0: 28 58 2C 59 29 B3 30 A7 97 54 53 AA 32 AC 58 AA |(X,Y).0..TS.2.X.|
00001900: 38 30 AC 59 2C 34 38 AB 41 28 58 2C 59 29 00 19 |80.Y,48.A(X,Y)..|
00001910: 21 EA 06 82 58 2C 59 3A 8E 00 37 21 F4 06 8F 20 |!...X,Y:..7!... |
00001920: 20 20 46 49 4C 4C 20 49 4E 20 52 41 4E 44 4F 4D | FILL IN RANDOM|
00001930: 20 53 51 55 41 52 45 00 4D 21 FE 06 97 43 53 AA | SQUARE.M!...CS.|
00001940: 32 AC 58 31 AA 38 30 AC 59 31 2C 31 35 00 7E 21 |2.X1.80.Y1,15.~!|
00001950: 08 07 52 51 B2 52 51 AA 31 3A 58 31 B2 52 58 28 |..RQ.RQ.1:X1.RX(|
00001960: 52 51 29 3A 59 31 B2 52 59 28 52 51 29 3A 8B 41 |RQ):Y1.RY(RQ):.A|
00001970: 28 58 31 2C 59 31 29 B3 30 A7 31 38 30 30 00 8A |(X1,Y1).0.1800..|
00001980: 21 12 07 8D 31 36 38 30 3A 8E 00 B9 21 1C 07 8F |!...1680:...!...|
00001990: 20 20 20 49 4E 49 54 49 41 4C 49 5A 45 20 50 45 | INITIALIZE PE|
000019A0: 52 4D 55 54 41 54 49 4F 4E 20 41 4E 44 20 46 4C |RMUTATION AND FL|
000019B0: 41 47 20 41 52 52 41 59 53 00 CD 21 26 07 81 49 |AG ARRAYS..!&..I|
000019C0: B2 31 A4 39 3A 5A 28 49 29 B2 49 3A 82 00 01 22 |.1.9:Z(I).I:..."|
000019D0: 30 07 81 49 B2 31 A4 39 3A 58 B2 B5 28 BB 28 54 |0..I.1.9:X..(.(T|
000019E0: 49 29 AC 39 29 AA 31 3A 53 B2 5A 28 49 29 3A 5A |I).9).1:S.Z(I):Z|
000019F0: 28 49 29 B2 5A 28 58 29 3A 5A 28 58 29 B2 53 3A |(I).Z(X):Z(X).S:|
00001A00: 82 00 4A 22 3A 07 50 54 28 31 29 B2 31 3A 50 54 |..J":.PT(1).1:PT|
00001A10: 28 32 29 B2 32 3A 50 54 28 33 29 B2 34 3A 50 54 |(2).2:PT(3).4:PT|
00001A20: 28 34 29 B2 38 3A 50 54 28 35 29 B2 31 36 3A 50 |(4).8:PT(5).16:P|
00001A30: 54 28 36 29 B2 33 32 3A 50 54 28 37 29 B2 36 34 |T(6).32:PT(7).64|
00001A40: 3A 50 54 28 38 29 B2 31 32 38 00 62 22 44 07 50 |:PT(8).128.b"D.P|
00001A50: 54 28 39 29 B2 32 35 36 3A 4E 55 B2 30 3A 52 51 |T(9).256:NU.0:RQ|
00001A60: B2 30 00 B0 22 4E 07 52 46 28 30 29 B2 30 3A 52 |.0.."N.RF(0).0:R|
00001A70: 46 28 31 29 B2 37 3A 52 46 28 32 29 B2 35 36 3A |F(1).7:RF(2).56:|
00001A80: 52 46 28 33 29 B2 36 33 3A 52 46 28 34 29 B2 34 |RF(3).63:RF(4).4|
00001A90: 34 38 3A 52 46 28 35 29 B2 34 35 35 3A 52 46 28 |48:RF(5).455:RF(|
00001AA0: 36 29 B2 35 32 34 3A 52 46 28 37 29 B2 35 31 31 |6).524:RF(7).511|
00001AB0: 00 EF 22 58 07 81 49 B2 31 A4 39 3A 4B 56 28 49 |.."X..I.1.9:KV(I|
00001AC0: 29 B2 B5 28 28 49 AB 31 29 AD 33 29 AA 31 3A 55 |)..((I.1).3).1:U|
00001AD0: 56 28 49 29 B2 33 AC B5 28 28 49 AB 31 29 AD 33 |V(I).3..((I.1).3|
00001AE0: 29 3A 4C 56 28 49 29 B2 49 AB 55 56 28 49 29 00 |):LV(I).I.UV(I).|
00001AF0: 3B 23 62 07 56 56 28 49 29 B2 33 AC 28 4C 56 28 |;#b.VV(I).3.(LV(|
00001B00: 49 29 AB 31 29 3A 52 4E 28 49 29 B2 35 31 31 3A |I).1):RN(I).511:|
00001B10: 43 4E 28 49 29 B2 35 31 31 3A 42 4E 28 49 29 B2 |CN(I).511:BN(I).|
00001B20: 35 31 31 3A 52 43 28 49 29 B2 39 3A 43 43 28 49 |511:RC(I).9:CC(I|
00001B30: 29 B2 39 3A 42 43 28 49 29 B2 39 00 7D 23 6C 07 |).9:BC(I).9.}#l.|
00001B40: 52 50 28 49 29 B2 35 31 31 3A 43 50 28 49 29 B2 |RP(I).511:CP(I).|
00001B50: 35 31 31 3A 42 50 28 49 29 B2 35 31 31 3A 4E 52 |511:BP(I).511:NR|
00001B60: 28 49 29 B2 35 31 31 3A 4E 43 28 49 29 B2 35 31 |(I).511:NC(I).51|
00001B70: 31 3A 4E 42 28 49 29 B2 35 31 31 3A 82 00 B3 23 |1:NB(I).511:...#|
00001B80: 76 07 81 49 B2 30 A4 38 30 3A 52 58 28 49 AA 31 |v..I.0.80:RX(I.1|
00001B90: 29 B2 B5 28 49 AD 39 29 AA 31 3A 52 59 28 49 AA |)..(I.9).1:RY(I.|
00001BA0: 31 29 B2 49 AB 39 AC 52 58 28 49 AA 31 29 AA 31 |1).I.9.RX(I.1).1|
00001BB0: 30 3A 82 00 F2 23 80 07 81 49 B2 31 A4 38 31 3A |0:...#...I.1.81:|
00001BC0: 58 B2 B5 28 BB 28 31 29 AC 38 31 AA 31 29 3A 53 |X..(.(1).81.1):S|
00001BD0: B2 52 58 28 49 29 3A 52 58 28 49 29 B2 52 58 28 |.RX(I):RX(I).RX(|
00001BE0: 58 29 3A 52 58 28 58 29 B2 53 3A 53 B2 52 59 28 |X):RX(X).S:S.RY(|
00001BF0: 49 29 00 0E 24 8A 07 52 59 28 49 29 B2 52 59 28 |I)..$..RY(I).RY(|
00001C00: 58 29 3A 52 59 28 58 29 B2 53 3A 82 3A 8E 00 3B |X):RY(X).S:.:..;|
00001C10: 24 94 07 8F 20 20 20 46 4C 41 47 20 53 51 55 41 |$... FLAG SQUA|
00001C20: 52 45 53 20 54 4F 20 42 45 20 47 55 45 53 53 45 |RES TO BE GUESSE|
00001C30: 44 20 42 59 20 50 4C 41 59 45 52 00 4D 24 9E 07 |D BY PLAYER.M$..|
00001C40: 8D 32 30 30 30 3A 8B 53 4B B3 32 A7 8E 00 5D 24 |.2000:.SK.2...]$|
00001C50: A8 07 8B 53 4B B1 34 A7 8D 32 30 37 30 00 6D 24 |...SK.4..2070.m$|
00001C60: B2 07 8B 53 4B B1 37 A7 8D 32 31 34 30 00 79 24 |...SK.7..2140.y$|
00001C70: BC 07 8D 32 32 31 30 3A 8E 00 AB 24 C6 07 8F 20 |...2210:...$... |
00001C80: 20 20 52 45 4D 4F 56 45 20 4F 4E 45 20 46 52 4F | REMOVE ONE FRO|
00001C90: 4D 20 45 41 43 48 20 52 4F 57 2C 20 43 4F 4C 55 |M EACH ROW, COLU|
00001CA0: 4D 4E 2C 20 41 4E 44 20 42 4F 58 00 CD 24 D0 07 |MN, AND BOX..$..|
00001CB0: 81 58 B2 31 A4 39 3A 59 B2 B5 28 BB 28 54 49 29 |.X.1.9:Y..(.(TI)|
00001CC0: AC 39 AA 31 29 3A 8D 31 36 31 30 3A 82 00 F6 24 |.9.1):.1610:...$|
00001CD0: DA 07 81 59 B2 31 A4 39 3A 8B 52 43 28 59 29 B2 |...Y.1.9:.RC(Y).|
00001CE0: 39 A7 58 B2 B5 28 BB 28 54 49 29 AC 39 AA 31 29 |9.X..(.(TI).9.1)|
00001CF0: 3A 8D 31 36 31 30 00 FC 24 E4 07 82 00 15 25 EE |:.1610..$.....%.|
00001D00: 07 81 51 B2 31 A4 39 3A 8B 42 43 28 51 29 B3 39 |..Q.1.9:.BC(Q).9|
00001D10: A7 32 30 35 30 00 49 25 F8 07 58 B2 56 56 28 51 |.2050.I%..X.VV(Q|
00001D20: 29 AA 31 AA B5 28 BB 28 54 49 29 AC 33 29 3A 59 |).1..(.(TI).3):Y|
00001D30: B2 55 56 28 51 29 AA 31 AA B5 28 BB 28 54 49 29 |.UV(Q).1..(.(TI)|
00001D40: AC 33 29 3A 8D 31 36 31 30 00 51 25 02 08 82 3A |.3):.1610.Q%...:|
00001D50: 8E 00 70 25 0C 08 8F 20 20 20 52 45 4D 4F 56 45 |..p%... REMOVE|
00001D60: 20 53 51 55 41 52 45 20 46 52 4F 4D 20 52 4F 57 | SQUARE FROM ROW|
00001D70: 00 8B 25 16 08 4A B2 32 37 AC 28 53 4B AB 34 29 |..%..J.27.(SK.4)|
00001D80: 3A 8B 4A B1 38 31 A7 4A B2 38 31 00 B5 25 20 08 |:.J.81.J.81..% .|
00001D90: 81 49 B2 31 A4 4A 3A 58 B2 52 58 28 49 29 3A 59 |.I.1.J:X.RX(I):Y|
00001DA0: B2 52 59 28 49 29 3A 8B 41 28 58 2C 59 29 B1 30 |.RY(I):.A(X,Y).0|
00001DB0: A7 32 31 32 30 00 E0 25 2A 08 97 43 53 AA 32 AC |.2120..%*..CS.2.|
00001DC0: 58 AA 38 30 AC 59 2C 30 3A 42 B2 4B 56 28 58 29 |X.80.Y,0:B.KV(X)|
00001DD0: AA 55 56 28 59 29 3A 4E B2 AB 41 28 58 2C 59 29 |.UV(Y):N..A(X,Y)|
00001DE0: 00 20 26 34 08 8B 28 52 50 28 59 29 B0 4E 43 28 |. &4..(RP(Y).NC(|
00001DF0: 4E 29 B0 52 46 28 B5 28 28 4E 42 28 4E 29 AB 50 |N).RF(.((NB(N).P|
00001E00: 54 28 42 29 29 AD 50 54 28 55 56 28 59 29 AA 31 |T(B)).PT(UV(Y).1|
00001E10: 29 29 AF 37 29 29 B2 35 31 31 A7 8D 31 36 31 30 |)).7)).511..1610|
00001E20: 00 34 26 3E 08 97 43 53 AA 32 AC 58 AA 38 30 AC |.4&>..CS.2.X.80.|
00001E30: 59 2C 31 35 00 3C 26 48 08 82 3A 8E 00 5E 26 52 |Y,15.<&H..:..^&R|
00001E40: 08 8F 20 20 20 52 45 4D 4F 56 45 20 53 51 55 41 |.. REMOVE SQUA|
00001E50: 52 45 20 46 52 4F 4D 20 43 4F 4C 55 4D 4E 00 79 |RE FROM COLUMN.y|
00001E60: 26 5C 08 4A B2 34 31 AC 28 53 4B AB 37 29 3A 8B |&\.J.41.(SK.7):.|
00001E70: 4A B1 38 31 A7 4A B2 38 31 00 A3 26 66 08 81 49 |J.81.J.81..&f..I|
00001E80: B2 31 A4 4A 3A 58 B2 52 58 28 49 29 3A 59 B2 52 |.1.J:X.RX(I):Y.R|
00001E90: 59 28 49 29 3A 8B 41 28 58 2C 59 29 B1 30 A7 32 |Y(I):.A(X,Y).0.2|
00001EA0: 31 39 30 00 CE 26 70 08 97 43 53 AA 32 AC 58 AA |190..&p..CS.2.X.|
00001EB0: 38 30 AC 59 2C 31 3A 42 B2 4B 56 28 58 29 AA 55 |80.Y,1:B.KV(X).U|
00001EC0: 56 28 59 29 3A 4E B2 AB 41 28 58 2C 59 29 00 0F |V(Y):N..A(X,Y)..|
00001ED0: 27 7A 08 8B 28 43 50 28 58 29 B0 4E 52 28 4E 29 |'z..(CP(X).NR(N)|
00001EE0: B0 28 28 B5 28 28 4E 42 28 4E 29 AB 50 54 28 42 |.((.((NB(N).PT(B|
00001EF0: 29 29 AD 50 54 28 4B 56 28 58 29 29 29 AF 37 33 |)).PT(KV(X))).73|
00001F00: 29 AC 37 29 29 B2 35 31 31 A7 8D 31 36 31 30 00 |).7)).511..1610.|
00001F10: 23 27 84 08 97 43 53 AA 32 AC 58 AA 38 30 AC 59 |#'...CS.2.X.80.Y|
00001F20: 2C 31 35 00 2B 27 8E 08 82 3A 8E 00 4F 27 98 08 |,15.+'...:..O'..|
00001F30: 8F 20 20 20 52 45 4D 4F 56 45 20 53 51 55 41 52 |. REMOVE SQUAR|
00001F40: 45 53 20 42 59 20 49 4E 44 55 43 54 49 4F 4E 00 |ES BY INDUCTION.|
00001F50: 6A 27 A2 08 4A B2 32 37 AC 28 53 4B AB 31 29 3A |j'..J.27.(SK.1):|
00001F60: 8B 4A B1 38 31 A7 4A B2 38 31 00 94 27 AC 08 81 |.J.81.J.81..'...|
00001F70: 49 B2 31 A4 4A 3A 58 B2 52 58 28 49 29 3A 59 B2 |I.1.J:X.RX(I):Y.|
00001F80: 52 59 28 49 29 3A 8B 41 28 58 2C 59 29 B1 30 A7 |RY(I):.A(X,Y).0.|
00001F90: 32 32 36 30 00 B5 27 B6 08 97 43 53 AA 32 AC 58 |2260..'...CS.2.X|
00001FA0: AA 38 30 AC 59 2C 38 3A 42 B2 4B 56 28 58 29 AA |.80.Y,8:B.KV(X).|
00001FB0: 55 56 28 59 29 00 D8 27 C0 08 8B 28 42 4E 28 42 |UV(Y)..'...(BN(B|
00001FC0: 29 B0 52 4E 28 59 29 B0 43 4E 28 58 29 29 B2 35 |).RN(Y).CN(X)).5|
00001FD0: 31 31 A7 8D 31 36 31 30 00 EC 27 CA 08 97 43 53 |11..1610..'...CS|
00001FE0: AA 32 AC 58 AA 38 30 AC 59 2C 31 35 00 F5 27 D4 |.2.X.80.Y,15..'.|
00001FF0: 08 82 49 3A 8E 00 09 28 DE 08 8F 20 20 20 50 52 |..I:...(... PR|
00002000: 49 4E 54 20 41 52 52 41 59 00 49 28 E8 08 99 43 |INT ARRAY.I(...C|
00002010: 4C 24 3B 22 12 20 50 52 49 4E 54 3A 22 3A 99 22 |L$;". PRINT:":."|
00002020: 12 20 46 31 3A 43 4F 4D 4D 4F 44 4F 52 45 20 20 |. F1:COMMODORE |
00002030: 46 33 3A 4F 54 48 45 52 20 20 46 35 3A 20 20 20 |F3:OTHER F5: |
00002040: 46 37 3A 51 55 49 54 22 3B 00 63 28 F2 08 A1 41 |F7:QUIT";.c(...A|
00002050: 24 3A 8D 33 37 39 30 3A 8B 41 24 B2 22 22 A7 32 |$:.3790:.A$."".2|
00002060: 32 39 30 00 7B 28 FC 08 41 B2 C6 28 41 24 29 3A |290.{(..A..(A$):|
00002070: 8B 41 B2 31 33 33 A7 32 34 34 30 00 8B 28 06 09 |.A.133.2440..(..|
00002080: 8B 41 B2 31 33 34 A7 32 33 34 30 00 98 28 10 09 |.A.134.2340..(..|
00002090: 8B 41 B2 31 33 36 A7 8E 00 A2 28 1A 09 89 32 32 |.A.136....(...22|
000020A0: 39 30 00 D6 28 24 09 9F 34 2C 34 3A 98 34 2C 22 |90..($..4,4:.4,"|
000020B0: 2B 2D 2D 2D 2B 2D 2D 2D 2B 2D 2D 2D 2B 2D 2D 2D |+---+---+---+---|
000020C0: 2B 2D 2D 2D 2B 2D 2D 2D 2B 2D 2D 2D 2B 2D 2D 2D |+---+---+---+---|
000020D0: 2B 2D 2D 2D 2B 22 00 0C 29 2E 09 81 59 B2 31 A4 |+---+"..)...Y.1.|
000020E0: 39 3A 98 34 2C 22 21 20 20 20 20 20 20 20 20 20 |9:.4,"! |
000020F0: 20 20 21 20 20 20 20 20 20 20 20 20 20 20 21 20 | ! ! |
00002100: 20 20 20 20 20 20 20 20 20 20 21 22 00 2F 29 38 | !"./)8|
00002110: 09 81 58 B2 31 A4 39 3A 8B 4C 56 28 58 29 B2 31 |..X.1.9:.LV(X).1|
00002120: A7 98 34 2C 22 21 22 3B 3A 89 20 32 33 38 30 00 |..4,"!";:. 2380.|
00002130: 3B 29 42 09 98 34 2C 22 20 22 3B 00 5B 29 4C 09 |;)B..4," ";.[)L.|
00002140: 8B 41 28 58 2C 59 29 B3 30 A7 98 34 2C AB 41 28 |.A(X,Y).0..4,.A(|
00002150: 58 2C 59 29 3B 3A 89 32 34 30 30 00 69 29 56 09 |X,Y);:.2400.i)V.|
00002160: 98 34 2C 22 20 20 20 22 3B 00 A1 29 60 09 82 3A |.4," ";..)`..:|
00002170: 98 34 2C 22 21 22 3A 98 34 2C 22 21 20 20 20 20 |.4,"!":.4,"! |
00002180: 20 20 20 20 20 20 20 21 20 20 20 20 20 20 20 20 | ! |
00002190: 20 20 20 21 20 20 20 20 20 20 20 20 20 20 20 21 | ! !|
000021A0: 22 00 DF 29 6A 09 8B 4C 56 28 59 29 B2 33 A7 98 |"..)j..LV(Y).3..|
000021B0: 34 2C 22 2B 2D 2D 2D 2B 2D 2D 2D 2B 2D 2D 2D 2B |4,"+---+---+---+|
000021C0: 2D 2D 2D 2B 2D 2D 2D 2B 2D 2D 2D 2B 2D 2D 2D 2B |---+---+---+---+|
000021D0: 2D 2D 2D 2B 2D 2D 2D 2B 22 3A 89 32 34 33 30 00 |---+---+":.2430.|
000021E0: 0E 2A 74 09 98 34 2C 22 2B 20 20 20 2B 20 20 20 |.*t..4,"+ + |
000021F0: 2B 20 20 20 2B 20 20 20 2B 20 20 20 2B 20 20 20 |+ + + + |
00002200: 2B 20 20 20 2B 20 20 20 2B 20 20 20 2B 22 00 19 |+ + + +"..|
00002210: 2A 7E 09 82 3A A0 34 3A 8E 00 4D 2A 88 09 9F 34 |*~..:.4:..M*...4|
00002220: 2C 34 3A 98 34 2C 22 B0 C0 C0 C0 B2 C0 C0 C0 B2 |,4:.4,".........|
00002230: C0 C0 C0 B2 C0 C0 C0 B2 C0 C0 C0 B2 C0 C0 C0 B2 |................|
00002240: C0 C0 C0 B2 C0 C0 C0 B2 C0 C0 C0 AE 22 00 83 2A |............"..*|
00002250: 92 09 81 59 B2 31 A4 39 3A 98 34 2C 22 DD 20 20 |...Y.1.9:.4,". |
00002260: 20 20 20 20 20 20 20 20 20 DD 20 20 20 20 20 20 | . |
00002270: 20 20 20 20 20 DD 20 20 20 20 20 20 20 20 20 20 | . |
00002280: 20 DD 22 00 A6 2A 9C 09 81 58 B2 31 A4 39 3A 8B | ."..*...X.1.9:.|
00002290: 4C 56 28 58 29 B2 31 A7 98 34 2C 22 DD 22 3B 3A |LV(X).1..4,".";:|
000022A0: 89 20 32 34 38 30 00 B2 2A A6 09 98 34 2C 22 20 |. 2480..*...4," |
000022B0: 22 3B 00 D2 2A B0 09 8B 41 28 58 2C 59 29 B3 30 |";..*...A(X,Y).0|
000022C0: A7 98 34 2C AB 41 28 58 2C 59 29 3B 3A 89 32 35 |..4,.A(X,Y);:.25|
000022D0: 30 30 00 E0 2A BA 09 98 34 2C 22 20 20 20 22 3B |00..*...4," ";|
000022E0: 00 18 2B C4 09 82 3A 98 34 2C 22 DD 22 3A 98 34 |..+...:.4,".":.4|
000022F0: 2C 22 DD 20 20 20 20 20 20 20 20 20 20 20 DD 20 |,". . |
00002300: 20 20 20 20 20 20 20 20 20 20 DD 20 20 20 20 20 | . |
00002310: 20 20 20 20 20 20 DD 22 00 56 2B CE 09 8B 59 B2 | .".V+...Y.|
00002320: 33 B0 59 B2 36 A7 98 34 2C 22 AB C0 C0 C0 DB C0 |3.Y.6..4,"......|
00002330: C0 C0 DB C0 C0 C0 DB C0 C0 C0 DB C0 C0 C0 DB C0 |................|
00002340: C0 C0 DB C0 C0 C0 DB C0 C0 C0 DB C0 C0 C0 B3 22 |..............."|
00002350: 3A 89 32 35 34 30 00 90 2B D8 09 8B 59 B2 39 A7 |:.2540..+...Y.9.|
00002360: 98 34 2C 22 AD C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 C0 |.4,"............|
00002370: B1 C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 C0 |................|
00002380: B1 C0 C0 C0 B1 C0 C0 C0 BD 22 3A 89 32 35 34 30 |.........":.2540|
00002390: 00 BF 2B E2 09 98 34 2C 22 AB 20 20 20 DB 20 20 |..+...4,". . |
000023A0: 20 DB 20 20 20 DB 20 20 20 DB 20 20 20 DB 20 20 | . . . . |
000023B0: 20 DB 20 20 20 DB 20 20 20 DB 20 20 20 B3 22 00 | . . . .".|
000023C0: CA 2B EC 09 82 3A A0 34 3A 8E 00 E1 2B F6 09 8F |.+...:.4:...+...|
000023D0: 20 20 20 53 41 56 45 20 54 4F 20 41 20 46 49 4C | SAVE TO A FIL|
000023E0: 45 00 16 2C 00 0A 54 46 24 B2 54 49 24 3A 99 43 |E..,..TF$.TI$:.C|
000023F0: 4C 24 3B 22 12 20 20 53 41 56 45 20 47 41 4D 45 |L$;". SAVE GAME|
00002400: 3F 20 41 52 45 20 59 4F 55 20 53 55 52 45 3F 20 |? ARE YOU SURE? |
00002410: 28 59 2F 4E 29 22 00 34 2C 0A 0A A1 41 24 3A 8B |(Y/N)".4,...A$:.|
00002420: 41 24 B3 B1 22 59 22 AF 41 24 B3 B1 22 4E 22 A7 |A$.."Y".A$.."N".|
00002430: 32 35 37 30 00 42 2C 14 0A 8B 41 24 B2 22 4E 22 |2570.B,...A$."N"|
00002440: A7 8E 00 67 2C 1E 0A A0 31 35 3A 9F 31 35 2C 38 |...g,...15:.15,8|
00002450: 2C 31 35 2C 22 53 30 3A 44 49 47 49 54 2E 46 49 |,15,"S0:DIGIT.FI|
00002460: 4C 45 22 3A A0 31 35 00 8E 2C 28 0A 9F 33 2C 38 |LE":.15..,(..3,8|
00002470: 2C 33 2C 22 30 3A 44 49 47 49 54 2E 46 49 4C 45 |,3,"0:DIGIT.FILE|
00002480: 2C 50 2C 57 22 3A 41 24 B2 C7 28 31 33 29 00 AF |,P,W":A$..(13)..|
00002490: 2C 32 0A 81 49 B2 31 A4 39 3A 81 4A B2 31 A4 39 |,2..I.1.9:.J.1.9|
000024A0: 3A 98 33 2C 41 28 49 2C 4A 29 3A 82 4A 2C 49 00 |:.3,A(I,J):.J,I.|
000024B0: CF 2C 3C 0A 81 49 B2 31 A4 38 31 3A 98 33 2C 52 |.,<..I.1.81:.3,R|
000024C0: 58 28 49 29 3A 98 33 2C 52 59 28 49 29 3A 82 00 |X(I):.3,RY(I):..|
000024D0: 05 2D 46 0A 98 33 2C 52 51 3A 98 33 2C 58 31 3A |.-F..3,RQ:.3,X1:|
000024E0: 98 33 2C 59 31 3A 98 33 2C 53 43 3A 98 33 2C 54 |.3,Y1:.3,SC:.3,T|
000024F0: 46 24 41 24 50 43 3B 41 24 50 5A 3B 41 24 54 52 |F$A$PC;A$PZ;A$TR|
00002500: 25 41 24 53 4B 00 0E 2D 50 0A A0 33 3A 8E 00 27 |%A$SK..-P..3:..'|
00002510: 2D 5A 0A 8F 20 20 20 52 45 41 44 20 46 52 4F 4D |-Z.. READ FROM|
00002520: 20 41 20 46 49 4C 45 00 58 2D 64 0A 99 43 4C 24 | A FILE.X-d..CL$|
00002530: 3B 22 12 20 4C 4F 41 44 20 4F 4C 44 20 47 41 4D |;". LOAD OLD GAM|
00002540: 45 3F 20 41 52 45 20 59 4F 55 20 53 55 52 45 3F |E? ARE YOU SURE?|
00002550: 20 28 59 2F 4E 29 22 3B 00 76 2D 6E 0A A1 41 24 | (Y/N)";.v-n..A$|
00002560: 3A 8B 41 24 B3 B1 22 59 22 AF 41 24 B3 B1 22 4E |:.A$.."Y".A$.."N|
00002570: 22 A7 32 36 37 30 00 84 2D 78 0A 8B 41 24 B2 22 |".2670..-x..A$."|
00002580: 4E 22 A7 8E 00 A0 2D 82 0A 9F 33 2C 38 2C 33 2C |N"....-...3,8,3,|
00002590: 22 44 49 47 49 54 2E 46 49 4C 45 2C 50 2C 52 22 |"DIGIT.FILE,P,R"|
000025A0: 00 EB 2D 8C 0A 81 49 B2 31 A4 39 3A 52 4E 28 49 |..-...I.1.9:RN(I|
000025B0: 29 B2 30 3A 43 4E 28 49 29 B2 30 3A 42 4E 28 49 |).0:CN(I).0:BN(I|
000025C0: 29 B2 30 3A 52 43 28 49 29 B2 30 3A 43 43 28 49 |).0:RC(I).0:CC(I|
000025D0: 29 B2 30 3A 42 43 28 49 29 B2 30 3A 52 50 28 49 |).0:BC(I).0:RP(I|
000025E0: 29 B2 30 3A 43 50 28 49 29 B2 30 00 17 2E 96 0A |).0:CP(I).0.....|
000025F0: 42 50 28 49 29 B2 30 3A 4E 52 28 49 29 B2 30 3A |BP(I).0:NR(I).0:|
00002600: 4E 43 28 49 29 B2 30 3A 4E 42 28 49 29 B2 30 3A |NC(I).0:NB(I).0:|
00002610: 82 49 3A 4E 55 B2 30 00 4A 2E A0 0A 81 49 B2 31 |.I:NU.0.J....I.1|
00002620: A4 39 3A 81 4A B2 31 A4 39 3A 84 33 2C 4E 3A 41 |.9:.J.1.9:.3,N:A|
00002630: 28 49 2C 4A 29 B2 4E 3A 8B 4E B1 30 A7 4E 55 B2 |(I,J).N:.N.0.NU.|
00002640: 4E 55 AA 31 3A 89 32 37 38 30 00 79 2E AA 0A 4E |NU.1:.2780.y...N|
00002650: B2 AB 4E 3A 42 B2 4B 56 28 49 29 AA 55 56 28 4A |..N:B.KV(I).UV(J|
00002660: 29 3A 42 53 B2 4C 56 28 49 29 AA 56 56 28 4A 29 |):BS.LV(I).VV(J)|
00002670: 3A 50 54 B2 50 54 28 4E 29 00 AA 2E B4 0A 52 4E |:PT.PT(N).....RN|
00002680: 28 4A 29 B2 52 4E 28 4A 29 AA 50 54 3A 43 4E 28 |(J).RN(J).PT:CN(|
00002690: 49 29 B2 43 4E 28 49 29 AA 50 54 3A 42 4E 28 42 |I).CN(I).PT:BN(B|
000026A0: 29 B2 42 4E 28 42 29 AA 50 54 00 D8 2E BE 0A 52 |).BN(B).PT.....R|
000026B0: 43 28 4A 29 B2 52 43 28 4A 29 AA 31 3A 43 43 28 |C(J).RC(J).1:CC(|
000026C0: 49 29 B2 43 43 28 49 29 AA 31 3A 42 43 28 42 29 |I).CC(I).1:BC(B)|
000026D0: B2 42 43 28 42 29 AA 31 00 13 2F C8 0A 52 50 28 |.BC(B).1../..RP(|
000026E0: 4A 29 B2 52 50 28 4A 29 AA 50 54 28 49 29 3A 43 |J).RP(J).PT(I):C|
000026F0: 50 28 49 29 B2 43 50 28 49 29 AA 50 54 28 4A 29 |P(I).CP(I).PT(J)|
00002700: 3A 42 50 28 42 29 B2 42 50 28 42 29 AA 50 54 28 |:BP(B).BP(B).PT(|
00002710: 42 53 29 00 4D 2F D2 0A 4E 52 28 4E 29 B2 4E 52 |BS).M/..NR(N).NR|
00002720: 28 4E 29 AA 50 54 28 4A 29 3A 4E 43 28 4E 29 B2 |(N).PT(J):NC(N).|
00002730: 4E 43 28 4E 29 AA 50 54 28 49 29 3A 4E 42 28 4E |NC(N).PT(I):NB(N|
00002740: 29 B2 4E 42 28 4E 29 AA 50 54 28 42 29 00 6F 2F |).NB(N).PT(B).o/|
00002750: DC 0A 82 4A 2C 49 3A 81 49 B2 31 A4 38 31 3A 84 |...J,I:.I.1.81:.|
00002760: 33 2C 52 58 28 49 29 2C 52 59 28 49 29 3A 82 00 |3,RX(I),RY(I):..|
00002770: 93 2F E6 0A 84 33 2C 52 51 2C 58 31 2C 59 31 2C |./...3,RQ,X1,Y1,|
00002780: 53 43 2C 54 49 24 2C 50 43 2C 50 5A 2C 54 52 25 |SC,TI$,PC,PZ,TR%|
00002790: 2C 53 4B 00 A2 2F F0 0A A0 33 3A 8D 31 37 35 30 |,SK../...3:.1750|
000027A0: 3A 8E 00 A8 2F FA 0A 3A 00 C8 2F 04 0B 8B 4A B2 |:.../..:../...J.|
000027B0: 31 A7 42 24 B2 22 52 4F 57 20 22 3A 43 24 B2 C7 |1.B$."ROW ":C$..|
000027C0: 28 38 31 AA 49 29 3A 8E 00 EB 2F 0E 0B 8B 4A B2 |(81.I):.../...J.|
000027D0: 32 A7 42 24 B2 22 43 4F 4C 55 4D 4E 20 22 3A 43 |2.B$."COLUMN ":C|
000027E0: 24 B2 C7 28 36 34 AA 49 29 3A 8E 00 26 30 18 0B |$..(64.I):..&0..|
000027F0: 43 24 B2 C7 28 36 35 AA 56 56 28 49 29 29 AA C7 |C$..(65.VV(I))..|
00002800: 28 36 37 AA 56 56 28 49 29 29 AA 22 2D 22 AA C7 |(67.VV(I))."-"..|
00002810: 28 38 32 AA 55 56 28 49 29 29 AA C7 28 38 34 AA |(82.UV(I))..(84.|
00002820: 55 56 28 49 29 29 00 36 30 22 0B 42 24 B2 22 42 |UV(I)).60".B$."B|
00002830: 4F 58 20 22 3A 8E 00 4D 30 2C 0B 8F 20 20 20 48 |OX ":..M0,.. H|
00002840: 49 4E 54 20 41 54 20 41 20 4D 4F 56 45 00 71 30 |INT AT A MOVE.q0|
00002850: 36 0B 99 43 4C 24 3B 22 12 20 20 20 4F 4E 45 20 |6..CL$;". ONE |
00002860: 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E 2E |MOMENT PLEASE...|
00002870: 22 00 80 30 40 0B 4A B2 30 3A 81 4B B2 31 A4 39 |"..0@.J.0:.K.1.9|
00002880: 00 A9 30 4A 0B 8B 52 43 28 4B 29 B2 38 A7 4A B2 |..0J..RC(K).8.J.|
00002890: 31 3A 59 B2 4B 3A 58 B2 A5 58 28 35 31 31 AB 52 |1:Y.K:X..X(511.R|
000028A0: 50 28 4B 29 29 3A 49 B2 4B 00 D2 30 54 0B 8B 43 |P(K)):I.K..0T..C|
000028B0: 43 28 4B 29 B2 38 A7 4A B2 32 3A 58 B2 4B 3A 59 |C(K).8.J.2:X.K:Y|
000028C0: B2 A5 58 28 35 31 31 AB 43 50 28 4B 29 29 3A 49 |..X(511.CP(K)):I|
000028D0: B2 4B 00 16 31 5E 0B 8B 42 43 28 4B 29 B2 38 A7 |.K..1^..BC(K).8.|
000028E0: 4A B2 33 3A 42 53 B2 A5 58 28 35 31 31 AB 42 50 |J.3:BS..X(511.BP|
000028F0: 28 4B 29 29 3A 49 B2 4B 3A 58 B2 56 56 28 4B 29 |(K)):I.K:X.VV(K)|
00002900: AA 4C 56 28 42 53 29 3A 59 B2 55 56 28 4B 29 AA |.LV(BS):Y.UV(K).|
00002910: 4B 56 28 42 53 29 00 27 31 68 0B 82 4B 3A 8B 4A |KV(BS).'1h..K:.J|
00002920: B2 30 A7 32 39 39 30 00 63 31 72 0B 8D 32 38 32 |.0.2990.c1r..282|
00002930: 30 3A 4D 31 24 28 31 29 B2 22 12 3E 3E 3E 20 4C |0:M1$(1).".>>> L|
00002940: 4F 4F 4B 20 46 4F 52 20 41 20 52 4F 57 2C 20 43 |OOK FOR A ROW, C|
00002950: 4F 4C 55 4D 4E 2C 20 4F 52 20 42 4F 58 20 57 49 |OLUMN, OR BOX WI|
00002960: 54 48 22 00 8B 31 7C 0B 4D 32 24 28 31 29 B2 22 |TH"..1|.M2$(1)."|
00002970: 12 3E 3E 3E 20 4A 55 53 54 20 4F 4E 45 20 4F 50 |.>>> JUST ONE OP|
00002980: 45 4E 20 53 51 55 41 52 45 2E 22 00 BD 31 86 0B |EN SQUARE."..1..|
00002990: 4D 31 24 28 32 29 B2 22 12 3E 3E 3E 20 54 48 45 |M1$(2).".>>> THE|
000029A0: 52 45 20 49 53 20 4F 4E 4C 59 20 4F 4E 45 20 44 |RE IS ONLY ONE D|
000029B0: 49 47 49 54 20 4D 49 53 53 49 4E 47 22 00 DB 31 |IGIT MISSING"..1|
000029C0: 90 0B 4D 32 24 28 32 29 B2 22 12 3E 3E 3E 20 46 |..M2$(2).".>>> F|
000029D0: 52 4F 4D 20 22 AA 42 24 AA 43 24 00 16 32 9A 0B |ROM ".B$.C$..2..|
000029E0: 4D 31 24 28 33 29 B2 22 12 3E 3E 3E 20 22 AA 42 |M1$(3).".>>> ".B|
000029F0: 24 AA 43 24 AA 22 20 49 53 20 4D 49 53 53 49 4E |$.C$." IS MISSIN|
00002A00: 47 20 54 48 45 20 44 49 47 49 54 22 AA C4 28 41 |G THE DIGIT"..(A|
00002A10: 28 58 2C 59 29 29 00 2E 32 A4 0B 4D 32 24 28 33 |(X,Y))..2..M2$(3|
00002A20: 29 B2 22 22 3A 4A B2 32 3A 89 33 34 38 30 00 59 |)."":J.2:.3480.Y|
00002A30: 32 AE 0B 46 47 B2 AB 31 3A 91 B5 28 BB 28 31 29 |2..FG..1:..(.(1)|
00002A40: AC 34 AA 31 29 89 33 30 30 30 2C 33 31 33 30 2C |.4.1).3000,3130,|
00002A50: 33 32 37 30 2C 33 33 36 30 00 6C 32 B8 0B 49 B2 |3270,3360.l2..I.|
00002A60: 30 3A 8B 46 47 B2 31 A7 33 34 37 30 00 7B 32 C2 |0:.FG.1.3470.{2.|
00002A70: 0B 8B 46 47 B3 30 A7 46 47 B2 31 00 90 32 CC 0B |..FG.0.FG.1..2..|
00002A80: 49 B2 49 AA 31 3A 8B 49 B1 38 31 A7 33 31 33 30 |I.I.1:.I.81.3130|
00002A90: 00 B3 32 D6 0B 58 B2 52 58 28 49 29 3A 59 B2 52 |..2..X.RX(I):Y.R|
00002AA0: 59 28 49 29 3A 8B 41 28 58 2C 59 29 B3 30 A7 33 |Y(I):.A(X,Y).0.3|
00002AB0: 30 32 30 00 E3 32 E0 0B 42 B2 4B 56 28 58 29 AA |020..2..B.KV(X).|
00002AC0: 55 56 28 59 29 3A 46 4C B2 52 4E 28 59 29 B0 43 |UV(Y):FL.RN(Y).C|
00002AD0: 4E 28 58 29 B0 42 4E 28 42 29 3A 4A B2 35 31 31 |N(X).BN(B):J.511|
00002AE0: AB 46 4C 00 FB 32 EA 0B 8B 28 4A AF 28 46 4C AA |.FL..2...(J.(FL.|
00002AF0: 31 29 29 B3 B1 4A A7 33 30 32 30 00 30 33 F4 0B |1))..J.3020.03..|
00002B00: 4A B2 B5 28 BB 28 31 29 AC 33 29 AA 31 3A 49 B2 |J..(.(1).3).1:I.|
00002B10: AB 28 28 4A B2 31 29 AC 59 AA 28 4A B2 32 29 AC |.((J.1).Y.(J.2).|
00002B20: 58 AA 28 4A B2 33 29 AC 42 29 3A 8D 32 38 32 30 |X.(J.3).B):.2820|
00002B30: 00 63 33 FE 0B 4D 31 24 28 31 29 B2 22 12 3E 3E |.c3..M1$(1).".>>|
00002B40: 3E 20 4F 4E 45 20 53 51 55 41 52 45 20 49 4E 20 |> ONE SQUARE IN |
00002B50: 22 AA 42 24 AA 43 24 AA 22 20 43 41 4E 20 4F 4E |".B$.C$." CAN ON|
00002B60: 4C 59 22 00 87 33 08 0C 4D 32 24 28 31 29 B2 22 |LY"..3..M2$(1)."|
00002B70: 12 3E 3E 3E 20 41 43 43 45 50 54 20 4F 4E 45 20 |.>>> ACCEPT ONE |
00002B80: 44 49 47 49 54 2E 22 00 BA 33 12 0C 4D 31 24 28 |DIGIT."..3..M1$(|
00002B90: 32 29 B2 22 12 3E 3E 3E 20 54 48 45 52 45 20 49 |2).".>>> THERE I|
00002BA0: 53 20 4F 4E 4C 59 20 4F 4E 45 20 44 49 47 49 54 |S ONLY ONE DIGIT|
00002BB0: 20 54 48 41 54 20 43 41 4E 22 00 EC 33 1C 0C 4D | THAT CAN"..3..M|
00002BC0: 32 24 28 32 29 B2 22 12 3E 3E 3E 20 47 4F 20 49 |2$(2).".>>> GO I|
00002BD0: 4E 54 4F 20 53 51 55 41 52 45 20 22 AA C7 28 36 |NTO SQUARE "..(6|
00002BE0: 34 AA 58 29 AA C7 28 38 31 AA 59 29 00 27 34 26 |4.X)..(81.Y).'4&|
00002BF0: 0C 4D 31 24 28 33 29 B2 22 12 3E 3E 3E 22 AA C4 |.M1$(3).".>>>"..|
00002C00: 28 41 28 58 2C 59 29 29 AA 22 20 49 53 20 54 48 |(A(X,Y))." IS TH|
00002C10: 45 20 4F 4E 4C 59 20 44 49 47 49 54 20 54 48 41 |E ONLY DIGIT THA|
00002C20: 54 20 57 49 4C 4C 22 00 63 34 30 0C 4D 32 24 28 |T WILL".c40.M2$(|
00002C30: 33 29 B2 22 12 3E 3E 3E 20 47 4F 20 49 4E 54 4F |3).".>>> GO INTO|
00002C40: 20 53 51 55 41 52 45 20 22 AA C7 28 36 34 AA 58 | SQUARE "..(64.X|
00002C50: 29 AA C7 28 38 31 AA 59 29 3A 4A B2 32 3A 89 33 |)..(81.Y):J.2:.3|
00002C60: 34 38 30 00 76 34 3A 0C 49 B2 30 3A 8B 46 47 B2 |480.v4:.I.0:.FG.|
00002C70: 32 A7 33 34 37 30 00 85 34 44 0C 8B 46 47 B3 30 |2.3470..4D..FG.0|
00002C80: A7 46 47 B2 32 00 9A 34 4E 0C 49 B2 49 AA 31 3A |.FG.2..4N.I.I.1:|
00002C90: 8B 49 B1 38 31 A7 33 32 37 30 00 BD 34 58 0C 58 |.I.81.3270..4X.X|
00002CA0: B2 52 58 28 49 29 3A 59 B2 52 59 28 49 29 3A 8B |.RX(I):Y.RY(I):.|
00002CB0: 41 28 58 2C 59 29 B3 30 A7 33 31 35 30 00 E5 34 |A(X,Y).0.3150..4|
00002CC0: 62 0C 42 B2 4B 56 28 58 29 AA 55 56 28 59 29 3A |b.B.KV(X).UV(Y):|
00002CD0: 4E B2 41 28 58 2C 59 29 3A 50 54 B2 50 54 28 4E |N.A(X,Y):PT.PT(N|
00002CE0: 29 3A 52 B2 30 00 1A 35 6C 0C 53 B2 28 52 50 28 |):R.0..5l.S.(RP(|
00002CF0: 59 29 B0 4E 43 28 4E 29 B0 52 46 28 B5 28 4E 42 |Y).NC(N).RF(.(NB|
00002D00: 28 4E 29 AD 50 54 28 55 56 28 59 29 AA 31 29 29 |(N).PT(UV(Y).1))|
00002D10: AF 37 29 B0 50 54 28 58 29 29 00 2B 35 76 0C 8B |.7).PT(X)).+5v..|
00002D20: 53 B3 B1 35 31 31 A7 33 31 35 30 00 44 35 80 0C |S..511.3150.D5..|
00002D30: 42 24 B2 22 52 4F 57 20 22 3A 43 24 B2 C7 28 38 |B$."ROW ":C$..(8|
00002D40: 31 AA 59 29 00 7A 35 8A 0C 4D 31 24 28 31 29 B2 |1.Y).z5..M1$(1).|
00002D50: 22 12 3E 3E 3E 20 4F 4E 45 20 44 49 47 49 54 20 |".>>> ONE DIGIT |
00002D60: 43 41 4E 20 4F 4E 4C 59 20 47 4F 20 49 4E 20 4F |CAN ONLY GO IN O|
00002D70: 4E 45 20 53 51 55 41 52 45 22 00 96 35 94 0C 4D |NE SQUARE"..5..M|
00002D80: 32 24 28 31 29 B2 22 12 3E 3E 3E 20 49 4E 20 22 |2$(1).".>>> IN "|
00002D90: AA 42 24 AA 43 24 00 CD 35 9E 0C 4D 31 24 28 32 |.B$.C$..5..M1$(2|
00002DA0: 29 B2 22 12 3E 3E 3E 22 AA C4 28 4E 29 AA 22 20 |).".>>>"..(N)." |
00002DB0: 43 41 4E 20 4F 4E 4C 59 20 47 4F 20 49 4E 20 4F |CAN ONLY GO IN O|
00002DC0: 4E 45 20 53 51 55 41 52 45 20 49 4E 22 00 E6 35 |NE SQUARE IN"..5|
00002DD0: A8 0C 4D 32 24 28 32 29 B2 22 12 3E 3E 3E 20 22 |..M2$(2).".>>> "|
00002DE0: AA 42 24 AA 43 24 00 1B 36 B2 0C 4D 31 24 28 33 |.B$.C$..6..M1$(3|
00002DF0: 29 B2 22 12 3E 3E 3E 20 49 4E 20 22 AA 42 24 AA |).".>>> IN ".B$.|
00002E00: 43 24 AA 22 2C 22 AA C4 28 4E 29 AA 22 20 57 49 |C$.","..(N)." WI|
00002E10: 4C 4C 20 4F 4E 4C 59 20 47 4F 22 00 54 36 BC 0C |LL ONLY GO".T6..|
00002E20: 4D 32 24 28 33 29 B2 22 12 3E 3E 3E 20 49 4E 54 |M2$(3).".>>> INT|
00002E30: 4F 20 53 51 55 41 52 45 20 22 AA C7 28 36 34 AA |O SQUARE "..(64.|
00002E40: 58 29 AA C7 28 38 31 AA 59 29 3A 4A B2 33 3A 89 |X)..(81.Y):J.3:.|
00002E50: 33 34 38 30 00 67 36 C6 0C 49 B2 30 3A 8B 46 47 |3480.g6..I.0:.FG|
00002E60: B2 33 A7 33 34 37 30 00 76 36 D0 0C 8B 46 47 B3 |.3.3470.v6...FG.|
00002E70: 30 A7 46 47 B2 33 00 8B 36 DA 0C 49 B2 49 AA 31 |0.FG.3..6..I.I.1|
00002E80: 3A 8B 49 B1 38 31 A7 33 33 36 30 00 AE 36 E4 0C |:.I.81.3360..6..|
00002E90: 58 B2 52 58 28 49 29 3A 59 B2 52 59 28 49 29 3A |X.RX(I):Y.RY(I):|
00002EA0: 8B 41 28 58 2C 59 29 B3 30 A7 33 32 39 30 00 D6 |.A(X,Y).0.3290..|
00002EB0: 36 EE 0C 42 B2 4B 56 28 58 29 AA 55 56 28 59 29 |6..B.KV(X).UV(Y)|
00002EC0: 3A 4E B2 41 28 58 2C 59 29 3A 50 54 B2 50 54 28 |:N.A(X,Y):PT.PT(|
00002ED0: 4E 29 3A 52 B2 30 00 0C 37 F8 0C 4A B2 28 43 50 |N):R.0..7..J.(CP|
00002EE0: 28 58 29 B0 4E 52 28 4E 29 B0 28 28 B5 28 4E 42 |(X).NR(N).((.(NB|
00002EF0: 28 4E 29 AD 50 54 28 4B 56 28 58 29 29 29 AF 37 |(N).PT(KV(X))).7|
00002F00: 33 29 AC 37 29 B0 50 54 28 59 29 29 00 1D 37 02 |3).7).PT(Y))..7.|
00002F10: 0D 8B 4A B3 B1 35 31 31 A7 33 32 39 30 00 39 37 |..J..511.3290.97|
00002F20: 0C 0D 42 24 B2 22 43 4F 4C 55 4D 4E 20 22 3A 43 |..B$."COLUMN ":C|
00002F30: 24 B2 C7 28 36 34 AA 58 29 00 43 37 16 0D 89 33 |$..(64.X).C7...3|
00002F40: 32 31 30 00 56 37 20 0D 49 B2 30 3A 8B 46 47 B2 |210.V7 .I.0:.FG.|
00002F50: 34 A7 33 34 37 30 00 65 37 2A 0D 8B 46 47 B3 30 |4.3470.e7*..FG.0|
00002F60: A7 46 47 B2 34 00 7A 37 34 0D 49 B2 49 AA 31 3A |.FG.4.z74.I.I.1:|
00002F70: 8B 49 B1 38 31 A7 33 30 30 30 00 9D 37 3E 0D 58 |.I.81.3000..7>.X|
00002F80: B2 52 58 28 49 29 3A 59 B2 52 59 28 49 29 3A 8B |.RX(I):Y.RY(I):.|
00002F90: 41 28 58 2C 59 29 B3 30 A7 33 33 38 30 00 D9 37 |A(X,Y).0.3380..7|
00002FA0: 48 0D 4E B2 41 28 58 2C 59 29 3A 50 54 B2 50 54 |H.N.A(X,Y):PT.PT|
00002FB0: 28 4E 29 3A 42 B2 30 3A 52 B2 B5 28 28 58 AB 31 |(N):B.0:R..((X.1|
00002FC0: 29 AD 33 29 AC 33 AA 31 3A 53 B2 B5 28 28 59 AB |).3).3.1:S..((Y.|
00002FD0: 31 29 AD 33 29 AC 33 AA 31 00 14 38 52 0D 81 52 |1).3).3.1..8R..R|
00002FE0: 31 B2 52 A4 52 AA 32 3A 81 53 31 B2 53 A4 53 AA |1.R.R.2:.S1.S.S.|
00002FF0: 32 3A 8B 28 28 58 B2 52 31 29 AF 28 59 B2 53 31 |2:.((X.R1).(Y.S1|
00003000: 29 29 B0 28 41 28 52 31 2C 53 31 29 B3 30 29 A7 |)).(A(R1,S1).0).|
00003010: 33 34 34 30 00 35 38 5C 0D 8B 28 28 43 4E 28 52 |3440.58\..((CN(R|
00003020: 31 29 B0 52 4E 28 53 31 29 29 AF 50 54 29 B1 30 |1).RN(S1)).PT).0|
00003030: A7 33 34 34 30 00 3D 38 66 0D 42 B2 31 00 52 38 |.3440.=8f.B.1.R8|
00003040: 70 0D 82 53 31 2C 52 31 3A 8B 42 B1 30 A7 33 33 |p..S1,R1:.B.0.33|
00003050: 38 30 00 7D 38 7A 0D 43 24 B2 C7 28 36 34 AA 52 |80.}8z.C$..(64.R|
00003060: 29 AA C7 28 36 36 AA 52 29 AA 22 2D 22 AA C7 28 |)..(66.R)."-"..(|
00003070: 38 31 AA 53 29 AA C7 28 38 33 AA 53 29 00 91 38 |81.S)..(83.S)..8|
00003080: 84 0D 42 24 B2 22 42 4F 58 20 22 3A 89 33 32 31 |..B$."BOX ":.321|
00003090: 30 00 C8 38 8E 0D 99 43 4C 24 3B 22 12 53 4F 52 |0..8...CL$;".SOR|
000030A0: 52 59 2C 20 4E 4F 20 48 49 4E 54 53 20 41 56 41 |RY, NO HINTS AVA|
000030B0: 49 4C 41 42 4C 45 22 3A 81 49 B2 31 A4 32 35 30 |ILABLE":.I.1.250|
000030C0: 30 3A 82 3A 89 38 34 30 00 D0 38 98 0D 49 B2 31 |0:.:.840..8..I.1|
000030D0: 00 EC 38 A2 0D 53 43 B2 53 43 AA 31 3A 8D 33 38 |..8..SC.SC.1:.38|
000030E0: 36 30 3A 8B 49 B3 4A A7 33 35 31 30 00 1D 39 AC |60:.I.J.3510..9.|
000030F0: 0D 97 43 53 AA 32 AC 58 31 AA 38 30 AC 59 31 2C |..CS.2.X1.80.Y1,|
00003100: 31 35 3A 58 31 B2 58 3A 59 31 B2 59 3A 97 43 53 |15:X1.X:Y1.Y:.CS|
00003110: AA 32 AC 58 31 AA 38 30 AC 59 31 2C 31 00 35 39 |.2.X1.80.Y1,1.59|
00003120: B6 0D 99 43 4C 24 3B 4D 31 24 28 49 29 3A 99 4D |...CL$;M1$(I):.M|
00003130: 32 24 28 49 29 00 3F 39 C0 0D 8D 33 35 38 30 00 |2$(I).?9...3580.|
00003140: 5E 39 CA 0D 41 B2 C6 28 41 24 29 3A 8B 41 B3 B1 |^9..A..(A$):.A..|
00003150: 31 33 36 A7 8D 31 32 39 30 3A 89 39 36 30 00 7A |136..1290:.960.z|
00003160: 39 D4 0D 49 B2 49 AA 31 3A 91 28 49 B3 34 29 AA |9..I.I.1:.(I.4).|
00003170: 32 89 33 34 39 30 2C 38 34 30 00 80 39 DE 0D 3A |2.3490,840..9..:|
00003180: 00 90 39 E8 0D 8F 20 47 45 54 20 49 4E 50 55 54 |..9... GET INPUT|
00003190: 00 96 39 F2 0D 3A 00 9F 39 FC 0D 43 43 B2 30 00 |..9..:..9..CC.0.|
000031A0: C2 39 06 0E 42 4C B2 38 3A 43 43 B2 31 AB 43 43 |.9..BL.8:CC.1.CC|
000031B0: 3A 97 43 53 AA 32 AC 58 31 AA 38 30 AC 59 31 2C |:.CS.2.X1.80.Y1,|
000031C0: 43 43 00 DB 39 10 0E A1 41 24 3A 8D 33 37 39 30 |CC..9...A$:.3790|
000031D0: 3A 8B 41 24 B3 B1 22 22 A7 20 8E 00 EE 39 1A 0E |:.A$.."". ...9..|
000031E0: 8B 54 49 24 B1 54 42 24 A7 8D 33 39 37 30 00 05 |.TI$.TB$..3970..|
000031F0: 3A 24 0E 42 4C B2 42 4C AB 31 3A 8B 42 4C B1 30 |:$.BL.BL.1:.BL.0|
00003200: A7 33 36 30 30 00 10 3A 2E 0E 89 20 33 35 39 30 |.3600..:... 3590|
00003210: 00 49 3A 38 0E 9F 31 35 2C 38 2C 31 35 2C 22 52 |.I:8..15,8,15,"R|
00003220: 30 3A 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 3D |0:HELLO CONNECT=|
00003230: 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 3A 84 |HELLO CONNECT":.|
00003240: 31 35 2C 45 52 3A A0 31 35 00 5F 3A 42 0E 8B 20 |15,ER:.15._:B.. |
00003250: 45 52 B3 B1 36 33 20 A7 20 99 22 93 22 3A 80 00 |ER..63 . .".":..|
00003260: 96 3A 4C 0E 41 24 B2 22 48 45 4C 4C 4F 20 43 4F |.:L.A$."HELLO CO|
00003270: 4E 4E 45 43 54 22 3A 51 24 B2 C7 28 33 34 29 3A |NNECT":Q$..(34):|
00003280: 97 35 33 32 38 31 2C 37 3A 97 35 33 32 38 30 2C |.53281,7:.53280,|
00003290: 37 3A 99 22 93 22 00 B1 3A 56 0E 99 22 9E 13 11 |7:."."..:V.."...|
000032A0: 11 11 4C 4F 41 44 22 51 24 41 24 51 24 22 2C 38 |..LOAD"Q$A$Q$",8|
000032B0: 22 00 DA 3A 60 0E 99 22 11 11 11 11 52 55 4E 13 |"..:`.."....RUN.|
000032C0: 22 3A 97 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 |":.631,13:.632,1|
000032D0: 33 3A 97 31 39 38 2C 32 3A 80 00 15 3B 6A 0E 97 |3:.198,2:...;j..|
000032E0: 32 31 34 2C 31 35 3A 99 3A 99 22 20 20 9B 12 B8 |214,15:.:." ...|
000032F0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00003300: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00003310: B8 B8 B8 98 22 00 4D 3B 74 0E 81 49 B2 31 A4 33 |....".M;t..I.1.3|
00003320: 3A 99 22 20 20 12 20 20 20 20 20 20 20 20 20 20 |:." . |
00003330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003340: 20 20 20 20 20 20 20 20 20 20 22 3A 82 00 7C 3B | ":..|;|
00003350: 7E 0E 99 22 20 20 12 20 20 20 20 20 20 50 55 42 |~.." . PUB|
00003360: 4C 49 53 48 45 44 20 4F 4E 20 4C 4F 41 44 53 54 |LISHED ON LOADST|
00003370: 41 52 20 23 36 30 20 20 20 20 20 22 00 AB 3B 88 |AR #60 "..;.|
00003380: 0E 99 22 20 20 12 20 20 20 20 53 55 42 53 43 52 |.." . SUBSCR|
00003390: 49 50 54 49 4F 4E 53 20 31 2D 38 30 30 2D 38 33 |IPTIONS 1-800-83|
000033A0: 31 2D 32 36 39 34 20 20 20 20 22 00 DA 3B 92 0E |1-2694 "..;..|
000033B0: 99 22 20 20 12 20 20 20 43 48 41 4E 47 49 4E 47 |." . CHANGING|
000033C0: 20 54 48 49 53 20 4E 4F 54 49 43 45 20 49 53 20 | THIS NOTICE IS |
000033D0: 49 4C 4C 45 47 41 4C 20 20 22 00 09 3C 9C 0E 99 |ILLEGAL "..<...|
000033E0: 22 20 20 12 20 20 20 20 20 20 20 20 20 20 20 20 |" . |
000033F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003400: 20 20 20 20 20 20 20 20 22 00 3A 3C A6 0E 99 22 | ".:<..."|
00003410: 20 20 97 12 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 | ..............|
00003420: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00003430: B9 B9 B9 B9 B9 B9 B9 B9 13 22 00 76 3C B0 0E 41 |.........".v<..A|
00003440: 55 24 B2 22 44 20 49 20 47 20 49 20 54 20 48 20 |U$."D I G I T H |
00003450: 55 20 4E 20 54 22 3A 97 32 31 34 2C 31 37 3A 99 |U N T":.214,17:.|
00003460: 3A 99 A6 32 30 AB C3 28 41 55 24 29 AD 32 29 22 |:..20..(AU$).2)"|
00003470: 12 98 22 41 55 24 00 A6 3C BA 0E 41 55 24 B2 22 |.."AU$..<..AU$."|
00003480: 42 59 20 44 41 56 45 20 4A 4F 48 41 4E 4E 53 45 |BY DAVE JOHANNSE|
00003490: 4E 20 20 28 43 29 20 31 39 38 39 22 3A 97 32 31 |N (C) 1989":.21|
000034A0: 34 2C 31 38 3A 99 00 C5 3C C4 0E 99 A6 32 30 AB |4,18:...<....20.|
000034B0: C3 28 41 55 24 29 AD 32 29 22 12 98 22 41 55 24 |.(AU$).2)".."AU$|
000034C0: 22 13 22 3A 8E 00 F2 3C CE 0E 99 22 13 11 11 11 |".":...<..."....|
000034D0: 11 11 11 1D 1D 12 9F 22 C5 28 CA 28 54 49 24 2C |.......".(.(TI$,|
000034E0: 33 2C 32 29 29 22 9D 3A 22 CA 28 54 49 24 2C 35 |3,2))".:".(TI$,5|
000034F0: 29 3B 00 12 3D D8 0E 8B 54 52 25 B2 30 A7 99 A3 |);..=...TR%.0...|
00003500: 33 32 29 22 31 30 30 25 22 3A 50 43 B2 31 30 30 |32)"100%":PC.100|
00003510: 3A 8E 00 37 3D E2 0E 50 5A B2 28 B5 28 31 30 30 |:..7=..PZ.(.(100|
00003520: 30 30 AC 28 28 54 52 25 AB 53 43 29 AD 54 52 25 |00.((TR%.SC).TR%|
00003530: 29 29 29 AD 31 30 30 00 46 3D EC 0E 8B 50 5A B3 |))).100.F=...PZ.|
00003540: 30 A7 50 5A B2 30 00 53 3D F6 0E 8B 50 5A B2 50 |0.PZ.0.S=...PZ.P|
00003550: 43 A7 8E 00 6D 3D 00 0F 50 43 B2 50 5A 3A 8B 50 |C...m=..PC.PZ:.P|
00003560: 5A B3 31 A7 50 5A B2 30 3A 50 43 B2 30 00 94 3D |Z.1.PZ.0:PC.0..=|
00003570: 0A 0F 99 A3 33 32 29 22 20 20 20 20 20 20 9D 9D |....32)" ..|
00003580: 9D 9D 9D 9D 22 CA 28 C4 28 50 43 29 2C 32 29 22 |....".(.(PC),2)"|
00003590: 25 22 3A 8E 00 B0 3D 14 0F 97 32 31 34 2C 31 34 |%":...=...214,14|
000035A0: 3A 99 3A 99 A3 33 32 29 22 9F 12 22 53 43 3A 8E |:.:..32)".."SC:.|
000035B0: 00 D3 3D 1E 0F 81 49 B2 31 A4 39 3A 81 49 49 B2 |..=...I.1.9:.II.|
000035C0: 31 A4 39 3A 99 41 28 49 49 2C 49 29 3B 3A 82 3A |1.9:.A(II,I);:.:|
000035D0: 99 3A 82 00 00 3E 28 0F 54 46 24 B2 54 49 24 3A |.:...>(.TF$.TI$:|
000035E0: 8B C5 28 CA 28 54 46 24 2C 33 29 29 B1 C5 28 CA |..(.(TF$,3))..(.|
000035F0: 28 42 54 24 28 53 4B 2C 31 29 2C 33 29 29 A7 8E |(BT$(SK,1),3))..|
00003600: 00 0B 3E 32 0F 8B 46 46 25 A7 8E 00 4C 3E 3C 0F |..>2..FF%...L><.|
00003610: 99 43 4C 24 22 9B 59 4F 55 20 54 4F 50 50 45 44 |.CL$".YOU TOPPED|
00003620: 20 54 48 45 20 52 45 43 4F 52 44 20 46 4F 52 20 | THE RECORD FOR |
00003630: 54 48 49 53 20 4C 45 56 45 4C 21 22 3A 42 54 24 |THIS LEVEL!":BT$|
00003640: 28 53 4B 2C 32 29 B2 C4 28 53 43 29 00 6F 3E 46 |(SK,2)..(SC).o>F|
00003650: 0F 99 22 9B 12 4C 45 56 45 4C 2E 20 45 4E 54 45 |.."..LEVEL. ENTE|
00003660: 52 20 59 4F 55 52 20 4E 41 4D 45 3A 20 22 3B 00 |R YOUR NAME: ";.|
00003670: 9B 3E 50 0F 42 54 24 28 53 4B 2C 31 29 B2 54 46 |.>P.BT$(SK,1).TF|
00003680: 24 3A 4C 49 B2 39 3A 8D 34 31 38 30 3A 41 24 B2 |$:LI.9:.4180:A$.|
00003690: 22 20 20 20 20 20 20 20 20 20 22 00 B7 3E 5A 0F |" "..>Z.|
000036A0: 42 54 24 28 53 4B 2C 30 29 B2 57 24 AA C8 28 41 |BT$(SK,0).W$..(A|
000036B0: 24 2C 39 AB 4C 57 29 00 DC 3E 64 0F A0 31 35 3A |$,9.LW)..>d..15:|
000036C0: 9F 31 35 2C 38 2C 31 35 2C 22 53 30 3A 42 45 53 |.15,8,15,"S0:BES|
000036D0: 54 20 54 49 4D 45 53 22 3A A0 31 35 00 17 3F 6E |T TIMES":.15..?n|
000036E0: 0F 9F 32 2C 38 2C 32 2C 22 42 45 53 54 20 54 49 |..2,8,2,"BEST TI|
000036F0: 4D 45 53 2C 50 2C 57 22 3A 81 49 B2 31 A4 39 3A |MES,P,W":.I.1.9:|
00003700: 98 32 2C 42 54 24 28 49 2C 31 29 3A 98 32 2C 42 |.2,BT$(I,1):.2,B|
00003710: 54 24 28 49 2C 30 29 00 2E 3F 78 0F 98 32 2C 42 |T$(I,0)..?x..2,B|
00003720: 54 24 28 49 2C 32 29 3A 82 3A A0 32 3A 8E 00 6C |T$(I,2):.:.2:..l|
00003730: 3F 82 0F 99 43 4C 24 22 54 49 4D 45 20 46 4F 52 |?...CL$"TIME FOR|
00003740: 20 54 48 49 53 20 50 55 5A 5A 4C 45 20 48 41 53 | THIS PUZZLE HAS|
00003750: 20 45 58 50 49 52 45 44 22 3A 99 22 12 50 52 45 | EXPIRED":.".PRE|
00003760: 53 53 20 41 20 4B 45 59 2E 2E 2E 22 00 A5 3F 8C |SS A KEY..."..?.|
00003770: 0F 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A 97 |..198,0:.198,1:.|
00003780: 31 39 38 2C 30 3A 41 24 B2 22 51 22 3A 54 49 24 |198,0:A$."Q":TI$|
00003790: B2 22 30 30 35 39 35 30 22 3A 99 43 4C 24 3B 3A |."005950":.CL$;:|
000037A0: 89 31 35 30 30 00 DE 3F 96 0F 97 32 31 34 2C 31 |.1500..?...214,1|
000037B0: 33 3A 99 3A 99 22 43 4C 45 41 52 20 42 45 53 54 |3:.:."CLEAR BEST|
000037C0: 20 54 49 4D 45 53 3F 20 20 41 52 45 20 59 4F 55 | TIMES? ARE YOU|
000037D0: 20 53 55 52 45 3F 20 28 59 2F 4E 29 20 22 00 FC | SURE? (Y/N) "..|
000037E0: 3F A0 0F A1 41 24 3A 8B 41 24 B3 B1 22 59 22 AF |?...A$:.A$.."Y".|
000037F0: 41 24 B3 B1 22 4E 22 A7 34 30 30 30 00 0C 40 AA |A$.."N".4000..@.|
00003800: 0F 8B 41 24 B2 22 4E 22 A7 34 36 30 00 2D 40 B4 |..A$."N".460.-@.|
00003810: 0F A0 31 35 3A 9F 31 35 2C 38 2C 31 35 2C 22 53 |..15:.15,8,15,"S|
00003820: 30 3A 42 45 53 54 20 54 49 4D 45 53 22 00 65 40 |0:BEST TIMES".e@|
00003830: BE 0F 97 32 31 34 2C 31 33 3A 99 3A 99 22 20 20 |...214,13:.:." |
00003840: 20 20 20 20 20 20 57 49 50 49 4E 47 20 4F 55 54 | WIPING OUT|
00003850: 20 42 45 53 54 20 53 43 4F 52 45 53 2E 2E 2E 20 | BEST SCORES... |
00003860: 20 20 20 20 22 00 75 40 C8 0F 84 31 35 2C 45 24 | ".u@...15,E$|
00003870: 3A 8A 32 31 30 00 A2 40 D2 0F 8B 42 54 24 28 53 |:.210..@...BT$(S|
00003880: 4B 2C 30 29 B2 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |K,0)."---------"|
00003890: A7 54 42 24 B2 22 30 30 36 30 30 30 22 3A 89 35 |.TB$."006000":.5|
000038A0: 34 30 00 D6 40 DC 0F 50 4A 25 B2 30 3A 81 49 B2 |40..@..PJ%.0:.I.|
000038B0: C3 28 42 54 24 28 53 4B 2C 30 29 29 A4 31 A9 AB |.(BT$(SK,0)).1..|
000038C0: 31 3A 41 41 24 B2 CA 28 42 54 24 28 53 4B 2C 30 |1:AA$..(BT$(SK,0|
000038D0: 29 2C 49 2C 31 29 00 EA 40 E6 0F 8B 41 41 24 B3 |),I,1)..@...AA$.|
000038E0: B1 22 20 22 A7 50 4A 25 B2 31 00 FF 40 F0 0F 8B |." ".PJ%.1..@...|
000038F0: 50 4A 25 A7 53 4E 24 B2 53 4E 24 AA 41 41 24 00 |PJ%.SN$.SN$.AA$.|
00003900: 34 41 FA 0F 82 3A 41 24 B2 22 22 3A 81 49 B2 C3 |4A...:A$."":.I..|
00003910: 28 53 4E 24 29 A4 31 A9 AB 31 3A 41 24 B2 41 24 |(SN$).1..1:A$.A$|
00003920: AA CA 28 53 4E 24 2C 49 2C 31 29 3A 82 3A 53 4E |..(SN$,I,1):.:SN|
00003930: 24 B2 41 24 00 50 41 04 10 41 24 B2 22 43 48 41 |$.A$.PA..A$."CHA|
00003940: 4C 4C 45 4E 47 45 20 22 AA 53 4E 24 AA 22 27 22 |LLENGE ".SN$."'"|
00003950: 00 6D 41 0E 10 8B C9 28 53 4E 24 2C 31 29 B3 B1 |.mA....(SN$,1)..|
00003960: 22 53 22 A7 41 24 B2 41 24 AA 22 53 22 00 7F 41 |"S".A$.A$."S"..A|
00003970: 18 10 41 24 B2 41 24 AA 22 20 54 49 4D 45 22 00 |..A$.A$." TIME".|
00003980: B9 41 22 10 97 32 31 34 2C 31 33 3A 99 3A 99 22 |.A"..214,13:.:."|
00003990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000039A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000039B0: 20 20 20 20 20 20 20 20 22 00 E7 41 2C 10 41 24 | "..A,.A$|
000039C0: B2 41 24 AA 22 3F 20 28 59 2F 4E 29 22 3A 97 32 |.A$."? (Y/N)":.2|
000039D0: 31 34 2C 31 33 3A 99 3A 99 A6 32 30 AB C3 28 41 |14,13:.:..20..(A|
000039E0: 24 29 AD 32 29 41 24 00 05 42 36 10 A1 41 24 3A |$).2)A$..B6..A$:|
000039F0: 8B 41 24 B3 B1 22 59 22 AF 41 24 B3 B1 22 4E 22 |.A$.."Y".A$.."N"|
00003A00: A7 34 31 35 30 00 23 42 40 10 8B 41 24 B2 22 4E |.4150.#B@..A$."N|
00003A10: 22 A7 54 42 24 B2 22 30 30 36 30 30 30 22 3A 89 |".TB$."006000":.|
00003A20: 35 34 30 00 3A 42 4A 10 54 42 24 B2 42 54 24 28 |540.:BJ.TB$.BT$(|
00003A30: 53 4B 2C 31 29 3A 89 35 34 30 00 62 42 54 10 57 |SK,1):.540.bBT.W|
00003A40: 24 B2 22 22 3A 4C 57 B2 30 3A 99 22 3E 9D 22 3B |$."":LW.0:.">.";|
00003A50: 3A 8B 4C 49 4D 49 54 B2 30 A7 4C 49 4D 49 54 B2 |:.LIMIT.0.LIMIT.|
00003A60: 38 30 00 A0 42 5E 10 A1 41 24 3A 8B 41 24 B2 22 |80..B^..A$:.A$."|
00003A70: 91 22 B0 41 24 B2 22 11 22 B0 41 24 B2 22 9D 22 |.".A$.".".A$."."|
00003A80: B0 41 24 B2 22 1D 22 B0 41 24 B2 22 13 22 B0 41 |.A$.".".A$.".".A|
00003A90: 24 B2 22 93 22 B0 41 24 B2 22 22 A7 34 31 39 30 |$.".".A$."".4190|
00003AA0: 00 CA 42 68 10 41 53 25 B2 C6 28 41 24 29 3A 8B |..Bh.AS%..(A$):.|
00003AB0: 41 53 25 B2 31 33 B0 41 53 25 B2 31 34 31 B0 41 |AS%.13.AS%.141.A|
00003AC0: 53 25 B2 32 30 A7 34 32 35 30 00 DB 42 72 10 8B |S%.20.4250..Br..|
00003AD0: C2 28 36 35 33 29 A7 34 31 39 30 00 0A 43 7C 10 |.(653).4190..C|.|
00003AE0: 8B 4C 57 B2 4C 49 4D 49 54 20 AF 28 41 53 25 B3 |.LW.LIMIT .(AS%.|
00003AF0: B1 32 30 AF 41 53 25 B3 B1 31 33 AF 41 53 25 B3 |.20.AS%..13.AS%.|
00003B00: B1 31 34 31 29 A7 34 31 39 30 00 40 43 86 10 8B |.141).4190.@C...|
00003B10: 41 53 25 B2 33 34 B0 28 41 53 25 B1 B2 31 33 33 |AS%.34.(AS%..133|
00003B20: AF 41 53 25 B3 B2 31 34 30 29 B0 28 41 53 25 B1 |.AS%..140).(AS%.|
00003B30: B2 31 AF 41 53 25 B3 B2 33 31 29 A7 34 31 39 30 |.1.AS%..31).4190|
00003B40: 00 64 43 90 10 4C 57 B2 4C 57 AA 31 3A 57 24 B2 |.dC..LW.LW.1:W$.|
00003B50: 57 24 AA 41 24 3A 99 41 24 22 3E 9D 22 3B 3A 89 |W$.A$:.A$">.";:.|
00003B60: 34 31 39 30 00 9D 43 9A 10 8B 41 53 25 B2 32 30 |4190..C...AS%.20|
00003B70: AF 57 24 B3 B1 22 22 A7 57 24 B2 C8 28 57 24 2C |.W$.."".W$..(W$,|
00003B80: 4C 57 AB 31 29 3A 99 22 9D 3C 20 9D 9D 22 3B 3A |LW.1):.".< ..";:|
00003B90: 4C 57 B2 4C 57 AB 31 3A 89 34 31 39 30 00 B4 43 |LW.LW.1:.4190..C|
00003BA0: A4 10 8B 41 53 25 B2 32 30 AF 57 24 B2 22 22 A7 |...AS%.20.W$."".|
00003BB0: 34 31 39 30 00 CB 43 AE 10 8B 41 53 25 B2 31 33 |4190..C...AS%.13|
00003BC0: AF 57 24 B2 22 22 A7 34 31 39 30 00 DF 43 B8 10 |.W$."".4190..C..|
00003BD0: 8B 41 53 25 B2 31 33 A7 99 22 20 22 3B 3A 8E 00 |.AS%.13.." ";:..|
00003BE0: 00 00 |.. |
.......@ S1024......@ 02.$....@ R=CS.O.(
..:. A(9,9),X(9),Y(9),PT(9),RX(81),RY(81
),RN(9),CN(9),BN(9),RC(9),CC(9)...2.. BC
(9),RP(9),CP(9),BP(9),NR(9),NC(9),NB(9),
LV(9),UV(9),KV(9),VV(9),C(7)...<.. RF(7)
,M1$(3),M2$(3),BT$(9,2)...F..255,0,56,69
,130,69,56,0,224,144,144,144,224,128,64,
63.R.P..255,16,144,16,16,16,144,16,16,16
,16,16,32,64,128,0.H.Z..I.832.894:.I,0:.
...D..I.832.877.3:.J:.I,J:....N..I.833.8
78.3:.J:.I,J:....X..53287,0:.53248,50:.5
3249,194:.53264,1:.2040,13:.53269,1.....
..X(Y)..(.(Y)..(2)).1.E...SL$.".........
..............":CL$."
".....BS$.".........
...............................":CS.5538
6:TS.1114:... .CL$."..".SL$.CL$.BS$.CL$.
BS$.....CL$.CL$."..
.....".....C(1).11:C(2)
.12:C(3).15:C(4).1:C(5).15:C(6).12.@....
53280,0:.53281,0:DB$."........."...H.BO$
."..U......I".DB$.". .".DB$."J.....
.K".DB$.".. .. .. ."...R.BO$.BO$.
"........":.15,8,15,"I0:".M....2,8,2,"BE
ST TIMES,P,R"......15,A$,A$:.A$.."OK". 2
:.250. ....I.1.9:.2,BT$(I,1),BT$(I,0),BT
$(I,2):.: 2:.270._....I.1.9:BT$(I,1)."00
6000":BT$(I,0)."---------":BT$(I,2)."5".
M....:.3940:...... 15:.53272,21:."...
D I G I T H U N T "...
...3690:."....".3)". LEVEL TIME N
AME ERRORS.."..."...4)"..............
....................".C.,.JJ$." ":.I.1
.9:A$.BT$(I,1):.I.SK..199,1.K.6...6)I"..
";:.E(J(A$,3,2)).10.." ";...@..E(J(A$,
3,2))".:"J(A$,5,2)JJ$BT$(I,0)JJ$;...J..E
(BT$(I,2)).10.." ";.O.T..BT$(I,2)" ":.:.
SK.4050...^..214,13:.:.". SE
TTING UP..."...H..1830.6.R..1550:.J.1.3:
.I.1.3:X(I.J.3.3).R(J).3.3:.:..F.|..1550
:.J.1.3:.I.1.3:Y(I.J.3.3).R(J).3.3:.:...
....I.0.6.3:.1550:.J.1.3:X(I.J).X(I.J).R
(J):.:.1550......J.1.3:Y(I.J).Y(I.J).R(J
):.:.......214,13:.:.". SETT
ING UP..."......X.1.9:.Y.1.9:.Q:A(X(X),Y
(Y))..Z(Q):.:..Q....1,5,9,8,4,6,7,2,3,8,
6,3,1,2,7,5,4,9,7,2,4,3,9,5,8,6,1......2
,1,8,5,3,9,6,7,4,4,9,5,7,6,2,3,1,8,6,3,7
,4,1,8,2,9,5.G.B..5,8,2,9,7,4,1,3,6,3,4,
6,2,8,1,9,5,7,9,7,1,6,5,3,4,8,2.V.L..198
,0:I.1...V..214,13:.:.".SKILL LEVEL (1-9
) OR CLR TO CLEAR TIMES".#....A$:.TI.10.
510.?....55869,C(I):.55871,C(I)......558
77,C(I):.55878,C(I):.55879,C(I):I.I.1:TI
$."000000":.I.6.I.1.....SK.E(A$):.(SK.9.
SK.1).A$..".".A$..".".480.I....A$.".".A$
.".".3990.....TI$."160000":.280......532
72,21:.53280,11:.53281,11:.53269,0.:.&.X
$.".....................................
.".I.0.Y$." ..................
........"...:.Z$." ...........
.........".F.D..".... D I G I
T H U N T ..."...N.."...........
.............................."...X..".
A B C D E F G H I".D.B..".
..................."._.L.."
.R";X$:.Y$.Z.V.." .S";X$:.
Y$......" .T";X$:.Z$......"
.U";X$:.Y$.K...." .V";X$:
.Y$......" .W";X$:.Z$......"
.X";X$:.Y$......" .Y";X$
:.Y$.W...." .Z";X$:."
....................."..F..CL$;"..
ONE MOMENT..."...P..". I'M TH
INKING OF A GOOD PUZZLE...".U.Z..1983,16
0:.2023,160:.56255,0:.56295,0......214,1
2:.:.".BEST TIME":."."BO$;:A$.BT$(SK,1).
)...."."E(J(A$,3,2))".:"J(A$,5,2).F....2
14,12:.:..32)".ERRORS".S.....31)BO$.}...
."..";:.BT$(SK,0)."---------".."...";...
...BT$(SK,0):."..............LIMIT".H. .
.".."E(J(TB$,3,2))".:"J(TB$,5,2)...*..19
50:. IFSK=10THENFORI=1TO9:FORII=1TO9:A(I
,II)=ABS(A(I,II)):NEXT:NEXT.:.4..CL$;"..
I'VE GOT IT!".N.>..1750:X1.
5:Y1.5.X.H..1290.^.R.:.P.\.. MAIN LOOP
.V.F.:...P..NU.1..3880:.CL$". YOU
WIN WITH ONLY"SC"ERRORS";:.1480...Z..E(
TI$).10000.."......."BO$"......".31)BO$:
TI$."000000".*...."..........TIME.......
.................ACCURACY".?....CS.2.X1.
80.Y1,1.I....3860.Y....3580:.A(X1,Y1).0.
.A$."0".A$.."9".TR%.TR%.1...... IFA$="?"
ORA$="/"THENSC=SC+1:XM=1:GOSUB3640:TR%=T
R%+1.G....TI$.TB$..3970.....A.F(A$):X2.X
1:Y2.Y1:.POKE1983,160:POKE2023,160:POKE5
6255,0:POKE56295,0.1.J..A..65.A..73.X2.A
.64:.1320.P.T..A..82.A..90.Y2.A.81:.1320
.F....A.133..2280:.840.|....A.134..2650:
.840......A.135..2550:.840......A.136.28
60.V....A.47.A(X1,Y1).0.FF%.1:.1680:SC.S
C.2:.3860:.880......A.63..1790:SC.SC.2:F
F%.1:.3860:.880......A.17.Y2.Y1.1:.1320.
/.$..A.29.X2.X1.1:.1320.H....A.145.Y2.Y1
.1:.1320.A.8..A.157.X2.X1.1:.1320.P.B..A
.81.1370...L..A.49.A.57.880...V.A.A.48:.
A(X1,Y1).0.880...`..A(X1,Y1).A..1680:.88
0.W.J.X2.X1:Y2.Y1:SC.SC.1:.3860...T..(RN
(Y1).PT(A)).0.1170...~.J.1:.I.1.9:.A(I,Y
1)..A.X2.I.)....:I.Y1:.2820:.1240.D....(
CN(X1).PT(A)).0.1200.D...J.2:.I.1.9:.A(X
1,I)..A.Y2.I.{....:I.X1:.2820:.1240.....
B.KV(X1).UV(Y1):.(BN(B).PT(A)).0.1230...
...I.VV(B).1.VV(B).3:.J.UV(B).1.UV(B).3:
.A(I,J)..A.X2.I:Y2.J...D..J,I:J.3:I.B:.2
820:.1240.=.N.M1$(1).".>>> I HAVE A DIFF
ERENT DIGIT THERE":X2.0:.1250.L.X.M1$(1)
.".>>> ".B$.C$." ALREADY HAS A".D(A)....
..CL$;M1$(1):.X2.0..CS.2.X2.80.Y2,0.....
. 3580......X2.0..CS.2.X2.80.Y2,15.I....
1290:.960......CL$;". Q:QUIT ?:REVEAL
RND /:REVEAL THIS".,....". F1:PRINT F
3:LOAD F5:SAVE F7:HINT";:..N.... MOV
E CURSOR, CHECK BOUNDS.{.(..CS.2.X1.80.Y
1,15:X1.X2:Y1.Y2:.X1.1.X1.9...2..X1.9.X1
.1...<..Y1.1.Y1.9...F..Y1.9.Y1.1...P..88
0...Z..CL$;".QUIT? F1:YES F3:SHOW GRID
F7:NO"...D..A$:.A$."".1380...N..A$."Y"
.A$."."...X..A$."N".A$.".".-....A$.G(136
).840.A....A$.G(133).1470.V....A$..G(134
).1380.. ..Y.1.9:.X.1.9:.TS.2.X.80.Y,48
.A(X,Y)......A(X,Y).0..TS.2.X.80.Y,48.A(
X,Y)......X,Y......CL$;".";.L.H..SC.1. .
". ".R.R........CS.2.X1.80.Y1,15:..13)".
PLAY AGAIN? (Y/N)."."....A$:.A$.."Y".A$
.."N".1510.3....A$."N".3640.9.....Z....
COMPUTE PERMUTATION OF 3.S...R(1).1:R(
2).2:R(3).3.....R..(.(TI).2).2:S.R(1):R(
1).R(R):R(R).S.K.".R..(.(TI).2).2.1:S.R(
2):R(2).R(R):R(R).S...,.R..(.(TI).2).1:S
.R(3):R(3).R(R):R(R).S...6.....@.. REM
OVE SQUARE AT (X,Y).`.J.N..A(X,Y):A(X,Y)
.N:NU.NU.1:PT.PT(N):B.KV(X).UV(Y):BS.LV(
X).VV(Y)...T.RN(Y).RN(Y).PT:CN(X).CN(X).
PT:BN(B).BN(B).PT...^.RC(Y).RC(Y).1:CC(X
).CC(X).1:BC(B).BC(B).1...H.RP(Y).RP(Y).
PT(X):CP(X).CP(X).PT(Y):BP(B).BP(B).PT(B
S).4.R.NR(N).NR(N).PT(Y):NC(N).NC(N).PT(
X):NB(N).NB(N).PT(B).:.|...\.... FILL
IN SQUARE AT (X1,Y1).....N.A(X1,Y1):A(X1
,Y1)..N:NU.NU.1:PT.PT(N):B.KV(X1).UV(Y1)
:BS.LV(X1).VV(Y1).....RN(Y1).RN(Y1).PT:C
N(X1).CN(X1).PT:BN(B).BN(B).PT.. ..RC(Y1
).RC(Y1).1:CC(X1).CC(X1).1:BC(B).BC(B).1
.Q ..RP(Y1).RP(Y1).PT(X1):CP(X1).CP(X1).
PT(Y1):BP(B).BP(B).PT(BS).. ..NR(N).NR(N
).PT(Y1):NC(N).NC(N).PT(X1):NB(N).NB(N).
PT(B).. B..TS.2.X1.80.Y1,48.N:..F L..
ADD NUMBERS TO DISPLAY.. V..Y.1.9:.X.1.9
:.TS.2.X.80.Y,102..!...A(X,Y).0..TS.2.X.
80.Y,48.A(X,Y)..!...X,Y:..7!... FILL I
N RANDOM SQUARE.M!...CS.2.X1.80.Y1,15.~!
..RQ.RQ.1:X1.RX(RQ):Y1.RY(RQ):.A(X1,Y1).
0.1800..!...1680:...!... INITIALIZE PE
RMUTATION AND FLAG ARRAYS.M!&..I.1.9:Z(I
).I:..."0..I.1.9:X..(.(TI).9).1:S.Z(I):Z
(I).Z(X):Z(X).S:..J":.PT(1).1:PT(2).2:PT
(3).4:PT(4).8:PT(5).16:PT(6).32:PT(7).64
:PT(8).128.B"D.PT(9).256:NU.0:RQ.0.."N.R
F(0).0:RF(1).7:RF(2).56:RF(3).63:RF(4).4
48:RF(5).455:RF(6).524:RF(7).511.."X..I.
1.9:KV(I)..((I.1).3).1:UV(I).3..((I.1).3
):LV(I).I.UV(I).;#B.VV(I).3.(LV(I).1):RN
(I).511:CN(I).511:BN(I).511:RC(I).9:CC(I
).9:BC(I).9.}#L.RP(I).511:CP(I).511:BP(I
).511:NR(I).511:NC(I).511:NB(I).511:...#
V..I.0.80:RX(I.1)..(I.9).1:RY(I.1).I.9.R
X(I.1).10:...#...I.1.81:X..(.(1).81.1):S
.RX(I):RX(I).RX(X):RX(X).S:S.RY(I)..$..R
Y(I).RY(X):RY(X).S:.:..;$... FLAG SQUA
RES TO BE GUESSED BY PLAYER.M$...2000:.S
K.2...]$...SK.4..2070.M$...SK.7..2140.Y$
...2210:...$F.. REMOVE ONE FROM EACH R
OW, COLUMN, AND BOX.M$P..X.1.9:Y..(.(TI)
.9.1):.1610:...$Z..Y.1.9:.RC(Y).9.X..(.(
TI).9.1):.1610..$.....%...Q.1.9:.BC(Q).9
.2050.I%..X.VV(Q).1..(.(TI).3):Y.UV(Q).1
..(.(TI).3):.1610.Q%...:..P%... REMOVE
SQUARE FROM ROW..%..J.27.(SK.4):.J.81.J
.81..% ..I.1.J:X.RX(I):Y.RY(I):.A(X,Y).0
.2120..%*..CS.2.X.80.Y,0:B.KV(X).UV(Y):N
..A(X,Y). &4..(RP(Y).NC(N).RF(.((NB(N).P
T(B)).PT(UV(Y).1)).7)).511..1610.4&>..CS
.2.X.80.Y,15.<&H..:..^&R.. REMOVE SQUA
RE FROM COLUMN.Y&\.J.41.(SK.7):.J.81.J.8
1..&F..I.1.J:X.RX(I):Y.RY(I):.A(X,Y).0.2
190.N&P..CS.2.X.80.Y,1:B.KV(X).UV(Y):N..
A(X,Y)..'Z..(CP(X).NR(N).((.((NB(N).PT(B
)).PT(KV(X))).73).7)).511..1610.#'...CS.
2.X.80.Y,15.+'...:..O'... REMOVE SQUAR
ES BY INDUCTION.J'..J.27.(SK.1):.J.81.J.
81..'...I.1.J:X.RX(I):Y.RY(I):.A(X,Y).0.
2260..'...CS.2.X.80.Y,8:B.KV(X).UV(Y).X'
...(BN(B).RN(Y).CN(X)).511..1610..'J..CS
.2.X.80.Y,15..'T..I:...(... PRINT ARRA
Y.I(...CL$;". PRINT:":.". F1:COMMODORE
F3:OTHER F5: F7:QUIT";.C(...A$:.3790:
.A$."".2290.{(..A.F(A$):.A.133.2440..(..
.A.134.2340..(...A.136....(...2290.V($..
4,4:.4,"+---+---+---+---+---+---+---+---
+---+"..)...Y.1.9:.4,"! !
! !"./)8..X.1.9:.LV(X).1
..4,"!";:. 2380.;)B..4," ";.[)L..A(X,Y).
0..4,.A(X,Y);:.2400.I)V..4," ";..)`..:
.4,"!":.4,"! ! !
!"..)J..LV(Y).3..4,"+---+---+---+
---+---+---+---+---+---+":.2430..*T..4,"
+ + + + + + + + + +"..
*~..: 4:..M*...4,4:.4,".................
...................."..*...Y.1.9:.4,".
. . ."..*..
.X.1.9:.LV(X).1..4,".";:. 2480..*...4,"
";.R*...A(X,Y).0..4,.A(X,Y);:.2500..*...
4," ";..+D..:.4,".":.4,". .
. .".V+N..Y.3.Y.6..4
,"....................................."
:.2540..+X..Y.9..4,"....................
.................":.2540..+...4,". .
. . . . . . . .".J+...: 4
:...+... SAVE TO A FILE..,..TF$.TI$:.C
L$;". SAVE GAME? ARE YOU SURE? (Y/N)".4
,...A$:.A$.."Y".A$.."N".2570.B,...A$."N"
...G,.. 15:.15,8,15,"S0:DIGIT.FILE": 15.
.,(..3,8,3,"0:DIGIT.FILE,P,W":A$.G(13)..
,2..I.1.9:.J.1.9:.3,A(I,J):.J,I.O,<..I.1
.81:.3,RX(I):.3,RY(I):...-F..3,RQ:.3,X1:
.3,Y1:.3,SC:.3,TF$A$PC;A$PZ;A$TR%A$SK..-
P. 3:..'-Z.. READ FROM A FILE.X-D..CL$
;". LOAD OLD GAME? ARE YOU SURE? (Y/N)";
.V-N..A$:.A$.."Y".A$.."N".2670..-X..A$."
N"... -...3,8,3,"DIGIT.FILE,P,R"..-...I.
1.9:RN(I).0:CN(I).0:BN(I).0:RC(I).0:CC(I
).0:BC(I).0:RP(I).0:CP(I).0.....BP(I).0:
NR(I).0:NC(I).0:NB(I).0:.I:NU.0.J. ..I.1
.9:.J.1.9:.3,N:A(I,J).N:.N.0.NU.NU.1:.27
80.Y...N..N:B.KV(I).UV(J):BS.LV(I).VV(J)
:PT.PT(N).....RN(J).RN(J).PT:CN(I).CN(I)
.PT:BN(B).BN(B).PT.X...RC(J).RC(J).1:CC(
I).CC(I).1:BC(B).BC(B).1../H.RP(J).RP(J)
.PT(I):CP(I).CP(I).PT(J):BP(B).BP(B).PT(
BS).M/R.NR(N).NR(N).PT(J):NC(N).NC(N).PT
(I):NB(N).NB(N).PT(B).O/...J,I:.I.1.81:.
3,RX(I),RY(I):.../...3,RQ,X1,Y1,SC,TI$,P
C,PZ,TR%,SK../.. 3:.1750:.../..:.H/...J.
1.B$."ROW ":C$.G(81.I):.../...J.2.B$."CO
LUMN ":C$.G(64.I):..&0..C$.G(65.VV(I)).G
(67.VV(I))."-".G(82.UV(I)).G(84.UV(I)).6
0".B$."BOX ":..M0,.. HINT AT A MOVE.Q0
6..CL$;". ONE MOMENT PLEASE..."..0@.J.
0:.K.1.9..0J..RC(K).8.J.1:Y.K:X..X(511.R
P(K)):I.K.R0T..CC(K).8.J.2:X.K:Y..X(511.
CP(K)):I.K..1^..BC(K).8.J.3:BS..X(511.BP
(K)):I.K:X.VV(K).LV(BS):Y.UV(K).KV(BS).'
1H..K:.J.0.2990.C1R..2820:M1$(1).".>>> L
OOK FOR A ROW, COLUMN, OR BOX WITH"..1|.
M2$(1).".>>> JUST ONE OPEN SQUARE."..1..
M1$(2).".>>> THERE IS ONLY ONE DIGIT MIS
SING"..1..M2$(2).".>>> FROM ".B$.C$..2..
M1$(3).".>>> ".B$.C$." IS MISSING THE DI
GIT".D(A(X,Y))..2..M2$(3)."":J.2:.3480.Y
2..FG..1:..(.(1).4.1).3000,3130,3270,336
0.L2..I.0:.FG.1.3470.{2B..FG.0.FG.1..2L.
I.I.1:.I.81.3130..2V.X.RX(I):Y.RY(I):.A(
X,Y).0.3020..2..B.KV(X).UV(Y):FL.RN(Y).C
N(X).BN(B):J.511.FL..2...(J.(FL.1))..J.3
020.03..J..(.(1).3).1:I..((J.1).Y.(J.2).
X.(J.3).B):.2820.C3..M1$(1).".>>> ONE SQ
UARE IN ".B$.C$." CAN ONLY"..3..M2$(1)."
.>>> ACCEPT ONE DIGIT."..3..M1$(2).".>>>
THERE IS ONLY ONE DIGIT THAT CAN"..3..M
2$(2).".>>> GO INTO SQUARE ".G(64.X).G(8
1.Y).'4&.M1$(3).".>>>".D(A(X,Y))." IS TH
E ONLY DIGIT THAT WILL".C40.M2$(3).".>>>
GO INTO SQUARE ".G(64.X).G(81.Y):J.2:.3
480.V4:.I.0:.FG.2.3470..4D..FG.0.FG.2..4
N.I.I.1:.I.81.3270..4X.X.RX(I):Y.RY(I):.
A(X,Y).0.3150..4B.B.KV(X).UV(Y):N.A(X,Y)
:PT.PT(N):R.0..5L.S.(RP(Y).NC(N).RF(.(NB
(N).PT(UV(Y).1)).7).PT(X)).+5V..S..511.3
150.D5..B$."ROW ":C$.G(81.Y).Z5..M1$(1).
".>>> ONE DIGIT CAN ONLY GO IN ONE SQUAR
E"..5..M2$(1).".>>> IN ".B$.C$.M5..M1$(2
).".>>>".D(N)." CAN ONLY GO IN ONE SQUAR
E IN"..5..M2$(2).".>>> ".B$.C$..6..M1$(3
).".>>> IN ".B$.C$.",".D(N)." WILL ONLY
GO".T6..M2$(3).".>>> INTO SQUARE ".G(64.
X).G(81.Y):J.3:.3480.G6F.I.0:.FG.3.3470.
V6P..FG.0.FG.3..6Z.I.I.1:.I.81.3360..6..
X.RX(I):Y.RY(I):.A(X,Y).0.3290.V6..B.KV(
X).UV(Y):N.A(X,Y):PT.PT(N):R.0..7..J.(CP
(X).NR(N).((.(NB(N).PT(KV(X))).73).7).PT
(Y))..7...J..511.3290.97..B$."COLUMN ":C
$.G(64.X).C7...3210.V7 .I.0:.FG.4.3470.E
7*..FG.0.FG.4.Z74.I.I.1:.I.81.3000..7>.X
.RX(I):Y.RY(I):.A(X,Y).0.3380.Y7H.N.A(X,
Y):PT.PT(N):B.0:R..((X.1).3).3.1:S..((Y.
1).3).3.1..8R..R1.R.R.2:.S1.S.S.2:.((X.R
1).(Y.S1)).(A(R1,S1).0).3440.58\..((CN(R
1).RN(S1)).PT).0.3440.=8F.B.1.R8P..S1,R1
:.B.0.3380.}8Z.C$.G(64.R).G(66.R)."-".G(
81.S).G(83.S)..8..B$."BOX ":.3210.H8...C
L$;".SORRY, NO HINTS AVAILABLE":.I.1.250
0:.:.840.P8..I.1..8..SC.SC.1:.3860:.I.J.
3510..9...CS.2.X1.80.Y1,15:X1.X:Y1.Y:.CS
.2.X1.80.Y1,1.59...CL$;M1$(I):.M2$(I).?9
...3580.^9J.A.F(A$):.A..136..1290:.960.Z
9T.I.I.1:.(I.4).2.3490,840..9..:..9... G
ET INPUT..9..:..9..CC.0.B9..BL.8:CC.1.CC
:.CS.2.X1.80.Y1,CC..9...A$:.3790:.A$..""
. ...9...TI$.TB$..3970..:$.BL.BL.1:.BL.0
.3600..:... 3590.I:8..15,8,15,"R0:HELLO
CONNECT=HELLO CONNECT":.15,ER: 15._:B..
ER..63 . .".":...:L.A$."HELLO CONNECT":Q
$.G(34):.53281,7:.53280,7:."."..:V.."...
..LOAD"Q$A$Q$",8".Z:`.."....RUN.":.631,1
3:.632,13:.198,2:...;J..214,15:.:." ...
....................................".M;
T..I.1.3:." .
":..|;~.." . PUBLISHED O
N LOADSTAR #60 "..;..." . SUBSCR
IPTIONS 1-800-831-2694 ".Z;..." .
CHANGING THIS NOTICE IS ILLEGAL "..<...
" .
".:<..." ..............................
.........".V<..AU$."D I G I T H U N T":.
214,17:.:..20.C(AU$).2)".."AU$..<..AU$."
BY DAVE JOHANNSEN (C) 1989":.214,18:..E
<D...20.C(AU$).2)".."AU$".":...<N.."....
......."E(J(TI$,3,2))".:"J(TI$,5);..=X..
TR%.0...32)"100%":PC.100:..7=..PZ.(.(100
00.((TR%.SC).TR%))).100.F=...PZ.0.PZ.0.S
=...PZ.PC...M=..PC.PZ:.PZ.1.PZ.0:PC.0..=
....32)" ......"J(D(PC),2)"%":...=.
..214,14:.:..32)".."SC:..S=...I.1.9:.II.
1.9:.A(II,I);:.:.:...>(.TF$.TI$:.E(J(TF$
,3)).E(J(BT$(SK,1),3))....>2..FF%...L><.
.CL$".YOU TOPPED THE RECORD FOR THIS LEV
EL!":BT$(SK,2).D(SC).O>F.."..LEVEL. ENTE
R YOUR NAME: ";..>P.BT$(SK,1).TF$:LI.9:.
4180:A$." "..>Z.BT$(SK,0).W$.H(A
$,9.LW)..>D. 15:.15,8,15,"S0:BEST TIMES"
: 15..?N..2,8,2,"BEST TIMES,P,W":.I.1.9:
.2,BT$(I,1):.2,BT$(I,0)..?X..2,BT$(I,2):
.: 2:..L?...CL$"TIME FOR THIS PUZZLE HAS
EXPIRED":.".PRESS A KEY..."..?...198,0:
.198,1:.198,0:A$."Q":TI$."005950":.CL$;:
.1500..?...214,13:.:."CLEAR BEST TIMES?
ARE YOU SURE? (Y/N) "..? ..A$:.A$.."Y".
A$.."N".4000..@...A$."N".460.-@.. 15:.15
,8,15,"S0:BEST TIMES".E@...214,13:.:."
WIPING OUT BEST SCORES... ".U@
H..15,E$:.210..@R..BT$(SK,0)."---------"
.TB$."006000":.540.V@..PJ%.0:.I.C(BT$(SK
,0)).1..1:AA$.J(BT$(SK,0),I,1)..@...AA$.
." ".PJ%.1..@...PJ%.SN$.SN$.AA$.4A...:A$
."":.I.C(SN$).1..1:A$.A$.J(SN$,I,1):.:SN
$.A$.PA..A$."CHALLENGE ".SN$."'".MA...I(
SN$,1).."S".A$.A$."S".A..A$.A$." TIME".
.A"..214,13:.:."
"..A,.A$.A$."? (Y/N)":.2
14,13:.:..20.C(A$).2)A$..B6..A$:.A$.."Y"
.A$.."N".4150.#B@..A$."N".TB$."006000":.
540.:BJ.TB$.BT$(SK,1):.540.BBT.W$."":LW.
0:.">.";:.LIMIT.0.LIMIT.80. B^..A$:.A$."
.".A$.".".A$.".".A$.".".A$.".".A$.".".A$
."".4190.JBH.AS%.F(A$):.AS%.13.AS%.141.A
S%.20.4250..BR..B(653).4190..C|..LW.LIMI
T .(AS%..20.AS%..13.AS%..141).4190.@C...
AS%.34.(AS%..133.AS%..140).(AS%..1.AS%..
31).4190.DC..LW.LW.1:W$.W$.A$:.A$">.";:.
4190..C...AS%.20.W$.."".W$.H(W$,LW.1):."
.< ..";:LW.LW.1:.4190..C...AS%.20.W$."".
4190.KC...AS%.13.W$."".4190..C...AS%.13.
." ";:....
> CLICK IMAGE PREVIEW FOR FULL MODAL