DOMINOES
FILE INFORMATION
FILENAME(S): DOMINOES
FILE TYPE(S): PRG
FILE SIZE: 4.5K
FIRST SEEN: 2025-11-30 01:07:55
APPEARS ON: 2 disk(s)
FILE HASH
d6fa57647f8e0875e6e716a2150a259f362d874e20b083923f36f1f0db095355
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT NR | DOMINOES | PRG | Treasure Chest - Wolfgang Rauprich | 17 | 12 | DOWNLOAD FILE |
| HORRORLAND 128 | DOMINOES | PRG | Treasure Chest - Wolfgang Rauprich | 17 | 12 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 1D 04 05 00 8F 20 4D 2E 52 49 43 48 54 45 |....... M.RICHTE| 00000010: 52 20 39 30 30 36 34 20 31 32 2F 37 38 00 30 04 |R 90064 12/78.0.| 00000020: 0A 00 50 57 B2 30 3A 54 57 B2 30 3A 54 59 B2 30 |..PW.0:TW.0:TY.0| 00000030: 00 64 04 14 00 97 35 39 34 36 38 2C 31 32 3A 49 |.d....59468,12:I| 00000040: B2 BB 28 AB 54 49 29 3A 86 44 24 28 32 37 29 2C |..(.TI):.D$(27),| 00000050: 48 24 28 31 2C 32 30 29 2C 50 4C 28 36 29 2C 48 |H$(1,20),PL(6),H| 00000060: 28 32 30 29 00 B2 04 28 00 4C 55 24 B2 22 13 11 |(20)...(.LU$."..| 00000070: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000080: 22 3A 4C 4F 24 B2 4C 55 24 AA 22 20 20 20 20 20 |":LO$.LU$." | 00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000B0: 91 22 00 F2 04 32 00 99 22 93 11 11 20 20 20 20 |."...2.."... | 000000C0: 20 20 20 20 12 20 44 4F 4D 49 4E 4F 45 53 20 11 | . DOMINOES .| 000000D0: 11 22 3A 99 22 50 45 54 20 48 41 53 20 54 48 52 |.":."PET HAS THR| 000000E0: 45 45 20 4C 45 56 45 4C 53 20 4F 46 20 50 4C 41 |EE LEVELS OF PLA| 000000F0: 59 3A 00 21 05 3C 00 99 22 11 31 2E 20 45 41 53 |Y:.!.<..".1. EAS| 00000100: 59 3A 20 59 4F 55 20 43 41 4E 20 57 49 4E 20 54 |Y: YOU CAN WIN T| 00000110: 57 4F 20 47 41 4D 45 53 20 4F 46 20 54 48 52 45 |WO GAMES OF THRE| 00000120: 45 00 50 05 46 00 99 22 11 32 2E 20 53 4C 49 47 |E.P.F..".2. SLIG| 00000130: 48 54 4C 59 20 48 41 52 44 45 52 3A 20 4D 41 59 |HTLY HARDER: MAY| 00000140: 42 45 20 36 30 2F 34 30 20 46 4F 52 20 59 4F 55 |BE 60/40 FOR YOU| 00000150: 00 79 05 4B 00 99 22 11 33 2E 20 54 4F 55 47 48 |.y.K..".3. TOUGH| 00000160: 3A 20 4E 45 41 52 4C 59 20 45 51 55 41 4C 53 20 |: NEARLY EQUALS | 00000170: 42 45 53 54 20 50 4C 41 59 00 94 05 50 00 99 22 |BEST PLAY...P.."| 00000180: 11 11 57 48 49 43 48 20 44 4F 20 59 4F 55 20 57 |..WHICH DO YOU W| 00000190: 41 4E 54 3F 00 A6 05 5A 00 A1 43 24 3A 8B 43 24 |ANT?...Z..C$:.C$| 000001A0: B2 22 22 89 39 30 00 BC 05 5B 00 8B 43 24 B3 22 |."".90...[..C$."| 000001B0: 31 22 B0 43 24 B1 22 33 22 89 39 30 00 C9 05 5F |1".C$."3".90..._| 000001C0: 00 41 4C B2 C5 28 43 24 29 00 EF 05 64 00 50 4C |.AL..(C$)...d.PL| 000001D0: B2 30 3A 99 22 93 22 A6 31 35 29 22 44 4F 4D 49 |.0:.".".15)"DOMI| 000001E0: 4E 4F 45 53 11 11 11 11 11 11 11 11 11 11 11 00 |NOES............| 000001F0: 23 06 6E 00 4A B2 30 3A 4B B2 30 3A 81 49 B2 30 |#.n.J.0:K.0:.I.0| 00000200: A4 32 37 3A 44 24 28 49 29 B2 CA 28 C4 28 4A 29 |.27:D$(I)..(.(J)| 00000210: 2C 32 29 AA CA 28 C4 28 4B 29 2C 32 29 3A 8D 39 |,2)..(.(K),2):.9| 00000220: 35 30 30 00 3C 06 78 00 4B B2 4B AA 31 3A 8B 4B |500.<.x.K.K.1:.K| 00000230: B1 4A A7 4B B2 30 3A 4A B2 4A AA 31 00 7F 06 82 |.J.K.0:J.J.1....| 00000240: 00 82 49 3A 81 49 B2 30 A4 32 36 3A 4A B2 49 AA |..I:.I.0.26:J.I.| 00000250: 28 32 38 AB 49 29 AC BB 28 31 29 3A 58 24 B2 44 |(28.I)..(1):X$.D| 00000260: 24 28 49 29 3A 44 24 28 49 29 B2 44 24 28 4A 29 |$(I):D$(I).D$(J)| 00000270: 3A 44 24 28 4A 29 B2 58 24 3A 8D 39 35 30 30 00 |:D$(J).X$:.9500.| 00000280: B8 06 8C 00 82 49 3A 81 4A B2 30 A4 36 3A 81 49 |.....I:.J.0.6:.I| 00000290: B2 30 A4 31 3A 48 24 28 49 2C 4A 29 B2 44 24 28 |.0.1:H$(I,J).D$(| 000002A0: 37 AC 49 AA 4A 29 3A 82 49 3A 8D 39 35 30 30 3A |7.I.J):.I:.9500:| 000002B0: 82 4A 3A 53 50 B2 31 34 00 E2 06 96 00 81 4A B2 |.J:SP.14......J.| 000002C0: 37 A4 32 30 3A 81 49 B2 30 A4 31 3A 48 24 28 49 |7.20:.I.0.1:H$(I| 000002D0: 2C 4A 29 B2 22 22 3A 82 49 3A 8D 39 35 30 30 3A |,J)."":.I:.9500:| 000002E0: 82 4A 00 0D 07 A0 00 4B 30 24 B2 22 44 22 3A 4B |.J.....K0$."D":K| 000002F0: 31 24 B2 22 12 44 92 52 41 57 22 3A 4B 32 24 B2 |1$.".D.RAW":K2$.| 00000300: 22 44 52 41 57 53 20 41 20 42 4F 4E 45 00 3B 07 |"DRAWS A BONE.;.| 00000310: C8 00 4C 24 B2 22 22 3A 81 4A B2 30 A4 31 3A 81 |..L$."":.J.0.1:.| 00000320: 49 B2 30 A4 36 3A 58 24 B2 C8 28 48 24 28 4A 2C |I.0.6:X$..(H$(J,| 00000330: 49 29 2C 31 29 3A 8D 39 35 30 30 00 64 07 D2 00 |I),1):.9500.d...| 00000340: 8B 58 24 B2 C9 28 48 24 28 4A 2C 49 29 2C 31 29 |.X$..(H$(J,I),1)| 00000350: AF 58 24 B1 4C 24 A7 4C 24 B2 58 24 3A 50 B2 4A |.X$.L$.L$.X$:P.J| 00000360: 3A 4B B2 49 00 79 07 DC 00 82 49 3A 82 4A 3A 8B |:K.I.y....I:.J:.| 00000370: 4C 24 B2 22 22 89 31 30 30 00 95 07 E6 00 99 22 |L$."".100......"| 00000380: 13 11 11 50 11 9D 4C 11 9D 41 11 9D 59 11 9D 45 |...P..L..A..Y..E| 00000390: 11 9D 44 11 11 00 B9 07 F0 00 99 A6 38 29 22 D5 |..D.........8)".| 000003A0: C0 C0 C0 C0 A2 A2 A2 C0 C0 C0 C0 C9 20 20 20 42 |............ B| 000003B0: 4F 4E 45 20 43 4F 55 4E 54 00 DF 07 FA 00 99 A6 |ONE COUNT.......| 000003C0: 38 29 22 DD 20 20 20 20 12 20 20 20 92 20 20 20 |8)". . . | 000003D0: 20 DD 20 20 20 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 00 | . ...........| 000003E0: FF 07 04 01 99 A6 38 29 22 DD 20 D6 20 20 12 20 |......8)". . . | 000003F0: 20 20 92 20 20 D6 20 DD 20 20 20 59 41 52 44 00 | . . . YARD.| 00000400: 1E 08 0E 01 99 A6 38 29 22 DD 20 20 20 20 12 20 |......8)". . | 00000410: 20 20 92 20 20 20 20 DD 20 20 20 59 4F 55 00 3D | . . YOU.=| 00000420: 08 18 01 99 A6 38 29 22 CA C0 C0 C0 C0 12 A2 A2 |.....8)"........| 00000430: A2 92 C0 C0 C0 C0 CB 20 20 20 50 45 54 00 4D 08 |....... PET.M.| 00000440: 22 01 8D 32 30 30 30 3A 8D 37 30 30 30 00 88 08 |"..2000:.7000...| 00000450: 27 01 99 4C 4F 24 3A 99 22 54 48 45 20 4C 41 52 |'..LO$:."THE LAR| 00000460: 47 45 53 54 20 44 4F 55 42 4C 45 54 20 49 53 20 |GEST DOUBLET IS | 00000470: 22 3B 4C 24 4C 24 3A 52 24 B2 4C 24 3A 8D 31 39 |";L$L$:R$.L$:.19| 00000480: 38 30 3A 89 31 30 30 30 00 B8 08 2C 01 50 B2 30 |80:.1000...,.P.0| 00000490: 3A 97 35 32 35 2C 30 3A 99 4C 4F 24 3A 99 22 57 |:.525,0:.LO$:."W| 000004A0: 48 49 43 48 20 42 4F 4E 45 20 28 4F 52 20 22 4B |HICH BONE (OR "K| 000004B0: 31 24 22 29 3F 20 22 3B 00 CB 08 2E 01 A1 58 24 |1$")? ";......X$| 000004C0: 3A 8B 58 24 B2 22 22 89 33 30 32 00 E1 08 2F 01 |:.X$."".302.../.| 000004D0: 8B 58 24 B2 4B 30 24 A7 99 58 24 3A 89 38 30 30 |.X$.K0$..X$:.800| 000004E0: 30 00 F8 08 31 01 8B 58 24 B3 22 30 22 B0 58 24 |0...1..X$."0".X$| 000004F0: B1 22 36 22 89 33 30 32 00 02 09 33 01 99 58 24 |."6".302...3..X$| 00000500: 3B 3A 00 15 09 36 01 A1 59 24 3A 8B 59 24 B2 22 |;:...6..Y$:.Y$."| 00000510: 22 89 33 31 30 00 2C 09 37 01 8B 59 24 B3 22 30 |".310.,.7..Y$."0| 00000520: 22 B0 59 24 B1 22 36 22 89 33 31 30 00 4B 09 3B |".Y$."6".310.K.;| 00000530: 01 99 59 24 3A 58 24 B2 58 24 AA 59 24 3A 59 24 |..Y$:X$.X$.Y$:Y$| 00000540: B2 59 24 AA C8 28 58 24 2C 31 29 00 79 09 40 01 |.Y$..(X$,1).y.@.| 00000550: 81 4B B2 30 A4 32 30 3A 8B 48 24 28 30 2C 4B 29 |.K.0.20:.H$(0,K)| 00000560: B3 B1 58 24 AF 48 24 28 30 2C 4B 29 B3 B1 59 24 |..X$.H$(0,K)..Y$| 00000570: A7 82 4B 3A 89 39 30 30 30 00 A9 09 4A 01 52 46 |..K:.9000...J.RF| 00000580: B2 30 3A 8B 50 4C B2 30 A7 4C 24 B2 C9 28 58 24 |.0:.PL.0.L$..(X$| 00000590: 2C 31 29 3A 52 24 B2 C8 28 58 24 2C 31 29 3A 4C |,1):R$..(X$,1):L| 000005A0: 46 B2 31 3A 89 31 30 30 30 00 CE 09 54 01 4C 46 |F.1:.1000...T.LF| 000005B0: B2 30 3A 8B 4C 24 B2 C8 28 58 24 2C 31 29 B0 4C |.0:.L$..(X$,1).L| 000005C0: 24 B2 C9 28 58 24 2C 31 29 A7 4C 46 B2 31 00 EE |$..(X$,1).LF.1..| 000005D0: 09 5E 01 8B 52 24 B2 C8 28 58 24 2C 31 29 B0 52 |.^..R$..(X$,1).R| 000005E0: 24 B2 C9 28 58 24 2C 31 29 A7 52 46 B2 31 00 00 |$..(X$,1).RF.1..| 000005F0: 0A 68 01 8B 4C 46 AA 52 46 B2 30 89 39 30 30 30 |.h..LF.RF.0.9000| 00000600: 00 1B 0A 72 01 8B 4C 46 AC 52 46 B2 30 A7 91 4C |...r..LF.RF.0..L| 00000610: 46 AA 31 89 35 30 30 2C 35 35 30 00 35 0A 77 01 |F.1.500,550.5.w.| 00000620: 8B 4C 24 B2 52 24 B0 48 24 28 30 2C 31 29 B2 22 |.L$.R$.H$(0,1)."| 00000630: 22 89 34 35 30 00 57 0A 7C 01 99 4C 4F 24 3A 99 |".450.W.|..LO$:.| 00000640: 58 24 22 20 2D 20 4C 45 46 54 20 4F 52 20 52 49 |X$" - LEFT OR RI| 00000650: 47 48 54 3F 20 22 3B 00 74 0A 86 01 A1 43 24 3A |GHT? ";.t....C$:| 00000660: 8B 43 24 B3 B1 22 4C 22 AF 43 24 B3 B1 22 52 22 |.C$.."L".C$.."R"| 00000670: 89 33 39 30 00 88 0A 90 01 99 43 24 3A 8B 43 24 |.390......C$:.C$| 00000680: B2 22 4C 22 89 34 35 30 00 A9 0A 9A 01 8B 52 24 |."L".450......R$| 00000690: B2 C9 28 58 24 2C 31 29 A7 52 24 B2 C8 28 58 24 |..(X$,1).R$..(X$| 000006A0: 2C 31 29 3A 89 31 30 30 30 00 BE 0A A4 01 52 24 |,1):.1000.....R$| 000006B0: B2 C9 28 58 24 2C 31 29 3A 89 31 30 30 30 00 DF |..(X$,1):.1000..| 000006C0: 0A C2 01 8B 4C 24 B2 C9 28 58 24 2C 31 29 A7 4C |....L$..(X$,1).L| 000006D0: 24 B2 C8 28 58 24 2C 31 29 3A 89 31 30 30 30 00 |$..(X$,1):.1000.| 000006E0: F4 0A CC 01 4C 24 B2 C9 28 58 24 2C 31 29 3A 89 |....L$..(X$,1):.| 000006F0: 31 30 30 30 00 15 0B F4 01 8B 52 24 B2 C9 28 58 |1000......R$..(X| 00000700: 24 2C 31 29 A7 52 24 B2 C8 28 58 24 2C 31 29 3A |$,1).R$..(X$,1):| 00000710: 89 31 30 30 30 00 2A 0B FE 01 52 24 B2 C9 28 58 |.1000.*...R$..(X| 00000720: 24 2C 31 29 3A 89 31 30 30 30 00 4B 0B 26 02 8B |$,1):.1000.K.&..| 00000730: 4C 24 B2 C9 28 58 24 2C 31 29 A7 4C 24 B2 C8 28 |L$..(X$,1).L$..(| 00000740: 58 24 2C 31 29 3A 89 31 30 30 30 00 60 0B 30 02 |X$,1):.1000.`.0.| 00000750: 4C 24 B2 C9 28 58 24 2C 31 29 3A 89 31 30 30 30 |L$..(X$,1):.1000| 00000760: 00 76 0B E8 03 8F 20 50 4C 41 59 20 54 48 45 20 |.v.... PLAY THE | 00000770: 44 4F 4D 49 4E 4F 00 B8 0B ED 03 4C 25 B2 30 3A |DOMINO.....L%.0:| 00000780: 59 24 B2 48 24 28 50 2C 4B 29 3A 81 49 B2 4B A4 |Y$.H$(P,K):.I.K.| 00000790: 31 39 3A 48 24 28 50 2C 49 29 B2 48 24 28 50 2C |19:H$(P,I).H$(P,| 000007A0: 49 AA 31 29 3A 82 49 3A 48 24 28 50 2C 49 29 B2 |I.1):.I:H$(P,I).| 000007B0: 22 22 3A 8D 37 30 30 30 00 DC 0B F2 03 8D 32 30 |"":.7000......20| 000007C0: 30 30 3A 58 24 B2 59 24 3A 99 22 13 11 22 3A 8D |00:X$.Y$:."..":.| 000007D0: 35 30 30 30 3A 50 4C B2 50 4C AA 31 00 F8 0B FC |5000:PL.PL.1....| 000007E0: 03 58 B2 50 4C 3A 8B 58 B1 31 38 A7 58 B2 58 AB |.X.PL:.X.18.X.X.| 000007F0: 31 38 3A 99 22 11 11 11 00 07 0C 06 04 99 A3 31 |18:."..........1| 00000800: AA 32 AC 58 29 58 24 00 33 0C 4C 04 58 24 B2 4C |.2.X)X$.3.L.X$.L| 00000810: 24 3A 8D 35 39 30 30 3A 99 C8 28 4C 4F 24 2C 31 |$:.5900:..(LO$,1| 00000820: 32 29 A3 39 29 58 24 3A 58 24 B2 52 24 3A 8D 35 |2).9)X$:X$.R$:.5| 00000830: 39 30 30 00 60 0C 56 04 99 22 91 91 91 22 A3 31 |900.`.V.."...".1| 00000840: 37 29 58 24 3A 8B 48 24 28 30 2C 30 29 B2 22 22 |7)X$:.H$(0,0).""| 00000850: B0 48 24 28 31 2C 30 29 B2 22 22 89 38 35 30 30 |.H$(1,0)."".8500| 00000860: 00 6B 0C 7E 04 8B 50 89 33 30 30 00 7C 0C B0 04 |.k.~..P.300.|...| 00000870: 8F 20 50 45 54 27 53 20 50 4C 41 59 00 92 0C BA |. PET'S PLAY....| 00000880: 04 50 B2 31 3A 91 41 4C 89 31 34 35 30 2C 31 33 |.P.1:.AL.1450,13| 00000890: 35 30 00 A8 0C C4 04 81 49 B2 30 A4 36 3A 50 4C |50......I.0.6:PL| 000008A0: 28 49 29 B2 30 3A 82 49 00 C5 0C CE 04 81 4B B2 |(I).0:.I......K.| 000008B0: 30 A4 32 30 3A 8B 48 24 28 31 2C 4B 29 B2 22 22 |0.20:.H$(1,K).""| 000008C0: 89 31 32 35 30 00 FE 0C D8 04 8D 39 39 30 30 3A |.1250......9900:| 000008D0: 58 B2 C5 28 58 24 29 3A 50 4C 28 58 29 B2 50 4C |X..(X$):PL(X).PL| 000008E0: 28 58 29 AA 31 3A 58 B2 C5 28 59 24 29 3A 50 4C |(X).1:X..(Y$):PL| 000008F0: 28 59 29 B2 50 4C 28 59 29 AA 31 3A 82 4B 00 24 |(Y).PL(Y).1:.K.$| 00000900: 0D E2 04 8F 20 50 4C 41 59 41 42 4C 45 20 44 4F |.... PLAYABLE DO| 00000910: 55 42 4C 45 54 20 57 49 54 48 20 53 55 43 43 45 |UBLET WITH SUCCE| 00000920: 53 53 4F 52 00 41 0D EC 04 81 4B B2 30 A4 32 30 |SSOR.A....K.0.20| 00000930: 3A 8B 48 24 28 31 2C 4B 29 B2 22 22 89 31 33 30 |:.H$(1,K)."".130| 00000940: 30 00 75 0D F6 04 8D 39 39 30 30 3A 8B 28 58 24 |0.u....9900:.(X$| 00000950: B2 59 24 29 AF 28 58 24 B2 52 24 B0 58 24 B2 4C |.Y$).(X$.R$.X$.L| 00000960: 24 29 AF 28 50 4C 28 C5 28 58 24 29 29 B1 32 29 |$).(PL(.(X$)).2)| 00000970: 89 31 35 30 30 00 7C 0D 00 05 82 4B 00 9F 0D 14 |.1500.|....K....| 00000980: 05 8F 20 50 4C 41 59 41 42 4C 45 20 42 4F 4E 45 |.. PLAYABLE BONE| 00000990: 20 57 49 54 48 20 53 55 43 43 45 53 53 4F 52 00 | WITH SUCCESSOR.| 000009A0: BC 0D 1E 05 81 4B B2 30 A4 32 30 3A 8B 48 24 28 |.....K.0.20:.H$(| 000009B0: 31 2C 4B 29 B2 22 22 89 31 33 35 30 00 EA 0D 28 |1,K)."".1350...(| 000009C0: 05 8D 39 39 30 30 3A 8B 28 28 58 24 B2 4C 24 29 |..9900:.((X$.L$)| 000009D0: B0 28 58 24 B2 52 24 29 29 AF 50 4C 28 C5 28 58 |.(X$.R$)).PL(.(X| 000009E0: 24 29 29 B1 31 89 31 35 30 30 00 12 0E 32 05 8B |$)).1.1500...2..| 000009F0: 28 28 59 24 B2 4C 24 29 B0 28 59 24 B2 52 24 29 |((Y$.L$).(Y$.R$)| 00000A00: 29 AF 50 4C 28 C5 28 59 24 29 29 B1 31 89 31 35 |).PL(.(Y$)).1.15| 00000A10: 30 30 00 19 0E 3C 05 82 4B 00 30 0E 46 05 8F 20 |00...<..K.0.F.. | 00000A20: 50 4C 41 59 41 42 4C 45 20 44 4F 55 42 4C 45 54 |PLAYABLE DOUBLET| 00000A30: 00 4D 0E 50 05 81 4B B2 30 A4 32 30 3A 8B 48 24 |.M.P..K.0.20:.H$| 00000A40: 28 31 2C 4B 29 B2 22 22 89 31 34 30 30 00 71 0E |(1,K)."".1400.q.| 00000A50: 5A 05 8D 39 39 30 30 3A 8B 58 24 B2 59 24 AF 28 |Z..9900:.X$.Y$.(| 00000A60: 58 24 B2 4C 24 B0 58 24 B2 52 24 29 89 31 35 30 |X$.L$.X$.R$).150| 00000A70: 30 00 78 0E 64 05 82 4B 00 99 0E 78 05 8F 20 53 |0.x.d..K...x.. S| 00000A80: 54 49 4C 4C 20 4D 4F 52 45 20 41 4C 47 4F 52 49 |TILL MORE ALGORI| 00000A90: 54 48 4D 53 20 48 45 52 45 00 AD 0E AA 05 8F 20 |THMS HERE...... | 00000AA0: 50 4C 41 59 41 42 4C 45 20 42 4F 4E 45 00 DD 0E |PLAYABLE BONE...| 00000AB0: B4 05 81 4B B2 30 A4 32 30 3A 8D 39 39 30 30 3A |...K.0.20:.9900:| 00000AC0: 8B 4C 24 B2 58 24 B0 52 24 B2 58 24 B0 4C 24 B2 |.L$.X$.R$.X$.L$.| 00000AD0: 59 24 B0 52 24 B2 59 24 89 31 35 30 30 00 16 0F |Y$.R$.Y$.1500...| 00000AE0: BE 05 82 4B 3A 99 4C 4F 24 3A 99 22 50 45 54 20 |...K:.LO$:."PET | 00000AF0: 22 4B 32 24 3A 8D 31 39 38 30 3A 89 38 30 30 30 |"K2$:.1980:.8000| 00000B00: 3A 8F 20 50 45 54 20 44 52 41 57 53 20 4F 52 20 |:. PET DRAWS OR | 00000B10: 50 41 53 53 45 53 00 2E 0F DC 05 8F 20 57 52 41 |PASSES...... WRA| 00000B20: 50 55 50 20 50 45 54 27 53 20 50 4C 41 59 00 4F |PUP PET'S PLAY.O| 00000B30: 0F E6 05 99 4C 4F 24 3A 99 22 50 45 54 20 50 4C |....LO$:."PET PL| 00000B40: 41 59 53 20 22 58 24 59 24 3A 8D 31 39 38 30 00 |AYS "X$Y$:.1980.| 00000B50: 7F 0F F0 05 58 B2 C5 28 58 24 29 3A 50 4C 28 58 |....X..(X$):PL(X| 00000B60: 29 B2 50 4C 28 58 29 AB 31 3A 58 B2 C5 28 59 24 |).PL(X).1:X..(Y$| 00000B70: 29 3A 50 4C 28 58 29 B2 50 4C 28 58 29 AB 31 00 |):PL(X).PL(X).1.| 00000B80: 96 0F 0E 06 8B 4C 24 B2 58 24 A7 4C 24 B2 59 24 |.....L$.X$.L$.Y$| 00000B90: 3A 89 31 30 30 30 00 AD 0F 18 06 8B 4C 24 B2 59 |:.1000......L$.Y| 00000BA0: 24 A7 4C 24 B2 58 24 3A 89 31 30 30 30 00 C4 0F |$.L$.X$:.1000...| 00000BB0: 22 06 8B 52 24 B2 58 24 A7 52 24 B2 59 24 3A 89 |"..R$.X$.R$.Y$:.| 00000BC0: 31 30 30 30 00 D4 0F 2C 06 52 24 B2 58 24 3A 89 |1000...,.R$.X$:.| 00000BD0: 31 30 30 30 00 F4 0F BC 07 81 49 5A B2 30 A4 38 |1000......IZ.0.8| 00000BE0: 30 30 3A 82 3A 8E 3A 8F 20 50 41 55 53 45 20 31 |00:.:.:. PAUSE 1| 00000BF0: 20 53 45 43 00 07 10 D0 07 8F 20 50 55 54 20 55 | SEC...... PUT U| 00000C00: 50 20 43 4F 55 4E 54 00 23 10 48 08 99 C8 28 4C |P COUNT.#.H...(L| 00000C10: 4F 24 2C 31 33 29 A3 33 30 29 32 38 AB 53 50 22 |O$,13).30)28.SP"| 00000C20: 9D 20 22 00 3E 10 52 08 81 49 B2 30 A4 32 30 3A |. ".>.R..I.0.20:| 00000C30: 8B 48 24 28 30 2C 49 29 B1 22 22 A7 82 49 00 64 |.H$(0,I).""..I.d| 00000C40: 10 66 08 99 A3 33 30 29 49 22 9D 20 22 3A 81 49 |.f...30)I". ":.I| 00000C50: B2 30 A4 31 39 3A 8B 48 24 28 31 2C 49 29 B1 22 |.0.19:.H$(1,I)."| 00000C60: 22 A7 82 49 00 75 10 7A 08 99 A3 33 30 29 49 22 |"..I.u.z...30)I"| 00000C70: 9D 20 22 3A 8E 00 96 10 88 13 58 24 B2 C8 28 58 |. ":......X$..(X| 00000C80: 24 2C 31 29 AA 22 9D 11 C0 9D 11 22 AA C9 28 58 |$,1)."....."..(X| 00000C90: 24 2C 31 29 3A 8E 00 AB 10 0C 17 8F 20 47 45 54 |$,1):....... GET| 00000CA0: 20 44 4F 54 20 46 4F 52 4D 41 54 00 DB 10 66 17 | DOT FORMAT...f.| 00000CB0: 91 31 AA C5 28 58 24 29 89 36 30 30 30 2C 36 30 |.1..(X$).6000,60| 00000CC0: 31 30 2C 36 30 32 30 2C 36 30 33 30 2C 36 30 34 |10,6020,6030,604| 00000CD0: 30 2C 36 30 35 30 2C 36 30 36 30 00 F8 10 70 17 |0,6050,6060...p.| 00000CE0: 58 24 B2 22 20 20 20 11 9D 9D 9D 20 20 20 11 9D |X$." .... ..| 00000CF0: 9D 9D 20 20 20 22 3A 8E 00 15 11 7A 17 58 24 B2 |.. ":....z.X$.| 00000D00: 22 20 20 20 11 9D 9D 9D 20 D1 20 11 9D 9D 9D 20 |" .... . .... | 00000D10: 20 20 22 3A 8E 00 32 11 84 17 58 24 B2 22 D1 20 | ":..2...X$.". | 00000D20: 20 11 9D 9D 9D 20 20 20 11 9D 9D 9D 20 20 D1 22 | .... .... ."| 00000D30: 3A 8E 00 4F 11 8E 17 58 24 B2 22 D1 20 20 11 9D |:..O...X$.". ..| 00000D40: 9D 9D 20 D1 20 11 9D 9D 9D 20 20 D1 22 3A 8E 00 |.. . .... .":..| 00000D50: 6C 11 98 17 58 24 B2 22 D1 20 D1 11 9D 9D 9D 20 |l...X$.". ..... | 00000D60: 20 20 11 9D 9D 9D D1 20 D1 22 3A 8E 00 89 11 A2 | ..... .":.....| 00000D70: 17 58 24 B2 22 D1 20 D1 11 9D 9D 9D 20 D1 20 11 |.X$.". ..... . .| 00000D80: 9D 9D 9D D1 20 D1 22 3A 8E 00 A6 11 AC 17 58 24 |.... .":......X$| 00000D90: B2 22 D1 20 D1 11 9D 9D 9D D1 20 D1 11 9D 9D 9D |.". ...... .....| 00000DA0: D1 20 D1 22 3A 8E 00 C4 11 58 1B 8F 20 50 52 49 |. .":....X.. PRI| 00000DB0: 4E 54 20 50 4C 41 59 45 52 27 53 20 44 4F 4D 49 |NT PLAYER'S DOMI| 00000DC0: 4E 4F 45 53 00 EB 11 62 1B 99 4C 55 24 22 11 11 |NOES...b..LU$"..| 00000DD0: 11 22 3A 81 49 B2 30 A4 31 39 3A 8B 48 24 28 30 |.":.I.0.19:.H$(0| 00000DE0: 2C 49 29 B1 22 22 89 37 31 30 30 00 00 12 76 1B |,I)."".7100...v.| 00000DF0: 8B 49 B3 32 30 A7 99 22 20 9D 11 20 9D 11 20 22 |.I.20.." .. .. "| 00000E00: 00 0A 12 80 1B 49 B2 30 3A 8E 00 32 12 BC 1B 58 |.....I.0:..2...X| 00000E10: 24 B2 48 24 28 30 2C 49 29 3A 8D 35 30 30 30 3A |$.H$(0,I):.5000:| 00000E20: 99 58 24 3B 3A 8B 49 B3 31 39 A7 99 22 91 20 91 |.X$;:.I.19..". .| 00000E30: 22 3B 00 3B 12 C6 1B 82 49 3A 8E 00 55 12 40 1F |";.;....I:..U.@.| 00000E40: 8F 20 50 45 54 20 44 52 41 57 53 20 4F 52 20 50 |. PET DRAWS OR P| 00000E50: 41 53 53 45 53 00 65 12 4A 1F 8B 53 50 B2 32 38 |ASSES.e.J..SP.28| 00000E60: 89 38 31 30 30 00 80 12 54 1F 81 49 B2 30 A4 32 |.8100...T..I.0.2| 00000E70: 30 3A 8B 48 24 28 50 2C 49 29 B1 22 22 A7 82 49 |0:.H$(P,I).""..I| 00000E80: 00 8F 12 59 1F 99 C8 28 4C 55 24 2C 31 33 29 00 |...Y...(LU$,13).| 00000E90: CF 12 5E 1F 8B 53 50 B1 32 36 A7 99 22 12 20 59 |..^..SP.26..". Y| 00000EA0: 41 52 44 22 3A 99 22 12 45 4D 50 54 59 22 3A 4B |ARD":.".EMPTY":K| 00000EB0: 30 24 B2 22 50 22 3A 4B 31 24 B2 22 12 50 92 41 |0$."P":K1$.".P.A| 00000EC0: 53 53 22 3A 4B 32 24 B2 22 50 41 53 53 45 53 00 |SS":K2$."PASSES.| 00000ED0: 04 13 68 1F 48 24 28 50 2C 49 29 B2 44 24 28 53 |..h.H$(P,I).D$(S| 00000EE0: 50 29 3A 53 50 B2 53 50 AA 31 3A 8D 37 30 30 30 |P):SP.SP.1:.7000| 00000EF0: 3A 8D 32 30 30 30 3A 91 50 AA 31 89 33 30 30 2C |:.2000:.P.1.300,| 00000F00: 31 32 30 30 00 15 13 A4 1F 8F 20 50 41 53 53 20 |1200...... PASS | 00000F10: 4C 4F 47 49 43 00 22 13 AE 1F 8B 4C 25 89 38 35 |LOGIC."....L%.85| 00000F20: 30 30 00 2B 13 B8 1F 4C 25 B2 31 00 3D 13 08 20 |00.+...L%.1.=.. | 00000F30: 91 50 AA 31 89 31 32 30 30 2C 33 30 30 00 59 13 |.P.1.1200,300.Y.| 00000F40: 34 21 53 30 B2 30 3A 81 49 B2 30 A4 31 39 3A 58 |4!S0.0:.I.0.19:X| 00000F50: 24 B2 48 24 28 30 2C 49 29 00 83 13 3E 21 8B 58 |$.H$(0,I)...>!.X| 00000F60: 24 B1 22 22 A7 53 30 B2 53 30 AA C5 28 C8 28 58 |$."".S0.S0..(.(X| 00000F70: 24 2C 31 29 29 AA C5 28 C9 28 58 24 2C 31 29 29 |$,1))..(.(X$,1))| 00000F80: 3A 82 49 00 9F 13 48 21 53 31 B2 30 3A 81 49 B2 |:.I...H!S1.0:.I.| 00000F90: 30 A4 31 39 3A 58 24 B2 48 24 28 31 2C 49 29 00 |0.19:X$.H$(1,I).| 00000FA0: C9 13 52 21 8B 58 24 B1 22 22 A7 53 31 B2 53 31 |..R!.X$."".S1.S1| 00000FB0: AA C5 28 C8 28 58 24 2C 31 29 29 AA C5 28 C9 28 |..(.(X$,1))..(.(| 00000FC0: 58 24 2C 31 29 29 3A 82 49 00 EE 13 5C 21 8B 53 |X$,1)):.I...\!.S| 00000FD0: 30 B1 53 31 A7 58 24 B2 22 12 20 50 45 54 20 57 |0.S1.X$.". PET W| 00000FE0: 49 4E 53 20 20 22 3A 50 57 B2 50 57 AA 31 00 0B |INS ":PW.PW.1..| 00000FF0: 14 66 21 8B 53 31 B1 53 30 A7 58 24 B2 22 12 20 |.f!.S1.S0.X$.". | 00001000: 59 4F 55 20 57 49 4E 20 20 20 22 00 30 14 70 21 |YOU WIN ".0.p!| 00001010: 8B 53 30 B2 53 31 A7 58 24 B2 22 12 49 54 27 53 |.S0.S1.X$.".IT'S| 00001020: 20 41 20 44 52 41 57 22 3A 54 59 B2 54 59 AA 31 | A DRAW":TY.TY.1| 00001030: 00 54 14 7A 21 54 30 B2 54 30 AA 53 30 3A 54 31 |.T.z!T0.T0.S0:T1| 00001040: B2 54 31 AA 53 31 3A 54 57 B2 54 57 AA 31 3A 8D |.T1.S1:TW.TW.1:.| 00001050: 32 30 30 30 00 83 14 98 21 99 4C 4F 24 3A 99 22 |2000....!.LO$:."| 00001060: 12 22 58 24 22 92 20 53 43 4F 52 45 3A 20 59 4F |."X$". SCORE: YO| 00001070: 55 22 53 30 22 2C 20 50 45 54 22 53 31 3A 8D 31 |U"S0", PET"S1:.1| 00001080: 39 38 30 00 A6 14 9D 21 99 22 A4 A4 A4 A4 A4 A4 |980....!."......| 00001090: A4 A4 A4 A4 A4 22 3A 99 22 12 20 41 4E 4F 54 48 |.....":.". ANOTH| 000010A0: 45 52 3F 20 20 22 00 BA 14 A2 21 A1 43 24 3A 8B |ER? "....!.C$:.| 000010B0: 43 24 B2 22 22 89 38 36 31 30 00 CA 14 A3 21 8B |C$."".8610....!.| 000010C0: 43 24 B2 22 59 22 89 31 30 30 00 DC 14 AC 21 8B |C$."Y".100....!.| 000010D0: 43 24 B3 B1 22 4E 22 89 38 36 31 30 00 E9 14 60 |C$.."N".8610...`| 000010E0: 22 8F 20 57 52 41 50 55 50 00 1F 15 74 22 99 22 |". WRAPUP...t"."| 000010F0: 93 11 11 4F 46 20 54 48 45 22 54 57 22 47 41 4D |...OF THE"TW"GAM| 00001100: 45 53 2C 20 59 4F 55 20 57 4F 4E 22 54 57 AB 54 |ES, YOU WON"TW.T| 00001110: 59 AB 50 57 22 50 45 54 20 57 4F 4E 22 50 57 00 |Y.PW"PET WON"PW.| 00001120: 3B 15 7E 22 8B 54 59 A7 99 22 41 4E 44 22 54 59 |;.~".TY.."AND"TY| 00001130: 22 57 45 52 45 20 44 52 41 57 53 00 63 15 88 22 |"WERE DRAWS.c.."| 00001140: 99 22 11 54 48 45 20 54 4F 54 41 4C 53 20 57 45 |.".THE TOTALS WE| 00001150: 52 45 3A 20 59 4F 55 22 54 30 22 2C 20 50 45 54 |RE: YOU"T0", PET| 00001160: 22 54 31 00 89 15 92 22 99 22 11 11 54 4F 20 50 |"T1...."."..TO P| 00001170: 4C 41 59 20 41 47 41 49 4E 2C 20 45 4E 54 45 52 |LAY AGAIN, ENTER| 00001180: 20 27 52 55 4E 27 22 3A 80 00 AE 15 28 23 99 4C | 'RUN'":....(#.L| 00001190: 4F 24 3A 99 22 54 52 59 20 41 47 41 49 4E 3A 20 |O$:."TRY AGAIN: | 000011A0: 22 3B 3A 97 35 32 35 2C 30 3A 89 33 30 32 00 C5 |";:.525,0:.302..| 000011B0: 15 1C 25 99 22 91 22 A6 31 34 29 3B 3A 8B 55 A7 |..%.".".14);:.U.| 000011C0: 99 22 20 22 3B 00 DF 15 26 25 99 22 53 48 55 46 |." ";...&%."SHUF| 000011D0: 46 4C 49 4E 47 20 22 3A 55 B2 31 AB 55 3A 8E 00 |FLING ":U.1.U:..| 000011E0: 06 16 AC 26 58 24 B2 48 24 28 31 2C 4B 29 3A 59 |...&X$.H$(1,K):Y| 000011F0: 24 B2 C9 28 58 24 2C 31 29 3A 58 24 B2 C8 28 58 |$..(X$,1):X$..(X| 00001200: 24 2C 31 29 3A 8E 00 00 00 |$,1):.... |
....... M.RICHTER 90064 12/78.0...PW.0:T
W.0:TY.0.D....59468,12:I..(.TI):.D$(27),
H$(1,20),PL(6),H(20)...(.LU$."..........
........":LO$.LU$."
."...2.."... . DO
MINOES ..":."PET HAS THREE LEVELS OF PLA
Y:.!.<..".1. EASY: YOU CAN WIN TWO GAMES
OF THREE.P.F..".2. SLIGHTLY HARDER: MAY
BE 60/40 FOR YOU.Y.K..".3. TOUGH: NEARLY
EQUALS BEST PLAY...P.."..WHICH DO YOU W
ANT?...Z..C$:.C$."".90...[..C$."1".C$."3
".90.I._.AL.E(C$)...D.PL.0:.".".15)"DOMI
NOES............#.N.J.0:K.0:.I.0.27:D$(I
).J(D(J),2).J(D(K),2):.9500.<.X.K.K.1:.K
.J.K.0:J.J.1.....I:.I.0.26:J.I.(28.I)..
(1):X$.D$(I):D$(I).D$(J):D$(J).X$:.9500.
.....I:.J.0.6:.I.0.1:H$(I,J).D$(7.I.J):.
I:.9500:.J:SP.14......J.7.20:.I.0.1:H$(I
,J)."":.I:.9500:.J... .K0$."D":K1$.".D.R
AW":K2$."DRAWS A BONE.;.H.L$."":.J.0.1:.
I.0.6:X$.H(H$(J,I),1):.9500.D.R..X$.I(H$
(J,I),1).X$.L$.L$.X$:P.J:K.I.Y....I:.J:.
L$."".100......"...P..L..A..Y..E..D.....
....8)"U...........I BONE COUNT.......
8)". . . . DDDDDDDDDD.......8)
". V . . V . YARD.......8)". .
. . YOU.=.....8)"J.............K
PET.M."..2000:.7000...'..LO$:."THE LAR
GEST DOUBLET IS ";L$L$:R$.L$:.1980:.1000
...,.P.0:.525,0:.LO$:."WHICH BONE (OR "K
1$")? ";.K....X$:.X$."".302.../..X$.K0$.
.X$:.8000...1..X$."0".X$."6".302...3..X$
;:...6..Y$:.Y$."".310.,.7..Y$."0".Y$."6"
.310.K.;..Y$:X$.X$.Y$:Y$.Y$.H(X$,1).Y.@.
.K.0.20:.H$(0,K)..X$.H$(0,K)..Y$..K:.900
0...J.RF.0:.PL.0.L$.I(X$,1):R$.H(X$,1):L
F.1:.1000.N.T.LF.0:.L$.H(X$,1).L$.I(X$,1
).LF.1...^..R$.H(X$,1).R$.I(X$,1).RF.1..
.H..LF.RF.0.9000...R..LF.RF.0..LF.1.500,
550.5.W..L$.R$.H$(0,1)."".450.W.|..LO$:.
X$" - LEFT OR RIGHT? ";.T....C$:.C$.."L"
.C$.."R".390......C$:.C$."L".450......R$
.I(X$,1).R$.H(X$,1):.1000.....R$.I(X$,1)
:.1000...B..L$.I(X$,1).L$.H(X$,1):.1000.
..L.L$.I(X$,1):.1000......R$.I(X$,1).R$.
H(X$,1):.1000.*...R$.I(X$,1):.1000.K.&..
L$.I(X$,1).L$.H(X$,1):.1000.`.0.L$.I(X$,
1):.1000.V.... PLAY THE DOMINO.....L%.0:
Y$.H$(P,K):.I.K.19:H$(P,I).H$(P,I.1):.I:
H$(P,I)."":.7000......2000:X$.Y$:."..":.
5000:PL.PL.1.....X.PL:.X.18.X.X.18:."...
.......1.2.X)X$.3.L.X$.L$:.5900:.H(LO$,1
2).9)X$:X$.R$:.5900.`.V.."...".17)X$:.H$
(0,0)."".H$(1,0)."".8500.K.~..P.300.|...
. PET'S PLAY.....P.1:.AL.1450,1350...D..
I.0.6:PL(I).0:.I.E.N..K.0.20:.H$(1,K).""
.1250...X..9900:X.E(X$):PL(X).PL(X).1:X.
E(Y$):PL(Y).PL(Y).1:.K.$.... PLAYABLE DO
UBLET WITH SUCCESSOR.A....K.0.20:.H$(1,K
)."".1300.U....9900:.(X$.Y$).(X$.R$.X$.L
$).(PL(E(X$)).2).1500.|....K...... PLAYA
BLE BONE WITH SUCCESSOR......K.0.20:.H$(
1,K)."".1350...(..9900:.((X$.L$).(X$.R$)
).PL(E(X$)).1.1500...2..((Y$.L$).(Y$.R$)
).PL(E(Y$)).1.1500...<..K.0.F.. PLAYABLE
DOUBLET.M.P..K.0.20:.H$(1,K)."".1400.Q.
Z..9900:.X$.Y$.(X$.L$.X$.R$).1500.X.D..K
...X.. STILL MORE ALGORITHMS HERE......
PLAYABLE BONE......K.0.20:.9900:.L$.X$.R
$.X$.L$.Y$.R$.Y$.1500......K:.LO$:."PET
"K2$:.1980:.8000:. PET DRAWS OR PASSES..
.... WRAPUP PET'S PLAY.O....LO$:."PET PL
AYS "X$Y$:.1980....X.E(X$):PL(X).PL(X).
1:X.E(Y$):PL(X).PL(X).1......L$.X$.L$.Y$
:.1000......L$.Y$.L$.X$:.1000.D."..R$.X$
.R$.Y$:.1000.T.,.R$.X$:.1000......IZ.0.8
00:.:.:. PAUSE 1 SEC...P.. PUT UP COUNT.
#.H..H(LO$,13).30)28.SP". ".>.R..I.0.20:
.H$(0,I).""..I.D.F...30)I". ":.I.0.19:.H
$(1,I).""..I.U.Z...30)I". ":......X$.H(X
$,1).".....".I(X$,1):....... GET DOT FOR
MAT...F..1.E(X$).6000,6010,6020,6030,604
0,6050,6060...P.X$." .... .... ":.
...Z.X$." .... Q .... ":..2...X$."Q
.... .... Q":..O...X$."Q .... Q ...
. Q":..L...X$."Q Q.... ....Q Q":.....
.X$."Q Q.... Q ....Q Q":......X$."Q Q...
.Q Q....Q Q":..D.X.. PRINT PLAYER'S DOMI
NOES...B..LU$"...":.I.0.19:.H$(0,I)."".7
100...V..I.20.." .. .. ".....I.0:..2...X
$.H$(0,I):.5000:.X$;:.I.19..". .";.;.F..
I:..U.@.. PET DRAWS OR PASSES.E.J..SP.28
.8100...T..I.0.20:.H$(P,I).""..I...Y..H(
LU$,13).O.^..SP.26..". YARD":.".EMPTY":K
0$."P":K1$.".P.ASS":K2$."PASSES...H.H$(P
,I).D$(SP):SP.SP.1:.7000:.2000:.P.1.300,
1200...... PASS LOGIC."....L%.8500.+...L
%.1.=.. .P.1.1200,300.Y.4!S0.0:.I.0.19:X
$.H$(0,I)...>!.X$."".S0.S0.E(H(X$,1)).E(
I(X$,1)):.I...H!S1.0:.I.0.19:X$.H$(1,I).
I.R!.X$."".S1.S1.E(H(X$,1)).E(I(X$,1)):.
I...\!.S0.S1.X$.". PET WINS ":PW.PW.1..
.F!.S1.S0.X$.". YOU WIN ".0.P!.S0.S1.X
$.".IT'S A DRAW":TY.TY.1.T.Z!T0.T0.S0:T1
.T1.S1:TW.TW.1:.2000....!.LO$:."."X$". S
CORE: YOU"S0", PET"S1:.1980....!."......
.....":.". ANOTHER? "....!.C$:.C$."".86
10.J..!.C$."Y".100....!.C$.."N".8610...`
". WRAPUP...T"."...OF THE"TW"GAMES, YOU
WON"TW.TY.PW"PET WON"PW.;.~".TY.."AND"TY
"WERE DRAWS.C..".".THE TOTALS WERE: YOU"
T0", PET"T1...."."..TO PLAY AGAIN, ENTER
'RUN'":....(#.LO$:."TRY AGAIN: ";:.525,
0:.302.E..%.".".14);:.U.." ";...&%."SHUF
FLING ":U.1.U:.....&X$.H$(1,K):Y$.I(X$,1
):X$.H(X$,1):....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL