KLONDIKE        
FILE INFORMATION
FILENAME(S): KLONDIKE        
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-12-01 01:07:10
APPEARS ON: 4 disk(s)
FILE HASH
dad093ca4e213f8bd836cc39c36f2752f61f644a123b8e0afab934cb96bd1943
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| M NADENS 64 DISK | KLONDIKE         | PRG | hedning, hedemora | 21 | 16 | DOWNLOAD FILE |
| JJEDFGG | KLONDIKE         | PRG | hedning, hedemora | 17 | 0 | DOWNLOAD FILE |
| M NADENS 64 DISK | KLONDIKE         | PRG | hedning, pewp | 21 | 16 | DOWNLOAD FILE |
| M NADENS 64 DISK | KLONDIKE         | PRG | hedning, pewp | 21 | 16 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4D 08 02 00 8F 20 2A 20 4B 4C 4F 4E 44 49 |..M.... * KLONDI| 00000010: 4B 45 20 2A 20 46 52 4F 4D 20 43 4F 4D 50 55 54 |KE * FROM COMPUT| 00000020: 45 27 53 20 20 20 20 20 20 20 20 20 20 20 20 20 |E'S | 00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 47 41 5A | GAZ| 00000040: 45 54 54 45 20 20 31 39 38 36 2D 30 35 00 53 08 |ETTE 1986-05.S.| 00000050: 03 00 99 00 71 08 04 00 8F 20 2A 20 4F 52 49 47 |....q.... * ORIG| 00000060: 49 4E 41 4C 20 36 34 20 56 45 52 53 49 4F 4E 20 |INAL 64 VERSION | 00000070: 2A 00 77 08 05 00 99 00 A6 08 0A 00 99 22 93 22 |*.w.........."."| 00000080: 3A 97 35 33 32 38 30 2C 35 3A 97 35 33 32 38 31 |:.53280,5:.53281| 00000090: 2C 35 3A 8B C2 28 31 34 38 35 30 29 B3 B1 32 34 |,5:..(14850)..24| 000000A0: A7 8D 32 30 30 30 00 E9 08 14 00 44 4E 24 B2 22 |..2000.....DN$."| 000000B0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 000000C0: 11 11 11 11 22 3A 4F 56 24 B2 22 1D 1D 1D 1D 1D |....":OV$.".....| 000000D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 000000E0: 1D 1D 1D 1D 1D 1D 1D 1D 22 00 20 09 1E 00 42 4B |........". ...BK| 000000F0: 24 B2 22 05 D3 D1 D2 D4 11 9D 9D 9D 9D D5 BB BC |$.".............| 00000100: D6 22 3A 42 4C 24 B2 22 20 20 20 20 11 9D 9D 9D |.":BL$." ....| 00000110: 9D 20 20 20 20 22 3A 97 35 33 32 37 32 2C 33 31 |. ":.53272,31| 00000120: 00 48 09 28 00 42 32 24 B2 22 20 20 20 20 20 20 |.H.(.B2$." | 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000140: 20 20 20 20 20 20 20 22 00 89 09 32 00 86 20 43 | "...2.. C| 00000150: 44 24 28 35 32 29 3A 43 24 28 30 29 B2 22 1C 22 |D$(52):C$(0)."."| 00000160: 3A 43 24 28 31 29 B2 22 90 22 3A 43 24 28 32 29 |:C$(1).".":C$(2)| 00000170: B2 22 1C 22 3A 43 24 28 33 29 B2 22 90 22 3A 43 |.".":C$(3).".":C| 00000180: 44 24 28 30 29 B2 42 4C 24 00 9C 09 3C 00 81 58 |D$(0).BL$...<..X| 00000190: B2 30 A4 33 3A 81 59 B2 31 A4 31 33 00 D1 09 46 |.0.3:.Y.1.13...F| 000001A0: 00 43 44 24 28 58 AC 31 33 AA 59 29 B2 43 24 28 |.CD$(X.13.Y).C$(| 000001B0: 58 29 AA 22 D3 22 AA C7 28 39 35 AA 59 29 AA C7 |X)."."..(95.Y)..| 000001C0: 28 31 30 39 AA 58 29 AA 22 D4 11 9D 9D 9D 9D D5 |(109.X).".......| 000001D0: 22 00 03 0A 4B 00 43 44 24 28 58 AC 31 33 AA 59 |"...K.CD$(X.13.Y| 000001E0: 29 B2 43 44 24 28 58 AC 31 33 AA 59 29 AA C7 28 |).CD$(X.13.Y)..(| 000001F0: 31 37 33 AA 58 29 AA C7 28 31 35 39 AA 59 29 AA |173.X)..(159.Y).| 00000200: 22 D6 22 00 0C 0A 50 00 82 59 2C 58 00 46 0A 5A |"."...P..Y,X.F.Z| 00000210: 00 86 44 4B 28 35 32 29 2C 53 54 28 32 34 29 2C |..DK(52),ST(24),| 00000220: 4C 59 28 37 2C 32 30 29 2C 55 43 28 37 29 2C 54 |LY(7,20),UC(7),T| 00000230: 50 28 37 29 3A 81 58 B2 31 A4 35 32 3A 44 4B 28 |P(7):.X.1.52:DK(| 00000240: 58 29 B2 58 3A 82 00 5E 0A 64 00 96 A5 52 28 5A |X).X:..^.d...R(Z| 00000250: 29 B2 B5 28 35 32 AC BB 28 5A 29 29 AA 31 00 8E |)..(52..(Z)).1..| 00000260: 0A 6E 00 96 A5 53 55 28 58 29 B2 B5 28 58 AD 31 |.n...SU(X)..(X.1| 00000270: 33 2E 31 29 AA 31 3A 96 A5 56 4C 28 58 29 B2 58 |3.1).1:..VL(X).X| 00000280: AB 31 33 AC 28 A5 53 55 28 58 29 AB 31 29 00 AD |.13.(.SU(X).1)..| 00000290: 0A 78 00 96 A5 53 43 28 58 29 B2 28 58 AD 32 B2 |.x...SC(X).(X.2.| 000002A0: B5 28 58 AD 32 29 29 3A 8D 31 31 39 30 00 BF 0A |.(X.2)):.1190...| 000002B0: 7D 00 8B 54 54 B3 B2 30 A7 54 54 B2 35 30 30 00 |}..TT..0.TT.500.| 000002C0: D4 0A 82 00 42 54 B2 B5 28 28 54 54 AA 35 31 29 |....BT..((TT.51)| 000002D0: AD 35 32 29 00 E2 0A 8C 00 8D 37 31 30 3A 8D 37 |.52)......710:.7| 000002E0: 32 30 00 23 0B 96 00 99 22 05 93 20 23 31 20 20 |20.#....".. #1 | 000002F0: 23 32 20 20 23 33 20 20 23 34 20 20 23 35 20 20 |#2 #3 #4 #5 | 00000300: 23 36 20 20 23 37 1D 1D 1D 1D 1D 90 50 05 49 4C |#6 #7......P.IL| 00000310: 45 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |E...............| 00000320: 11 11 22 00 4C 0B A0 00 99 4F 56 24 22 90 46 32 |..".L....OV$".F2| 00000330: 05 2D 45 4E 44 20 47 41 4D 45 22 3A 99 4F 56 24 |.-END GAME":.OV$| 00000340: 22 90 46 38 05 2D 51 55 49 54 11 22 00 82 0B AA |".F8.-QUIT."....| 00000350: 00 99 22 90 44 05 45 43 4B 20 20 90 53 05 54 41 |..".D.ECK .S.TA| 00000360: 43 4B 20 20 20 54 4F 54 41 4C 22 3A 99 22 1D 1D |CK TOTAL":."..| 00000370: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 42 45 |..............BE| 00000380: 54 22 00 98 0B B4 00 99 22 46 52 4F 4D 20 20 20 |T"......"FROM | 00000390: 20 20 20 20 54 4F 22 3B 00 E4 0B BE 00 99 22 13 | TO";......".| 000003A0: 1D 1D 11 11 11 22 4F 56 24 22 1C 48 45 41 52 54 |....."OV$".HEART| 000003B0: 53 11 11 11 11 9D 9D 9D 9D 9D 9D 90 53 50 41 44 |S...........SPAD| 000003C0: 45 53 11 11 11 11 9D 9D 9D 9D 9D 9D 1C 44 49 41 |ES...........DIA| 000003D0: 4D 4F 4E 44 53 11 11 11 11 9D 9D 9D 9D 9D 9D 9D |MONDS...........| 000003E0: 9D 90 22 3B 00 01 0C C8 00 99 22 43 4C 55 42 53 |..";......"CLUBS| 000003F0: 22 3A 4E 42 B2 AB 31 3A 8D 39 34 30 3A 4E 42 B2 |":NB..1:.940:NB.| 00000400: 30 00 36 0C D2 00 81 58 B2 31 A4 37 3A 99 22 13 |0.6....X.1.7:.".| 00000410: 22 C8 28 44 4E 24 2C 58 29 C8 28 4F 56 24 2C 58 |".(DN$,X).(OV$,X| 00000420: AC 34 AB 34 29 3B 3A 81 59 B2 58 A4 37 3A 8B 59 |.4.4);:.Y.X.7:.Y| 00000430: B2 58 A7 32 33 30 00 48 0C DC 00 99 42 4B 24 22 |.X.230.H....BK$"| 00000440: 91 22 3B 3A 89 32 34 30 00 5E 0C E6 00 99 43 44 |.";:.240.^....CD| 00000450: 24 28 4C 59 28 58 2C 58 29 29 22 91 22 3B 00 68 |$(LY(X,X))".";.h| 00000460: 0C F0 00 82 59 3A 82 58 00 92 0C FA 00 99 22 13 |....Y:.X......".| 00000470: 22 4F 56 24 22 11 22 3B 3A 81 58 B2 31 A4 34 3A |"OV$".";:.X.1.4:| 00000480: 99 42 4B 24 22 11 11 11 9D 9D 9D 9D 22 3B 3A 82 |.BK$".......";:.| 00000490: 3A 99 00 9B 0C 04 01 8D 37 34 30 00 AD 0C 0E 01 |:.......740.....| 000004A0: 8D 37 36 30 3A 8B 51 55 A7 31 32 34 30 00 D9 0C |.760:.QU.1240...| 000004B0: 18 01 99 22 91 91 91 91 91 22 3A 81 58 B2 31 A4 |...".....":.X.1.| 000004C0: 35 3A 99 42 32 24 3A 82 3A 54 54 B2 54 54 AB 35 |5:.B2$:.:TT.TT.5| 000004D0: 32 AC 42 47 3A 8D 39 34 30 00 EB 0C 22 01 8F 2A |2.BG:.940..."..*| 000004E0: 2A 2A 4D 41 49 4E 20 4C 4F 4F 50 00 FF 0C 2C 01 |**MAIN LOOP...,.| 000004F0: 47 57 B2 30 3A 47 4D B2 AB 31 3A 4D 31 B2 31 00 |GW.0:GM..1:M1.1.| 00000500: 1B 0D 36 01 45 44 B2 30 3A 8D 39 36 30 3A 8B 45 |..6.ED.0:.960:.E| 00000510: 44 A7 99 22 93 22 3A 89 31 32 35 00 28 0D 40 01 |D..".":.125.(.@.| 00000520: 8B 51 55 A7 31 32 34 30 00 35 0D 4A 01 8B 47 57 |.QU.1240.5.J..GW| 00000530: A7 31 31 36 30 00 48 0D 54 01 47 4D B2 30 3A 8D |.1160.H.T.GM.0:.| 00000540: 33 35 30 3A 89 33 31 30 00 57 0D 5E 01 8B 4D 31 |350:.310.W.^..M1| 00000550: B1 AB 31 A7 33 38 30 00 63 0D 68 01 8B 44 50 B2 |..1.380.c.h..DP.| 00000560: 30 A7 8E 00 9F 0D 72 01 53 50 B2 53 50 AA 31 3A |0.....r.SP.SP.1:| 00000570: 53 54 28 53 50 29 B2 44 4B 28 44 50 29 3A 44 50 |ST(SP).DK(DP):DP| 00000580: B2 44 50 AB 31 3A 99 22 13 22 44 4E 24 22 91 91 |.DP.1:."."DN$"..| 00000590: 22 3B 3A 8D 37 34 30 3A 47 4D B2 AB 31 3A 8E 00 |";:.740:GM..1:..| 000005A0: BE 0D 7C 01 8B 4D 31 B2 30 A7 43 31 B2 53 54 28 |..|..M1.0.C1.ST(| 000005B0: 53 50 29 3A 43 33 B2 43 31 3A 89 34 30 30 00 E6 |SP):C3.C1:.400..| 000005C0: 0D 86 01 43 31 B2 4C 59 28 4D 31 2C 55 43 28 4D |...C1.LY(M1,UC(M| 000005D0: 31 29 AA 31 29 3A 43 33 B2 4C 59 28 4D 31 2C 54 |1).1):C3.LY(M1,T| 000005E0: 50 28 4D 31 29 29 00 F5 0D 90 01 8B 4D 32 B1 AB |P(M1))......M2..| 000005F0: 31 A7 36 30 30 00 01 0E 9A 01 8B 43 33 B2 30 A7 |1.600......C3.0.| 00000600: 8E 00 2B 0E A4 01 53 33 B2 A5 53 55 28 43 33 29 |..+...S3..SU(C3)| 00000610: 3A 56 33 B2 A5 56 4C 28 43 33 29 3A 8B 56 33 AB |:V3..VL(C3):.V3.| 00000620: 31 B3 B1 50 4C 28 53 33 29 A7 8E 00 38 0E AE 01 |1..PL(S3)...8...| 00000630: 8B A8 41 4D A7 35 31 30 00 5C 0E B8 01 42 4D B2 |..AM.510.\...BM.| 00000640: 30 3A 81 58 B2 31 A4 34 3A 8B A5 53 43 28 58 29 |0:.X.1.4:..SC(X)| 00000650: B2 A5 53 43 28 53 33 29 A7 34 36 30 00 72 0E C2 |..SC(S3).460.r..| 00000660: 01 8B 56 33 B1 50 4C 28 58 29 AA 32 A7 42 4D B2 |..V3.PL(X).2.BM.| 00000670: AB 31 00 8B 0E CC 01 82 3A 8B 28 4D 31 B1 30 29 |.1......:.(M1.0)| 00000680: B0 28 56 33 B3 33 29 A7 35 30 30 00 C0 0E D6 01 |.(V3.3).500.....| 00000690: 81 58 B2 31 A4 37 3A 43 34 B2 4C 59 28 58 2C 55 |.X.1.7:C4.LY(X,U| 000006A0: 43 28 58 29 AA 31 29 3A 56 34 B2 A5 56 4C 28 43 |C(X).1):V4..VL(C| 000006B0: 34 29 3A 8B 56 34 B3 B1 56 33 AB 31 A7 34 39 30 |4):.V4..V3.1.490| 000006C0: 00 E1 0E E0 01 8B A5 53 43 28 53 33 29 B3 B1 A5 |.......SC(S3)...| 000006D0: 53 43 28 A5 53 55 28 43 34 29 29 A7 42 4D B2 AB |SC(.SU(C4)).BM..| 000006E0: 31 00 E7 0E EA 01 82 00 F1 0E F4 01 8B 42 4D A7 |1............BM.| 000006F0: 8E 00 FF 0E FE 01 8B 4D 31 B2 30 A7 35 37 30 00 |.......M1.0.570.| 00000700: 2B 0F 08 02 43 B2 4D 31 3A 8D 31 31 35 30 3A 8B |+...C.M1:.1150:.| 00000710: 54 50 28 4D 31 29 B2 31 A7 99 42 4C 24 3A 54 50 |TP(M1).1..BL$:TP| 00000720: 28 4D 31 29 B2 30 3A 89 35 38 30 00 4C 0F 12 02 |(M1).0:.580.L...| 00000730: 8B 54 50 28 4D 31 29 B2 31 A7 99 42 4C 24 3A 54 |.TP(M1).1..BL$:T| 00000740: 50 28 4D 31 29 B2 30 3A 89 35 36 30 00 80 0F 1C |P(M1).0:.560....| 00000750: 02 54 50 28 4D 31 29 B2 54 50 28 4D 31 29 AB 31 |.TP(M1).TP(M1).1| 00000760: 3A 99 42 4C 24 22 9D 9D 9D 9D 91 91 22 43 44 24 |:.BL$"......"CD$| 00000770: 28 4C 59 28 4D 31 2C 54 50 28 4D 31 29 29 29 3B |(LY(M1,TP(M1)));| 00000780: 00 A3 0F 26 02 8B 54 50 28 4D 31 29 B2 55 43 28 |...&..TP(M1).UC(| 00000790: 4D 31 29 A7 55 43 28 4D 31 29 B2 55 43 28 4D 31 |M1).UC(M1).UC(M1| 000007A0: 29 AB 31 00 AC 0F 30 02 89 35 38 30 00 B6 0F 3A |).1...0..580...:| 000007B0: 02 8D 31 31 37 30 00 F1 0F 44 02 99 22 13 22 4F |..1170...D.."."O| 000007C0: 56 24 C8 28 44 4E 24 2C 53 33 AC 34 AB 33 29 43 |V$.(DN$,S3.4.3)C| 000007D0: 44 24 28 43 33 29 3A 50 4C 28 53 33 29 B2 56 33 |D$(C3):PL(S3).V3| 000007E0: 3A 54 54 B2 54 54 AA 35 AC 42 47 3A 4D 55 B2 AB |:TT.TT.5.BG:MU..| 000007F0: 31 00 27 10 4E 02 8D 39 34 30 3A 54 51 B2 30 3A |1.'.N..940:TQ.0:| 00000800: 81 51 B2 31 A4 34 3A 54 51 B2 54 51 AA 50 4C 28 |.Q.1.4:TQ.TQ.PL(| 00000810: 51 29 3A 82 3A 47 57 B2 28 54 51 B2 35 32 29 3A |Q):.:GW.(TQ.52):| 00000820: 47 4D B2 AB 31 3A 8E 00 5C 10 58 02 43 32 B2 4C |GM..1:..\.X.C2.L| 00000830: 59 28 4D 32 2C 54 50 28 4D 32 29 29 3A 53 31 B2 |Y(M2,TP(M2)):S1.| 00000840: A5 53 43 28 A5 53 55 28 43 31 29 29 3A 53 32 B2 |.SC(.SU(C1)):S2.| 00000850: A5 53 43 28 A5 53 55 28 43 32 29 29 00 8A 10 62 |.SC(.SU(C2))...b| 00000860: 02 56 31 B2 A5 56 4C 28 43 31 29 3A 56 32 B2 A5 |.V1..VL(C1):V2..| 00000870: 56 4C 28 43 32 29 3A 8B 28 56 31 B2 31 33 29 AF |VL(C2):.(V1.13).| 00000880: 28 56 32 B2 30 29 A7 36 33 30 00 A4 10 6C 02 8B |(V2.0).630...l..| 00000890: 28 53 31 B2 53 32 29 B0 28 56 31 AA 31 B3 B1 56 |(S1.S2).(V1.1..V| 000008A0: 32 29 A7 8E 00 B2 10 76 02 8B 4D 31 B1 30 A7 36 |2).....v..M1.0.6| 000008B0: 35 30 00 D9 10 80 02 8D 31 31 37 30 3A 4C 59 28 |50......1170:LY(| 000008C0: 4D 32 2C 54 50 28 4D 32 29 AA 31 29 B2 43 31 3A |M2,TP(M2).1).C1:| 000008D0: 4E 43 B2 31 3A 89 36 39 30 00 13 11 8A 02 4E 43 |NC.1:.690.....NC| 000008E0: B2 54 50 28 4D 31 29 AB 55 43 28 4D 31 29 3A 43 |.TP(M1).UC(M1):C| 000008F0: B2 4D 31 3A 99 22 13 22 C8 28 44 4E 24 2C 55 43 |.M1:.".".(DN$,UC| 00000900: 28 43 29 AA 31 29 C8 28 4F 56 24 2C 43 AC 34 AB |(C).1).(OV$,C.4.| 00000910: 34 29 3B 00 4D 11 94 02 81 58 B2 31 A4 4E 43 3A |4);.M....X.1.NC:| 00000920: 99 42 4C 24 22 9D 9D 9D 9D 22 3B 3A 4C 59 28 4D |.BL$"....";:LY(M| 00000930: 32 2C 54 50 28 4D 32 29 AA 58 29 B2 4C 59 28 4D |2,TP(M2).X).LY(M| 00000940: 31 2C 55 43 28 4D 31 29 AA 58 29 3A 82 00 7A 11 |1,UC(M1).X):..z.| 00000950: 9E 02 54 50 28 4D 31 29 B2 55 43 28 4D 31 29 3A |..TP(M1).UC(M1):| 00000960: 55 43 28 4D 31 29 B2 55 43 28 4D 31 29 AB 31 AB |UC(M1).UC(M1).1.| 00000970: 28 55 43 28 4D 31 29 B2 30 29 00 A3 11 A8 02 8B |(UC(M1).0)......| 00000980: 54 50 28 4D 31 29 B1 30 A7 8D 31 31 35 30 3A 99 |TP(M1).0..1150:.| 00000990: 43 44 24 28 4C 59 28 4D 31 2C 54 50 28 4D 31 29 |CD$(LY(M1,TP(M1)| 000009A0: 29 29 3B 00 DF 11 B2 02 43 B2 4D 32 3A 8D 31 31 |));.....C.M2:.11| 000009B0: 35 30 3A 99 22 11 22 3B 3A 81 58 B2 31 A4 4E 43 |50:.".";:.X.1.NC| 000009C0: 3A 99 43 44 24 28 4C 59 28 4D 32 2C 54 50 28 4D |:.CD$(LY(M2,TP(M| 000009D0: 32 29 AA 58 29 29 22 9D 9D 9D 9D 22 3B 3A 82 00 |2).X))"....";:..| 000009E0: FC 11 BC 02 54 50 28 4D 32 29 B2 54 50 28 4D 32 |....TP(M2).TP(M2| 000009F0: 29 AA 4E 43 3A 47 4D B2 AB 31 3A 8E 00 36 12 C6 |).NC:GM..1:..6..| 00000A00: 02 81 58 B2 31 A4 35 32 3A 41 B2 A5 52 28 30 29 |..X.1.52:A..R(0)| 00000A10: 3A 53 B2 44 4B 28 41 29 3A 44 4B 28 41 29 B2 44 |:S.DK(A):DK(A).D| 00000A20: 4B 28 58 29 3A 44 4B 28 58 29 B2 53 3A 82 3A 44 |K(X):DK(X).S:.:D| 00000A30: 50 B2 35 32 3A 8E 00 77 12 D0 02 81 58 B2 31 A4 |P.52:..w....X.1.| 00000A40: 37 3A 81 59 B2 58 A4 37 3A 4C 59 28 59 2C 58 29 |7:.Y.X.7:LY(Y,X)| 00000A50: B2 44 4B 28 44 50 29 3A 44 50 B2 44 50 AB 31 3A |.DK(DP):DP.DP.1:| 00000A60: 82 59 3A 54 50 28 58 29 B2 58 3A 55 43 28 58 29 |.Y:TP(X).X:UC(X)| 00000A70: B2 58 AB 31 3A 82 58 00 A8 12 DA 02 53 54 28 31 |.X.1:.X.....ST(1| 00000A80: 29 B2 44 4B 28 44 50 29 3A 44 50 B2 44 50 AB 31 |).DK(DP):DP.DP.1| 00000A90: 3A 53 50 B2 31 3A 81 58 B2 31 A4 34 3A 50 4C 28 |:SP.1:.X.1.4:PL(| 00000AA0: 58 29 B2 30 3A 82 3A 8E 00 CA 12 E4 02 99 22 13 |X).0:.:.......".| 00000AB0: 22 44 4E 24 22 91 22 42 4B 24 22 91 1D 1D 22 43 |"DN$"."BK$"..."C| 00000AC0: 44 24 28 53 54 28 53 50 29 29 00 E6 12 EE 02 99 |D$(ST(SP))......| 00000AD0: 22 05 22 44 50 22 9D 20 22 3B A3 36 29 53 50 22 |"."DP". ";.6)SP"| 00000AE0: 9D 20 22 3B 3A 8E 00 10 13 F8 02 99 22 05 13 11 |. ";:......."...| 00000AF0: 11 11 11 11 11 11 11 11 11 20 50 4C 45 41 53 45 |......... PLEASE| 00000B00: 20 45 4E 54 45 52 20 59 4F 55 52 20 42 45 54 22 | ENTER YOUR BET"| 00000B10: 00 29 13 02 03 99 22 20 4D 41 58 49 4D 55 4D 20 |.)...." MAXIMUM | 00000B20: 42 45 54 20 3D 90 22 42 54 00 4B 13 0C 03 99 22 |BET =."BT.K...."| 00000B30: 05 20 50 52 45 53 53 20 90 46 31 05 20 54 4F 20 |. PRESS .F1. TO | 00000B40: 42 45 54 20 49 54 20 41 4C 4C 22 00 6C 13 16 03 |BET IT ALL".l...| 00000B50: 99 22 20 50 52 45 53 53 20 90 46 37 05 20 54 4F |." PRESS .F7. TO| 00000B60: 20 52 45 2D 53 48 55 46 46 4C 45 22 00 99 13 20 | RE-SHUFFLE"... | 00000B70: 03 99 22 20 2D 3E 20 20 20 20 20 20 20 20 9D 9D |.." -> ..| 00000B80: 9D 9D 9D 9D 9D 90 B9 9D 22 3B 3A 4E B2 30 3A 42 |........";:N.0:B| 00000B90: 47 B2 30 3A 42 24 B2 22 22 00 AC 13 2A 03 A1 41 |G.0:B$.""...*..A| 00000BA0: 24 3A 8B 41 24 B2 22 22 A7 38 31 30 00 CB 13 34 |$:.A$."".810...4| 00000BB0: 03 8B 28 41 24 B2 C7 28 31 33 33 29 29 AF 28 4E |..(A$..(133)).(N| 00000BC0: B2 30 29 A7 42 47 B2 42 54 3A 8E 00 E6 13 3E 03 |.0).BG.BT:....>.| 00000BD0: 8B 28 41 24 B2 C7 28 31 33 36 29 29 AF 28 4E B2 |.(A$..(136)).(N.| 00000BE0: 30 29 A7 39 31 30 00 05 14 48 03 8B 28 41 24 B2 |0).910...H..(A$.| 00000BF0: C7 28 31 34 30 29 29 AF 28 4E B2 30 29 A7 51 55 |.(140)).(N.0).QU| 00000C00: B2 AB 31 3A 8E 00 18 14 52 03 8B 41 24 B3 B1 C7 |..1:....R..A$...| 00000C10: 28 31 33 29 A7 38 38 30 00 3A 14 5C 03 42 47 B2 |(13).880.:.\.BG.| 00000C20: C5 28 42 24 29 3A 8B A8 28 28 42 47 B2 30 29 B0 |.(B$):..((BG.0).| 00000C30: 28 42 47 B1 42 54 29 29 A7 8E 00 5A 14 66 03 99 |(BG.BT))...Z.f..| 00000C40: 3A 99 22 91 1D 1D 1D 1D 20 20 20 20 20 20 20 20 |:."..... | 00000C50: 20 20 20 20 22 3A 89 37 36 30 00 95 14 70 03 8B | ":.760...p..| 00000C60: 28 41 24 B3 22 3A 22 29 AF 28 41 24 B1 22 2F 22 |(A$.":").(A$."/"| 00000C70: 29 AF 28 4E B3 31 31 29 A7 42 24 B2 42 24 AA 41 |).(N.11).B$.B$.A| 00000C80: 24 3A 4E B2 4E AA 31 3A 99 41 24 22 B9 9D 22 3B |$:N.N.1:.A$"..";| 00000C90: 3A 89 38 31 30 00 C7 14 7A 03 8B 28 41 24 B2 C7 |:.810...z..(A$..| 00000CA0: 28 32 30 29 29 AF 28 4E B1 30 29 A7 4E B2 4E AB |(20)).(N.0).N.N.| 00000CB0: 31 3A 99 22 9D 9D B9 9D 22 3B 3A 42 24 B2 CA 28 |1:."....";:B$..(| 00000CC0: 42 24 2C 31 2C 4E 29 00 D0 14 84 03 89 38 31 30 |B$,1,N)......810| 00000CD0: 00 E9 14 8E 03 99 22 57 4F 52 4B 49 4E 47 22 3A |......"WORKING":| 00000CE0: 8D 37 31 30 3A 8D 37 32 30 00 0C 15 98 03 99 22 |.710:.720......"| 00000CF0: 13 11 22 3B 3A 81 58 B2 31 A4 37 3A 99 43 44 24 |..";:.X.1.7:.CD$| 00000D00: 28 4C 59 28 58 2C 58 29 29 3B 3A 82 00 36 15 A2 |(LY(X,X));:..6..| 00000D10: 03 99 3A 99 22 11 11 11 11 11 11 11 11 11 11 1D |..:."...........| 00000D20: 1D 1D 1D 1D 1D 22 43 44 24 28 53 54 28 53 50 29 |....."CD$(ST(SP)| 00000D30: 29 3A 89 37 36 30 00 55 15 AC 03 99 22 13 90 11 |):.760.U...."...| 00000D40: 11 22 44 4E 24 A3 31 39 29 54 54 22 9D 20 22 3A |."DN$.19)TT". ":| 00000D50: 8B 4E 42 A7 8E 00 63 15 B6 03 99 A3 31 39 29 42 |.NB...c.....19)B| 00000D60: 47 3A 8E 00 71 15 C0 03 8B A8 47 4D A7 31 30 31 |G:..q.....GM.101| 00000D70: 30 00 9F 15 CA 03 41 4D B2 AB 31 3A 4D 32 B2 AB |0.....AM..1:M2..| 00000D80: 31 3A 8B 4D 31 B1 30 A7 4D 55 B2 30 3A 81 5A B2 |1:.M1.0.MU.0:.Z.| 00000D90: 31 A4 37 3A 4D 31 B2 5A 3A 8D 33 35 30 3A 82 00 |1.7:M1.Z:.350:..| 00000DA0: AD 15 D4 03 4D 31 B2 30 3A 8D 33 35 30 00 BF 15 |....M1.0:.350...| 00000DB0: DE 03 8B 4D 55 A7 4D 31 B2 31 3A 89 39 37 30 00 |...MU.M1.1:.970.| 00000DC0: CE 15 E8 03 41 4D B2 30 3A 8B 47 57 A7 8E 00 03 |....AM.0:.GW....| 00000DD0: 16 F2 03 99 22 13 90 22 44 4E 24 22 11 11 11 11 |....".."DN$"....| 00000DE0: 1D 1D 1D 1D 1D 20 20 20 20 20 1D 1D 1D 1D 20 20 |..... .... | 00000DF0: 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | .............| 00000E00: 9D 22 3B 00 17 16 FC 03 A1 41 24 3A 8B 41 24 B2 |.";......A$:.A$.| 00000E10: 22 22 A7 31 30 32 30 00 4C 16 06 04 8B 28 41 24 |"".1020.L....(A$| 00000E20: B1 22 30 22 29 AF 28 41 24 B3 22 38 22 29 A7 4D |."0").(A$."8").M| 00000E30: 31 B2 C5 28 41 24 29 3A 99 41 24 22 1D 1D 1D 1D |1..(A$):.A$"....| 00000E40: 1D 1D 1D 1D 22 3B 3A 89 31 30 39 30 00 63 16 10 |....";:.1090.c..| 00000E50: 04 8B 41 24 B2 C7 28 31 33 37 29 A7 45 44 B2 AB |..A$..(137).ED..| 00000E60: 31 3A 8E 00 80 16 1A 04 8B 41 24 B2 22 44 22 A7 |1:.......A$."D".| 00000E70: 4D 31 B2 AB 31 3A 99 22 44 45 43 4B 22 3B 3A 8E |M1..1:."DECK";:.| 00000E80: 00 A5 16 24 04 8B 41 24 B2 22 53 22 A7 4D 31 B2 |...$..A$."S".M1.| 00000E90: 30 3A 99 22 53 54 41 43 4B 1D 1D 1D 1D 22 3B 3A |0:."STACK....";:| 00000EA0: 89 31 30 39 30 00 BC 16 2E 04 8B 41 24 B2 C7 28 |.1090......A$..(| 00000EB0: 31 34 30 29 A7 51 55 B2 AB 31 3A 8E 00 C6 16 38 |140).QU..1:....8| 00000EC0: 04 89 31 30 32 30 00 DA 16 42 04 A1 41 24 3A 8B |..1020...B..A$:.| 00000ED0: 41 24 B2 22 22 A7 31 30 39 30 00 01 17 4C 04 8B |A$."".1090...L..| 00000EE0: 28 41 24 B1 22 30 22 29 AF 28 41 24 B3 22 38 22 |(A$."0").(A$."8"| 00000EF0: 29 A7 4D 32 B2 C5 28 41 24 29 3A 99 41 24 3B 3A |).M2..(A$):.A$;:| 00000F00: 8E 00 29 17 56 04 8B 28 41 24 B2 22 50 22 29 B0 |..).V..(A$."P").| 00000F10: 28 41 24 B2 22 46 22 29 A7 4D 32 B2 AB 31 3A 99 |(A$."F").M2..1:.| 00000F20: 22 50 49 4C 45 22 3B 3A 8E 00 33 17 60 04 89 31 |"PILE";:..3.`..1| 00000F30: 30 31 30 00 57 17 7E 04 99 22 13 22 C8 28 44 4E |010.W.~..".".(DN| 00000F40: 24 2C 54 50 28 43 29 29 C8 28 4F 56 24 2C 43 AC |$,TP(C)).(OV$,C.| 00000F50: 34 AB 34 29 3B 3A 8E 00 87 17 88 04 54 54 B2 54 |4.4);:......TT.T| 00000F60: 54 AA 37 34 30 AC 42 47 3A 99 22 93 11 11 11 1D |T.740.BG:.".....| 00000F70: 1D 1D 1D 1D 1D 1D 1D 1D 1D 59 4F 55 20 57 4F 4E |.........YOU WON| 00000F80: 21 22 3A 89 31 33 30 00 B9 17 92 04 53 50 B2 53 |!":.130.....SP.S| 00000F90: 50 AB 31 3A 8B 53 50 B2 30 AF 44 50 B1 30 A7 53 |P.1:.SP.0.DP.0.S| 00000FA0: 50 B2 31 3A 53 54 28 53 50 29 B2 44 4B 28 44 50 |P.1:ST(SP).DK(DP| 00000FB0: 29 3A 44 50 B2 44 50 AB 31 00 C4 17 9C 04 8D 37 |):DP.DP.1......7| 00000FC0: 34 30 3A 8E 00 E3 17 A6 04 85 22 93 90 11 1D 45 |40:......."....E| 00000FD0: 4E 54 45 52 20 59 4F 55 52 20 4E 41 4D 45 20 22 |NTER YOUR NAME "| 00000FE0: 3B 4E 24 00 0D 18 B0 04 46 24 B2 22 40 30 3A 22 |;N$.....F$."@0:"| 00000FF0: AA 4E 24 AA 22 2E 4D 4F 4E 45 59 2C 53 2C 22 3A |.N$.".MONEY,S,":| 00001000: 9F 32 2C 38 2C 32 2C 46 24 AA 22 52 22 00 1A 18 |.2,8,2,F$."R"...| 00001010: BA 04 84 32 2C 54 54 3A A0 32 00 2C 18 C4 04 9F |...2,TT:.2.,....| 00001020: 32 2C 38 2C 32 2C 46 24 AA 22 57 22 00 3A 18 CE |2,8,2,F$."W".:..| 00001030: 04 98 32 2C 30 3A A0 32 3A 8E 00 55 18 D8 04 9F |..2,0:.2:..U....| 00001040: 32 2C 38 2C 32 2C 46 24 AA 22 57 22 3A 98 32 2C |2,8,2,F$."W":.2,| 00001050: 54 54 3A A0 32 00 6A 18 E2 04 99 22 93 90 11 1D |TT:.2.j...."....| 00001060: 47 4F 44 42 59 45 2E 2E 2E 22 00 70 18 EC 04 80 |GODBYE...".p....| 00001070: 00 8F 18 D0 07 81 20 58 B2 38 32 38 A4 38 38 35 |...... X.828.885| 00001080: 3A 87 41 3A 97 58 2C 41 3A 82 3A 9E 38 32 38 00 |:.A:.X,A:.:.828.| 00001090: BD 18 DA 07 81 58 B2 30 A4 31 36 3A 42 B2 31 34 |.....X.0.16:B.14| 000010A0: 38 34 38 AA 58 AC 38 3A 43 B2 31 35 31 30 34 AA |848.X.8:C.15104.| 000010B0: 58 AC 38 3A 81 59 B2 32 A4 37 3A 87 41 00 D4 18 |X.8:.Y.2.7:.A...| 000010C0: E4 07 97 42 AA 59 2C 41 3A 8B 58 B1 31 32 A7 41 |...B.Y,A:.X.12.A| 000010D0: B2 41 AD 32 00 EB 18 EE 07 97 43 AA 59 AB 31 AA |.A.2......C.Y.1.| 000010E0: 28 58 B1 31 32 29 2C 41 3A 82 59 00 17 19 F8 07 |(X.12),A:.Y.....| 000010F0: 97 42 2C 32 35 35 3A 97 43 AA 37 2C 32 35 35 3A |.B,255:.C.7,255:| 00001100: 97 42 AA 31 2C 30 3A 97 43 AB 36 AC 28 58 B1 31 |.B.1,0:.C.6.(X.1| 00001110: 32 29 2C 30 3A 82 58 00 34 19 02 08 81 58 B2 31 |2),0:.X.4....X.1| 00001120: 34 39 38 34 A4 31 35 30 33 31 3A 87 41 3A 97 58 |4984.15031:.A:.X| 00001130: 2C 41 3A 82 00 51 19 0C 08 81 58 B2 31 35 33 32 |,A:..Q....X.1532| 00001140: 30 A4 31 35 33 33 35 3A 87 41 3A 97 58 2C 41 3A |0.15335:.A:.X,A:| 00001150: 82 00 57 19 16 08 8E 00 94 19 20 08 83 31 36 39 |..W....... ..169| 00001160: 2C 30 2C 31 34 31 2C 31 34 2C 32 32 30 2C 31 36 |,0,141,14,220,16| 00001170: 39 2C 35 31 2C 31 33 33 2C 31 2C 31 36 39 2C 30 |9,51,133,1,169,0| 00001180: 2C 31 33 33 2C 32 35 31 2C 31 33 33 2C 32 35 33 |,133,251,133,253| 00001190: 2C 31 36 39 00 C6 19 2A 08 83 32 30 38 2C 31 33 |,169...*..208,13| 000011A0: 33 2C 32 35 32 2C 31 36 39 2C 35 36 2C 31 33 33 |3,252,169,56,133| 000011B0: 2C 32 35 34 2C 31 36 30 2C 30 2C 31 37 37 2C 32 |,254,160,0,177,2| 000011C0: 35 31 2C 31 34 35 00 09 1A 34 08 83 32 35 33 2C |51,145...4..253,| 000011D0: 32 33 30 2C 32 35 31 2C 32 33 30 2C 32 35 33 2C |230,251,230,253,| 000011E0: 32 30 38 2C 32 34 36 2C 31 36 35 2C 32 35 32 2C |208,246,165,252,| 000011F0: 32 30 31 2C 32 31 35 2C 32 34 30 2C 37 2C 32 33 |201,215,240,7,23| 00001200: 30 2C 32 35 32 2C 32 33 30 00 3D 1A 3E 08 83 32 |0,252,230.=.>..2| 00001210: 35 34 2C 37 36 2C 38 35 2C 33 2C 31 36 39 2C 35 |54,76,85,3,169,5| 00001220: 35 2C 31 33 33 2C 31 2C 31 36 39 2C 31 32 39 2C |5,133,1,169,129,| 00001230: 31 34 31 2C 31 34 2C 32 32 30 2C 39 36 00 57 1A |141,14,220,96.W.| 00001240: 48 08 83 20 32 34 2C 36 30 2C 31 30 32 2C 31 32 |H.. 24,60,102,12| 00001250: 36 2C 31 30 32 2C 30 00 70 1A 52 08 83 20 36 30 |6,102,0.p.R.. 60| 00001260: 2C 31 30 32 2C 31 32 2C 34 38 2C 31 32 36 2C 30 |,102,12,48,126,0| 00001270: 00 89 1A 5C 08 83 20 36 30 2C 31 30 32 2C 31 32 |...\.. 60,102,12| 00001280: 2C 31 30 32 2C 36 30 2C 30 00 A1 1A 66 08 83 20 |,102,60,0...f.. | 00001290: 31 30 32 2C 31 30 32 2C 31 32 36 2C 36 2C 36 2C |102,102,126,6,6,| 000012A0: 30 00 BA 1A 70 08 83 20 31 32 36 2C 39 36 2C 31 |0...p.. 126,96,1| 000012B0: 32 34 2C 36 2C 31 32 34 2C 30 00 D3 1A 7A 08 83 |24,6,124,0...z..| 000012C0: 20 36 30 2C 39 36 2C 31 32 34 2C 31 30 32 2C 36 | 60,96,124,102,6| 000012D0: 30 2C 30 00 EA 1A 84 08 83 20 31 32 36 2C 36 2C |0,0...... 126,6,| 000012E0: 31 32 2C 32 34 2C 32 34 2C 30 00 03 1B 8E 08 83 |12,24,24,0......| 000012F0: 20 36 30 2C 31 30 32 2C 36 30 2C 31 30 32 2C 36 | 60,102,60,102,6| 00001300: 30 2C 30 00 1A 1B 98 08 83 20 36 30 2C 31 30 32 |0,0...... 60,102| 00001310: 2C 36 32 2C 36 2C 36 30 2C 30 00 32 1B A2 08 83 |,62,6,60,0.2....| 00001320: 20 31 32 36 2C 32 34 2C 32 34 2C 32 34 2C 32 34 | 126,24,24,24,24| 00001330: 2C 30 00 4A 1B AC 08 83 20 33 30 2C 31 32 2C 31 |,0.J.... 30,12,1| 00001340: 32 2C 31 30 38 2C 35 36 2C 30 00 63 1B B6 08 83 |2,108,56,0.c....| 00001350: 20 36 30 2C 31 30 32 2C 31 30 32 2C 36 30 2C 31 | 60,102,102,60,1| 00001360: 34 2C 30 00 7F 1B C0 08 83 20 31 30 32 2C 31 30 |4,0...... 102,10| 00001370: 38 2C 31 32 30 2C 31 30 38 2C 31 30 32 2C 30 00 |8,120,108,102,0.| 00001380: 9B 1B CA 08 83 20 31 30 38 2C 32 35 34 2C 32 35 |..... 108,254,25| 00001390: 34 2C 31 32 34 2C 35 36 2C 31 36 00 B6 1B D4 08 |4,124,56,16.....| 000013A0: 83 20 31 36 2C 35 36 2C 31 32 34 2C 32 35 34 2C |. 16,56,124,254,| 000013B0: 35 36 2C 31 32 34 00 D0 1B DE 08 83 20 32 34 2C |56,124...... 24,| 000013C0: 36 30 2C 31 32 36 2C 31 32 36 2C 36 30 2C 32 34 |60,126,126,60,24| 000013D0: 00 EB 1B E8 08 83 20 35 36 2C 35 36 2C 32 35 34 |...... 56,56,254| 000013E0: 2C 32 35 34 2C 35 36 2C 31 32 34 00 0F 1C F2 08 |,254,56,124.....| 000013F0: 83 20 32 35 35 2C 35 31 2C 31 30 32 2C 32 30 34 |. 255,51,102,204| 00001400: 2C 31 35 33 2C 35 31 2C 31 30 32 2C 32 30 34 00 |,153,51,102,204.| 00001410: 33 1C FC 08 83 20 32 35 35 2C 32 30 34 2C 31 30 |3.... 255,204,10| 00001420: 32 2C 35 31 2C 31 35 33 2C 32 30 34 2C 31 30 32 |2,51,153,204,102| 00001430: 2C 35 31 00 49 1C 06 09 83 20 30 2C 33 2C 33 2C |,51.I.... 0,3,3,| 00001440: 33 2C 33 2C 33 2C 33 2C 33 00 6D 1C 10 09 83 20 |3,3,3,3,3.m.... | 00001450: 30 2C 31 39 32 2C 31 39 32 2C 31 39 32 2C 31 39 |0,192,192,192,19| 00001460: 32 2C 31 39 32 2C 31 39 32 2C 31 39 32 00 83 1C |2,192,192,192...| 00001470: 1A 09 83 20 33 2C 33 2C 33 2C 33 2C 33 2C 33 2C |... 3,3,3,3,3,3,| 00001480: 33 2C 30 00 A7 1C 24 09 83 20 31 39 32 2C 31 39 |3,0...$.. 192,19| 00001490: 32 2C 31 39 32 2C 31 39 32 2C 31 39 32 2C 31 39 |2,192,192,192,19| 000014A0: 32 2C 31 39 32 2C 30 00 CB 1C 2E 09 83 20 32 30 |2,192,0...... 20| 000014B0: 34 2C 31 30 32 2C 35 31 2C 31 35 33 2C 32 30 34 |4,102,51,153,204| 000014C0: 2C 31 30 32 2C 35 31 2C 32 35 35 00 EF 1C 38 09 |,102,51,255...8.| 000014D0: 83 20 35 31 2C 31 30 32 2C 32 30 34 2C 31 35 33 |. 51,102,204,153| 000014E0: 2C 35 31 2C 31 30 32 2C 32 30 34 2C 32 35 35 00 |,51,102,204,255.| 000014F0: 00 00 |.. |
..M.... * KLONDIKE * FROM COMPUTE'S
GAZETTE 1986-05.S.
....Q.... * ORIGINAL 64 VERSION *.W.....
.....".":.53280,5:.53281,5:.B(14850)..24
..2000.....DN$."....................":OV
$.".............................". ...BK
$.".SQRT.....U..V":BL$." ..... ":.
53272,31.H.(.B2$."
"...2.. CD$(52):C$(0).".":C$(1)."
.":C$(2).".":C$(3).".":CD$(0).BL$...<..X
.0.3:.Y.1.13.Q.F.CD$(X.13.Y).C$(X)."S".G
(95.Y).G(109.X)."T.....U"...K.CD$(X.13.Y
).CD$(X.13.Y).G(173.X).G(159.Y)."V"...P.
.Y,X.F.Z..DK(52),ST(24),LY(7,20),UC(7),T
P(7):.X.1.52:DK(X).X:..^.D...R(Z)..(52..
(Z)).1...N...SU(X)..(X.13.1).1:..VL(X).X
.13.(.SU(X).1)...X...SC(X).(X.2..(X.2)):
.1190...}..TT..0.TT.500.T...BT..((TT.51)
.52)......710:.720.#....".. #1 #2 #3
#4 #5 #6 #7......P.ILE...............
..".L. ..OV$".F2.-END GAME":.OV$".F8.-QU
IT."......".D.ECK .S.TACK TOTAL":."..
..............BET"......"FROM TO";
......"......"OV$".HEARTS...........SPAD
ES...........DIAMONDS.............";...H
.."CLUBS":NB..1:.940:NB.0.6.R..X.1.7:.".
"H(DN$,X)H(OV$,X.4.4);:.Y.X.7:.Y.X.230.H
....BK$".";:.240.^....CD$(LY(X,X))".";.H
....Y:.X......"."OV$".";:.X.1.4:.BK$"...
....";:.:.......740......760:.QU.1240.Y.
...".....":.X.1.5:.B2$:.:TT.TT.52.BG:.94
0..."..***MAIN LOOP...,.GW.0:GM..1:M1.1.
..6.ED.0:.960:.ED..".":.125.(.@..QU.1240
.5.J..GW.1160.H.T.GM.0:.350:.310.W.^..M1
..1.380.C.H..DP.0.....R.SP.SP.1:ST(SP).D
K(DP):DP.DP.1:."."DN$"..";:.740:GM..1:..
..|..M1.0.C1.ST(SP):C3.C1:.400.....C1.LY
(M1,UC(M1).1):C3.LY(M1,TP(M1))......M2..
1.600......C3.0...+...S3..SU(C3):V3..VL(
C3):.V3.1..PL(S3)...8.....AM.510.\...BM.
0:.X.1.4:..SC(X)..SC(S3).460.R.B..V3.PL(
X).2.BM..1...L..:.(M1.0).(V3.3).500...V.
.X.1.7:C4.LY(X,UC(X).1):V4..VL(C4):.V4..
V3.1.490.......SC(S3)...SC(.SU(C4)).BM..
1............BM........M1.0.570.+...C.M1
:.1150:.TP(M1).1..BL$:TP(M1).0:.580.L...
.TP(M1).1..BL$:TP(M1).0:.560.....TP(M1).
TP(M1).1:.BL$"......"CD$(LY(M1,TP(M1)));
...&..TP(M1).UC(M1).UC(M1).UC(M1).1...0.
.580...:..1170...D.."."OV$H(DN$,S3.4.3)C
D$(C3):PL(S3).V3:TT.TT.5.BG:MU..1.'.N..9
40:TQ.0:.Q.1.4:TQ.TQ.PL(Q):.:GW.(TQ.52):
GM..1:..\.X.C2.LY(M2,TP(M2)):S1..SC(.SU(
C1)):S2..SC(.SU(C2))...B.V1..VL(C1):V2..
VL(C2):.(V1.13).(V2.0).630...L..(S1.S2).
(V1.1..V2).....V..M1.0.650.Y....1170:LY(
M2,TP(M2).1).C1:NC.1:.690.....NC.TP(M1).
UC(M1):C.M1:."."H(DN$,UC(C).1)H(OV$,C.4.
4);.M....X.1.NC:.BL$"....";:LY(M2,TP(M2)
.X).LY(M1,UC(M1).X):..Z...TP(M1).UC(M1):
UC(M1).UC(M1).1.(UC(M1).0)......TP(M1).0
..1150:.CD$(LY(M1,TP(M1)));.....C.M2:.11
50:.".";:.X.1.NC:.CD$(LY(M2,TP(M2).X))".
...";:......TP(M2).TP(M2).NC:GM..1:..6.F
..X.1.52:A..R(0):S.DK(A):DK(A).DK(X):DK(
X).S:.:DP.52:..W.P..X.1.7:.Y.X.7:LY(Y,X)
.DK(DP):DP.DP.1:.Y:TP(X).X:UC(X).X.1:.X.
..Z.ST(1).DK(DP):DP.DP.1:SP.1:.X.1.4:PL(
X).0:.:..J...."."DN$"."BK$"..."CD$(ST(SP
))......"."DP". ";.6)SP". ";:......."...
......... PLEASE ENTER YOUR BET".)...."
MAXIMUM BET =."BT.K....". PRESS .F1. TO
BET IT ALL".L...." PRESS .F7. TO RE-SHUF
FLE"... .." -> ..........";:N.0:B
G.0:B$.""...*..A$:.A$."".810.K.4..(A$.G(
133)).(N.0).BG.BT:....>..(A$.G(136)).(N.
0).910...H..(A$.G(140)).(N.0).QU..1:....
R..A$..G(13).880.:.\.BG.E(B$):..((BG.0).
(BG.BT))...Z.F..:."..... ":.7
60...P..(A$.":").(A$."/").(N.11).B$.B$.A
$:N.N.1:.A$"..";:.810.G.Z..(A$.G(20)).(N
.0).N.N.1:."....";:B$.J(B$,1,N).P....810
......"WORKING":.710:.720......"..";:.X.
1.7:.CD$(LY(X,X));:..6....:."...........
....."CD$(ST(SP)):.760.U...."...."DN$.19
)TT". ":.NB...C.....19)BG:..Q.....GM.101
0...J.AM..1:M2..1:.M1.0.MU.0:.Z.1.7:M1.Z
:.350:....T.M1.0:.350......MU.M1.1:.970.
N...AM.0:.GW........".."DN$".........
.... ..............";......A$:.A$.
"".1020.L....(A$."0").(A$."8").M1.E(A$):
.A$"........";:.1090.C....A$.G(137).ED..
1:.......A$."D".M1..1:."DECK";:....$..A$
."S".M1.0:."STACK....";:.1090......A$.G(
140).QU..1:..F.8..1020.Z.B..A$:.A$."".10
90...L..(A$."0").(A$."8").M2.E(A$):.A$;:
..).V..(A$."P").(A$."F").M2..1:."PILE";:
..3.`..1010.W.~.."."H(DN$,TP(C))H(OV$,C.
4.4);:......TT.TT.740.BG:.".............
.YOU WON!":.130.....SP.SP.1:.SP.0.DP.0.S
P.1:ST(SP).DK(DP):DP.DP.1.D....740:.....
.."....ENTER YOUR NAME ";N$.....F$."@0:"
.N$.".MONEY,S,":.2,8,2,F$."R"......2,TT:
2.,.D..2,8,2,F$."W".:.N..2,0: 2:..U.X..
2,8,2,F$."W":.2,TT: 2.J...."....GODBYE..
.".P.......P.. X.828.885:.A:.X,A:.:.828.
..Z..X.0.16:B.14848.X.8:C.15104.X.8:.Y.2
.7:.A.T....B.Y,A:.X.12.A.A.2......C.Y.1.
(X.12),A:.Y......B,255:.C.7,255:.B.1,0:.
C.6.(X.12),0:.X.4....X.14984.15031:.A:.X
,A:..Q....X.15320.15335:.A:.X,A:..W.....
.. ..169,0,141,14,220,169,51,133,1,169,0
,133,251,133,253,169.F.*..208,133,252,16
9,56,133,254,160,0,177,251,145...4..253,
230,251,230,253,208,246,165,252,201,215,
240,7,230,252,230.=.>..254,76,85,3,169,5
5,133,1,169,129,141,14,220,96.W.H.. 24,6
0,102,126,102,0.P.R.. 60,102,12,48,126,0
...\.. 60,102,12,102,60,0...F.. 102,102,
126,6,6,0...P.. 126,96,124,6,124,0.S.Z..
60,96,124,102,60,0...... 126,6,12,24,24
,0...... 60,102,60,102,60,0...... 60,102
,62,6,60,0.2.... 126,24,24,24,24,0.J....
30,12,12,108,56,0.C.... 60,102,102,60,1
4,0..... 102,108,120,108,102,0...J.. 10
8,254,254,124,56,16...T.. 16,56,124,254,
56,124.P.... 24,60,126,126,60,24...... 5
6,56,254,254,56,124...... 255,51,102,204
,153,51,102,204.3.... 255,204,102,51,153
,204,102,51.I.... 0,3,3,3,3,3,3,3.M....
0,192,192,192,192,192,192,192...... 3,3,
3,3,3,3,3,0...$.. 192,192,192,192,192,19
2,192,0.K.... 204,102,51,153,204,102,51,
255...8.. 51,102,204,153,51,102,204,255.
..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL