PEGSOL.D
FILE INFORMATION
FILENAME(S): PEGSOL.D
FILE TYPE(S): PRG
FILE SIZE: 7K
FIRST SEEN: 2025-11-30 01:08:23
APPEARS ON: 1 disk(s)
FILE HASH
cfbb864e39a6c19df2fc73d151babec652a31bbaa0a4226effb3424095a32bc5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | PEGSOL.D | PRG | Treasure Chest - Wolfgang Rauprich | 21 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 01 00 8F 20 2D 20 50 45 47 20 53 4F |..(.... - PEG SO|
00000010: 4C 49 54 41 49 52 45 20 46 4F 52 20 43 4F 4D 4D |LITAIRE FOR COMM|
00000020: 4F 44 4F 52 45 20 36 34 00 3E 08 02 00 8F 20 2D |ODORE 64.>.... -|
00000030: 20 44 41 4E 49 45 4C 20 4D 49 4C 4C 45 52 00 55 | DANIEL MILLER.U|
00000040: 08 03 00 8F 20 2D 20 32 38 31 35 20 33 34 20 53 |.... - 2815 34 S|
00000050: 54 52 45 45 54 00 6D 08 04 00 8F 20 2D 20 41 53 |TREET.m.... - AS|
00000060: 54 4F 52 49 41 2C 20 51 55 45 45 4E 53 00 90 08 |TORIA, QUEENS...|
00000070: 05 00 8F 20 2D 20 4E 45 57 20 59 4F 52 4B 2C 20 |... - NEW YORK, |
00000080: 4E 45 57 20 59 4F 52 4B 20 20 20 31 31 31 30 33 |NEW YORK 11103|
00000090: 00 A1 08 06 00 8F 20 2D 20 30 33 2F 30 36 2F 38 |...... - 03/06/8|
000000A0: 33 00 C9 08 07 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |3...... ********|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 EF 08 0A 00 86 20 |*********...... |
000000D0: 41 24 28 33 29 2C 42 28 33 37 29 2C 43 24 28 31 |A$(3),B(37),C$(1|
000000E0: 35 29 2C 43 28 33 37 29 2C 44 24 28 31 35 29 00 |5),C(37),D$(15).|
000000F0: 02 09 14 00 99 C7 28 31 34 37 29 3A 89 31 30 30 |......(147):.100|
00000100: 30 30 00 2A 09 28 00 97 56 4F 2C 31 35 3A 97 57 |00.*.(..VO,15:.W|
00000110: 56 2C 31 37 3A 97 41 54 2C 31 35 3A 97 48 49 2C |V,17:.AT,15:.HI,|
00000120: 36 38 3A 97 4C 4F 2C 31 34 39 00 46 09 32 00 81 |68:.LO,149.F.2..|
00000130: 20 54 4D B2 31 20 A4 20 31 30 30 3A 82 20 54 4D | TM.1 . 100:. TM|
00000140: 3A 97 57 56 2C 30 00 5F 09 37 00 97 56 4F 2C 31 |:.WV,0._.7..VO,1|
00000150: 35 3A 97 57 56 2C 31 37 3A 97 41 54 2C 31 35 00 |5:.WV,17:.AT,15.|
00000160: 78 09 3C 00 97 57 56 2C 31 37 3A 97 48 49 2C 33 |x.<..WV,17:.HI,3|
00000170: 34 3A 97 4C 4F 2C 37 35 00 96 09 4B 00 81 20 54 |4:.LO,75...K.. T|
00000180: 4D B2 31 20 A4 20 31 30 30 3A 82 20 54 4D 3A 97 |M.1 . 100:. TM:.|
00000190: 57 56 2C 30 3A 8E 00 B6 09 96 00 81 20 58 B2 31 |WV,0:....... X.1|
000001A0: 20 A4 20 33 37 3A 42 28 58 29 B2 32 3A 82 3A 42 | . 37:B(X).2:.:B|
000001B0: 28 31 39 29 B2 31 00 C9 09 A0 00 41 41 B2 31 3A |(19).1.....AA.1:|
000001C0: 8D 32 33 30 3A 41 41 B2 30 00 02 0A C8 00 99 A3 |.230:AA.0.......|
000001D0: 31 34 29 44 57 24 3B 52 56 24 3B 22 50 45 47 20 |14)DW$;RV$;"PEG |
000001E0: 53 4F 4C 49 54 41 49 52 45 22 3B 52 4F 24 3B 3A |SOLITAIRE";RO$;:|
000001F0: 81 20 54 4D B2 31 20 A4 20 32 35 30 30 3A 82 20 |. TM.1 . 2500:. |
00000200: 54 4D 00 0C 0A D7 00 8D 31 30 30 30 00 22 0A DC |TM......1000."..|
00000210: 00 8F 20 2D 20 50 55 5A 5A 4C 45 20 53 43 52 45 |.. - PUZZLE SCRE|
00000220: 45 4E 00 2F 0A E6 00 99 20 C7 28 31 39 29 3B 00 |EN./.... .(19);.|
00000230: 69 0A 90 01 99 C8 28 44 4F 24 2C 34 29 A3 31 35 |i.....(DO$,4).15|
00000240: 29 41 24 28 42 28 31 29 29 3B 55 24 A3 32 30 29 |)A$(B(1));U$.20)|
00000250: 41 24 28 42 28 32 29 29 3B 55 24 A3 32 35 29 41 |A$(B(2));U$.25)A|
00000260: 24 28 42 28 33 29 29 3A 99 00 7E 0A 95 01 8B 20 |$(B(3)):..~.... |
00000270: C5 28 46 32 24 29 B3 B1 31 20 A7 34 31 30 00 86 |.(F2$)..1 .410..|
00000280: 0A 96 01 8D 34 30 00 C6 0A 9A 01 99 A3 31 30 29 |....40.......10)|
00000290: 41 24 28 42 28 34 29 29 3B 55 24 A3 31 35 29 41 |A$(B(4));U$.15)A|
000002A0: 24 28 42 28 35 29 29 3B 55 24 A3 32 30 29 41 24 |$(B(5));U$.20)A$|
000002B0: 28 42 28 36 29 29 3B 55 24 A3 32 35 29 41 24 28 |(B(6));U$.25)A$(|
000002C0: 42 28 37 29 29 3B 00 DC 0A 9F 01 99 55 24 A3 33 |B(7));......U$.3|
000002D0: 30 29 41 24 28 42 28 38 29 29 3A 99 00 F1 0A A0 |0)A$(B(8)):.....|
000002E0: 01 8B 20 C5 28 46 32 24 29 B3 B1 32 20 A7 34 32 |.. .(F2$)..2 .42|
000002F0: 30 00 F9 0A A1 01 8D 34 30 00 2B 0B A4 01 99 A3 |0......40.+.....|
00000300: 35 29 41 24 28 42 28 39 29 29 3B 55 24 A3 31 30 |5)A$(B(9));U$.10|
00000310: 29 41 24 28 42 28 31 30 29 29 3B 55 24 A3 31 35 |)A$(B(10));U$.15|
00000320: 29 41 24 28 42 28 31 31 29 29 3B 00 41 0B A5 01 |)A$(B(11));.A...|
00000330: 99 55 24 A3 32 30 29 41 24 28 42 28 31 32 29 29 |.U$.20)A$(B(12))|
00000340: 3B 00 78 0B A9 01 99 55 24 A3 32 35 29 41 24 28 |;.x....U$.25)A$(|
00000350: 42 28 31 33 29 29 3B 55 24 A3 33 30 29 41 24 28 |B(13));U$.30)A$(|
00000360: 42 28 31 34 29 29 3B 55 24 A3 33 35 29 41 24 28 |B(14));U$.35)A$(|
00000370: 42 28 31 35 29 29 3A 99 00 8D 0B AA 01 8B 20 C5 |B(15)):....... .|
00000380: 28 46 32 24 29 B3 B1 33 20 A7 34 33 30 00 95 0B |(F2$)..3 .430...|
00000390: AB 01 8D 34 30 00 C8 0B AE 01 99 A3 35 29 41 24 |...40.......5)A$|
000003A0: 28 42 28 31 36 29 29 3B 55 24 A3 31 30 29 41 24 |(B(16));U$.10)A$|
000003B0: 28 42 28 31 37 29 29 3B 55 24 A3 31 35 29 41 24 |(B(17));U$.15)A$|
000003C0: 28 42 28 31 38 29 29 3B 00 FE 0B AF 01 99 55 24 |(B(18));......U$|
000003D0: A3 32 30 29 41 24 28 42 28 31 39 29 29 3B 55 24 |.20)A$(B(19));U$|
000003E0: A3 32 35 29 41 24 28 42 28 32 30 29 29 3B 55 24 |.25)A$(B(20));U$|
000003F0: A3 33 30 29 41 24 28 42 28 32 31 29 29 3B 00 15 |.30)A$(B(21));..|
00000400: 0C B0 01 99 55 24 A3 33 35 29 41 24 28 42 28 32 |....U$.35)A$(B(2|
00000410: 32 29 29 3A 99 00 2A 0C B3 01 8B 20 C5 28 46 32 |2)):..*.... .(F2|
00000420: 24 29 B3 B1 34 20 A7 34 34 30 00 32 0C B4 01 8D |$)..4 .440.2....|
00000430: 34 30 00 65 0C B8 01 99 A3 35 29 41 24 28 42 28 |40.e.....5)A$(B(|
00000440: 32 33 29 29 3B 55 24 A3 31 30 29 41 24 28 42 28 |23));U$.10)A$(B(|
00000450: 32 34 29 29 3B 55 24 A3 31 35 29 41 24 28 42 28 |24));U$.15)A$(B(|
00000460: 32 35 29 29 3B 00 9B 0C B9 01 99 55 24 A3 32 30 |25));......U$.20|
00000470: 29 41 24 28 42 28 32 36 29 29 3B 55 24 A3 32 35 |)A$(B(26));U$.25|
00000480: 29 41 24 28 42 28 32 37 29 29 3B 55 24 A3 33 30 |)A$(B(27));U$.30|
00000490: 29 41 24 28 42 28 32 38 29 29 3B 00 B2 0C BA 01 |)A$(B(28));.....|
000004A0: 99 55 24 A3 33 35 29 41 24 28 42 28 32 39 29 29 |.U$.35)A$(B(29))|
000004B0: 3A 99 00 C7 0C BD 01 8B 20 C5 28 46 32 24 29 B3 |:....... .(F2$).|
000004C0: B1 35 20 A7 34 35 30 00 CF 0C BE 01 8D 34 30 00 |.5 .450......40.|
000004D0: 03 0D C2 01 99 A3 31 30 29 41 24 28 42 28 33 30 |......10)A$(B(30|
000004E0: 29 29 3B 55 24 A3 31 35 29 41 24 28 42 28 33 31 |));U$.15)A$(B(31|
000004F0: 29 29 3B 55 24 A3 32 30 29 41 24 28 42 28 33 32 |));U$.20)A$(B(32|
00000500: 29 29 3B 00 2A 0D C3 01 99 55 24 A3 32 35 29 41 |));.*....U$.25)A|
00000510: 24 28 42 28 33 33 29 29 3B 55 24 A3 33 30 29 41 |$(B(33));U$.30)A|
00000520: 24 28 42 28 33 34 29 29 3A 99 00 3F 0D C7 01 8B |$(B(34)):..?....|
00000530: 20 C5 28 46 32 24 29 B3 B1 36 20 A7 34 36 30 00 | .(F2$)..6 .460.|
00000540: 47 0D C8 01 8D 34 30 00 7A 0D CC 01 99 A3 31 35 |G....40.z.....15|
00000550: 29 41 24 28 42 28 33 35 29 29 3B 55 24 A3 32 30 |)A$(B(35));U$.20|
00000560: 29 41 24 28 42 28 33 36 29 29 3B 55 24 A3 32 35 |)A$(B(36));U$.25|
00000570: 29 41 24 28 42 28 33 37 29 29 00 8F 0D D1 01 8B |)A$(B(37))......|
00000580: 20 C5 28 46 32 24 29 B3 B1 37 20 A7 35 30 30 00 | .(F2$)..7 .500.|
00000590: 97 0D D2 01 8D 34 30 00 C0 0D F4 01 44 B2 39 39 |.....40.....D.99|
000005A0: 3A 45 B2 31 32 30 3A 81 20 58 B2 31 32 30 32 20 |:E.120:. X.1202 |
000005B0: A4 20 31 39 39 32 20 A9 45 3A 97 58 2C 44 3A 82 |. 1992 .E:.X,D:.|
000005C0: 00 DE 0D FE 01 81 20 58 B2 31 32 30 37 20 A4 20 |...... X.1207 . |
000005D0: 31 39 39 37 20 A9 45 3A 97 58 2C 44 3A 82 00 FC |1997 .E:.X,D:...|
000005E0: 0D 08 02 81 20 58 B2 31 33 31 37 20 A4 20 31 37 |.... X.1317 . 17|
000005F0: 39 37 20 A9 45 3A 97 58 2C 44 3A 82 00 1A 0E 12 |97 .E:.X,D:.....|
00000600: 02 81 20 58 B2 31 33 33 32 20 A4 20 31 38 31 32 |.. X.1332 . 1812|
00000610: 20 A9 45 3A 97 58 2C 44 3A 82 00 38 0E 1C 02 81 | .E:.X,D:..8....|
00000620: 20 58 B2 31 34 33 32 20 A4 20 31 36 37 32 20 A9 | X.1432 . 1672 .|
00000630: 45 3A 97 58 2C 44 3A 82 00 56 0E 21 02 81 20 58 |E:.X,D:..V.!.. X|
00000640: B2 31 34 35 37 20 A4 20 31 36 39 37 20 A9 45 3A |.1457 . 1697 .E:|
00000650: 97 58 2C 44 3A 82 00 65 0E 24 02 8B 20 41 41 B2 |.X,D:..e.$.. AA.|
00000660: 31 20 A7 20 8E 00 86 0E 26 02 81 20 58 B2 35 35 |1 . ....&.. X.55|
00000670: 33 34 32 20 A4 20 35 35 33 37 32 20 A9 35 3A 97 |342 . 55372 .5:.|
00000680: 58 2C 31 30 3A 82 00 AF 0E 2B 02 58 B2 34 39 3A |X,10:....+.X.49:|
00000690: 81 20 59 B2 31 30 37 30 20 A4 20 31 31 30 30 20 |. Y.1070 . 1100 |
000006A0: A9 35 3A 97 59 2C 58 3A 58 B2 58 AA 31 3A 82 00 |.5:.Y,X:X.X.1:..|
000006B0: D0 0E 30 02 81 20 58 B2 35 35 34 31 38 20 A4 20 |..0.. X.55418 . |
000006C0: 35 36 32 31 38 20 A9 45 3A 97 58 2C 31 30 3A 82 |56218 .E:.X,10:.|
000006D0: 00 F9 0E 35 02 58 B2 34 39 3A 81 20 59 B2 31 31 |...5.X.49:. Y.11|
000006E0: 34 36 20 A4 20 31 39 34 36 20 A9 45 3A 97 59 2C |46 . 1946 .E:.Y,|
000006F0: 58 3A 58 B2 58 AA 31 3A 82 00 2E 0F 3A 02 53 31 |X:X.X.1:....:.S1|
00000700: 24 B2 52 56 24 AA C7 28 31 35 39 29 AA 22 4D 4F |$.RV$..(159)."MO|
00000710: 56 45 20 23 22 AA 52 4F 24 3A 99 C8 28 44 4F 24 |VE #".RO$:..(DO$|
00000720: 2C 32 32 29 3B A3 33 30 29 20 53 31 24 3B 00 64 |,22);.30) S1$;.d|
00000730: 0F 58 02 53 31 24 B2 52 56 24 AA C7 28 31 35 39 |.X.S1$.RV$..(159|
00000740: 29 AA 22 46 52 4F 4D 22 AA 52 4F 24 3A 53 32 24 |)."FROM".RO$:S2$|
00000750: B2 52 56 24 AA C7 28 31 35 39 29 AA 22 54 4F 22 |.RV$..(159)."TO"|
00000760: AA 52 4F 24 00 81 0F 5D 02 99 20 44 4F 24 3B A3 |.RO$...].. DO$;.|
00000770: 31 30 29 20 53 31 24 3B A3 32 34 29 20 53 32 24 |10) S1$;.24) S2$|
00000780: 3B 00 A7 0F 62 02 99 20 44 4F 57 4E 24 3B A3 31 |;...b.. DOWN$;.1|
00000790: 35 29 3B 22 20 20 20 22 3B 44 4F 57 4E 24 3B A3 |5);" ";DOWN$;.|
000007A0: 31 35 29 3B 22 22 3B 00 BD 0F 63 02 A1 20 46 24 |15);"";...c.. F$|
000007B0: 3A 8B 20 46 24 B2 22 22 20 A7 36 31 31 00 F3 0F |:. F$."" .611...|
000007C0: 64 02 46 30 B2 C6 28 46 24 29 3A 8B 20 46 30 B2 |d.F0..(F$):. F0.|
000007D0: 31 33 33 20 B0 20 46 30 B2 31 33 34 20 B0 20 46 |133 . F0.134 . F|
000007E0: 30 B2 31 33 35 20 B0 20 46 30 B2 31 33 36 20 A7 |0.135 . F0.136 .|
000007F0: 37 34 30 00 09 10 68 02 A1 20 47 24 3A 8B 20 47 |740...h.. G$:. G|
00000800: 24 B2 22 22 20 A7 36 31 36 00 2A 10 69 02 46 52 |$."" .616.*.i.FR|
00000810: 24 B2 46 24 AA 47 24 3A 99 20 46 52 24 3B 3A 46 |$.F$.G$:. FR$;:F|
00000820: 24 B2 22 22 3A 47 24 B2 22 22 00 5A 10 6A 02 8B |$."":G$."".Z.j..|
00000830: 20 C8 28 46 52 24 2C 31 29 B3 22 31 22 20 B0 20 | .(FR$,1)."1" . |
00000840: C8 28 46 52 24 2C 31 29 B1 22 39 22 20 A7 20 46 |.(FR$,1)."9" . F|
00000850: 52 24 B2 22 22 3A 89 36 31 30 00 8A 10 6B 02 8B |R$."":.610...k..|
00000860: 20 C9 28 46 52 24 2C 31 29 B3 22 31 22 20 B0 20 | .(FR$,1)."1" . |
00000870: C9 28 46 52 24 2C 31 29 B1 22 39 22 20 A7 20 46 |.(FR$,1)."9" . F|
00000880: 52 24 B2 22 22 3A 89 36 31 30 00 BB 10 6C 02 48 |R$."":.610...l.H|
00000890: B2 C5 28 46 52 24 29 3A 46 31 B2 48 3A 8D 38 30 |..(FR$):F1.H:.80|
000008A0: 30 30 3A 46 52 B2 48 3A 43 28 46 52 29 B2 C5 28 |00:FR.H:C(FR)..(|
000008B0: CA 28 44 24 2C 46 52 2C 31 29 29 00 E1 10 94 02 |.(D$,FR,1)).....|
000008C0: 99 20 44 4F 57 4E 24 3B A3 32 37 29 3B 22 20 20 |. DOWN$;.27);" |
000008D0: 20 22 3B 44 4F 57 4E 24 3B A3 32 37 29 3B 22 22 | ";DOWN$;.27);""|
000008E0: 3B 00 F7 10 99 02 A1 20 46 24 3A 8B 20 46 24 B2 |;...... F$:. F$.|
000008F0: 22 22 20 A7 36 36 35 00 0D 11 9A 02 A1 20 47 24 |"" .665...... G$|
00000900: 3A 8B 20 47 24 B2 22 22 20 A7 36 36 36 00 2E 11 |:. G$."" .666...|
00000910: 9B 02 54 55 24 B2 46 24 AA 47 24 3A 99 20 54 55 |..TU$.F$.G$:. TU|
00000920: 24 3B 3A 46 24 B2 22 22 3A 47 24 B2 22 22 00 5E |$;:F$."":G$."".^|
00000930: 11 9C 02 8B 20 C8 28 54 55 24 2C 31 29 B3 22 31 |.... .(TU$,1)."1|
00000940: 22 20 B0 20 C8 28 54 55 24 2C 31 29 B1 22 37 22 |" . .(TU$,1)."7"|
00000950: 20 A7 20 54 55 24 B2 22 22 3A 89 36 36 30 00 8E | . TU$."":.660..|
00000960: 11 9D 02 8B 20 C9 28 54 55 24 2C 31 29 B3 22 31 |.... .(TU$,1)."1|
00000970: 22 20 B0 20 C9 28 54 55 24 2C 31 29 B1 22 37 22 |" . .(TU$,1)."7"|
00000980: 20 A7 20 54 55 24 B2 22 22 3A 89 36 36 30 00 BF | . TU$."":.660..|
00000990: 11 9E 02 48 B2 C5 28 54 55 24 29 3A 54 31 B2 48 |...H..(TU$):T1.H|
000009A0: 3A 8D 38 30 30 30 3A 54 55 B2 48 3A 43 28 54 55 |:.8000:TU.H:C(TU|
000009B0: 29 B2 C5 28 CA 28 44 24 2C 54 55 2C 31 29 29 00 |)..(.(D$,TU,1)).|
000009C0: D0 11 A3 02 46 32 24 B2 C8 28 46 52 24 2C 31 29 |....F2$..(FR$,1)|
000009D0: 00 F2 11 A8 02 46 52 24 B2 CA 28 44 24 2C 46 52 |.....FR$..(D$,FR|
000009E0: 2C 31 29 3A 54 55 24 B2 CA 28 44 24 2C 54 55 2C |,1):TU$..(D$,TU,|
000009F0: 31 29 00 0C 12 B2 02 8B 20 46 52 24 B2 22 31 22 |1)...... FR$."1"|
00000A00: 20 A7 20 45 52 B2 31 3A 89 39 30 30 00 26 12 B3 | . ER.1:.900.&..|
00000A10: 02 8B 20 54 55 24 B2 22 32 22 20 A7 20 45 52 B2 |.. TU$."2" . ER.|
00000A20: 32 3A 89 39 30 30 00 4A 12 B4 02 8B 20 46 52 24 |2:.900.J.... FR$|
00000A30: B2 22 33 22 20 B0 20 54 55 24 B2 22 33 22 20 A7 |."3" . TU$."3" .|
00000A40: 20 45 52 B2 33 3A 89 39 30 30 00 6A 12 BC 02 43 | ER.3:.900.j...C|
00000A50: B2 43 28 54 55 29 3A 43 28 54 55 29 B2 43 28 46 |.C(TU):C(TU).C(F|
00000A60: 52 29 3A 43 28 46 52 29 B2 43 00 9F 12 C1 02 8B |R):C(FR).C......|
00000A70: 20 46 31 AB 54 31 B2 32 20 B0 20 46 31 AB 54 31 | F1.T1.2 . F1.T1|
00000A80: B2 AB 32 20 B0 20 46 31 AB 54 31 B2 32 30 20 B0 |..2 . F1.T1.20 .|
00000A90: 20 46 31 AB 54 31 B2 AB 32 30 20 A7 38 30 30 00 | F1.T1..20 .800.|
00000AA0: C9 12 C6 02 44 24 B2 22 22 3A 81 20 58 B2 31 20 |....D$."":. X.1 |
00000AB0: A4 20 33 37 3A 44 24 B2 44 24 AA C9 28 C4 28 43 |. 37:D$.D$..(.(C|
00000AC0: 28 58 29 29 2C 31 29 3A 82 00 F5 12 D0 02 99 20 |(X)),1):....... |
00000AD0: 44 4F 57 4E 24 3B A3 31 35 29 3B 22 20 20 20 22 |DOWN$;.15);" "|
00000AE0: 3B 3A 99 20 44 4F 57 4E 24 3B A3 32 37 29 3B 22 |;:. DOWN$;.27);"|
00000AF0: 20 20 20 22 3B 00 1D 13 DA 02 81 20 58 B2 31 20 | ";...... X.1 |
00000B00: A4 20 33 37 3A 42 28 58 29 B2 C5 28 CA 28 44 24 |. 37:B(X)..(.(D$|
00000B10: 2C 58 2C 31 29 29 3A 82 3A 89 32 32 30 00 4D 13 |,X,1)):.:.220.M.|
00000B20: E4 02 46 30 B2 30 3A 4D 56 B2 4D 56 AA 31 3A 99 |..F0.0:MV.MV.1:.|
00000B30: 20 C8 28 44 4F 57 4E 24 2C 32 32 29 3B A3 33 37 | .(DOWN$,22);.37|
00000B40: 29 3B C4 28 4D 56 29 3B 3A 89 32 32 30 00 6A 13 |);.(MV);:.220.j.|
00000B50: 20 03 8B 20 B6 28 46 31 AB 54 31 29 B2 32 30 20 | .. .(F1.T1).20 |
00000B60: A7 20 4A B2 31 3A 89 38 32 30 00 77 13 25 03 4A |. J.1:.820.w.%.J|
00000B70: B2 32 3A 89 38 33 30 00 88 13 34 03 8B 20 46 31 |.2:.830...4.. F1|
00000B80: B1 54 31 20 A7 38 32 35 00 99 13 35 03 48 B2 46 |.T1 .825...5.H.F|
00000B90: 31 AA 31 30 3A 89 38 32 36 00 A5 13 39 03 48 B2 |1.10:.826...9.H.|
00000BA0: 46 31 AB 31 30 00 BB 13 3A 03 8D 38 30 30 30 3A |F1.10...:..8000:|
00000BB0: 43 28 48 29 B2 31 3A 89 37 31 30 00 CC 13 3E 03 |C(H).1:.710...>.|
00000BC0: 8B 20 46 31 B1 54 31 20 A7 38 33 35 00 DC 13 3F |. F1.T1 .835...?|
00000BD0: 03 48 B2 46 31 AA 31 3A 89 38 33 36 00 E7 13 43 |.H.F1.1:.836...C|
00000BE0: 03 48 B2 46 31 AB 31 00 FD 13 44 03 8D 38 30 30 |.H.F1.1...D..800|
00000BF0: 30 3A 43 28 48 29 B2 31 3A 89 37 31 30 00 14 14 |0:C(H).1:.710...|
00000C00: 84 03 91 20 45 52 20 89 20 39 31 30 2C 39 32 30 |... ER . 910,920|
00000C10: 2C 39 33 30 00 4D 14 8E 03 45 52 24 B2 52 56 24 |,930.M...ER$.RV$|
00000C20: AA 22 27 46 52 4F 4D 27 20 50 4F 53 49 54 49 4F |."'FROM' POSITIO|
00000C30: 4E 20 45 4D 50 54 59 22 AA 52 4F 24 3A 8D 39 35 |N EMPTY".RO$:.95|
00000C40: 30 3A 46 32 24 B2 22 22 3A 89 32 32 30 00 87 14 |0:F2$."":.220...|
00000C50: 98 03 45 52 24 B2 52 56 24 AA 22 27 54 4F 27 20 |..ER$.RV$."'TO' |
00000C60: 50 4F 53 49 54 49 4F 4E 20 4F 43 43 55 50 49 45 |POSITION OCCUPIE|
00000C70: 44 22 AA 52 4F 24 3A 8D 39 35 30 3A 46 32 24 B2 |D".RO$:.950:F2$.|
00000C80: 22 22 3A 89 32 32 30 00 B7 14 A2 03 45 52 24 B2 |"":.220.....ER$.|
00000C90: 52 56 24 AA 22 49 4E 56 41 4C 49 44 20 4D 4F 56 |RV$."INVALID MOV|
00000CA0: 45 22 AA 52 4F 24 3A 8D 39 35 30 3A 46 32 24 B2 |E".RO$:.950:F2$.|
00000CB0: 22 22 3A 89 32 32 30 00 E3 14 B6 03 99 20 44 4F |"":.220...... DO|
00000CC0: 57 4E 24 3B A3 35 29 3B 22 20 20 20 20 20 20 20 |WN$;.5);" |
00000CD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CE0: 20 22 3B 00 F1 14 B7 03 81 20 58 B2 31 20 A4 20 | ";...... X.1 . |
00000CF0: 35 00 24 15 B8 03 99 20 44 4F 57 4E 24 3B A3 32 |5.$.... DOWN$;.2|
00000D00: 32 AB 28 C3 28 45 52 24 29 AD 32 29 29 3B 45 52 |2.(.(ER$).2));ER|
00000D10: 24 3B 3A 81 20 54 4D B2 31 20 A4 20 35 30 30 3A |$;:. TM.1 . 500:|
00000D20: 82 20 54 4D 00 55 15 BA 03 99 20 44 4F 57 4E 24 |. TM.U.... DOWN$|
00000D30: 3B 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |;" |
00000D40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D50: 20 20 20 22 3B 00 71 15 BC 03 81 20 54 4D B2 31 | ";.q.... TM.1|
00000D60: 20 A4 20 35 30 30 3A 82 20 54 4D 3A 82 20 58 3A | . 500:. TM:. X:|
00000D70: 8E 00 83 15 E7 03 8F 20 2D 20 4D 41 49 4E 20 4D |....... - MAIN M|
00000D80: 45 4E 55 00 AE 15 E8 03 53 31 24 B2 44 57 24 AA |ENU.....S1$.DW$.|
00000D90: 52 56 24 AA C7 28 31 35 39 29 AA 22 50 45 47 20 |RV$..(159)."PEG |
00000DA0: 53 4F 4C 49 54 41 49 52 45 22 AA 52 4F 24 00 C4 |SOLITAIRE".RO$..|
00000DB0: 15 F2 03 99 43 4C 24 3A 99 A3 31 34 29 53 31 24 |....CL$:..14)S1$|
00000DC0: 3B 44 57 24 00 E8 15 B0 04 81 20 58 B2 31 20 A4 |;DW$...... X.1 .|
00000DD0: 20 31 35 3A 99 A3 35 29 C4 28 58 29 22 2E 20 22 | 15:..5).(X)". "|
00000DE0: 3B 43 24 28 58 29 3A 82 00 00 16 F6 04 8C 3A 81 |;C$(X):.......:.|
00000DF0: 20 58 B2 31 20 A4 20 31 35 3A 87 20 43 24 3A 82 | X.1 . 15:. C$:.|
00000E00: 00 25 16 14 05 99 20 44 57 24 3B A3 31 30 29 22 |.%.... DW$;.10)"|
00000E10: 53 45 4C 45 43 54 20 43 48 4F 49 43 45 20 22 3B |SELECT CHOICE ";|
00000E20: 3A 85 20 50 5A 00 3A 16 19 05 8B 20 50 5A B2 31 |:. PZ.:.... PZ.1|
00000E30: 35 20 A7 20 99 43 4C 24 3A 80 00 80 16 1E 05 91 |5 . .CL$:.......|
00000E40: 20 50 5A 20 8D 31 31 30 30 30 2C 31 31 31 30 30 | PZ .11000,11100|
00000E50: 2C 31 31 32 30 30 2C 31 31 33 30 30 2C 31 31 34 |,11200,11300,114|
00000E60: 30 30 2C 31 31 35 30 30 2C 31 31 36 30 30 2C 31 |00,11500,11600,1|
00000E70: 31 37 30 30 2C 31 31 38 30 30 2C 31 31 39 30 30 |1700,11800,11900|
00000E80: 00 92 16 20 05 8B 20 50 5A B3 31 31 20 A7 31 33 |... .. PZ.11 .13|
00000E90: 32 30 00 B7 16 23 05 91 20 50 5A AB 31 30 20 8D |20...#.. PZ.10 .|
00000EA0: 31 32 30 30 30 2C 31 32 31 30 30 2C 31 32 32 30 |12000,12100,1220|
00000EB0: 30 2C 31 32 33 30 30 00 CF 16 28 05 8C 3A 81 20 |0,12300...(..:. |
00000EC0: 58 B2 31 20 A4 20 50 5A 3A 87 20 43 24 3A 82 00 |X.1 . PZ:. C$:..|
00000ED0: E7 16 32 05 8C 3A 81 20 58 B2 31 20 A4 20 31 35 |..2..:. X.1 . 15|
00000EE0: 3A 87 20 58 24 3A 82 00 06 17 3C 05 81 20 58 B2 |:. X$:....<.. X.|
00000EF0: 31 20 A4 20 50 5A 3A 87 20 50 50 24 2C 4A 4A 24 |1 . PZ:. PP$,JJ$|
00000F00: 2C 43 43 24 3A 82 00 10 17 46 05 8D 37 30 30 30 |,CC$:....F..7000|
00000F10: 00 4E 17 78 05 44 24 B2 44 24 28 50 5A 29 3A 81 |.N.x.D$.D$(PZ):.|
00000F20: 20 58 B2 31 20 A4 20 33 37 3A 42 28 58 29 B2 C5 | X.1 . 37:B(X)..|
00000F30: 28 CA 28 44 24 2C 58 2C 31 29 29 3A 43 28 58 29 |(.(D$,X,1)):C(X)|
00000F40: B2 42 28 58 29 3A 82 3A 46 32 24 B2 22 22 00 73 |.B(X):.:F2$."".s|
00000F50: 17 AA 05 97 35 33 32 38 30 2C 38 3A 97 35 33 32 |....53280,8:.532|
00000F60: 38 31 2C 36 3A 4D 56 B2 30 3A 99 43 4C 24 3A 89 |81,6:MV.0:.CL$:.|
00000F70: 32 33 30 00 A7 17 58 1B 99 43 4C 24 3A 53 31 24 |230...X..CL$:S1$|
00000F80: B2 44 57 24 AA 52 56 24 AA 43 24 AA 52 4F 24 AA |.DW$.RV$.C$.RO$.|
00000F90: 44 57 24 3A 99 A3 32 30 AB 28 C3 28 43 24 29 AD |DW$:..20.(.(C$).|
00000FA0: 32 29 29 3B 53 31 24 00 D5 17 BC 1B 99 22 20 49 |2));S1$......" I|
00000FB0: 4E 20 4F 52 44 45 52 20 54 4F 20 53 4F 4C 56 45 |N ORDER TO SOLVE|
00000FC0: 20 54 48 49 53 20 50 55 5A 5A 4C 45 2C 20 52 45 | THIS PUZZLE, RE|
00000FD0: 4D 4F 56 45 22 00 F9 17 C6 1B 53 31 24 B2 52 56 |MOVE".....S1$.RV|
00000FE0: 24 AA 50 50 24 AA 52 4F 24 3A 53 32 24 B2 52 56 |$.PP$.RO$:S2$.RV|
00000FF0: 24 AA 4A 4A 24 AA 52 4F 24 00 31 18 CB 1B 99 22 |$.JJ$.RO$.1...."|
00001000: 20 22 53 31 24 3B 22 20 50 49 45 43 45 53 20 49 | "S1$;" PIECES I|
00001010: 4E 20 22 3B 53 32 24 3B 22 20 4D 4F 56 45 53 20 |N ";S2$;" MOVES |
00001020: 4C 45 41 56 49 4E 47 20 54 48 45 20 4C 41 53 54 |LEAVING THE LAST|
00001030: 22 00 6C 18 D0 1B 53 31 24 B2 52 56 24 AA 43 43 |".l...S1$.RV$.CC|
00001040: 24 AA 52 4F 24 3A 99 22 20 50 4C 41 59 49 4E 47 |$.RO$:." PLAYING|
00001050: 20 50 49 45 43 45 20 49 4E 20 50 4F 53 49 54 49 | PIECE IN POSITI|
00001060: 4F 4E 20 22 3B 53 31 24 3B 22 2E 22 00 9D 18 20 |ON ";S1$;"."... |
00001070: 1C 99 C8 28 44 4F 57 4E 24 2C 32 30 29 3B A3 38 |...(DOWN$,20);.8|
00001080: 29 22 50 52 45 53 53 20 3C 52 45 54 55 52 4E 3E |)"PRESS <RETURN>|
00001090: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 B6 18 | TO CONTINUE"...|
000010A0: 2A 1C A1 20 52 52 24 3A 8B 20 52 52 24 B2 22 22 |*.. RR$:. RR$.""|
000010B0: 20 A7 37 32 31 30 00 CD 18 34 1C 8B 20 52 52 24 | .7210...4.. RR$|
000010C0: B3 B1 C7 28 31 33 29 20 A7 37 32 31 30 00 D3 18 |...(13) .7210...|
000010D0: 3E 1C 8E 00 E6 18 40 1F 8B 20 48 B2 31 33 20 A7 |>.....@.. H.13 .|
000010E0: 20 48 B2 31 3A 8E 00 F9 18 4A 1F 8B 20 48 B2 31 | H.1:....J.. H.1|
000010F0: 34 20 A7 20 48 B2 32 3A 8E 00 0C 19 54 1F 8B 20 |4 . H.2:....T.. |
00001100: 48 B2 31 35 20 A7 20 48 B2 33 3A 8E 00 1F 19 5E |H.15 . H.3:....^|
00001110: 1F 8B 20 48 B2 32 32 20 A7 20 48 B2 34 3A 8E 00 |.. H.22 . H.4:..|
00001120: 32 19 68 1F 8B 20 48 B2 32 33 20 A7 20 48 B2 35 |2.h.. H.23 . H.5|
00001130: 3A 8E 00 45 19 72 1F 8B 20 48 B2 32 34 20 A7 20 |:..E.r.. H.24 . |
00001140: 48 B2 36 3A 8E 00 58 19 7C 1F 8B 20 48 B2 32 35 |H.6:..X.|.. H.25|
00001150: 20 A7 20 48 B2 37 3A 8E 00 6B 19 86 1F 8B 20 48 | . H.7:..k.... H|
00001160: B2 32 36 20 A7 20 48 B2 38 3A 8E 00 7E 19 90 1F |.26 . H.8:..~...|
00001170: 8B 20 48 B2 33 31 20 A7 20 48 B2 39 3A 8E 00 92 |. H.31 . H.9:...|
00001180: 19 9A 1F 8B 20 48 B2 33 32 20 A7 20 48 B2 31 30 |.... H.32 . H.10|
00001190: 3A 8E 00 A6 19 A4 1F 8B 20 48 B2 33 33 20 A7 20 |:....... H.33 . |
000011A0: 48 B2 31 31 3A 8E 00 BA 19 AE 1F 8B 20 48 B2 33 |H.11:....... H.3|
000011B0: 34 20 A7 20 48 B2 31 32 3A 8E 00 CE 19 B8 1F 8B |4 . H.12:.......|
000011C0: 20 48 B2 33 35 20 A7 20 48 B2 31 33 3A 8E 00 E2 | H.35 . H.13:...|
000011D0: 19 C2 1F 8B 20 48 B2 33 36 20 A7 20 48 B2 31 34 |.... H.36 . H.14|
000011E0: 3A 8E 00 F6 19 D6 1F 8B 20 48 B2 33 37 20 A7 20 |:....... H.37 . |
000011F0: 48 B2 31 35 3A 8E 00 0A 1A E0 1F 8B 20 48 B2 34 |H.15:....... H.4|
00001200: 31 20 A7 20 48 B2 31 36 3A 8E 00 1E 1A EA 1F 8B |1 . H.16:.......|
00001210: 20 48 B2 34 32 20 A7 20 48 B2 31 37 3A 8E 00 32 | H.42 . H.17:..2|
00001220: 1A F4 1F 8B 20 48 B2 34 33 20 A7 20 48 B2 31 38 |.... H.43 . H.18|
00001230: 3A 8E 00 46 1A FE 1F 8B 20 48 B2 34 34 20 A7 20 |:..F.... H.44 . |
00001240: 48 B2 31 39 3A 8E 00 5A 1A 08 20 8B 20 48 B2 34 |H.19:..Z.. . H.4|
00001250: 35 20 A7 20 48 B2 32 30 3A 8E 00 6E 1A 12 20 8B |5 . H.20:..n.. .|
00001260: 20 48 B2 34 36 20 A7 20 48 B2 32 31 3A 8E 00 82 | H.46 . H.21:...|
00001270: 1A 1C 20 8B 20 48 B2 34 37 20 A7 20 48 B2 32 32 |.. . H.47 . H.22|
00001280: 3A 8E 00 96 1A 26 20 8B 20 48 B2 35 31 20 A7 20 |:....& . H.51 . |
00001290: 48 B2 32 33 3A 8E 00 AA 1A 30 20 8B 20 48 B2 35 |H.23:....0 . H.5|
000012A0: 32 20 A7 20 48 B2 32 34 3A 8E 00 BE 1A 3A 20 8B |2 . H.24:....: .|
000012B0: 20 48 B2 35 33 20 A7 20 48 B2 32 35 3A 8E 00 D2 | H.53 . H.25:...|
000012C0: 1A 44 20 8B 20 48 B2 35 34 20 A7 20 48 B2 32 36 |.D . H.54 . H.26|
000012D0: 3A 8E 00 E6 1A 4E 20 8B 20 48 B2 35 35 20 A7 20 |:....N . H.55 . |
000012E0: 48 B2 32 37 3A 8E 00 FA 1A 58 20 8B 20 48 B2 35 |H.27:....X . H.5|
000012F0: 36 20 A7 20 48 B2 32 38 3A 8E 00 0E 1B 62 20 8B |6 . H.28:....b .|
00001300: 20 48 B2 35 37 20 A7 20 48 B2 32 39 3A 8E 00 22 | H.57 . H.29:.."|
00001310: 1B 6C 20 8B 20 48 B2 36 32 20 A7 20 48 B2 33 30 |.l . H.62 . H.30|
00001320: 3A 8E 00 36 1B 76 20 8B 20 48 B2 36 33 20 A7 20 |:..6.v . H.63 . |
00001330: 48 B2 33 31 3A 8E 00 4A 1B 80 20 8B 20 48 B2 36 |H.31:..J.. . H.6|
00001340: 34 20 A7 20 48 B2 33 32 3A 8E 00 5E 1B 8A 20 8B |4 . H.32:..^.. .|
00001350: 20 48 B2 36 35 20 A7 20 48 B2 33 33 3A 8E 00 72 | H.65 . H.33:..r|
00001360: 1B 94 20 8B 20 48 B2 36 36 20 A7 20 48 B2 33 34 |.. . H.66 . H.34|
00001370: 3A 8E 00 86 1B 9E 20 8B 20 48 B2 37 33 20 A7 20 |:..... . H.73 . |
00001380: 48 B2 33 35 3A 8E 00 9A 1B A8 20 8B 20 48 B2 37 |H.35:..... . H.7|
00001390: 34 20 A7 20 48 B2 33 36 3A 8E 00 AE 1B B2 20 8B |4 . H.36:..... .|
000013A0: 20 48 B2 37 35 20 A7 20 48 B2 33 37 3A 8E 00 BF | H.75 . H.37:...|
000013B0: 1B BC 20 8B 20 48 B2 39 39 20 A7 38 35 30 30 00 |.. . H.99 .8500.|
000013C0: CD 1B D0 20 81 20 58 B2 31 20 A4 20 35 00 FA 1B |... . X.1 . 5...|
000013D0: DA 20 53 31 24 B2 52 56 24 AA 22 49 4E 43 4F 52 |. S1$.RV$."INCOR|
000013E0: 52 45 43 54 20 46 52 4F 4D 2F 54 4F 20 50 4F 53 |RECT FROM/TO POS|
000013F0: 49 54 49 4F 4E 22 AA 52 4F 24 00 1D 1C DF 20 99 |ITION".RO$.... .|
00001400: 44 4F 24 3B A3 39 29 53 31 24 3B 3A 81 20 54 4D |DO$;.9)S1$;:. TM|
00001410: B2 31 20 A4 20 35 30 30 3A 82 20 54 4D 00 5D 1C |.1 . 500:. TM.].|
00001420: E4 20 99 20 44 4F 57 4E 24 3B A3 39 29 3B 22 20 |. . DOWN$;.9);" |
00001430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001440: 20 20 20 20 20 20 20 20 20 22 3B 3A 81 20 54 4D | ";:. TM|
00001450: B2 31 20 A4 20 35 30 30 3A 82 20 54 4D 00 71 1C |.1 . 500:. TM.q.|
00001460: EE 20 82 20 58 3A 46 32 24 B2 22 22 3A 89 32 32 |. . X:F2$."":.22|
00001470: 30 00 AE 1C 34 21 53 31 24 B2 22 49 20 48 4F 50 |0...4!S1$."I HOP|
00001480: 45 20 59 4F 55 20 48 41 44 20 46 55 4E 20 57 49 |E YOU HAD FUN WI|
00001490: 54 48 20 22 AA 52 56 24 AA 22 27 50 45 47 20 53 |TH ".RV$."'PEG S|
000014A0: 4F 4C 49 54 41 49 52 45 27 22 AA 52 4F 24 00 DD |OLITAIRE'".RO$..|
000014B0: 1C 3E 21 99 20 44 4F 57 4E 24 3B 53 31 24 3B 3A |.>!. DOWN$;S1$;:|
000014C0: 81 20 54 4D B2 31 20 A4 20 31 35 30 30 3A 82 20 |. TM.1 . 1500:. |
000014D0: 54 4D 3A 99 43 4C 24 3A 89 31 30 30 30 00 23 1D |TM:.CL$:.1000.#.|
000014E0: AC 26 83 20 4C 41 54 49 4E 20 43 52 4F 53 53 2C |.&. LATIN CROSS,|
000014F0: 47 52 45 45 4B 20 43 52 4F 53 53 2C 46 4F 4F 54 |GREEK CROSS,FOOT|
00001500: 42 41 4C 4C 20 54 45 41 4D 2C 50 59 52 41 4D 49 |BALL TEAM,PYRAMI|
00001510: 44 20 4F 46 20 43 48 45 46 52 45 4E 2C 53 48 52 |D OF CHEFREN,SHR|
00001520: 49 4E 45 00 64 1D B6 26 83 20 50 59 52 41 4D 49 |INE.d..&. PYRAMI|
00001530: 44 20 4F 46 20 43 48 45 4F 50 53 2C 54 49 46 46 |D OF CHEOPS,TIFF|
00001540: 41 4E 59 20 4C 41 4D 50 2C 43 45 4E 54 45 52 20 |ANY LAMP,CENTER |
00001550: 54 4F 20 43 45 4E 54 45 52 2C 44 41 56 49 53 20 |TO CENTER,DAVIS |
00001560: 4A 55 4D 50 00 A4 1D C0 26 83 20 46 49 56 45 20 |JUMP....&. FIVE |
00001570: 43 52 4F 53 53 45 53 2C 50 45 4E 54 41 47 4F 4E |CROSSES,PENTAGON|
00001580: 2C 44 4F 55 42 4C 45 20 43 52 4F 53 53 2C 54 49 |,DOUBLE CROSS,TI|
00001590: 4C 54 45 44 20 53 51 55 41 52 45 2C 4F 43 54 41 |LTED SQUARE,OCTA|
000015A0: 47 52 41 4D 00 B6 1D CA 26 83 20 45 4E 44 20 50 |GRAM....&. END P|
000015B0: 52 4F 47 52 41 4D 00 FD 1D D4 26 83 20 35 2C 35 |ROGRAM....&. 5,5|
000015C0: 2C 34 34 2C 38 2C 36 2C 34 34 2C 31 30 2C 38 2C |,44,8,6,44,10,8,|
000015D0: 34 34 2C 38 2C 38 2C 34 34 2C 31 34 2C 31 32 2C |44,8,8,44,14,12,|
000015E0: 34 33 2C 31 35 2C 31 32 2C 34 34 2C 31 36 2C 31 |43,15,12,44,16,1|
000015F0: 30 2C 34 34 2C 33 31 2C 31 38 2C 34 34 00 39 1E |0,44,31,18,44.9.|
00001600: DE 26 83 20 33 31 2C 31 35 2C 33 35 2C 32 30 2C |.&. 31,15,35,20,|
00001610: 31 30 2C 34 34 2C 32 33 2C 31 35 2C 34 34 2C 32 |10,44,23,15,44,2|
00001620: 30 2C 31 36 2C 34 34 2C 32 33 2C 31 31 2C 34 34 |0,16,44,23,11,44|
00001630: 2C 32 38 2C 32 34 2C 34 34 00 71 1E 10 27 44 57 |,28,24,44.q..'DW|
00001640: 24 B2 C7 28 31 37 29 3A 55 24 B2 C7 28 31 34 35 |$..(17):U$..(145|
00001650: 29 3A 52 56 24 B2 C7 28 31 38 29 3A 52 4F 24 B2 |):RV$..(18):RO$.|
00001660: C7 28 31 34 36 29 3A 42 4C 24 B2 C7 28 31 34 34 |.(146):BL$..(144|
00001670: 29 00 A5 1E 12 27 57 48 24 B2 C7 28 35 29 3A 47 |)....'WH$..(5):G|
00001680: 52 24 B2 C7 28 33 30 29 3A 4C 46 24 B2 C7 28 31 |R$..(30):LF$..(1|
00001690: 35 37 29 AA C7 28 31 35 37 29 3A 43 4C 24 B2 C7 |57)..(157):CL$..|
000016A0: 28 31 34 37 29 00 DF 1E 15 27 41 24 28 31 29 B2 |(147)....'A$(1).|
000016B0: 52 56 24 AA 42 4C 24 AA C7 28 31 31 37 29 AA C7 |RV$.BL$..(117)..|
000016C0: 28 31 30 35 29 AA 44 57 24 AA 4C 46 24 AA C7 28 |(105).DW$.LF$..(|
000016D0: 31 30 36 29 AA C7 28 31 30 37 29 AA 52 4F 24 00 |106)..(107).RO$.|
000016E0: 19 1F 18 27 41 24 28 32 29 B2 52 56 24 AA 57 48 |...'A$(2).RV$.WH|
000016F0: 24 AA C7 28 31 31 37 29 AA C7 28 31 30 35 29 AA |$..(117)..(105).|
00001700: 44 57 24 AA 4C 46 24 AA C7 28 31 30 36 29 AA C7 |DW$.LF$..(106)..|
00001710: 28 31 30 37 29 AA 52 4F 24 00 53 1F 1A 27 41 24 |(107).RO$.S..'A$|
00001720: 28 33 29 B2 52 56 24 AA 47 52 24 AA C7 28 31 37 |(3).RV$.GR$..(17|
00001730: 36 29 AA C7 28 31 37 34 29 AA 44 57 24 AA 4C 46 |6)..(174).DW$.LF|
00001740: 24 AA C7 28 31 37 33 29 AA C7 28 31 38 39 29 AA |$..(173)..(189).|
00001750: 52 4F 24 00 6C 1F 24 27 81 20 58 B2 31 20 A4 20 |RO$.l.$'. X.1 . |
00001760: 31 35 3A 87 20 43 24 28 58 29 3A 82 00 99 1F 2E |15:. C$(X):.....|
00001770: 27 81 20 58 B2 31 20 A4 20 32 34 3A 44 4F 24 B2 |'. X.1 . 24:DO$.|
00001780: 44 57 24 AA 44 4F 24 3A 82 20 58 3A 44 4F 24 B2 |DW$.DO$:. X:DO$.|
00001790: C7 28 31 39 29 AA 44 4F 24 00 D6 1F 42 27 56 4F |.(19).DO$...B'VO|
000017A0: B2 35 34 32 39 36 3A 57 56 B2 35 34 32 37 36 3A |.54296:WV.54276:|
000017B0: 41 54 B2 35 34 32 37 37 3A 48 49 B2 35 34 32 37 |AT.54277:HI.5427|
000017C0: 33 3A 4C 4F B2 35 34 32 37 32 3A 46 32 B2 30 3A |3:LO.54272:F2.0:|
000017D0: 46 32 24 B2 22 22 00 DF 1F 74 27 89 31 35 30 00 |F2$.""...t'.150.|
000017E0: F3 1F F7 2A 8F 20 2D 20 4C 41 54 49 4E 20 43 52 |...*. - LATIN CR|
000017F0: 4F 53 53 00 27 20 F8 2A 44 24 28 31 29 B2 22 31 |OSS.' .*D$(1)."1|
00001800: 31 31 31 31 32 31 31 31 31 32 32 32 31 31 31 31 |1111211112221111|
00001810: 31 32 31 31 31 31 31 31 32 31 31 31 31 31 31 31 |1211111121111111|
00001820: 31 31 31 31 22 3A 8E 00 3B 20 5B 2B 8F 20 2D 20 |1111":..; [+. - |
00001830: 47 52 45 45 4B 20 43 52 4F 53 53 00 6F 20 5C 2B |GREEK CROSS.o \+|
00001840: 44 24 28 32 29 B2 22 31 31 31 31 31 32 31 31 31 |D$(2)."111112111|
00001850: 31 31 32 31 31 31 31 32 32 32 32 32 31 31 31 31 |1121111222221111|
00001860: 32 31 31 31 31 31 32 31 31 31 31 31 22 3A 8E 00 |211111211111":..|
00001870: 85 20 BF 2B 8F 20 2D 20 46 4F 4F 54 42 41 4C 4C |. .+. - FOOTBALL|
00001880: 20 54 45 41 4D 00 B9 20 C0 2B 44 24 28 33 29 B2 | TEAM.. .+D$(3).|
00001890: 22 32 32 32 31 32 32 32 31 31 31 32 32 32 31 31 |"222122211122211|
000018A0: 31 31 32 31 32 31 31 31 31 31 31 31 31 31 31 31 |1121211111111111|
000018B0: 31 31 31 31 31 31 22 3A 8E 00 D4 20 23 2C 8F 20 |111111":... #,. |
000018C0: 2D 20 50 59 52 41 4D 49 44 20 4F 46 20 43 48 45 |- PYRAMID OF CHE|
000018D0: 46 52 45 4E 00 08 21 24 2C 44 24 28 34 29 B2 22 |FREN..!$,D$(4)."|
000018E0: 31 31 31 33 31 31 31 33 31 31 31 32 31 31 31 31 |1113111311121111|
000018F0: 31 32 32 32 31 31 31 32 32 32 32 32 31 33 31 31 |1222111222221311|
00001900: 31 33 31 31 31 22 3A 8E 00 1B 21 87 2C 8F 20 2D |13111":...!.,. -|
00001910: 20 54 48 45 20 53 48 52 49 4E 45 00 4F 21 88 2C | THE SHRINE.O!.,|
00001920: 44 24 28 35 29 B2 22 31 32 31 31 31 32 31 31 31 |D$(5)."121112111|
00001930: 32 32 32 32 32 31 31 31 31 32 31 31 31 31 31 31 |2222211112111111|
00001940: 32 31 31 31 31 32 32 32 31 32 32 32 22 3A 8E 00 |211112221222":..|
00001950: 69 21 EB 2C 8F 20 2D 20 50 59 52 41 4D 49 44 20 |i!.,. - PYRAMID |
00001960: 4F 46 20 43 48 45 4F 50 53 00 9D 21 EC 2C 44 24 |OF CHEOPS..!.,D$|
00001970: 28 36 29 B2 22 31 31 31 31 31 32 31 31 31 31 32 |(6)."11111211112|
00001980: 32 32 31 31 31 32 32 32 32 32 31 32 32 32 32 32 |2211122222122222|
00001990: 32 32 31 31 31 31 31 31 31 31 22 3A 8E 00 B2 21 |2211111111":...!|
000019A0: 4F 2D 8F 20 2D 20 54 49 46 46 41 4E 59 20 4C 41 |O-. - TIFFANY LA|
000019B0: 4D 50 00 E6 21 50 2D 44 24 28 37 29 B2 22 31 32 |MP..!P-D$(7)."12|
000019C0: 31 33 32 32 32 33 31 32 32 32 32 32 31 31 31 31 |1322231222221111|
000019D0: 32 31 31 31 31 31 31 32 31 31 31 33 32 32 32 33 |2111111211132223|
000019E0: 32 32 32 22 3A 8E 00 FF 21 B3 2D 8F 20 2D 20 43 |222":...!.-. - C|
000019F0: 45 4E 54 45 52 20 54 4F 20 43 45 4E 54 45 52 00 |ENTER TO CENTER.|
00001A00: 33 22 B4 2D 44 24 28 38 29 B2 22 32 32 32 33 32 |3".-D$(8)."22232|
00001A10: 32 32 33 32 32 32 32 32 32 32 32 32 32 31 32 32 |2232222222222122|
00001A20: 32 32 32 32 32 32 32 32 33 32 32 32 33 32 32 32 |2222222232223222|
00001A30: 22 3A 8E 00 46 22 17 2E 8F 20 2D 20 44 41 56 49 |":..F"... - DAVI|
00001A40: 53 20 4A 55 4D 50 00 7A 22 18 2E 44 24 28 39 29 |S JUMP.z"..D$(9)|
00001A50: B2 22 32 32 32 33 32 32 32 33 32 32 32 32 31 32 |."22232223222212|
00001A60: 32 32 32 32 32 32 32 32 32 32 32 32 32 32 32 33 |2222222222222223|
00001A70: 32 32 32 33 32 32 32 22 3A 8E 00 8F 22 7B 2E 8F |2223222":..."{..|
00001A80: 20 2D 20 46 49 56 45 20 43 52 4F 53 53 45 53 00 | - FIVE CROSSES.|
00001A90: C4 22 7C 2E 44 24 28 31 30 29 B2 22 31 32 31 31 |."|.D$(10)."1211|
00001AA0: 32 32 32 31 31 32 31 32 31 32 31 32 32 32 32 32 |2221121212122222|
00001AB0: 32 32 31 32 31 32 31 32 31 31 32 32 32 31 31 32 |2212121211222112|
00001AC0: 31 22 3A 8E 00 D5 22 DF 2E 8F 20 2D 20 50 45 4E |1":..."... - PEN|
00001AD0: 54 41 47 4F 4E 00 0A 23 E0 2E 44 24 28 31 31 29 |TAGON..#..D$(11)|
00001AE0: B2 22 31 32 31 33 32 32 32 33 31 32 32 32 32 32 |."12132223122222|
00001AF0: 31 32 32 32 32 32 32 32 31 32 32 32 32 32 31 33 |1222222212222213|
00001B00: 32 32 32 33 31 31 31 22 3A 8E 00 1F 23 43 2F 8F |2223111":...#C/.|
00001B10: 20 2D 20 44 4F 55 42 4C 45 20 43 52 4F 53 53 00 | - DOUBLE CROSS.|
00001B20: 54 23 44 2F 44 24 28 31 32 29 B2 22 31 32 31 32 |T#D/D$(12)."1212|
00001B30: 31 32 31 32 31 31 32 32 32 31 31 32 32 32 32 32 |1212112221122222|
00001B40: 32 32 31 31 32 32 32 31 31 32 31 32 31 32 31 32 |2211222112121212|
00001B50: 31 22 3A 8E 00 6A 23 A7 2F 8F 20 2D 20 54 49 4C |1":..j#./. - TIL|
00001B60: 54 45 44 20 53 51 55 41 52 45 00 9F 23 A8 2F 44 |TED SQUARE..#./D|
00001B70: 24 28 31 33 29 B2 22 31 32 31 31 32 32 32 31 31 |$(13)."121122211|
00001B80: 32 32 32 32 32 31 32 32 32 31 32 32 32 31 32 32 |2222212221222122|
00001B90: 32 32 32 31 31 32 32 32 31 31 32 31 22 3A 8E 00 |222112221121":..|
00001BA0: B0 23 0B 30 8F 20 2D 20 4F 43 54 41 47 52 41 4D |.#.0. - OCTAGRAM|
00001BB0: 00 E5 23 0C 30 44 24 28 31 34 29 B2 22 31 32 31 |..#.0D$(14)."121|
00001BC0: 32 32 32 32 32 31 32 32 32 32 32 31 32 32 32 32 |2222212222212222|
00001BD0: 32 32 32 31 32 32 32 32 32 31 32 32 32 32 32 31 |2221222221222221|
00001BE0: 32 31 22 3A 8E 00 00 00 |21":.... |
..(.... - PEG SOLITAIRE FOR COMMODORE 64
.>.... - DANIEL MILLER.U.... - 2815 34 S
TREET.M.... - ASTORIA, QUEENS...... - NE
W YORK, NEW YORK 11103...... - 03/06/8
3.I.... ********************************
*...... A$(3),B(37),C$(15),C(37),D$(15).
.....G(147):.10000.*.(..VO,15:.WV,17:.AT
,15:.HI,68:.LO,149.F.2.. TM.1 . 100:. TM
:.WV,0._.7..VO,15:.WV,17:.AT,15.X.<..WV,
17:.HI,34:.LO,75...K.. TM.1 . 100:. TM:.
WV,0:....... X.1 . 37:B(X).2:.:B(19).1.I
. .AA.1:.230:AA.0...H...14)DW$;RV$;"PEG
SOLITAIRE";RO$;:. TM.1 . 2500:. TM...W..
1000.".... - PUZZLE SCREEN./.... G(19);.
I....H(DO$,4).15)A$(B(1));U$.20)A$(B(2))
;U$.25)A$(B(3)):..~.... E(F2$)..1 .410..
....40.F.....10)A$(B(4));U$.15)A$(B(5));
U$.20)A$(B(6));U$.25)A$(B(7));......U$.3
0)A$(B(8)):.... .. E(F2$)..2 .420......4
0.+.....5)A$(B(9));U$.10)A$(B(10));U$.15
)A$(B(11));.A....U$.20)A$(B(12));.X....U
$.25)A$(B(13));U$.30)A$(B(14));U$.35)A$(
B(15)):....... E(F2$)..3 .430......40.H.
....5)A$(B(16));U$.10)A$(B(17));U$.15)A$
(B(18));......U$.20)A$(B(19));U$.25)A$(B
(20));U$.30)A$(B(21));......U$.35)A$(B(2
2)):..*.... E(F2$)..4 .440.2....40.E....
.5)A$(B(23));U$.10)A$(B(24));U$.15)A$(B(
25));......U$.20)A$(B(26));U$.25)A$(B(27
));U$.30)A$(B(28));......U$.35)A$(B(29))
:..G.... E(F2$)..5 .450.O....40...B...10
)A$(B(30));U$.15)A$(B(31));U$.20)A$(B(32
));.*.C..U$.25)A$(B(33));U$.30)A$(B(34))
:..?.G.. E(F2$)..6 .460.G.H..40.Z.L...15
)A$(B(35));U$.20)A$(B(36));U$.25)A$(B(37
))...Q.. E(F2$)..7 .500...R..40.....D.99
:E.120:. X.1202 . 1992 .E:.X,D:....... X
.1207 . 1997 .E:.X,D:....... X.1317 . 17
97 .E:.X,D:....... X.1332 . 1812 .E:.X,D
:..8.... X.1432 . 1672 .E:.X,D:..V.!.. X
.1457 . 1697 .E:.X,D:..E.$.. AA.1 . ....
&.. X.55342 . 55372 .5:.X,10:....+.X.49:
. Y.1070 . 1100 .5:.Y,X:X.X.1:..P.0.. X.
55418 . 56218 .E:.X,10:....5.X.49:. Y.11
46 . 1946 .E:.Y,X:X.X.1:....:.S1$.RV$.G(
159)."MOVE #".RO$:.H(DO$,22);.30) S1$;.D
.X.S1$.RV$.G(159)."FROM".RO$:S2$.RV$.G(1
59)."TO".RO$...].. DO$;.10) S1$;.24) S2$
;...B.. DOWN$;.15);" ";DOWN$;.15);"";.
..C.. F$:. F$."" .611...D.F0.F(F$):. F0.
133 . F0.134 . F0.135 . F0.136 .740...H.
. G$:. G$."" .616.*.I.FR$.F$.G$:. FR$;:F
$."":G$."".Z.J.. H(FR$,1)."1" . H(FR$,1)
."9" . FR$."":.610...K.. I(FR$,1)."1" .
I(FR$,1)."9" . FR$."":.610...L.H.E(FR$):
F1.H:.8000:FR.H:C(FR).E(J(D$,FR,1)).....
. DOWN$;.27);" ";DOWN$;.27);"";......
F$:. F$."" .665...... G$:. G$."" .666...
..TU$.F$.G$:. TU$;:F$."":G$."".^.... H(T
U$,1)."1" . H(TU$,1)."7" . TU$."":.660..
.... I(TU$,1)."1" . I(TU$,1)."7" . TU$."
":.660.....H.E(TU$):T1.H:.8000:TU.H:C(TU
).E(J(D$,TU,1)).P...F2$.H(FR$,1).....FR$
.J(D$,FR,1):TU$.J(D$,TU,1)...... FR$."1"
. ER.1:.900.&.... TU$."2" . ER.2:.900.J
.... FR$."3" . TU$."3" . ER.3:.900.J...C
.C(TU):C(TU).C(FR):C(FR).C...A.. F1.T1.2
. F1.T1..2 . F1.T1.20 . F1.T1..20 .800.
I.F.D$."":. X.1 . 37:D$.D$.I(D(C(X)),1):
....P.. DOWN$;.15);" ";:. DOWN$;.27);"
";...Z.. X.1 . 37:B(X).E(J(D$,X,1)):.
:.220.M...F0.0:MV.MV.1:. H(DOWN$,22);.37
);D(MV);:.220.J. .. .(F1.T1).20 . J.1:.8
20.W.%.J.2:.830...4.. F1.T1 .825...5.H.F
1.10:.826...9.H.F1.10...:..8000:C(H).1:.
710.L.>.. F1.T1 .835...?.H.F1.1:.836...C
.H.F1.1...D..8000:C(H).1:.710...... ER .
910,920,930.M...ER$.RV$."'FROM' POSITIO
N EMPTY".RO$:.950:F2$."":.220.....ER$.RV
$."'TO' POSITION OCCUPIED".RO$:.950:F2$.
"":.220.....ER$.RV$."INVALID MOVE".RO$:.
950:F2$."":.220...... DOWN$;.5);"
";...... X.1 . 5.$....
DOWN$;.22.(C(ER$).2));ER$;:. TM.1 . 500:
. TM.U.... DOWN$;"
";.Q.... TM.1 . 500:. TM:. X:
....... - MAIN MENU.....S1$.DW$.RV$.G(15
9)."PEG SOLITAIRE".RO$.D....CL$:..14)S1$
;DW$...... X.1 . 15:..5)D(X)". ";C$(X):.
......:. X.1 . 15:. C$:..%.... DW$;.10)"
SELECT CHOICE ";:. PZ.:.... PZ.15 . .CL$
:....... PZ .11000,11100,11200,11300,114
00,11500,11600,11700,11800,11900... .. P
Z.11 .1320...#.. PZ.10 .12000,12100,1220
0,12300.O.(..:. X.1 . PZ:. C$:....2..:.
X.1 . 15:. X$:....<.. X.1 . PZ:. PP$,JJ$
,CC$:....F..7000.N.X.D$.D$(PZ):. X.1 . 3
7:B(X).E(J(D$,X,1)):C(X).B(X):.:F2$."".S
....53280,8:.53281,6:MV.0:.CL$:.230...X.
.CL$:S1$.DW$.RV$.C$.RO$.DW$:..20.(C(C$).
2));S1$.U...." IN ORDER TO SOLVE THIS PU
ZZLE, REMOVE"...F.S1$.RV$.PP$.RO$:S2$.RV
$.JJ$.RO$.1.K.." "S1$;" PIECES IN ";S2$;
" MOVES LEAVING THE LAST".L.P.S1$.RV$.CC
$.RO$:." PLAYING PIECE IN POSITION ";S1$
;"."... ..H(DOWN$,20);.8)"PRESS <RETURN>
TO CONTINUE"...*.. RR$:. RR$."" .7210.M
.4.. RR$..G(13) .7210.S.>.....@.. H.13 .
H.1:....J.. H.14 . H.2:....T.. H.15 . H
.3:....^.. H.22 . H.4:..2.H.. H.23 . H.5
:..E.R.. H.24 . H.6:..X.|.. H.25 . H.7:.
.K.... H.26 . H.8:..~.... H.31 . H.9:...
.... H.32 . H.10:....... H.33 . H.11:...
.... H.34 . H.12:..N.... H.35 . H.13:...
.B.. H.36 . H.14:....V.. H.37 . H.15:...
.... H.41 . H.16:....... H.42 . H.17:..2
.... H.43 . H.18:..F.... H.44 . H.19:..Z
.. . H.45 . H.20:..N.. . H.46 . H.21:...
.. . H.47 . H.22:....& . H.51 . H.23:...
.0 . H.52 . H.24:....: . H.53 . H.25:..R
.D . H.54 . H.26:....N . H.55 . H.27:...
.X . H.56 . H.28:....B . H.57 . H.29:.."
.L . H.62 . H.30:..6.V . H.63 . H.31:..J
.. . H.64 . H.32:..^.. . H.65 . H.33:..R
.. . H.66 . H.34:..... . H.73 . H.35:...
.. . H.74 . H.36:..... . H.75 . H.37:...
.. . H.99 .8500.M.P . X.1 . 5...Z S1$.RV
$."INCORRECT FROM/TO POSITION".RO$.... .
DO$;.9)S1$;:. TM.1 . 500:. TM.].. . DOWN
$;.9);" ";:. TM
.1 . 500:. TM.Q.. . X:F2$."":.220...4!S1
$."I HOPE YOU HAD FUN WITH ".RV$."'PEG S
OLITAIRE'".RO$...>!. DOWN$;S1$;:. TM.1 .
1500:. TM:.CL$:.1000.#..&. LATIN CROSS,
GREEK CROSS,FOOTBALL TEAM,PYRAMID OF CHE
FREN,SHRINE.D..&. PYRAMID OF CHEOPS,TIFF
ANY LAMP,CENTER TO CENTER,DAVIS JUMP....
&. FIVE CROSSES,PENTAGON,DOUBLE CROSS,TI
LTED SQUARE,OCTAGRAM...J&. END PROGRAM..
.T&. 5,5,44,8,6,44,10,8,44,8,8,44,14,12,
43,15,12,44,16,10,44,31,18,44.9..&. 31,1
5,35,20,10,44,23,15,44,20,16,44,23,11,44
,28,24,44.Q..'DW$.G(17):U$.G(145):RV$.G(
18):RO$.G(146):BL$.G(144)....'WH$.G(5):G
R$.G(30):LF$.G(157).G(157):CL$.G(147)...
.'A$(1).RV$.BL$.G(117).G(105).DW$.LF$.G(
106).G(107).RO$....'A$(2).RV$.WH$.G(117)
.G(105).DW$.LF$.G(106).G(107).RO$.S..'A$
(3).RV$.GR$.G(176).G(174).DW$.LF$.G(173)
.G(189).RO$.L.$'. X.1 . 15:. C$(X):.....
'. X.1 . 24:DO$.DW$.DO$:. X:DO$.G(19).DO
$.V.B'VO.54296:WV.54276:AT.54277:HI.5427
3:LO.54272:F2.0:F2$.""...T'.150....*. -
LATIN CROSS.' .*D$(1)."11111211112221111
12111111211111111111":..; [+. - GREEK CR
OSS.O \+D$(2)."1111121111121111222221111
211111211111":... .+. - FOOTBALL TEAM..
.+D$(3)."2221222111222111121211111111111
111111":..T #,. - PYRAMID OF CHEFREN..!$
,D$(4)."11131113111211111222111222221311
13111":...!.,. - THE SHRINE.O!.,D$(5)."1
211121112222211112111111211112221222":..
I!.,. - PYRAMID OF CHEOPS..!.,D$(6)."111
1121111222111222221222222211111111":...!
O-. - TIFFANY LAMP..!P-D$(7)."1213222312
222211112111111211132223222":...!.-. - C
ENTER TO CENTER.3".-D$(8)."2223222322222
222221222222222232223222":..F"... - DAVI
S JUMP.Z"..D$(9)."2223222322221222222222
222222232223222":..."{.. - FIVE CROSSES.
D"|.D$(10)."1211222112121212222222121212
112221121":..U"... - PENTAGON..#..D$(11)
."1213222312222212222222122222132223111"
:...#C/. - DOUBLE CROSS.T#D/D$(12)."1212
121211222112222222112221121212121":..J#.
/. - TILTED SQUARE..#./D$(13)."121122211
2222212221222122222112221121":...#.0. -
OCTAGRAM..#.0D$(14)."1212222212222212222
222122222122222121":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL