POKER
FILE INFORMATION
FILENAME(S): POKER
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-11-30 21:13:02
APPEARS ON: 1 disk(s)
FILE HASH
85d9c2aaffca33b3aa75fb5a0c70261b15b643d3dd22abb55c4fe725f2b4a791
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MASTER 6440 | POKER | PRG | DuncanTwain | 21 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 00 00 8F 00 1F 08 01 00 8F 20 43 4F |............. CO|
00000010: 55 52 42 4F 49 53 20 53 4F 46 54 57 41 52 45 00 |URBOIS SOFTWARE.|
00000020: 2F 08 02 00 8F 20 42 45 55 4E 49 4E 47 45 4E 00 |/.... BEUNINGEN.|
00000030: 35 08 03 00 8F 00 4A 08 04 00 8F 20 50 4F 4B 45 |5.....J.... POKE|
00000040: 52 20 46 45 42 20 31 39 38 35 00 50 08 05 00 8F |R FEB 1985.P....|
00000050: 00 5B 08 08 00 8D 36 33 30 30 30 00 83 08 09 00 |.[....63000.....|
00000060: 97 35 33 32 38 30 2C 32 3A 97 35 33 32 38 31 2C |.53280,2:.53281,|
00000070: 32 3A 99 22 93 9E 22 C7 28 31 34 32 29 C7 28 38 |2:."..".(142).(8|
00000080: 29 3A 9C 00 91 08 0A 00 43 52 24 B2 C7 28 31 33 |):......CR$..(13|
00000090: 29 00 C7 08 64 00 86 20 44 53 28 34 29 2C 41 25 |)...d.. DS(4),A%|
000000A0: 28 35 31 29 2C 42 25 28 34 2C 33 29 2C 48 25 28 |(51),B%(4,3),H%(|
000000B0: 31 33 29 2C 44 25 28 31 2C 31 29 2C 4F 25 28 38 |13),D%(1,1),O%(8|
000000C0: 29 2C 4F 24 28 38 29 00 EC 08 6E 00 86 41 24 28 |),O$(8)...n..A$(|
000000D0: 31 33 29 2C 43 25 28 31 30 2C 37 29 2C 53 24 28 |13),C%(10,7),S$(|
000000E0: 32 2C 33 29 2C 46 24 28 33 2C 37 29 00 1E 09 78 |2,3),F$(3,7)...x|
000000F0: 00 42 4C 24 B2 22 20 20 20 20 20 20 20 20 20 20 |.BL$." |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 41 | ".A|
00000120: 09 82 00 42 24 B2 22 13 11 11 11 11 11 11 11 11 |...B$.".........|
00000130: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000140: 22 00 60 09 8C 00 4D 44 24 B2 C8 28 42 24 2C 31 |".`...MD$..(B$,1|
00000150: 34 29 3A 43 B2 35 32 3A 49 B2 BB 28 AB 54 49 29 |4):C.52:I..(.TI)|
00000160: 00 7D 09 96 00 81 49 B2 31 A4 31 33 3A 87 41 24 |.}....I.1.13:.A$|
00000170: 28 49 29 3A 48 25 28 49 29 B2 30 3A 82 00 9D 09 |(I):H%(I).0:....|
00000180: 9B 00 83 41 2C 32 2C 33 2C 34 2C 35 2C 36 2C 37 |...A,2,3,4,5,6,7|
00000190: 2C 38 2C 39 2C 31 30 2C 4A 2C 51 2C 4B 00 B7 09 |,8,9,10,J,Q,K...|
000001A0: A0 00 81 49 B2 30 A4 38 3A 87 4F 25 28 49 29 2C |...I.0.8:.O%(I),|
000001B0: 4F 24 28 49 29 3A 82 00 F9 09 A5 00 83 30 2C 4E |O$(I):.......0,N|
000001C0: 4F 20 50 41 49 52 2C 31 2C 4F 4E 45 20 50 41 49 |O PAIR,1,ONE PAI|
000001D0: 52 2C 33 2C 54 57 4F 20 50 41 49 52 2C 35 2C 54 |R,3,TWO PAIR,5,T|
000001E0: 48 52 45 45 20 4F 46 20 41 20 4B 49 4E 44 2C 37 |HREE OF A KIND,7|
000001F0: 2C 53 54 52 41 49 47 48 54 00 39 0A AA 00 83 31 |,STRAIGHT.9....1|
00000200: 30 2C 46 4C 55 53 48 2C 32 30 2C 46 55 4C 4C 20 |0,FLUSH,20,FULL |
00000210: 48 4F 55 53 45 2C 33 30 2C 46 4F 55 52 20 4F 46 |HOUSE,30,FOUR OF|
00000220: 20 41 20 4B 49 4E 44 2C 35 30 2C 53 54 52 41 49 | A KIND,50,STRAI|
00000230: 47 48 54 20 46 4C 55 53 48 00 5A 0A B4 00 81 49 |GHT FLUSH.Z....I|
00000240: B2 31 A4 31 30 3A 81 4A B2 31 A4 37 3A 87 43 25 |.1.10:.J.1.7:.C%|
00000250: 28 49 2C 4A 29 3A 82 4A 2C 49 00 A5 0A B9 00 83 |(I,J):.J,I......|
00000260: 30 2C 30 2C 30 2C 31 2C 30 2C 30 2C 30 2C 31 2C |0,0,0,1,0,0,0,1,|
00000270: 30 2C 30 2C 30 2C 30 2C 30 2C 31 2C 31 2C 30 2C |0,0,0,0,0,1,1,0,|
00000280: 30 2C 31 2C 30 2C 30 2C 31 2C 32 2C 30 2C 30 2C |0,1,0,0,1,2,0,0,|
00000290: 30 2C 30 2C 30 2C 32 2C 32 2C 30 2C 30 2C 31 2C |0,0,0,2,2,0,0,1,|
000002A0: 30 2C 30 2C 32 00 F0 0A BE 00 83 32 2C 30 2C 30 |0,0,2......2,0,0|
000002B0: 2C 32 2C 30 2C 30 2C 32 2C 32 2C 30 2C 31 2C 30 |,2,0,0,2,2,0,1,0|
000002C0: 2C 32 2C 30 2C 32 2C 32 2C 30 2C 32 2C 30 2C 32 |,2,0,2,2,0,2,0,2|
000002D0: 2C 30 2C 32 2C 32 2C 30 2C 32 2C 31 2C 32 2C 30 |,0,2,2,0,2,1,2,0|
000002E0: 2C 32 2C 32 2C 31 2C 32 2C 30 2C 32 2C 31 2C 32 |,2,2,1,2,0,2,1,2|
000002F0: 00 10 0B C8 00 81 49 B2 31 A4 33 3A 81 4A B2 31 |......I.1.3:.J.1|
00000300: A4 37 3A 87 46 24 28 49 2C 4A 29 3A 82 4A 2C 49 |.7:.F$(I,J):.J,I|
00000310: 00 54 0B CD 00 83 22 DF 92 20 12 A9 20 20 22 2C |.T....".. .. ",|
00000320: 22 20 92 BC 12 A7 BA 20 12 20 20 22 2C 22 20 A1 |" ..... . "," .|
00000330: 92 A9 12 A9 92 DF 12 20 20 22 2C 22 20 A6 A9 D6 |....... "," ...|
00000340: 92 A9 12 A6 20 22 2C 22 20 20 DF 92 A9 12 A9 92 |.... "," ......|
00000350: A1 12 20 22 00 98 0B D2 00 83 22 20 20 A7 D0 20 |.. "......" .. |
00000360: 92 BB 12 20 22 2C 22 20 20 92 A9 20 DF 22 2C 22 |... "," .. .","|
00000370: A9 D0 20 20 20 22 2C 22 20 92 A9 12 C2 AA 20 20 |.. "," ..... |
00000380: 20 22 2C 22 20 92 20 20 20 20 12 BB 20 22 2C 22 | "," . .. ","|
00000390: 20 A6 D6 D6 D6 A6 20 22 00 DC 0B D7 00 83 22 20 | ..... "......" |
000003A0: BC 92 20 20 20 20 12 20 22 2C 22 20 20 20 B4 DD |.. . "," ..|
000003B0: A9 20 22 2C 22 20 20 20 CC 92 A9 22 2C 22 DF 92 |. "," ...","..|
000003C0: 20 20 12 A9 20 22 2C 22 20 20 A7 20 A6 C2 20 22 | .. "," . .. "|
000003D0: 2C 22 20 92 A9 20 20 20 BC 12 20 22 00 0A 0C DC |," .. .. "....|
000003E0: 00 83 22 20 A6 BF BF BF A6 20 22 2C 22 20 92 BB |.." ..... "," ..|
000003F0: 20 20 20 12 A9 20 22 2C 22 20 DD A6 20 A5 20 20 | .. "," .. . |
00000400: 22 2C 22 20 92 A9 20 20 DF 22 00 20 0C F0 00 81 |"," .. .". ....|
00000410: 49 B2 30 A4 35 31 3A 41 25 28 49 29 B2 49 3A 82 |I.0.51:A%(I).I:.|
00000420: 00 41 0C FA 00 81 49 B2 30 A4 34 3A 81 4A B2 31 |.A....I.0.4:.J.1|
00000430: A4 33 3A 42 25 28 49 2C 4A 29 B2 30 3A 82 4A 2C |.3:B%(I,J).0:.J,|
00000440: 49 00 62 0C 04 01 81 49 B2 30 A4 31 3A 81 4A B2 |I.b....I.0.1:.J.|
00000450: 30 A4 31 3A 44 25 28 49 2C 4A 29 B2 30 3A 82 4A |0.1:D%(I,J).0:.J|
00000460: 2C 49 00 9E 0C 0E 01 53 24 B2 22 20 20 20 D8 20 |,I.....S$." . |
00000470: 20 20 DA 20 20 20 D3 20 20 20 C1 20 20 20 22 3A | . . . ":|
00000480: 54 24 B2 22 20 D8 20 20 20 D8 20 DA 20 20 20 DA |T$." . . . .|
00000490: 20 D3 20 20 20 D3 20 C1 20 20 20 C1 20 22 00 D3 | . . . . "..|
000004A0: 0C 18 01 81 49 B2 30 A4 33 3A 53 24 28 30 2C 49 |....I.0.3:S$(0,I|
000004B0: 29 B2 22 20 20 20 20 20 20 20 22 3A 53 24 28 31 |)." ":S$(1|
000004C0: 2C 49 29 B2 CA 28 53 24 2C 49 AC 34 AA 31 2C 37 |,I)..(S$,I.4.1,7|
000004D0: 29 3A 82 00 F6 0C 22 01 81 49 B2 30 A4 33 3A 53 |):...."..I.0.3:S|
000004E0: 24 28 32 2C 49 29 B2 CA 28 54 24 2C 49 AC 36 AA |$(2,I)..(T$,I.6.|
000004F0: 31 2C 37 29 3A 82 00 32 0D 2C 01 42 41 B2 31 30 |1,7):..2.,.BA.10|
00000500: 30 30 3A 42 45 B2 30 3A 4F 48 B2 30 3A 48 4C B2 |00:BE.0:OH.0:HL.|
00000510: 30 3A 48 B2 30 3A 44 B2 30 3A 4A B2 30 3A 4B B2 |0:H.0:D.0:J.0:K.|
00000520: 30 3A 4C B2 30 3A 4D B2 30 3A 4E B2 30 3A 4F 42 |0:L.0:M.0:N.0:OB|
00000530: B2 30 00 4E 0D 31 01 53 54 25 B2 30 3A 46 4C 25 |.0.N.1.ST%.0:FL%|
00000540: B2 30 3A 53 46 25 B2 30 3A 41 46 25 B2 30 00 58 |.0:SF%.0:AF%.0.X|
00000550: 0D 68 01 8D 31 32 35 30 00 5E 0D 77 01 8F 00 6D |.h..1250.^.w...m|
00000560: 0D 7C 01 8B 42 41 B2 30 A7 31 37 30 30 00 7E 0D |.|..BA.0.1700.~.|
00000570: 81 01 81 49 B2 31 A4 31 30 30 30 3A 82 49 00 8E |...I.1.1000:.I..|
00000580: 0D 86 01 42 45 B2 4F 42 3A 8D 31 34 35 30 00 AB |...BE.OB:.1450..|
00000590: 0D 90 01 99 22 05 4A 4F 55 57 20 49 4E 5A 45 54 |....".JOUW INZET|
000005A0: 3F 20 22 3B 3A 8D 36 30 30 30 30 00 D0 0D 95 01 |? ";:.60000.....|
000005B0: 8B C8 28 49 4E 24 2C 31 29 B2 22 51 22 A7 52 4B |..(IN$,1)."Q".RK|
000005C0: B2 48 3A 8D 31 33 34 30 3A 8D 31 33 30 30 3A 80 |.H:.1340:.1300:.|
000005D0: 00 E6 0D 9A 01 8B 49 4E 24 B2 22 22 A7 49 4E 24 |......IN$."".IN$|
000005E0: B2 C4 28 42 45 29 00 F8 0D A4 01 8B C5 28 49 4E |..(BE).......(IN|
000005F0: 24 29 B2 30 A7 33 39 30 00 09 0E AE 01 42 45 B2 |$).0.390.....BE.|
00000600: B5 28 C5 28 49 4E 24 29 29 00 2E 0E AF 01 8B 42 |.(.(IN$))......B|
00000610: 45 B3 31 A7 99 22 44 41 54 20 4B 55 4E 20 4A 45 |E.1.."DAT KUN JE|
00000620: 20 4E 49 45 54 20 21 22 3A 89 20 33 38 35 00 5B | NIET !":. 385.[|
00000630: 0E B0 01 8B 42 45 B1 42 41 A7 99 22 5A 4F 56 45 |....BE.BA.."ZOVE|
00000640: 45 4C 20 47 45 4C 44 20 48 45 42 20 4A 45 20 4E |EL GELD HEB JE N|
00000650: 49 45 54 2E 22 3A 89 20 33 38 35 00 84 0E B1 01 |IET.":. 385.....|
00000660: 8B 42 45 B1 31 30 30 30 30 A7 99 22 4D 41 58 49 |.BE.10000.."MAXI|
00000670: 4D 55 4D 20 49 53 20 24 31 30 30 30 30 2E 22 3A |MUM IS $10000.":|
00000680: 89 33 38 35 00 9F 0E B8 01 99 22 9E 22 3B 3A 52 |.385......".";:R|
00000690: 4B B2 48 3A 8D 31 33 34 30 3A 8D 31 34 39 30 00 |K.H:.1340:.1490.|
000006A0: B8 0E C2 01 42 41 B2 42 41 AB 42 45 3A 8D 31 34 |....BA.BA.BE:.14|
000006B0: 32 30 3A 8D 31 33 30 30 00 CB 0E CC 01 99 4D 44 |20:.1300......MD|
000006C0: 24 22 11 11 22 3B 3A 8D 35 34 30 00 D9 0E D6 01 |$"..";:.540.....|
000006D0: 4F 48 B2 30 3A 8D 36 30 30 00 E2 0E E0 01 8D 39 |OH.0:.600......9|
000006E0: 39 30 00 F1 0E EA 01 8D 31 34 35 30 3A 89 33 38 |90......1450:.38|
000006F0: 30 00 08 0F FE 01 99 4D 44 24 3B 22 11 12 53 43 |0......MD$;"..SC|
00000700: 48 55 44 44 45 4E 13 22 00 47 0F 08 02 81 49 B2 |HUDDEN.".G....I.|
00000710: 30 A4 35 31 3A 4A B2 B5 28 28 35 32 AB 49 29 AC |0.51:J..((52.I).|
00000720: BB 28 31 29 29 3A 4B B2 41 25 28 4A 29 3A 41 25 |.(1)):K.A%(J):A%|
00000730: 28 4A 29 B2 41 25 28 35 31 AB 49 29 3A 41 25 28 |(J).A%(51.I):A%(|
00000740: 35 31 AB 49 29 B2 4B 00 5B 0F 12 02 82 49 3A 99 |51.I).K.[....I:.|
00000750: 4D 44 24 3B 22 11 11 22 3B 3A 8E 00 6E 0F 1C 02 |MD$;"..";:..n...|
00000760: 8B 43 B1 34 34 A7 43 B2 30 3A 8D 35 31 30 00 84 |.C.44.C.0:.510..|
00000770: 0F 26 02 81 49 B2 31 A4 31 33 3A 48 25 28 49 29 |.&..I.1.13:H%(I)|
00000780: B2 30 3A 82 00 8F 0F 30 02 81 4E B2 30 A4 34 00 |.0:....0..N.0.4.|
00000790: AD 0F 3A 02 42 25 28 4E 2C 31 29 B2 41 25 28 43 |..:.B%(N,1).A%(C|
000007A0: 29 3A 43 B2 43 AA 31 3A 8D 31 35 35 30 00 D3 0F |):C.C.1:.1550...|
000007B0: 44 02 42 25 28 4E 2C 32 29 B2 4B 3A 42 25 28 4E |D.B%(N,2).K:B%(N|
000007C0: 2C 33 29 B2 49 3A 48 25 28 49 29 B2 48 25 28 49 |,3).I:H%(I).H%(I|
000007D0: 29 AA 31 00 DC 0F 4E 02 82 4E 3A 8E 00 F8 0F 58 |).1...N..N:....X|
000007E0: 02 53 54 25 B2 30 3A 46 4C 25 B2 30 3A 41 46 25 |.ST%.0:FL%.0:AF%|
000007F0: B2 30 3A 53 46 25 B2 30 00 24 10 62 02 81 49 B2 |.0:SF%.0.$.b..I.|
00000800: 31 A4 34 3A 8B 42 25 28 49 2C 32 29 B3 B1 42 25 |1.4:.B%(I,2)..B%|
00000810: 28 30 2C 32 29 A7 49 B2 34 3A 46 4C 25 B2 30 3A |(0,2).I.4:FL%.0:|
00000820: 89 36 33 30 00 2E 10 6C 02 46 4C 25 B2 31 00 35 |.630...l.FL%.1.5|
00000830: 10 76 02 82 49 00 4C 10 80 02 4A B2 30 3A 8B 48 |.v..I.L...J.0:.H|
00000840: 25 28 31 29 B2 31 A7 41 46 25 B2 31 00 68 10 8A |%(1).1.AF%.1.h..|
00000850: 02 81 49 B2 31 A4 39 3A 8B 48 25 28 49 29 B2 31 |..I.1.9:.H%(I).1|
00000860: A7 4A B2 49 3A 49 B2 39 00 6F 10 94 02 82 49 00 |.J.I:I.9.o....I.|
00000870: 77 10 9E 02 4B B2 34 00 A0 10 A8 02 81 49 B2 4A |w...K.4......I.J|
00000880: AA 31 A4 4A AA 4B 3A 8B 48 25 28 49 29 B2 30 A7 |.1.J.K:.H%(I).0.|
00000890: 49 B2 4A AA 4B 3A 53 54 25 B2 30 3A 89 37 30 30 |I.J.K:ST%.0:.700|
000008A0: 00 AA 10 B2 02 53 54 25 B2 31 00 B1 10 BC 02 82 |.....ST%.1......|
000008B0: 49 00 DD 10 C6 02 8B 41 46 25 B2 31 AF 53 54 25 |I......AF%.1.ST%|
000008C0: B2 30 AF 48 25 28 31 30 29 B2 31 AF 4B B2 34 A7 |.0.H%(10).1.K.4.|
000008D0: 4A B2 31 30 3A 4B B2 33 3A 89 36 38 30 00 FD 10 |J.10:K.3:.680...|
000008E0: D0 02 81 49 B2 31 A4 31 33 3A 8B 48 25 28 49 29 |...I.1.13:.H%(I)|
000008F0: B1 31 A7 53 54 25 B2 30 3A 49 B2 31 33 00 04 11 |.1.ST%.0:I.13...|
00000900: DA 02 82 49 00 17 11 E4 02 8B 53 54 25 AF 4B B2 |...I......ST%.K.|
00000910: 34 A7 4B B2 4A AA 34 00 28 11 EE 02 8B 53 54 25 |4.K.J.4.(....ST%|
00000920: AF 4B B2 33 A7 4B B2 31 00 3B 11 F8 02 8B 53 54 |.K.3.K.1.;....ST|
00000930: 25 AF 46 4C 25 A7 53 46 25 B2 31 00 4D 11 02 03 |%.FL%.SF%.1.M...|
00000940: 8B 53 46 25 A7 48 B2 38 3A 89 39 34 30 00 5F 11 |.SF%.H.8:.940._.|
00000950: 0C 03 8B 53 54 25 A7 48 B2 34 3A 89 39 34 30 00 |...ST%.H.4:.940.|
00000960: 71 11 16 03 8B 46 4C 25 A7 48 B2 35 3A 89 39 34 |q....FL%.H.5:.94|
00000970: 30 00 92 11 20 03 81 49 B2 30 A4 31 3A 81 4A B2 |0... ..I.0.1:.J.|
00000980: 30 A4 31 3A 44 25 28 49 2C 4A 29 B2 30 3A 82 4A |0.1:D%(I,J).0:.J|
00000990: 2C 49 00 AF 11 2A 03 4A B2 30 3A 81 49 B2 31 A4 |,I...*.J.0:.I.1.|
000009A0: 31 33 3A 8B 48 25 28 49 29 B3 32 A7 38 34 30 00 |13:.H%(I).2.840.|
000009B0: D1 11 34 03 44 25 28 4A 2C 30 29 B2 48 25 28 49 |..4.D%(J,0).H%(I|
000009C0: 29 3A 44 25 28 4A 2C 31 29 B2 49 3A 4A B2 4A AA |):D%(J,1).I:J.J.|
000009D0: 31 00 DF 11 3E 03 8B 4A B2 32 A7 49 B2 31 33 00 |1...>..J.2.I.13.|
000009E0: E6 11 48 03 82 49 00 F8 11 52 03 8B 4A B2 30 A7 |..H..I...R..J.0.|
000009F0: 48 B2 30 3A 89 39 34 30 00 05 12 5C 03 8B 4A B2 |H.0:.940...\..J.|
00000A00: 31 A7 39 30 30 00 2C 12 66 03 81 49 B2 30 A4 31 |1.900.,.f..I.0.1|
00000A10: 3A 8B 44 25 28 49 2C 30 29 B2 33 A7 48 B2 36 3A |:.D%(I,0).3.H.6:|
00000A20: 4B B2 49 3A 49 B2 31 3A 89 38 39 30 00 34 12 70 |K.I:I.1:.890.4.p|
00000A30: 03 48 B2 32 00 40 12 7A 03 82 49 3A 89 39 34 30 |.H.2.@.z..I:.940|
00000A40: 00 67 12 84 03 81 49 B2 30 A4 31 3A 8B 44 25 28 |.g....I.0.1:.D%(|
00000A50: 49 2C 30 29 B2 34 A7 48 B2 37 3A 4B B2 49 3A 49 |I,0).4.H.7:K.I:I|
00000A60: B2 31 3A 89 39 33 30 00 83 12 8E 03 8B 44 25 28 |.1:.930......D%(|
00000A70: 49 2C 30 29 B2 33 A7 48 B2 33 3A 49 B2 31 3A 89 |I,0).3.H.3:I.1:.|
00000A80: 39 33 30 00 8B 12 98 03 48 B2 31 00 92 12 A2 03 |930.....H.1.....|
00000A90: 82 49 00 9C 12 AC 03 8D 31 34 35 30 00 A8 12 B6 |.I......1450....|
00000AA0: 03 8B 4F 48 B2 48 A7 8E 00 BF 12 C0 03 52 56 24 |..OH.H.......RV$|
00000AB0: B2 22 12 22 3A 52 4B B2 48 3A 8D 31 33 34 30 00 |.".":RK.H:.1340.|
00000AC0: CF 12 CA 03 52 4B B2 4F 48 3A 8D 31 33 34 30 00 |....RK.OH:.1340.|
00000AD0: D5 12 D4 03 8E 00 EB 12 DE 03 81 49 B2 31 A4 31 |...........I.1.1|
00000AE0: 33 3A 48 25 28 49 29 B2 30 3A 82 00 11 13 E8 03 |3:H%(I).0:......|
00000AF0: 81 49 B2 30 A4 34 3A 44 53 28 49 29 B2 30 3A 82 |.I.0.4:DS(I).0:.|
00000B00: 49 3A 44 24 B2 22 22 3A 5A 43 B2 31 3A 5A 54 B2 |I:D$."":ZC.1:ZT.|
00000B10: 30 00 34 13 F2 03 99 4D 44 24 22 9F 57 45 4C 4B |0.4....MD$".WELK|
00000B20: 45 20 57 45 47 47 4F 4F 49 45 4E 2D 22 44 24 22 |E WEGGOOIEN-"D$"|
00000B30: 20 9D 22 3B 00 4F 13 FC 03 A1 5A 24 3A 8B 5A 24 | .";.O....Z$:.Z$|
00000B40: B3 B1 22 22 A7 99 22 20 22 3A 89 31 30 35 30 00 |.."".." ":.1050.|
00000B50: 7E 13 06 04 8B 54 49 B1 5A 54 A7 99 CA 28 22 D6 |~....TI.ZT...(".|
00000B60: 20 22 2C 5A 43 2C 31 29 3B 22 9D 22 3B 3A 5A 43 | ",ZC,1);".";:ZC|
00000B70: B2 33 AB 5A 43 3A 5A 54 B2 54 49 AA 31 35 00 88 |.3.ZC:ZT.TI.15..|
00000B80: 13 10 04 89 31 30 32 30 00 9B 13 1A 04 8B C6 28 |....1020.......(|
00000B90: 5A 24 29 B2 31 33 A7 31 31 35 30 00 B6 13 24 04 |Z$).13.1150...$.|
00000BA0: 8B C6 28 5A 24 29 B2 32 30 AF C3 28 44 24 29 B1 |..(Z$).20..(D$).|
00000BB0: 30 A7 31 31 31 30 00 D6 13 2E 04 8B 5A 24 B3 22 |0.1110......Z$."|
00000BC0: 31 22 B0 5A 24 B1 22 35 22 B0 C3 28 44 24 29 B1 |1".Z$."5"..(D$).|
00000BD0: 32 A7 31 30 31 30 00 F0 13 38 04 5A B2 C5 28 5A |2.1010...8.Z..(Z|
00000BE0: 24 29 AB 31 3A 8B 44 53 28 5A 29 A7 31 30 31 30 |$).1:.DS(Z).1010|
00000BF0: 00 05 14 42 04 44 24 B2 44 24 AA 5A 24 3A 44 53 |...B.D$.D$.Z$:DS|
00000C00: 28 5A 29 B2 31 00 2A 14 4C 04 99 4D 44 24 3B 22 |(Z).1.*.L..MD$;"|
00000C10: 11 11 22 3B A3 5A AC 38 29 22 90 20 57 20 45 20 |..";.Z.8)". W E |
00000C20: 47 20 05 22 3A 89 31 30 31 30 00 50 14 56 04 5A |G .":.1010.P.V.Z|
00000C30: 24 B2 C9 28 44 24 2C 31 29 3A 5A B2 C5 28 5A 24 |$..(D$,1):Z..(Z$|
00000C40: 29 AB 31 3A 44 53 28 5A 29 B2 30 3A 99 22 20 22 |).1:DS(Z).0:." "|
00000C50: 00 6D 14 60 04 99 4D 44 24 3B 22 11 11 22 3B A3 |.m.`..MD$;"..";.|
00000C60: 5A AC 38 29 22 20 20 20 20 20 20 20 22 00 91 14 |Z.8)" "...|
00000C70: 6A 04 8B C3 28 44 24 29 B1 31 A7 44 24 B2 C8 28 |j...(D$).1.D$..(|
00000C80: 44 24 2C C3 28 44 24 29 AB 31 29 3A 89 31 30 31 |D$,.(D$).1):.101|
00000C90: 30 00 9B 14 74 04 89 31 30 30 30 00 B9 14 7E 04 |0...t..1000...~.|
00000CA0: 99 22 05 22 3B 3A 8D 31 34 35 30 3A 8B C3 28 44 |.".";:.1450:..(D|
00000CB0: 24 29 B2 30 A7 31 32 33 30 00 C9 14 88 04 99 4D |$).0.1230......M|
00000CC0: 44 24 3B 22 11 11 11 22 3B 00 E2 14 92 04 81 4E |D$;"...";......N|
00000CD0: B2 30 A4 34 3A 8B 44 53 28 4E 29 B2 30 A7 31 32 |.0.4:.DS(N).0.12|
00000CE0: 30 30 00 00 15 9C 04 42 25 28 4E 2C 31 29 B2 41 |00.....B%(N,1).A|
00000CF0: 25 28 43 29 3A 43 B2 43 AA 31 3A 8D 31 35 35 30 |%(C):C.C.1:.1550|
00000D00: 00 18 15 A6 04 42 25 28 4E 2C 32 29 B2 4B 3A 42 |.....B%(N,2).K:B|
00000D10: 25 28 4E 2C 33 29 B2 49 00 1F 15 B0 04 82 4E 00 |%(N,3).I......N.|
00000D20: 47 15 BA 04 81 49 B2 30 A4 34 3A 48 25 28 42 25 |G....I.0.4:H%(B%|
00000D30: 28 49 2C 33 29 29 B2 48 25 28 42 25 28 49 2C 33 |(I,3)).H%(B%(I,3|
00000D40: 29 29 AA 31 3A 82 49 00 55 15 C4 04 4F 48 B2 48 |)).1:.I.U...OH.H|
00000D50: 3A 8D 36 30 30 00 70 15 CE 04 42 41 B2 42 41 AA |:.600.p...BA.BA.|
00000D60: 42 45 AC 28 4F 25 28 48 29 29 3A 8D 31 34 32 30 |BE.(O%(H)):.1420|
00000D70: 00 76 15 D8 04 8E 00 85 15 E2 04 99 22 93 22 3A |.v..........".":|
00000D80: 8D 31 34 32 30 00 A1 15 EC 04 54 24 B2 22 C3 C3 |.1420.....T$."..|
00000D90: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000DA0: C3 00 CB 15 F6 04 99 22 11 20 20 20 20 22 A3 32 |.......". ".2|
00000DB0: 31 29 22 4B 41 4E 53 22 A3 33 32 29 22 57 49 4E |1)"KANS".32)"WIN|
00000DC0: 53 54 22 3A 99 54 24 54 24 22 C3 00 E4 15 00 05 |ST":.T$T$"......|
00000DD0: 81 52 4B B2 38 A4 31 A9 AB 31 3A 8D 31 33 34 30 |.RK.8.1..1:.1340|
00000DE0: 3A 82 52 4B 00 F3 15 0A 05 99 54 24 54 24 22 C3 |:.RK......T$T$".|
00000DF0: 22 3A 8E 00 FD 15 14 05 99 4D 44 24 3B 00 12 16 |":.......MD$;...|
00000E00: 1E 05 81 49 B2 31 34 A4 32 34 3A 99 42 4C 24 3A |...I.14.24:.BL$:|
00000E10: 82 49 00 23 16 28 05 99 42 4C 24 3B 4D 44 24 3B |.I.#.(..BL$;MD$;|
00000E20: 22 91 22 00 29 16 32 05 8E 00 3D 16 3C 05 8B 52 |".".).2...=.<..R|
00000E30: 4B B3 31 B0 52 4B B1 38 A7 31 34 31 30 00 53 16 |K.1.RK.8.1410.S.|
00000E40: 46 05 99 C8 28 42 24 2C 31 33 AB 52 4B 29 3B 52 |F...(B$,13.RK);R|
00000E50: 56 24 3B 00 81 16 50 05 5A 24 B2 4F 24 28 52 4B |V$;...P.Z$.O$(RK|
00000E60: 29 3A 5A 24 B2 5A 24 AA C9 28 42 4C 24 AA C4 28 |):Z$.Z$..(BL$..(|
00000E70: 4F 25 28 52 4B 29 29 2C 32 30 AB C3 28 5A 24 29 |O%(RK)),20..(Z$)|
00000E80: 29 00 97 16 5A 05 99 22 9E 22 3B 5A 24 3B 22 20 |)...Z..".";Z$;" |
00000E90: 2D 2D 2D 20 31 22 3B 00 B4 16 64 05 5A 24 B2 22 |--- 1";...d.Z$."|
00000EA0: 24 22 AA CA 28 C4 28 42 45 AC 4F 25 28 52 4B 29 |$"..(.(BE.O%(RK)|
00000EB0: 29 2C 32 29 00 C7 16 6E 05 8B 5A 24 B2 22 24 30 |),2)...n..Z$."$0|
00000EC0: 22 A7 5A 24 B2 22 22 00 D9 16 78 05 99 C9 28 42 |".Z$.""...x...(B|
00000ED0: 4C 24 AA 5A 24 2C 31 32 29 00 E6 16 82 05 52 56 |L$.Z$,12).....RV|
00000EE0: 24 B2 22 22 3A 8E 00 09 17 8C 05 99 22 13 9E 47 |$."":......."..G|
00000EF0: 45 4C 44 3A 20 24 22 3B CA 28 C4 28 42 41 29 AA |ELD: $";.(.(BA).|
00000F00: 42 4C 24 2C 32 2C 31 33 29 00 2F 17 96 05 99 A3 |BL$,2,13)./.....|
00000F10: 32 30 29 3B 22 91 42 4F 44 3A 20 24 22 3B CA 28 |20);".BOD: $";.(|
00000F20: C4 28 42 45 29 AA 42 4C 24 2C 32 2C 31 33 29 00 |.(BE).BL$,2,13).|
00000F30: 35 17 A0 05 8E 00 3F 17 AA 05 99 4D 44 24 3B 00 |5.....?....MD$;.|
00000F40: 4D 17 B4 05 99 42 4C 24 3A 99 42 4C 24 00 5E 17 |M....BL$:.BL$.^.|
00000F50: BE 05 99 42 4C 24 3B 4D 44 24 3B 22 91 22 00 64 |...BL$;MD$;".".d|
00000F60: 17 C8 05 8E 00 74 17 D2 05 8B 4F 42 B2 42 45 A7 |.....t....OB.BE.|
00000F70: 31 35 34 30 00 83 17 DC 05 81 52 4B B2 38 A4 31 |1540......RK.8.1|
00000F80: A9 AB 31 00 95 17 E6 05 99 C8 28 42 24 2C 31 33 |..1.......(B$,13|
00000F90: AB 52 4B 29 3B 00 A6 17 F0 05 99 A3 32 36 29 3B |.RK);.......26);|
00000FA0: 3A 8D 31 33 38 30 00 AE 17 FA 05 82 52 4B 00 BA |:.1380......RK..|
00000FB0: 17 04 06 4F 42 B2 42 45 3A 8E 00 02 18 0E 06 99 |...OB.BE:.......|
00000FC0: 22 05 22 3B 3A 20 20 20 20 4B B2 B5 28 42 25 28 |".";: K..(B%(|
00000FD0: 4E 2C 31 29 AD 31 33 29 3A 49 B2 42 25 28 4E 2C |N,1).13):I.B%(N,|
00000FE0: 31 29 AB 31 33 AC 4B AA 31 3A 53 24 B2 CA 28 22 |1).13.K.1:S$..("|
00000FF0: D8 DA D3 C1 22 2C 4B AA 31 2C 31 29 3A 4C B2 38 |....",K.1,1):L.8|
00001000: AC 4E 00 28 18 18 06 99 4D 44 24 3B 22 11 11 11 |.N.(....MD$;"...|
00001010: 22 3B A3 4C 29 3B 22 12 22 3B C8 28 41 24 28 49 |";.L);".";.(A$(I|
00001020: 29 AA 42 4C 24 2C 37 29 00 5B 18 22 06 8B 49 B3 |).BL$,7).[."..I.|
00001030: B2 31 30 A7 81 4A B2 31 A4 37 3A 99 A3 4C 29 3B |.10..J.1.7:..L);|
00001040: 22 12 22 3B 53 24 28 43 25 28 49 2C 4A 29 2C 4B |".";S$(C%(I,J),K|
00001050: 29 3A 82 20 4A 3A 89 31 36 33 30 00 71 18 2C 06 |):. J:.1630.q.,.|
00001060: 81 4A B2 31 A4 37 3A 99 20 A3 4C 29 3B 22 12 22 |.J.1.7:. .L);"."|
00001070: 3B 00 85 18 36 06 8B 20 4A B2 31 A7 20 99 22 20 |;...6.. J.1. ." |
00001080: 22 3B 53 24 3B 00 97 18 40 06 99 20 46 24 28 49 |";S$;...@.. F$(I|
00001090: AB 31 30 2C 4A 29 3B 00 AD 18 4A 06 8B 4A B2 37 |.10,J);...J..J.7|
000010A0: A7 99 22 12 22 3B 53 24 3B 22 20 22 3B 00 B7 18 |..".";S$;" ";...|
000010B0: 54 06 99 3A 82 20 4A 00 D8 18 5E 06 99 20 A3 4C |T..:. J...^.. .L|
000010C0: 29 3B 22 12 22 3B C9 28 42 4C 24 AA 41 24 28 49 |);".";.(BL$.A$(I|
000010D0: 29 2C 37 29 3B 22 13 22 00 DE 18 68 06 8E 00 FA |),7);"."...h....|
000010E0: 18 A4 06 8D 31 33 30 30 3A 99 22 12 4A 49 4A 20 |....1300:.".JIJ |
000010F0: 42 45 4E 54 20 42 4C 55 54 21 00 1E 19 AE 06 99 |BENT BLUT!......|
00001100: 22 11 4E 4F 47 20 45 45 4E 20 53 50 45 4C 20 3F |".NOG EEN SPEL ?|
00001110: 3F 3F 3F 3F 20 22 3B 3A 8D 36 30 30 30 30 00 35 |???? ";:.60000.5|
00001120: 19 B8 06 8B C8 28 49 4E 24 2C 31 29 B3 B1 22 4E |.....(IN$,1).."N|
00001130: 22 A7 33 30 30 00 3B 19 C2 06 80 00 5C 19 60 EA |".300.;.....\.`.|
00001140: 49 4E 24 B2 22 20 22 3A 5A 54 B2 54 49 3A 5A 43 |IN$." ":ZT.TI:ZC|
00001150: B2 32 3A 5A 44 24 B2 C7 28 32 30 29 00 72 19 6A |.2:ZD$..(20).r.j|
00001160: EA A1 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 36 30 30 |..Z$:.Z$.."".600|
00001170: 37 30 00 A2 19 74 EA 8B 5A 54 B3 B2 54 49 A7 99 |70...t..ZT..TI..|
00001180: CA 28 22 20 A6 22 2C 5A 43 2C 31 29 3B 22 9D 22 |.(" .",ZC,1);"."|
00001190: 3B 3A 5A 43 B2 33 AB 5A 43 3A 5A 54 B2 54 49 AA |;:ZC.3.ZC:ZT.TI.|
000011A0: 31 35 00 AD 19 7E EA 89 36 30 30 31 30 00 DD 19 |15...~..60010...|
000011B0: A6 EA 5A B2 C6 28 5A 24 29 3A 5A 4C B2 C3 28 49 |..Z..(Z$):ZL..(I|
000011C0: 4E 24 29 3A 8B 28 5A AF 31 32 37 29 B3 33 32 A7 |N$):.(Z.127).32.|
000011D0: 99 22 20 9D 22 3B 3A 89 36 30 31 31 30 00 0D 1A |." .";:.60110...|
000011E0: B0 EA 8B 46 4C AF 28 5A AF 31 32 37 29 B1 36 34 |...FL.(Z.127).64|
000011F0: AF 28 5A AF 31 32 37 29 B3 39 31 A7 5A 24 B2 C7 |.(Z.127).91.Z$..|
00001200: 28 28 5A AA 31 32 38 29 AF 32 35 35 29 00 1F 1A |((Z.128).255)...|
00001210: BA EA 8B 5A 4C B1 32 35 34 A7 36 30 30 31 30 00 |...ZL.254.60010.|
00001220: 3A 1A C4 EA 49 4E 24 B2 49 4E 24 AA 5A 24 3A 99 |:...IN$.IN$.Z$:.|
00001230: 5A 24 3B 5A 44 24 3B 5A 24 3B 00 59 1A CE EA 8B |Z$;ZD$;Z$;.Y....|
00001240: 5A B2 31 33 A7 49 4E 24 B2 CA 28 49 4E 24 2C 32 |Z.13.IN$..(IN$,2|
00001250: 29 3A 99 43 52 24 3B 3A 8E 00 85 1A D8 EA 8B 5A |):.CR$;:.......Z|
00001260: B2 32 30 AF 5A 4C B1 31 A7 49 4E 24 B2 C8 28 49 |.20.ZL.1.IN$..(I|
00001270: 4E 24 2C 5A 4C AB 31 29 3A 99 22 9D 22 3B 3A 89 |N$,ZL.1):.".";:.|
00001280: 36 30 30 31 30 00 B8 1A E2 EA 8B 5A B2 31 34 31 |60010......Z.141|
00001290: A7 5A 24 B2 C7 28 AB 32 30 AC 28 5A 4C B1 31 29 |.Z$..(.20.(ZL.1)|
000012A0: 29 3A 81 5A B2 32 A4 5A 4C 3A 99 5A 24 3B 3A 82 |):.Z.2.ZL:.Z$;:.|
000012B0: 5A 3A 89 36 30 30 30 30 00 C3 1A EC EA 89 36 30 |Z:.60000......60|
000012C0: 30 31 30 00 D3 1A 28 EB 8B 50 4E B2 30 A7 36 30 |010...(..PN.0.60|
000012D0: 32 35 30 00 DE 1A 2D EB 8D 36 30 35 30 30 00 F9 |250...-..60500..|
000012E0: 1A 32 EB 99 22 50 52 45 53 53 20 12 52 45 54 55 |.2.."PRESS .RETU|
000012F0: 52 4E 92 20 54 4F 20 22 3B 00 16 1B 3C EB 8B 50 |RN. TO ";...<..P|
00001300: 4E B2 4C 50 A7 99 22 42 45 47 49 4E 3A 22 3B 3A |N.LP.."BEGIN:";:|
00001310: 89 36 30 32 34 30 00 28 1B 46 EB 99 22 43 4F 4E |.60240.(.F.."CON|
00001320: 54 49 4E 55 45 3A 22 3B 00 3D 1B 50 EB A1 54 24 |TINUE:";.=.P..T$|
00001330: 3A 8B 54 24 B2 22 22 A7 36 30 32 34 30 00 4E 1B |:.T$."".60240.N.|
00001340: 5A EB 8B 50 4E B2 4C 50 A7 36 30 33 30 30 00 8C |Z..PN.LP.60300..|
00001350: 1B 64 EB 50 4E B2 50 4E AA 31 3A 99 22 93 22 3B |.d.PN.PN.1:.".";|
00001360: 50 47 24 3B 22 20 2D 20 43 55 52 53 4F 52 20 23 |PG$;" - CURSOR #|
00001370: 22 3B 4E 4D 24 3B 22 20 20 28 43 29 20 31 39 38 |";NM$;" (C) 198|
00001380: 30 20 20 20 50 41 47 45 22 3B 50 4E 00 97 1B 69 |0 PAGE";PN...i|
00001390: EB 8D 36 30 35 30 30 00 9D 1B 6E EB 8E 00 C3 1B |..60500...n.....|
000013A0: 18 F6 97 35 33 32 38 30 2C 35 3A 97 35 33 32 38 |...53280,5:.5328|
000013B0: 31 2C 35 3A 99 22 93 05 22 C7 28 31 34 32 29 C7 |1,5:."..".(142).|
000013C0: 28 38 29 00 F3 1B 22 F6 99 22 93 2A 2A 2A 20 43 |(8)..."..".*** C|
000013D0: 4F 4D 4D 4F 44 4F 52 45 20 36 34 20 2A 2A 2A 2A |OMMODORE 64 ****|
000013E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 50 4F 4B 45 52 20 |********* POKER |
000013F0: 2A 2A 2A 00 1E 1C 2C F6 99 22 11 48 45 54 20 42 |***...,..".HET B|
00001400: 45 4B 45 4E 44 45 20 4B 41 41 52 53 50 45 4C 20 |EKENDE KAARSPEL |
00001410: 50 4F 4B 45 52 20 54 45 47 45 4E 20 44 45 00 33 |POKER TEGEN DE.3|
00001420: 1C 36 F6 99 22 11 43 4F 4D 4D 4F 44 4F 52 45 20 |.6..".COMMODORE |
00001430: 36 34 2E 00 5F 1C 40 F6 99 22 11 11 4D 41 58 49 |64.._.@.."..MAXI|
00001440: 4D 41 41 4C 20 4B 55 4E 20 4A 45 20 31 30 30 30 |MAAL KUN JE 1000|
00001450: 30 20 49 4E 5A 45 54 54 45 4E 20 45 4E 20 33 00 |0 INZETTEN EN 3.|
00001460: 8F 1C 4A F6 99 22 11 4B 41 41 52 54 45 4E 20 57 |..J..".KAARTEN W|
00001470: 45 47 47 4F 4F 49 45 4E 2E 20 53 4C 55 49 54 20 |EGGOOIEN. SLUIT |
00001480: 41 4C 4C 45 20 41 4E 54 57 4F 4F 52 44 45 4E 00 |ALLE ANTWOORDEN.|
00001490: AD 1C 54 F6 99 22 41 46 20 4D 45 54 20 44 45 20 |..T.."AF MET DE |
000014A0: 52 45 54 55 52 4E 2D 54 4F 45 54 53 2E 00 DC 1C |RETURN-TOETS....|
000014B0: 5E F6 99 22 11 11 47 4F 4F 49 20 4B 41 41 52 54 |^.."..GOOI KAART|
000014C0: 45 4E 20 57 45 47 20 44 4F 4F 52 20 44 45 20 4E |EN WEG DOOR DE N|
000014D0: 55 4D 4D 45 52 53 20 28 31 2D 35 29 00 09 1D 68 |UMMERS (1-5)...h|
000014E0: F6 99 22 11 49 4E 20 54 45 20 54 49 4B 4B 45 4E |..".IN TE TIKKEN|
000014F0: 2E 20 43 4F 52 52 49 47 45 45 52 20 4D 45 54 20 |. CORRIGEER MET |
00001500: 44 45 20 27 44 45 4C 27 2D 00 17 1D 72 F6 99 22 |DE 'DEL'-...r.."|
00001510: 11 54 4F 45 54 53 2E 00 3A 1D 7C F6 99 22 11 11 |.TOETS..:.|.."..|
00001520: 44 52 55 4B 20 53 50 41 54 49 45 20 56 4F 4F 52 |DRUK SPATIE VOOR|
00001530: 20 42 45 47 49 4E 2E 2E 2E 2E 00 51 1D 86 F6 A1 | BEGIN.....Q....|
00001540: 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 36 33 31 31 |A$:.A$.." ".6311|
00001550: 30 00 57 1D 90 F6 8E 00 00 00 |0.W....... |
............. COURBOIS SOFTWARE./.... BE
UNINGEN.5.....J.... POKER FEB 1985.P....
.[....63000......53280,2:.53281,2:.".."G
(142)G(8):......CR$.G(13).G.D.. DS(4),A%
(51),B%(4,3),H%(13),D%(1,1),O%(8),O$(8).
..N..A$(13),C%(10,7),S$(2,3),F$(3,7)...X
.BL$."
".A...B$.".........................
".`...MD$.H(B$,14):C.52:I..(.TI).}....I.
1.13:.A$(I):H%(I).0:.......A,2,3,4,5,6,7
,8,9,10,J,Q,K... ..I.0.8:.O%(I),O$(I):..
.....0,NO PAIR,1,ONE PAIR,3,TWO PAIR,5,T
HREE OF A KIND,7,STRAIGHT.9....10,FLUSH,
20,FULL HOUSE,30,FOUR OF A KIND,50,STRAI
GHT FLUSH.Z....I.1.10:.J.1.7:.C%(I,J):.J
,I......0,0,0,1,0,0,0,1,0,0,0,0,0,1,1,0,
0,1,0,0,1,2,0,0,0,0,0,2,2,0,0,1,0,0,2...
...2,0,0,2,0,0,2,2,0,1,0,2,0,2,2,0,2,0,2
,0,2,2,0,2,1,2,0,2,2,1,2,0,2,1,2...H..I.
1.3:.J.1.7:.F$(I,J):.J,I.T.M..".. .. ",
" ..... . "," ........ "," ..V.... ","
........ "...R.." .P ... "," .. .","
.P "," ...B. "," . .. "," .VVV. "
...W.." .. . "," ... "," L..","..
.. "," . .B "," .. .. "......" ....
. "," .. .. "," .. . "," .. .". ....
I.0.51:A%(I).I:..A....I.0.4:.J.1.3:B%(I,
J).0:.J,I.B....I.0.1:.J.0.1:D%(I,J).0:.J
,I.....S$." X Z S A ":T$." X
X Z Z S S A A ".S....I.0.3:S$(0,I
)." ":S$(1,I).J(S$,I.4.1,7):....".
.I.0.3:S$(2,I).J(T$,I.6.1,7):..2.,.BA.10
00:BE.0:OH.0:HL.0:H.0:D.0:J.0:K.0:L.0:M.
0:N.0:OB.0.N.1.ST%.0:FL%.0:SF%.0:AF%.0.X
.H..1250.^.W...M.|..BA.0.1700.~....I.1.1
000:.I.....BE.OB:.1450......".JOUW INZET
? ";:.60000.P....H(IN$,1)."Q".RK.H:.1340
:.1300:.......IN$."".IN$.D(BE)......E(IN
$).0.390.....BE..(E(IN$))......BE.1.."DA
T KUN JE NIET !":. 385.[....BE.BA.."ZOVE
EL GELD HEB JE NIET.":. 385......BE.1000
0.."MAXIMUM IS $10000.":.385......".";:R
K.H:.1340:.1490...B.BA.BA.BE:.1420:.1300
.K.L..MD$"..";:.540.Y.V.OH.0:.600......9
90......1450:.380......MD$;"..SCHUDDEN."
.G....I.0.51:J..((52.I)..(1)):K.A%(J):A%
(J).A%(51.I):A%(51.I).K.[....I:.MD$;".."
;:..N....C.44.C.0:.510...&..I.1.13:H%(I)
.0:....0..N.0.4...:.B%(N,1).A%(C):C.C.1:
.1550.S.D.B%(N,2).K:B%(N,3).I:H%(I).H%(I
).1...N..N:....X.ST%.0:FL%.0:AF%.0:SF%.0
.$.B..I.1.4:.B%(I,2)..B%(0,2).I.4:FL%.0:
.630...L.FL%.1.5.V..I.L...J.0:.H%(1).1.A
F%.1.H....I.1.9:.H%(I).1.J.I:I.9.O....I.
W...K.4. ....I.J.1.J.K:.H%(I).0.I.J.K:ST
%.0:.700.....ST%.1......I...F..AF%.1.ST%
.0.H%(10).1.K.4.J.10:K.3:.680...P..I.1.1
3:.H%(I).1.ST%.0:I.13...Z..I......ST%.K.
4.K.J.4.(....ST%.K.3.K.1.;....ST%.FL%.SF
%.1.M....SF%.H.8:.940._....ST%.H.4:.940.
Q....FL%.H.5:.940... ..I.0.1:.J.0.1:D%(I
,J).0:.J,I...*.J.0:.I.1.13:.H%(I).2.840.
Q.4.D%(J,0).H%(I):D%(J,1).I:J.J.1...>..J
.2.I.13...H..I...R..J.0.H.0:.940...\..J.
1.900.,.F..I.0.1:.D%(I,0).3.H.6:K.I:I.1:
.890.4.P.H.2.@.Z..I:.940.G....I.0.1:.D%(
I,0).4.H.7:K.I:I.1:.930......D%(I,0).3.H
.3:I.1:.930.....H.1......I......1450....
..OH.H.......RV$.".":RK.H:.1340.O.J.RK.O
H:.1340.U.T........I.1.13:H%(I).0:......
.I.0.4:DS(I).0:.I:D$."":ZC.1:ZT.0.4....M
D$".WELKE WEGGOOIEN-"D$" .";.O....Z$:.Z$
.."".." ":.1050.~....TI.ZT..J("V ",ZC,1)
;".";:ZC.3.ZC:ZT.TI.15......1020......F(
Z$).13.1150...$..F(Z$).20.C(D$).0.1110.V
....Z$."1".Z$."5".C(D$).2.1010...8.Z.E(Z
$).1:.DS(Z).1010...B.D$.D$.Z$:DS(Z).1.*.
L..MD$;"..";.Z.8)". W E G .":.1010.P.V.Z
$.I(D$,1):Z.E(Z$).1:DS(Z).0:." ".M.`..MD
$;"..";.Z.8)" "...J..C(D$).1.D$.H(
D$,C(D$).1):.1010...T..1000...~..".";:.1
450:.C(D$).0.1230.I....MD$;"...";......N
.0.4:.DS(N).0.1200.....B%(N,1).A%(C):C.C
.1:.1550.....B%(N,2).K:B%(N,3).I......N.
G....I.0.4:H%(B%(I,3)).H%(B%(I,3)).1:.I.
U.D.OH.H:.600.P.N.BA.BA.BE.(O%(H)):.1420
.V.X........".":.1420.....T$."CCCCCCCCCC
CCCCCCCCC.K....". ".21)"KANS".32)"WIN
ST":.T$T$"C......RK.8.1..1:.1340:.RK....
..T$T$"C":.......MD$;......I.14.24:.BL$:
.I.#.(..BL$;MD$;".".).2...=.<..RK.1.RK.8
.1410.S.F..H(B$,13.RK);RV$;...P.Z$.O$(RK
):Z$.Z$.I(BL$.D(O%(RK)),20.C(Z$))...Z.."
.";Z$;" --- 1";...D.Z$."$".J(D(BE.O%(RK)
),2).G.N..Z$."$0".Z$."".Y.X..I(BL$.Z$,12
).....RV$."":......."..GELD: $";J(D(BA).
BL$,2,13)./.....20);".BOD: $";J(D(BE).BL
$,2,13).5. ...?....MD$;.M....BL$:.BL$.^.
...BL$;MD$;".".D.H...T.R..OB.BE.1540....
..RK.8.1..1......H(B$,13.RK);.......26);
:.1380......RK.....OB.BE:.......".";:
K..(B%(N,1).13):I.B%(N,1).13.K.1:S$.J("
XZSA",K.1,1):L.8.N.(....MD$;"...";.L);".
";H(A$(I).BL$,7).[."..I..10..J.1.7:..L);
".";S$(C%(I,J),K):. J:.1630.Q.,..J.1.7:.
.L);".";...6.. J.1. ." ";S$;...@.. F$(I
.10,J);...J..J.7..".";S$;" ";...T..:. J.
X.^.. .L);".";I(BL$.A$(I),7);"."...H....
....1300:.".JIJ BENT BLUT!......".NOG EE
N SPEL ????? ";:.60000.5....H(IN$,1).."N
".300.;.B...\.`.IN$." ":ZT.TI:ZC.2:ZD$.G
(20).R.J..Z$:.Z$.."".60070...T..ZT..TI..
J(" .",ZC,1);".";:ZC.3.ZC:ZT.TI.15...~..
60010.....Z.F(Z$):ZL.C(IN$):.(Z.127).32.
." .";:.60110......FL.(Z.127).64.(Z.127)
.91.Z$.G((Z.128).255)......ZL.254.60010.
:.D.IN$.IN$.Z$:.Z$;ZD$;Z$;.Y.N..Z.13.IN$
.J(IN$,2):.CR$;:....X..Z.20.ZL.1.IN$.H(I
N$,ZL.1):.".";:.60010......Z.141.Z$.G(.2
0.(ZL.1)):.Z.2.ZL:.Z$;:.Z:.60000.C....60
010.S.(..PN.0.60250...-..60500...2.."PRE
SS .RETURN. TO ";...<..PN.LP.."BEGIN:";:
.60240.(.F.."CONTINUE:";.=.P..T$:.T$."".
60240.N.Z..PN.LP.60300...D.PN.PN.1:.".";
PG$;" - CURSOR #";NM$;" (C) 1980 PAGE
";PN...I..60500...N...C....53280,5:.5328
1,5:.".."G(142)G(8)..."..".*** COMMODORE
64 ************* POKER ***...,..".HET B
EKENDE KAARSPEL POKER TEGEN DE.3.6..".CO
MMODORE 64.._.@.."..MAXIMAAL KUN JE 1000
0 INZETTEN EN 3...J..".KAARTEN WEGGOOIEN
. SLUIT ALLE ANTWOORDEN...T.."AF MET DE
RETURN-TOETS....^.."..GOOI KAARTEN WEG D
OOR DE NUMMERS (1-5)...H..".IN TE TIKKEN
. CORRIGEER MET DE 'DEL'-...R..".TOETS..
:.|.."..DRUK SPATIE VOOR BEGIN.....Q....
A$:.A$.." ".63110.W.......
> CLICK IMAGE PREVIEW FOR FULL MODAL