POKER
FILE INFORMATION
FILENAME(S): POKER
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-11-30 21:28:10
APPEARS ON: 1 disk(s)
FILE HASH
3886dfde9fa68d2d9dfd68c065a1f8a36647b5af8259d14abd93ee8e3f8c9987
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RON 64 60 | POKER | PRG | DuncanTwain | 19 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 12 08 01 00 8F 20 44 52 41 57 20 50 4F 4B |....... DRAW POK|
00000010: 45 52 00 3C 08 02 00 99 22 93 11 11 11 11 11 11 |ER.<....".......|
00000020: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 44 52 41 57 |............DRAW|
00000030: 20 50 4F 4B 45 52 20 31 11 11 11 22 00 60 08 03 | POKER 1...".`..|
00000040: 00 99 22 11 11 11 20 20 20 20 20 20 12 4F 4E 45 |.."... .ONE|
00000050: 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 21 22 | MOMENT PLEASE!"|
00000060: 00 86 08 04 00 86 47 31 28 35 29 2C 46 37 28 33 |......G1(5),F7(3|
00000070: 35 29 2C 46 38 28 33 35 29 2C 46 39 28 33 35 29 |5),F8(35),F9(35)|
00000080: 2C 4F 28 31 30 29 00 B7 08 05 00 81 49 B2 31 A4 |,O(10)......I.1.|
00000090: 31 30 3A 87 4F 28 49 29 3A 82 49 3A 83 32 30 30 |10:.O(I):.I:.200|
000000A0: 2C 35 30 2C 33 30 2C 32 30 2C 31 30 2C 37 2C 35 |,50,30,20,10,7,5|
000000B0: 2C 32 2C 31 2C 2D 31 00 E9 08 06 00 86 43 35 28 |,2,1,-1......C5(|
000000C0: 36 29 2C 43 36 28 35 29 2C 43 37 28 35 29 2C 43 |6),C6(5),C7(5),C|
000000D0: 38 28 37 29 3A 46 53 24 B2 22 20 20 20 20 20 20 |8(7):FS$." |
000000E0: 20 20 20 20 20 20 20 20 22 00 F4 08 07 00 4D 24 | ".....M$|
000000F0: B2 22 20 22 00 0F 09 08 00 50 31 B2 31 30 32 34 |." ".....P1.1024|
00000100: 3A 50 32 B2 34 30 3A 56 4B B2 35 35 38 39 35 00 |:P2.40:VK.55895.|
00000110: 17 09 09 00 57 B2 30 00 20 09 0A 00 8D 32 30 36 |....W.0. ....206|
00000120: 00 2A 09 0B 00 99 22 93 22 3B 00 5A 09 0C 00 99 |.*....".";.Z....|
00000130: 22 12 48 41 4E 44 20 20 20 20 20 20 20 20 20 20 |".HAND |
00000140: 20 20 20 20 20 20 4F 44 44 53 20 20 20 20 20 20 | ODDS |
00000150: 20 59 4F 55 20 57 49 4E 20 22 00 7A 09 0D 00 99 | YOU WIN ".z....|
00000160: 22 52 4F 59 41 4C 20 46 4C 55 53 48 3A 20 20 20 |"ROYAL FLUSH: |
00000170: 20 20 32 30 30 20 54 4F 20 31 00 B8 09 0E 00 99 | 200 TO 1......|
00000180: 22 53 54 52 41 49 47 48 54 20 46 4C 55 53 48 3A |"STRAIGHT FLUSH:|
00000190: 20 20 20 35 30 20 54 4F 20 31 22 3A 99 22 46 4F | 50 TO 1":."FO|
000001A0: 55 52 20 4F 46 20 41 20 4B 49 4E 44 3A 20 20 20 |UR OF A KIND: |
000001B0: 33 30 20 54 4F 20 31 22 00 F6 09 0F 00 99 22 46 |30 TO 1"......"F|
000001C0: 55 4C 4C 20 48 4F 55 53 45 3A 20 20 20 20 20 20 |ULL HOUSE: |
000001D0: 20 32 30 20 54 4F 20 31 22 3A 99 22 46 4C 55 53 | 20 TO 1":."FLUS|
000001E0: 48 3A 20 20 20 20 20 20 20 20 20 20 20 20 31 30 |H: 10|
000001F0: 20 54 4F 20 31 22 00 34 0A 10 00 99 22 53 54 52 | TO 1".4...."STR|
00000200: 41 49 47 48 54 3A 20 20 20 20 20 20 20 20 20 20 |AIGHT: |
00000210: 37 20 54 4F 20 31 22 3A 99 22 54 48 52 45 45 20 |7 TO 1":."THREE |
00000220: 4F 46 20 41 20 4B 49 4E 44 3A 20 20 20 35 20 54 |OF A KIND: 5 T|
00000230: 4F 20 31 22 00 55 0A 11 00 99 22 54 57 4F 20 50 |O 1".U...."TWO P|
00000240: 41 49 52 3A 20 20 20 20 20 20 20 20 20 20 32 20 |AIR: 2 |
00000250: 54 4F 20 31 22 00 75 0A 12 00 99 22 50 41 49 52 |TO 1".u...."PAIR|
00000260: 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 |: 1|
00000270: 20 54 4F 20 31 00 83 0A 13 00 8D 31 38 39 3A 8D | TO 1......189:.|
00000280: 33 30 31 00 BC 0A 14 00 99 22 50 4C 41 43 45 20 |301......"PLACE |
00000290: 59 4F 55 52 20 42 45 54 3A 20 24 31 20 54 4F 20 |YOUR BET: $1 TO |
000002A0: 24 31 30 30 30 30 20 24 22 3B 3A 5A 39 B2 36 3A |$10000 $";:Z9.6:|
000002B0: 8D 32 39 32 3A 44 B2 C5 28 5A 24 29 00 E0 0A 15 |.292:D..(Z$)....|
000002C0: 00 91 B5 28 28 44 AA 39 39 39 39 29 AD 31 30 30 |...((D.9999).100|
000002D0: 30 30 29 AA 31 89 32 31 38 2C 32 33 2C 32 32 30 |00).1.218,23,220|
000002E0: 00 E9 0A 16 00 89 32 32 30 00 23 0B 17 00 99 22 |......220.#...."|
000002F0: 13 22 3A 81 53 B2 31 A4 39 3A 5A 24 B2 C4 28 4F |.":.S.1.9:Z$..(O|
00000300: 28 53 29 AC 44 29 3A 99 A6 32 35 29 C8 28 46 53 |(S).D):..25).(FS|
00000310: 24 2C 31 32 AB C3 28 5A 24 29 29 22 24 22 5A 24 |$,12..(Z$))"$"Z$|
00000320: 3A 82 53 00 37 0B 18 00 8B C3 28 43 39 24 29 B3 |:.S.7.....(C9$).|
00000330: 31 32 A7 8D 32 34 33 00 4E 0B 19 00 81 59 B2 31 |12..243.N....Y.1|
00000340: A4 35 3A 8D 32 33 37 3A 8D 37 38 3A 82 59 00 61 |.5:.237:.78:.Y.a|
00000350: 0B 1A 00 8D 32 34 35 3A 53 58 B2 53 3A 8D 31 37 |....245:SX.S:.17|
00000360: 30 00 74 0B 1B 00 A1 51 24 3A 8B 51 24 B3 B1 22 |0.t....Q$:.Q$.."|
00000370: 22 A7 32 37 00 B0 0B 1C 00 99 22 13 11 11 11 11 |".27......".....|
00000380: 11 11 11 11 11 11 11 11 53 45 4C 45 43 54 20 44 |........SELECT D|
00000390: 49 53 43 41 52 44 53 20 42 59 20 4E 55 4D 42 45 |ISCARDS BY NUMBE|
000003A0: 52 2C 20 31 2C 32 2C 33 2C 34 26 2F 4F 52 20 35 |R, 1,2,3,4&/OR 5|
000003B0: 00 E1 0B 1D 00 99 22 91 54 4F 20 43 41 4E 43 45 |......".TO CANCE|
000003C0: 4C 20 50 52 45 53 53 20 43 2E 20 54 4F 20 44 52 |L PRESS C. TO DR|
000003D0: 41 57 20 50 52 45 53 53 20 52 45 54 55 52 4E 2E |AW PRESS RETURN.|
000003E0: 22 00 EC 0B 1E 00 81 49 B2 31 A4 35 00 F8 0B 1F |"......I.1.5....|
000003F0: 00 47 31 28 49 29 B2 31 00 FF 0B 20 00 82 49 00 |.G1(I).1... ..I.|
00000400: 0E 0C 21 00 50 B2 50 31 AA 32 34 AC 50 32 00 17 |..!.P.P1.24.P2..|
00000410: 0C 22 00 8D 32 32 35 00 1F 0C 23 00 A1 51 24 00 |."..225...#..Q$.|
00000420: 2D 0C 24 00 8B 51 24 B2 22 22 89 33 35 00 39 0C |-.$..Q$."".35.9.|
00000430: 25 00 51 B2 C6 28 51 24 29 00 46 0C 26 00 8B 51 |%.Q..(Q$).F.&..Q|
00000440: B2 31 33 89 34 39 00 55 0C 27 00 8B 51 24 B2 22 |.13.49.U.'..Q$."|
00000450: 43 22 89 33 30 00 64 0C 28 00 8B 51 24 B3 22 31 |C".30.d.(..Q$."1|
00000460: 22 89 33 35 00 73 0C 29 00 8B 51 24 B1 22 35 22 |".35.s.)..Q$."5"|
00000470: 89 33 35 00 7F 0C 2A 00 59 B2 C5 28 51 24 29 00 |.35...*.Y..(Q$).|
00000480: 8B 0C 2B 00 47 31 28 59 29 B2 30 00 A2 0C 2C 00 |..+.G1(Y).0...,.|
00000490: 50 B2 50 31 AA 32 34 AC 50 32 AA 38 AC 28 59 AB |P.P1.24.P2.8.(Y.|
000004A0: 31 29 00 B3 0C 2D 00 4D 24 B2 22 44 49 53 43 41 |1)...-.M$."DISCA|
000004B0: 52 44 22 00 BF 0C 2E 00 4C B2 C3 28 4D 24 29 00 |RD".....L..(M$).|
000004C0: C8 0C 2F 00 8D 32 32 36 00 D0 0C 30 00 89 33 35 |../..226...0..35|
000004D0: 00 E4 0C 31 00 50 B2 50 31 AA 31 31 AC 50 32 3A |...1.P.P1.11.P2:|
000004E0: 8D 32 32 35 00 F8 0C 32 00 50 B2 50 31 AA 31 32 |.225...2.P.P1.12|
000004F0: AC 50 32 3A 8D 32 32 35 00 1C 0D 33 00 50 B2 50 |.P2:.225...3.P.P|
00000500: 31 AA 31 33 AC 50 32 3A 8D 32 32 35 3A 50 B2 50 |1.13.P2:.225:P.P|
00000510: 31 AA 32 34 AC 50 32 3A 8D 32 32 35 00 27 0D 34 |1.24.P2:.225.'.4|
00000520: 00 81 59 B2 31 A4 35 00 39 0D 35 00 8B 47 31 28 |..Y.1.5.9.5..G1(|
00000530: 59 29 B2 30 A7 8D 31 35 39 00 40 0D 36 00 82 59 |Y).0..159.@.6..Y|
00000540: 00 49 0D 37 00 8D 32 34 35 00 56 0D 38 00 8B 53 |.I.7..245.V.8..S|
00000550: 58 B2 53 89 35 39 00 5F 0D 39 00 8D 31 37 30 00 |X.S.59._.9..170.|
00000560: 68 0D 3A 00 53 58 B2 53 00 73 0D 3B 00 81 59 B2 |h.:.SX.S.s.;..Y.|
00000570: 31 A4 35 00 83 0D 3C 00 8B 47 31 28 59 29 B2 31 |1.5...<..G1(Y).1|
00000580: 89 36 33 00 8C 0D 3D 00 8D 32 33 37 00 94 0D 3E |.63...=..237...>|
00000590: 00 8D 37 38 00 9B 0D 3F 00 82 59 00 A4 0D 40 00 |..78...?..Y...@.|
000005A0: 8D 32 34 35 00 B1 0D 41 00 8B 53 58 B2 53 89 36 |.245...A..SX.S.6|
000005B0: 39 00 BA 0D 42 00 8D 31 37 30 00 C3 0D 43 00 53 |9...B..170...C.S|
000005C0: 58 B2 53 00 CC 0D 44 00 8D 31 37 30 00 D2 0D 45 |X.S...D..170...E|
000005D0: 00 8F 00 09 0E 46 00 57 B2 57 AA 44 AC 4F 28 31 |.....F.W.W.D.O(1|
000005E0: 30 AB 53 29 3A 4D 24 B2 22 57 49 4E 4E 49 4E 47 |0.S):M$."WINNING|
000005F0: 53 22 3A 8B 4F 28 31 30 AB 53 29 B3 30 A7 4D 24 |S":.O(10.S).0.M$|
00000600: B2 22 4C 4F 53 53 45 53 22 00 46 0E 47 00 4D 24 |."LOSSES".F.G.M$|
00000610: B2 4D 24 AA 22 20 54 48 49 53 20 48 41 4E 44 20 |.M$." THIS HAND |
00000620: 41 52 45 20 24 22 AA C4 28 B6 28 44 AC 4F 28 31 |ARE $"..(.(D.O(1|
00000630: 30 AB 53 29 29 29 3A 50 B2 50 31 AA 31 31 AC 50 |0.S))):P.P1.11.P|
00000640: 32 3A 8D 32 32 35 00 68 0E 48 00 4D 24 B2 22 57 |2:.225.h.H.M$."W|
00000650: 49 4E 4E 49 4E 47 53 22 3A 8B 57 B3 30 A7 4D 24 |INNINGS":.W.0.M$|
00000660: B2 22 4C 4F 53 53 45 53 00 9C 0E 49 00 50 B2 50 |."LOSSES...I.P.P|
00000670: 31 AA 31 32 AC 50 32 3A 4D 24 B2 22 54 4F 54 41 |1.12.P2:M$."TOTA|
00000680: 4C 20 22 AA 4D 24 AA 22 20 41 52 45 20 24 22 AA |L ".M$." ARE $".|
00000690: C4 28 B6 28 57 29 29 3A 8D 32 32 35 00 D1 0E 4A |.(.(W)):.225...J|
000006A0: 00 4D 24 B2 22 50 52 45 53 53 20 52 45 54 55 52 |.M$."PRESS RETUR|
000006B0: 4E 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 2E 2E |N TO CONTINUE...|
000006C0: 22 3A 50 B2 50 31 AA 31 33 AC 50 32 3A 8D 32 32 |":P.P1.13.P2:.22|
000006D0: 35 00 E3 0E 4B 00 A1 47 24 3A 8B 47 24 B2 22 22 |5...K..G$:.G$.""|
000006E0: A7 37 35 00 F5 0E 4C 00 8B C6 28 47 24 29 B3 B1 |.75...L...(G$)..|
000006F0: 31 33 A7 37 35 00 FD 0E 4D 00 89 31 31 00 08 0F |13.75...M..11...|
00000700: 4E 00 48 B2 43 32 AB 37 00 15 0F 4F 00 8B 48 B3 |N.H.C2.7...O..H.|
00000710: 34 A7 48 B2 31 00 20 0F 50 00 81 49 B2 31 A4 37 |4.H.1. .P..I.1.7|
00000720: 00 2C 0F 51 00 43 38 28 49 29 B2 48 00 33 0F 52 |.,.Q.C8(I).H.3.R|
00000730: 00 82 49 00 62 0F 53 00 91 43 32 89 38 34 2C 38 |..I.b.S..C2.84,8|
00000740: 37 2C 38 36 2C 39 37 2C 39 33 2C 39 36 2C 39 35 |7,86,97,93,96,95|
00000750: 2C 39 30 2C 39 32 2C 38 39 2C 39 38 2C 39 38 2C |,90,92,89,98,98,|
00000760: 39 38 00 6E 0F 54 00 43 38 28 34 29 B2 32 00 76 |98.n.T.C8(4).2.v|
00000770: 0F 55 00 89 39 38 00 82 0F 56 00 43 38 28 34 29 |.U..98...V.C8(4)|
00000780: B2 32 00 96 0F 57 00 43 38 28 32 29 B2 32 3A 43 |.2...W.C8(2).2:C|
00000790: 38 28 36 29 B2 32 00 9E 0F 58 00 89 39 38 00 B2 |8(6).2...X..98..|
000007A0: 0F 59 00 43 38 28 32 29 B2 32 3A 43 38 28 36 29 |.Y.C8(2).2:C8(6)|
000007B0: B2 32 00 C6 0F 5A 00 43 38 28 33 29 B2 33 3A 43 |.2...Z.C8(3).3:C|
000007C0: 38 28 35 29 B2 33 00 CE 0F 5B 00 89 39 37 00 E2 |8(5).3...[..97..|
000007D0: 0F 5C 00 43 38 28 33 29 B2 33 3A 43 38 28 35 29 |.\.C8(3).3:C8(5)|
000007E0: B2 33 00 EE 0F 5D 00 43 38 28 34 29 B2 32 00 F6 |.3...].C8(4).2..|
000007F0: 0F 5E 00 89 39 37 00 02 10 5F 00 43 38 28 33 29 |.^..97..._.C8(3)|
00000800: B2 32 00 0E 10 60 00 43 38 28 34 29 B2 33 00 22 |.2...`.C8(4).3."|
00000810: 10 61 00 43 38 28 31 29 B2 33 3A 43 38 28 37 29 |.a.C8(1).3:C8(7)|
00000820: B2 33 00 39 10 62 00 41 B2 50 31 AA 31 35 AC 50 |.3.9.b.A.P1.15.P|
00000830: 32 AA 38 AC 28 59 AB 31 29 00 50 10 63 00 43 33 |2.8.(Y.1).P.c.C3|
00000840: B2 28 C6 28 43 32 24 29 AF 36 33 29 AA 31 32 38 |.(.(C2$).63).128|
00000850: 00 5A 10 64 00 97 41 2C 43 33 00 65 10 65 00 41 |.Z.d..A,C3.e.e.A|
00000860: 31 B2 31 36 30 00 7E 10 66 00 8B 43 32 B2 31 30 |1.160.~.f..C2.10|
00000870: A7 41 31 B2 C6 28 22 30 22 29 AA 31 32 38 00 86 |.A1..("0").128..|
00000880: 10 67 00 45 B2 36 00 8F 10 68 00 8D 31 32 33 00 |.g.E.6...h..123.|
00000890: 9D 10 69 00 43 34 B2 C6 28 43 31 24 29 00 B4 10 |..i.C4..(C1$)...|
000008A0: 6A 00 46 37 28 35 29 B2 43 34 3A 46 37 28 33 31 |j.F7(5).C4:F7(31|
000008B0: 29 B2 43 34 00 CB 10 6B 00 46 38 28 31 29 B2 43 |).C4...k.F8(1).C|
000008C0: 34 3A 46 38 28 33 35 29 B2 43 34 00 E2 10 6C 00 |4:F8(35).C4...l.|
000008D0: 46 39 28 31 29 B2 43 34 3A 46 39 28 33 35 29 B2 |F9(1).C4:F9(35).|
000008E0: 43 34 00 ED 10 6D 00 81 49 B2 31 A4 37 00 F8 10 |C4...m..I.1.7...|
000008F0: 6E 00 41 B2 41 AA 34 30 00 03 11 6F 00 97 41 2C |n.A.A.40...o..A,|
00000900: 31 36 30 00 26 11 70 00 91 43 38 28 49 29 8D 31 |160.&.p..C8(I).1|
00000910: 32 38 2C 31 33 32 2C 31 33 38 2C 31 34 34 2C 31 |28,132,138,144,1|
00000920: 34 39 2C 31 35 34 00 33 11 71 00 97 41 AA 36 2C |49,154.3.q..A.6,|
00000930: 31 36 30 00 3A 11 72 00 82 49 00 45 11 73 00 41 |160.:.r..I.E.s.A|
00000940: B2 41 AA 33 39 00 54 11 74 00 8B 43 32 B2 31 30 |.A.39.T.t..C2.10|
00000950: A7 45 B2 35 00 5D 11 75 00 8D 31 32 33 00 6B 11 |.E.5.].u..123.k.|
00000960: 76 00 97 41 AA 45 AA 31 2C 43 33 00 86 11 77 00 |v..A.E.1,C3...w.|
00000970: 8B 43 32 B2 31 30 A7 97 41 AA 37 2C C6 28 22 30 |.C2.10..A.7,.("0|
00000980: 22 29 AA 31 32 38 00 93 11 78 00 43 36 28 59 29 |").128...x.C6(Y)|
00000990: B2 43 31 00 A0 11 79 00 43 37 28 59 29 B2 43 32 |.C1...y.C7(Y).C2|
000009A0: 00 A6 11 7A 00 8E 00 B1 11 7B 00 81 49 B2 31 A4 |...z.....{..I.1.|
000009B0: 45 00 BD 11 7C 00 97 41 AA 49 2C 41 31 00 C8 11 |E...|..A.I,A1...|
000009C0: 7D 00 41 31 B2 31 36 30 00 CF 11 7E 00 82 49 00 |}.A1.160...~..I.|
000009D0: D5 11 7F 00 8E 00 E0 11 80 00 81 58 B2 31 A4 35 |...........X.1.5|
000009E0: 00 ED 11 81 00 97 41 AA 58 2C 31 36 30 00 F4 11 |......A.X,160...|
000009F0: 82 00 82 58 00 FA 11 83 00 8E 00 07 12 84 00 97 |...X............|
00000A00: 41 AA 31 2C 31 36 30 00 14 12 85 00 97 41 AA 32 |A.1,160......A.2|
00000A10: 2C 31 36 30 00 20 12 86 00 97 41 AA 33 2C 43 34 |,160. ....A.3,C4|
00000A20: 00 2D 12 87 00 97 41 AA 34 2C 31 36 30 00 3A 12 |.-....A.4,160.:.|
00000A30: 88 00 97 41 AA 35 2C 31 36 30 00 40 12 89 00 8E |...A.5,160.@....|
00000A40: 00 4C 12 8A 00 97 41 AA 31 2C 43 34 00 59 12 8B |.L....A.1,C4.Y..|
00000A50: 00 97 41 AA 32 2C 31 36 30 00 66 12 8C 00 97 41 |..A.2,160.f....A|
00000A60: AA 33 2C 31 36 30 00 73 12 8D 00 97 41 AA 34 2C |.3,160.s....A.4,|
00000A70: 31 36 30 00 7F 12 8E 00 97 41 AA 35 2C 43 34 00 |160......A.5,C4.|
00000A80: 85 12 8F 00 8E 00 90 12 90 00 81 58 B2 31 A4 35 |...........X.1.5|
00000A90: 00 A1 12 91 00 58 31 B2 35 AC 28 49 AB 31 29 AA |.....X1.5.(I.1).|
00000AA0: 58 00 B1 12 92 00 97 41 AA 58 2C 46 37 28 58 31 |X......A.X,F7(X1|
00000AB0: 29 00 B8 12 93 00 82 58 00 BE 12 94 00 8E 00 C9 |)......X........|
00000AC0: 12 95 00 81 58 B2 31 A4 35 00 DA 12 96 00 58 31 |....X.1.5.....X1|
00000AD0: B2 35 AC 28 49 AB 31 29 AA 58 00 EA 12 97 00 97 |.5.(I.1).X......|
00000AE0: 41 AA 58 2C 46 38 28 58 31 29 00 F1 12 98 00 82 |A.X,F8(X1)......|
00000AF0: 58 00 F7 12 99 00 8E 00 02 13 9A 00 81 58 B2 31 |X............X.1|
00000B00: A4 35 00 13 13 9B 00 58 31 B2 35 AC 28 49 AB 31 |.5.....X1.5.(I.1|
00000B10: 29 AA 58 00 23 13 9C 00 97 41 AA 58 2C 46 39 28 |).X.#....A.X,F9(|
00000B20: 58 31 29 00 2A 13 9D 00 82 58 00 30 13 9E 00 8E |X1).*....X.0....|
00000B30: 00 41 13 9F 00 8F 20 43 4C 45 41 52 20 43 41 52 |.A.... CLEAR CAR|
00000B40: 44 00 5A 13 A0 00 41 B2 50 31 AA 31 35 AC 50 32 |D.Z...A.P1.15.P2|
00000B50: AA 38 AC 28 59 AB 31 29 AB 31 00 65 13 A1 00 81 |.8.(Y.1).1.e....|
00000B60: 49 B2 31 A4 39 00 70 13 A2 00 81 58 B2 31 A4 37 |I.1.9.p....X.1.7|
00000B70: 00 7C 13 A3 00 97 41 AA 58 2C 33 32 00 83 13 A4 |.|....A.X,32....|
00000B80: 00 82 58 00 8E 13 A5 00 41 B2 41 AA 34 30 00 95 |..X.....A.A.40..|
00000B90: 13 A6 00 82 49 00 A6 13 A7 00 43 36 28 59 29 B2 |....I.....C6(Y).|
00000BA0: 31 35 AA 32 AC 59 00 B7 13 A8 00 43 37 28 59 29 |15.2.Y.....C7(Y)|
00000BB0: B2 31 35 AA 32 AC 59 00 BD 13 A9 00 8E 00 D4 13 |.15.2.Y.........|
00000BC0: AA 00 8F 20 48 49 47 48 4C 49 47 48 54 20 53 43 |... HIGHLIGHT SC|
00000BD0: 52 45 45 4E 00 E2 13 AB 00 8B 53 58 B2 30 89 31 |REEN......SX.0.1|
00000BE0: 38 30 00 F6 13 AC 00 50 B2 50 31 AA 50 32 AC 28 |80.....P.P1.P2.(|
00000BF0: 31 30 AB 53 58 29 00 FE 13 AD 00 58 B2 30 00 0A |10.SX).....X.0..|
00000C00: 14 AE 00 81 49 B2 30 A4 33 37 00 17 14 AF 00 4E |....I.0.37.....N|
00000C10: B2 C2 28 50 AA 49 29 00 2D 14 B0 00 8B 28 4E B2 |..(P.I).-....(N.|
00000C20: 33 32 29 AF 28 58 B2 30 29 89 31 37 39 00 35 14 |32).(X.0).179.5.|
00000C30: B1 00 58 B2 31 00 4A 14 B2 00 97 50 AA 49 2C 28 |..X.1.J....P.I,(|
00000C40: 4E AA 31 32 38 29 AF 32 35 35 00 51 14 B3 00 82 |N.128).255.Q....|
00000C50: 49 00 57 14 B4 00 8E 00 63 14 B5 00 57 31 B2 32 |I.W.....c...W1.2|
00000C60: 30 AC 44 00 69 14 B6 00 8E 00 75 14 B7 00 57 31 |0.D.i.....u...W1|
00000C70: B2 33 30 AC 44 00 7B 14 B8 00 8E 00 87 14 B9 00 |.30.D.{.........|
00000C80: 57 31 B2 35 30 AC 44 00 8D 14 BA 00 8E 00 9A 14 |W1.50.D.........|
00000C90: BB 00 57 31 B2 32 30 30 AC 44 00 A0 14 BC 00 8E |..W1.200.D......|
00000CA0: 00 A6 14 BD 00 99 00 B1 14 BE 00 8B 57 B2 30 A7 |............W.0.|
00000CB0: 99 00 D8 14 BF 00 8B 57 B3 30 A7 99 22 59 4F 55 |.......W.0.."YOU|
00000CC0: 52 20 54 4F 54 41 4C 20 4C 4F 53 53 45 53 20 41 |R TOTAL LOSSES A|
00000CD0: 52 45 20 24 22 3B AB 57 00 00 15 C0 00 8B 57 B1 |RE $";.W......W.|
00000CE0: 30 A7 99 22 59 4F 55 52 20 54 4F 54 41 4C 20 57 |0.."YOUR TOTAL W|
00000CF0: 49 4E 4E 49 4E 47 53 20 41 52 45 20 24 22 3B 57 |INNINGS ARE $";W|
00000D00: 00 06 15 C1 00 8E 00 33 15 C2 00 46 24 B2 22 20 |.......3...F$." |
00000D10: 5F A0 29 20 47 2A 35 54 20 47 A0 A0 A0 20 47 A0 |_.) G*5T G... G.|
00000D20: A0 A0 48 20 A0 A0 A0 48 20 59 36 34 48 20 A9 A0 |..H ...H Y64H ..|
00000D30: DF 20 22 00 39 15 C3 00 8E 00 66 15 C4 00 46 24 |. ".9.....f...F$|
00000D40: B2 22 20 29 23 54 20 A9 47 20 35 20 A0 A0 A0 A0 |." )#T .G 5 ....|
00000D50: 3B A0 A0 A0 A0 A0 3C A0 A0 A0 A0 20 36 20 48 29 |;.....<.... 6 H)|
00000D60: 20 59 24 A9 20 22 00 6C 15 C5 00 8E 00 99 15 C6 | Y$. ".l........|
00000D70: 00 46 24 B2 22 20 5F A0 A0 29 20 27 20 26 42 A9 |.F$." _..) ' &B.|
00000D80: A0 A0 A0 BC A0 A0 A0 A0 A0 BB A0 A0 A0 29 5D 26 |.............)]&|
00000D90: 20 25 20 A9 A0 A0 DF 20 22 00 9F 15 C7 00 8E 00 | % .... ".......|
00000DA0: AD 15 C8 00 46 37 28 58 31 29 B2 46 31 00 B3 15 |....F7(X1).F1...|
00000DB0: C9 00 8E 00 C1 15 CA 00 46 38 28 58 31 29 B2 46 |........F8(X1).F|
00000DC0: 31 00 C7 15 CB 00 8E 00 D5 15 CC 00 46 39 28 58 |1...........F9(X|
00000DD0: 31 29 B2 46 31 00 DB 15 CD 00 8E 00 E6 15 CE 00 |1).F1...........|
00000DE0: 81 58 B2 31 A4 33 00 F3 15 CF 00 81 58 31 B2 31 |.X.1.3......X1.1|
00000DF0: A4 33 35 00 06 16 D0 00 91 58 8D 31 39 34 2C 31 |.35......X.194,1|
00000E00: 39 36 2C 31 39 38 00 1B 16 D1 00 46 31 B2 C6 28 |96,198.....F1..(|
00000E10: CA 28 46 24 2C 58 31 2C 31 29 29 00 2A 16 D2 00 |.(F$,X1,1)).*...|
00000E20: 8B 46 31 B3 39 36 89 32 31 32 00 3F 16 D3 00 8B |.F1.96.212.?....|
00000E30: 46 31 B3 31 39 32 A7 46 31 B2 46 31 AA 36 34 00 |F1.192.F1.F1.64.|
00000E40: 53 16 D4 00 8B 46 31 B3 36 34 A7 46 31 B2 46 31 |S....F1.64.F1.F1|
00000E50: AA 36 34 00 67 16 D5 00 46 31 B2 28 46 31 AA 31 |.64.g...F1.(F1.1|
00000E60: 32 38 29 AF 32 35 35 00 7A 16 D6 00 91 58 8D 32 |28).255.z....X.2|
00000E70: 30 30 2C 32 30 32 2C 32 30 34 00 82 16 D7 00 82 |00,202,204......|
00000E80: 58 31 00 89 16 D8 00 82 58 00 8F 16 D9 00 8E 00 |X1......X.......|
00000E90: A5 16 DA 00 99 3A 99 22 49 4E 56 41 4C 49 44 20 |.....:."INVALID |
00000EA0: 42 45 54 20 22 00 AE 16 DB 00 89 32 32 31 00 DC |BET "......221..|
00000EB0: 16 DC 00 99 3A 99 22 42 45 54 20 54 4F 4F 20 48 |....:."BET TOO H|
00000EC0: 49 47 48 2C 20 48 4F 55 53 45 20 4C 49 4D 49 54 |IGH, HOUSE LIMIT|
00000ED0: 20 49 53 20 24 31 30 2C 30 30 30 22 00 E6 16 DD | IS $10,000"....|
00000EE0: 00 58 B2 31 30 30 00 F0 16 DE 00 58 B2 58 AB 31 |.X.100.....X.X.1|
00000EF0: 00 FD 16 DF 00 8B 58 B1 30 89 32 32 32 00 05 17 |......X.0.222...|
00000F00: E0 00 89 31 31 00 0E 17 E1 00 4C B2 34 30 00 49 |...11.....L.40.I|
00000F10: 17 E2 00 41 B2 50 AB 31 3A 4C 31 B2 C3 28 4D 24 |...A.P.1:L1..(M$|
00000F20: 29 3A 81 49 B2 31 A4 4C 31 3A 4D 31 24 B2 CA 28 |):.I.1.L1:M1$..(|
00000F30: 4D 24 2C 49 2C 31 29 3A 97 41 AA 49 2C C6 28 4D |M$,I,1):.A.I,.(M|
00000F40: 31 24 29 AF 36 33 3A 82 49 00 5B 17 E3 00 4D 31 |1$).63:.I.[...M1|
00000F50: 24 B2 CA 28 4D 24 2C 49 2C 31 29 00 66 17 E4 00 |$..(M$,I,1).f...|
00000F60: 41 B2 41 AA 4C 31 00 71 17 E5 00 4C B2 4C AB 4C |A.A.L1.q...L.L.L|
00000F70: 31 00 7F 17 E6 00 8B 4C B3 B2 30 89 32 33 34 00 |1......L..0.234.|
00000F80: 8A 17 E7 00 81 49 B2 31 A4 4C 00 96 17 E8 00 97 |.....I.1.L......|
00000F90: 41 AA 49 2C 33 32 00 9D 17 E9 00 82 49 00 A8 17 |A.I,32......I...|
00000FA0: EA 00 4D 24 B2 22 20 22 00 AE 17 EB 00 8E 00 B4 |..M$." "........|
00000FB0: 17 EC 00 4B 00 DF 17 ED 00 43 B2 B5 28 C3 28 43 |...K.....C..(.(C|
00000FC0: 39 24 29 AC BB 28 54 49 29 29 AA 31 3A 8B 43 B1 |9$)..(TI)).1:.C.|
00000FD0: C3 28 43 39 24 29 A7 43 B2 C3 28 43 39 24 29 00 |.(C9$).C..(C9$).|
00000FE0: 0A 18 EE 00 43 B2 B5 28 C3 28 43 39 24 29 AC BB |....C..(.(C9$)..|
00000FF0: 28 54 49 29 29 AA 31 3A 8B 43 B1 C3 28 43 39 24 |(TI)).1:.C..(C9$|
00001000: 29 A7 43 B2 C3 28 43 39 24 29 00 41 18 EF 00 43 |).C..(C9$).A...C|
00001010: 30 B2 C6 28 CA 28 43 39 24 2C 43 2C 31 29 29 3A |0..(.(C9$,C,1)):|
00001020: 43 31 B2 B5 28 28 43 30 AB 31 29 AD 31 33 29 AA |C1..((C0.1).13).|
00001030: 31 3A 43 32 B2 43 30 AB 31 33 AC 28 43 31 AB 31 |1:C2.C0.13.(C1.1|
00001040: 29 00 74 18 F0 00 43 31 24 B2 CA 28 22 C1 D3 DA |).t...C1$..("...|
00001050: D8 22 2C 43 31 2C 31 29 3A 43 32 24 B2 CA 28 22 |.",C1,1):C2$..("|
00001060: 41 32 33 34 35 36 37 38 39 31 4A 51 4B 22 2C 43 |A234567891JQK",C|
00001070: 32 2C 31 29 00 91 18 F1 00 54 24 B2 22 22 3A 8B |2,1).....T$."":.|
00001080: 43 B1 31 A7 54 24 B2 C8 28 43 39 24 2C 43 AB 31 |C.1.T$..(C9$,C.1|
00001090: 29 00 A9 18 F2 00 43 39 24 B2 54 24 AA CA 28 43 |).....C9$.T$..(C|
000010A0: 39 24 2C 43 AA 31 29 3A 8E 00 D5 18 F3 00 99 22 |9$,C.1):......."|
000010B0: 13 11 11 11 11 11 11 11 11 11 11 12 43 41 52 44 |............CARD|
000010C0: 53 20 48 41 56 45 20 42 45 45 4E 20 53 48 55 46 |S HAVE BEEN SHUF|
000010D0: 46 4C 45 44 22 00 FD 18 F4 00 43 39 24 B2 22 22 |FLED".....C9$.""|
000010E0: 3A 81 5A 5A B2 31 A4 35 32 3A 43 39 24 B2 43 39 |:.ZZ.1.52:C9$.C9|
000010F0: 24 AA C7 28 5A 5A 29 3A 82 5A 5A 3A 8E 00 05 19 |$..(ZZ):.ZZ:....|
00001100: F5 00 53 B2 30 00 0E 19 F6 00 53 32 B2 30 00 19 |..S.0.....S2.0..|
00001110: 19 F7 00 81 49 B2 31 A4 36 00 27 19 F8 00 43 35 |....I.1.6.'...C5|
00001120: 28 49 29 B2 31 30 30 00 2E 19 F9 00 82 49 00 39 |(I).100......I.9|
00001130: 19 FA 00 81 49 B2 31 A4 35 00 41 19 FB 00 58 B2 |....I.1.5.A...X.|
00001140: 35 00 56 19 FC 00 8B 43 37 28 49 29 B1 43 35 28 |5.V....C7(I).C5(|
00001150: 58 29 89 32 35 36 00 68 19 FD 00 43 35 28 58 AA |X).256.h...C5(X.|
00001160: 31 29 B2 43 35 28 58 29 00 72 19 FE 00 58 B2 58 |1).C5(X).r...X.X|
00001170: AB 31 00 7F 19 FF 00 8B 58 B1 30 89 32 35 32 00 |.1......X.0.252.|
00001180: 91 19 00 01 43 35 28 58 AA 31 29 B2 43 37 28 49 |....C5(X.1).C7(I|
00001190: 29 00 98 19 01 01 82 49 00 AE 19 02 01 8B 43 35 |)......I......C5|
000011A0: 28 31 29 B2 31 A7 43 35 28 36 29 B2 31 34 00 B7 |(1).1.C5(6).14..|
000011B0: 19 03 01 53 31 B2 30 00 C2 19 04 01 81 49 B2 31 |...S1.0......I.1|
000011C0: A4 34 00 DD 19 05 01 8B 43 36 28 49 29 B2 43 36 |.4......C6(I).C6|
000011D0: 28 49 AA 31 29 A7 53 31 B2 53 31 AA 31 00 E4 19 |(I.1).S1.S1.1...|
000011E0: 06 01 82 49 00 F2 19 07 01 8B 53 31 B2 34 A7 53 |...I......S1.4.S|
000011F0: B2 35 00 1B 1A 08 01 53 31 B2 30 3A 81 49 B2 31 |.5.....S1.0:.I.1|
00001200: A4 34 3A 8B 43 35 28 49 29 AA 35 AB 49 B2 43 35 |.4:.C5(I).5.I.C5|
00001210: 28 35 29 A7 53 31 B2 53 31 AA 31 00 22 1A 09 01 |(5).S1.S1.1."...|
00001220: 82 49 00 3B 1A 0A 01 8B 53 31 B2 34 A7 53 B2 53 |.I.;....S1.4.S.S|
00001230: AA 33 3A 8B 53 B2 33 A7 53 B2 34 00 49 1A 0B 01 |.3:.S.3.S.4.I...|
00001240: 8B 53 31 B2 34 A7 32 37 31 00 72 1A 0C 01 53 31 |.S1.4.271.r...S1|
00001250: B2 30 3A 81 49 B2 32 A4 35 3A 8B 43 35 28 49 29 |.0:.I.2.5:.C5(I)|
00001260: AA 36 AB 49 B2 43 35 28 36 29 A7 53 31 B2 53 31 |.6.I.C5(6).S1.S1|
00001270: AA 31 00 79 1A 0D 01 82 49 00 92 1A 0E 01 8B 53 |.1.y....I......S|
00001280: 31 B2 34 A7 53 B2 53 AA 33 3A 8B 53 B2 33 A7 53 |1.4.S.S.3:.S.3.S|
00001290: B2 34 00 AE 1A 0F 01 8B 28 53 B2 38 29 AF 28 43 |.4......(S.8).(C|
000012A0: 35 28 35 29 B2 31 33 29 A7 53 B2 53 AA 31 00 B7 |5(5).13).S.S.1..|
000012B0: 1A 10 01 53 31 B2 30 00 C2 1A 11 01 81 49 B2 31 |...S1.0......I.1|
000012C0: A4 34 00 DD 1A 12 01 8B 43 35 28 49 29 B2 43 35 |.4......C5(I).C5|
000012D0: 28 49 AA 31 29 A7 53 31 B2 53 31 AA 31 00 F8 1A |(I.1).S1.S1.1...|
000012E0: 13 01 8B 43 35 28 49 29 B2 43 35 28 49 AA 32 29 |...C5(I).C5(I.2)|
000012F0: A7 53 31 B2 53 31 AA 31 00 FF 1A 14 01 82 49 00 |.S1.S1.1......I.|
00001300: 11 1B 15 01 8B 53 31 B1 33 A7 53 31 B2 53 31 AA |.....S1.3.S1.S1.|
00001310: 32 00 20 1B 16 01 8B 53 31 B1 53 A7 53 B2 53 31 |2. ....S1.S.S.S1|
00001320: 00 26 1B 17 01 8E 00 31 1B 18 01 81 49 B2 31 A4 |.&.....1....I.1.|
00001330: 35 00 59 1B 19 01 85 22 45 4E 54 45 52 20 53 55 |5.Y...."ENTER SU|
00001340: 49 54 20 23 2C 20 43 41 52 44 20 23 22 3B 43 36 |IT #, CARD #";C6|
00001350: 28 49 29 2C 43 37 28 49 29 00 60 1B 1A 01 82 49 |(I),C7(I).`....I|
00001360: 00 69 1B 1B 01 8D 32 34 35 00 6F 1B 1C 01 99 00 |.i....245.o.....|
00001370: 7B 1B 1D 01 99 22 53 3D 22 3B 53 00 81 1B 1E 01 |{...."S=";S.....|
00001380: 99 00 94 1B 1F 01 99 22 43 35 22 2C 22 43 36 22 |......."C5","C6"|
00001390: 2C 22 43 37 00 9F 1B 20 01 81 49 B2 31 A4 35 00 |,"C7... ..I.1.5.|
000013A0: B6 1B 21 01 99 43 35 28 49 29 2C 43 36 28 49 29 |..!..C5(I),C6(I)|
000013B0: 2C 43 37 28 49 29 00 C4 1B 22 01 82 49 3A 99 43 |,C7(I)..."..I:.C|
000013C0: 35 28 36 29 00 CD 1B 23 01 89 32 38 30 00 E7 1B |5(6)...#..280...|
000013D0: 24 01 5A 24 B2 22 22 3A 5A 30 24 B2 22 20 22 3A |$.Z$."":Z0$." ":|
000013E0: 5A 31 24 B2 22 A6 22 00 18 1C 25 01 99 5A 30 24 |Z1$."."...%..Z0$|
000013F0: 22 9D 22 3B 3A 81 5A 5A B2 31 A4 35 30 3A A1 5A |".";:.ZZ.1.50:.Z|
00001400: 32 24 3A 8B 5A 32 24 B3 B1 22 22 A7 5A 5A B2 35 |2$:.Z2$.."".ZZ.5|
00001410: 30 3A 82 3A 89 32 39 35 00 3B 1C 26 01 82 3A 5A |0:.:.295.;.&..:Z|
00001420: 32 24 B2 5A 31 24 3A 5A 31 24 B2 5A 30 24 3A 5A |2$.Z1$:Z1$.Z0$:Z|
00001430: 30 24 B2 5A 32 24 3A 89 32 39 33 00 70 1C 27 01 |0$.Z2$:.293.p.'.|
00001440: 5A 5A B2 C6 28 5A 32 24 29 AF 31 32 37 3A 8B 5A |ZZ..(Z2$).127:.Z|
00001450: 5A B2 32 39 B0 5A 5A B2 31 37 B0 5A 5A B2 31 39 |Z.29.ZZ.17.ZZ.19|
00001460: B0 5A 5A B2 33 34 B0 5A 5A B2 36 39 A7 32 39 33 |.ZZ.34.ZZ.69.293|
00001470: 00 80 1C 28 01 8B 5A 5A B3 B1 32 30 A7 32 39 39 |...(..ZZ..20.299|
00001480: 00 B2 1C 29 01 8B C3 28 5A 24 29 B1 30 A7 99 5A |...)...(Z$).0..Z|
00001490: 32 24 3B 3A 8B C3 28 5A 24 29 B1 31 A7 5A 24 B2 |2$;:..(Z$).1.Z$.|
000014A0: C8 28 5A 24 2C C3 28 5A 24 29 AB 31 29 3A 89 32 |.(Z$,.(Z$).1):.2|
000014B0: 39 33 00 BB 1C 2A 01 89 32 39 32 00 E5 1C 2B 01 |93...*..292...+.|
000014C0: 8B 5A 5A B3 B1 31 33 A7 99 5A 32 24 3B 3A 5A 24 |.ZZ..13..Z2$;:Z$|
000014D0: B2 5A 24 AA 5A 32 24 3A 8B C3 28 5A 24 29 B3 5A |.Z$.Z2$:..(Z$).Z|
000014E0: 39 A7 32 39 33 00 F0 1C 2C 01 99 22 20 22 3A 8E |9.293...,.." ":.|
000014F0: 00 0A 1D 2D 01 81 49 B2 31 A4 34 30 30 3A 97 56 |...-..I.1.400:.V|
00001500: 4B AA 49 2C 31 34 3A 82 3A 8E 00 00 00 00 41 |K.I,14:.:.....A |
....... DRAW POKER.<...."...............
....DRAW POKER 1...".`...."... .ONE
MOMENT PLEASE!"......G1(5),F7(35),F8(35
),F9(35),O(10)......I.1.10:.O(I):.I:.200
,50,30,20,10,7,5,2,1,-1......C5(6),C6(5)
,C7(5),C8(7):FS$." ".....M$
." ".....P1.1024:P2.40:VK.55895.....W.0.
....206.*....".";.Z....".HAND
ODDS YOU WIN ".Z...."ROYAL F
LUSH: 200 TO 1......"STRAIGHT FLUSH:
50 TO 1":."FOUR OF A KIND: 30 TO 1"
......"FULL HOUSE: 20 TO 1":."FLUS
H: 10 TO 1".4...."STRAIGHT:
7 TO 1":."THREE OF A KIND: 5 T
O 1".U...."TWO PAIR: 2 TO 1".U.
..."PAIR: 1 TO 1......189:.
301......"PLACE YOUR BET: $1 TO $10000 $
";:Z9.6:.292:D.E(Z$).......((D.9999).100
00).1.218,23,220......220.#....".":.S.1.
9:Z$.D(O(S).D):..25)H(FS$,12.C(Z$))"$"Z$
:.S.7....C(C9$).12..243.N....Y.1.5:.237:
.78:.Y.A....245:SX.S:.170.T....Q$:.Q$.."
".27......".............SELECT DISCARDS
BY NUMBER, 1,2,3,4&/OR 5......".TO CANCE
L PRESS C. TO DRAW PRESS RETURN."......I
.1.5.....G1(I).1... ..I...!.P.P1.24.P2..
."..225...#..Q$.-.$..Q$."".35.9.%.Q.F(Q$
).F.&..Q.13.49.U.'..Q$."C".30.D.(..Q$."1
".35.S.)..Q$."5".35..*.Y.E(Q$)...+.G1(Y
).0...,.P.P1.24.P2.8.(Y.1)...-.M$."DISCA
RD".....L.C(M$).H./..226.P.0..35...1.P.P
1.11.P2:.225...2.P.P1.12.P2:.225...3.P.P
1.13.P2:.225:P.P1.24.P2:.225.'.4..Y.1.5.
9.5..G1(Y).0..159.@.6..Y.I.7..245.V.8..S
X.S.59._.9..170.H.:.SX.S.S.;..Y.1.5...<.
.G1(Y).1.63...=..237...>..78...?..Y...@.
.245...A..SX.S.69...B..170.C.C.SX.S.L.D.
.170.R.E.....F.W.W.D.O(10.S):M$."WINNING
S":.O(10.S).0.M$."LOSSES".F.G.M$.M$." TH
IS HAND ARE $".D(.(D.O(10.S))):P.P1.11.P
2:.225.H.H.M$."WINNINGS":.W.0.M$."LOSSES
...I.P.P1.12.P2:M$."TOTAL ".M$." ARE $".
D(.(W)):.225.Q.J.M$."PRESS RETURN TO CON
TINUE...":P.P1.13.P2:.225...K..G$:.G$.""
.75...L..F(G$)..13.75...M..11...N.H.C2.7
...O..H.4.H.1. .P..I.1.7.,.Q.C8(I).H.3.R
..I.B.S..C2.84,87,86,97,93,96,95,90,92,8
9,98,98,98.N.T.C8(4).2.V.U..98...V.C8(4)
.2...W.C8(2).2:C8(6).2...X..98...Y.C8(2)
.2:C8(6).2.F.Z.C8(3).3:C8(5).3.N.[..97..
.\.C8(3).3:C8(5).3...].C8(4).2...^..97..
._.C8(3).2...`.C8(4).3.".A.C8(1).3:C8(7)
.3.9.B.A.P1.15.P2.8.(Y.1).P.C.C3.(F(C2$)
.63).128.Z.D..A,C3.E.E.A1.160.~.F..C2.10
.A1.F("0").128...G.E.6...H..123...I.C4.F
(C1$)...J.F7(5).C4:F7(31).C4.K.K.F8(1).C
4:F8(35).C4...L.F9(1).C4:F9(35).C4...M..
I.1.7...N.A.A.40...O..A,160.&.P..C8(I).1
28,132,138,144,149,154.3.Q..A.6,160.:.R.
.I.E.S.A.A.39.T.T..C2.10.E.5.].U..123.K.
V..A.E.1,C3...W..C2.10..A.7,F("0").128..
.X.C6(Y).C1. .Y.C7(Y).C2...Z.....{..I.1.
E...|..A.I,A1.H.}.A1.160.O.~..I.U......
...X.1.5......A.X,160......X............
A.1,160......A.2,160. ....A.3,C4.-....A.
4,160.:....A.5,160.@.....L....A.1,C4.Y..
..A.2,160.F....A.3,160.S....A.4,160....
.A.5,C4............X.1.5.....X1.5.(I.1).
X......A.X,F7(X1)......X.......I....X.1.
5.Z...X1.5.(I.1).X......A.X,F8(X1)......
X............X.1.5.....X1.5.(I.1).X.#...
.A.X,F9(X1).*....X.0.....A.... CLEAR CAR
D.Z. .A.P1.15.P2.8.(Y.1).1.E....I.1.9.P.
...X.1.7.|....A.X,32......X.....A.A.40..
....I.....C6(Y).15.2.Y.....C7(Y).15.2.Y.
......T.... HIGHLIGHT SCREEN......SX.0.1
80.....P.P1.P2.(10.SX).....X.0......I.0.
37.....N.B(P.I).-....(N.32).(X.0).179.5.
..X.1.J....P.I,(N.128).255.Q....I.W.....
C...W1.20.D.I.....U...W1.30.D.{.........
W1.50.D...........W1.200.D. ............
....W.0...X....W.0.."YOUR TOTAL LOSSES A
RE $";.W......W.0.."YOUR TOTAL WINNINGS
ARE $";W...A...3.B.F$." _ ) G*5T G G
H H Y64H . . ".9.C...F.D.F$." )#T .
G 5 ; < 6 H) Y$. ".L.E.....F
.F$." _ ) ' &B. . . )]& % . .
"...G.....H.F7(X1).F1...I...A.J.F8(X1).F
1.G.K...U.L.F9(X1).F1...M.....N..X.1.3..
.O..X1.1.35...P..X.194,196,198...Q.F1.F(
J(F$,X1,1)).*.R..F1.96.212.?.S..F1.192.F
1.F1.64.S.T..F1.64.F1.F1.64.G.U.F1.(F1.1
28).255.Z.V..X.200,202,204...W..X1...X..
X...Y.....Z..:."INVALID BET "......221..
....:."BET TOO HIGH, HOUSE LIMIT IS $10,
000".....X.100.....X.X.1......X.0.222...
...11.....L.40.I...A.P.1:L1.C(M$):.I.1.L
1:M1$.J(M$,I,1):.A.I,F(M1$).63:.I.[...M1
$.J(M$,I,1).F...A.A.L1.Q...L.L.L1.....L
..0.234......I.1.L......A.I,32......I...
..M$." "...........K.....C..(C(C9$)..(TI
)).1:.C.C(C9$).C.C(C9$).....C..(C(C9$)..
(TI)).1:.C.C(C9$).C.C(C9$).A...C0.F(J(C9
$,C,1)):C1..((C0.1).13).1:C2.C0.13.(C1.1
).T...C1$.J("ASZX",C1,1):C2$.J("A2345678
91JQK",C2,1).....T$."":.C.1.T$.H(C9$,C.1
).....C9$.T$.J(C9$,C.1):..U...."........
....CARDS HAVE BEEN SHUFFLED".....C9$.""
:.ZZ.1.52:C9$.C9$.G(ZZ):.ZZ:......S.0...
..S2.0......I.1.6.'...C5(I).100......I.9
....I.1.5.A...X.5.V....C7(I).C5(X).256.H
...C5(X.1).C5(X).R...X.X.1.....X.0.252.
....C5(X.1).C7(I)......I......C5(1).1.C5
(6).14.....S1.0.B....I.1.4......C6(I).C6
(I.1).S1.S1.1......I......S1.4.S.5.....S
1.0:.I.1.4:.C5(I).5.I.C5(5).S1.S1.1."...
.I.;....S1.4.S.S.3:.S.3.S.4.I....S1.4.27
1.R...S1.0:.I.2.5:.C5(I).6.I.C5(6).S1.S1
.1.Y....I......S1.4.S.S.3:.S.3.S.4......
(S.8).(C5(5).13).S.S.1.....S1.0.B....I.1
.4......C5(I).C5(I.1).S1.S1.1......C5(I)
.C5(I.2).S1.S1.1......I......S1.3.S1.S1.
2. ....S1.S.S.S1.&.....1....I.1.5.Y...."
ENTER SUIT #, CARD #";C6(I),C7(I).`....I
.I....245.O.....{...."S=";S............"
C5","C6","C7... ..I.1.5...!..C5(I),C6(I)
,C7(I).D."..I:.C5(6).M.#..280...$.Z$."":
Z0$." ":Z1$."."...%..Z0$".";:.ZZ.1.50:.Z
2$:.Z2$.."".ZZ.50:.:.295.;.&..:Z2$.Z1$:Z
1$.Z0$:Z0$.Z2$:.293.P.'.ZZ.F(Z2$).127:.Z
Z.29.ZZ.17.ZZ.19.ZZ.34.ZZ.69.293...(..ZZ
..20.299...)..C(Z$).0..Z2$;:.C(Z$).1.Z$.
H(Z$,C(Z$).1):.293...*..292...+..ZZ..13.
.Z2$;:Z$.Z$.Z2$:.C(Z$).Z9.293...,.." ":.
...-..I.1.400:.VK.I,14:.:.....A
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL