Multiple names: DRAW POKER, POKER

00000000: 01 08 12 08 64 00 8F 20  44 52 41 57 20 50 4F 4B  |....d.. DRAW POK|
00000010: 45 52 00 30 08 6E 00 8F  20 42 59 20 45 41 52 4C  |ER.0.n.. BY EARL|
00000020: 20 57 55 43 48 54 45 52  20 20 20 20 31 39 37 38  | WUCHTER    1978|
00000030: 00 53 08 78 00 8F 20 41  4E 59 4F 4E 45 20 46 4F  |.S.x.. ANYONE FO|
00000040: 52 20 43 4F 4C 4F 52 20  26 20 53 4F 55 4E 44 20  |R COLOR & SOUND |
00000050: 3F 3F 3F 00 82 08 82 00  97 35 33 32 37 32 2C 32  |???......53272,2|
00000060: 31 3A 99 22 93 20 20 20  20 20 20 20 20 20 44 20  |1:.".         D |
00000070: 52 A0 41 A0 57 20 20 20  50 20 4F 20 4B 20 45 20  |R.A.W   P O K E |
00000080: 52 22 00 A1 08 8C 00 99  A3 31 30 29 22 11 11 45  |R".......10)"..E|
00000090: 41 52 4C 20 57 55 43 48  54 45 52 A0 31 39 37 38  |ARL WUCHTER.1978|
000000A0: 22 00 D8 08 96 00 85 22  11 4D 59 20 4E 41 4D 45  |"......".MY NAME|
000000B0: 20 49 53 20 44 45 41 4C  45 52 2E 20 57 48 41 54  | IS DEALER. WHAT|
000000C0: 20 49 53 20 59 4F 55 52  53 20 20 4D 41 4E 9D 9D  | IS YOURS  MAN..|
000000D0: 9D 9D 9D 22 3B 55 4E 24  00 F3 08 A0 00 8B C3 28  |...";UN$.......(|
000000E0: 55 4E 24 29 B1 38 A7 55  4E 24 B2 C8 28 55 4E 24  |UN$).8.UN$..(UN$|
000000F0: 2C 38 29 00 2A 09 AA 00  97 35 33 32 37 32 2C 32  |,8).*....53272,2|
00000100: 33 3A 99 22 93 11 CF CB  2E 20 22 55 4E 24 22 20  |3:."..... "UN$" |
00000110: C8 C5 D2 C5 A0 C1 D2 C5  A0 D4 C8 C5 A0 C8 CF D5  |................|
00000120: D3 C5 20 D2 D5 CC C5 D3  3A 22 00 55 09 B4 00 99  |.. .....:".U....|
00000130: 22 11 D4 C8 C5 A0 C1 CE  D4 C5 A0 C9 D3 A0 35 2E  |".............5.|
00000140: 20 20 20 CE CF A0 CC C9  CD C9 D4 A0 CF CE A0 C2  |   .............|
00000150: C5 D4 D3 2E 22 00 85 09  BE 00 99 22 D7 C5 A0 C1  |...."......"....|
00000160: CC D4 C5 D2 CE C1 D4 C5  A0 CF D0 C5 CE C9 CE C7  |................|
00000170: 2E 20 CF D0 C5 CE A0 D7  C9 D4 C8 A0 C1 CE D9 D4  |. ..............|
00000180: C8 C9 CE C7 22 00 B0 09  C8 00 99 22 91 CE CF A0  |...."......"....|
00000190: C3 C8 C5 C3 CB C9 CE C7  2E 20 CF D0 C5 CE A0 CF  |......... ......|
000001A0: D2 A0 C2 C5 D4 A0 30 A0  28 C6 CF CC C4 29 2E 22  |......0.(....)."|
000001B0: 00 DA 09 D2 00 99 22 11  D7 C8 C5 CE A0 C1 D3 CB  |......".........|
000001C0: C5 C4 A0 D4 CF A0 C6 CF  CC C4 2C C3 C1 CC CC 2C  |..........,....,|
000001D0: CF D2 A0 D2 C1 C9 D3 C5  2C 22 00 04 0A DC 00 99  |........,"......|
000001E0: 22 D2 C5 D0 CC D9 A0 D7  C9 D4 C8 A0 C6 20 CF D2  |"............ ..|
000001F0: A0 C3 20 CF D2 A0 D2 20  C1 CE C4 20 D2 C5 D4 D5  |.. .... ... ....|
00000200: D2 CE 2E 22 00 2F 0A E6  00 99 22 D7 C8 C5 CE A0  |..."./....".....|
00000210: C1 D3 CB C5 C4 A0 D4 CF  A0 C2 C5 D4 2C 20 CF D2  |............, ..|
00000220: A0 D7 C8 C5 CE A0 D2 C1  C9 D3 C9 CE C7 2C 22 00  |.............,".|
00000230: 54 0A F0 00 99 22 D2 C5  D0 CC D9 A0 D7 C9 D4 C8  |T...."..........|
00000240: A0 C1 CD CF D5 CE D4 A0  C1 CE C4 A0 D2 C5 D4 D5  |................|
00000250: D2 CE 2E 22 00 85 0A FA  00 99 22 11 D4 CF A0 C4  |..."......".....|
00000260: D2 C1 D7 2C 20 C5 CE D4  C5 D2 A0 C5 C1 C3 C8 A0  |..., ...........|
00000270: C3 C1 D2 C4 20 CE D5 CD  C2 C5 D2 A0 C1 CE C4 A0  |.... ...........|
00000280: D2 C5 D4 2E 22 00 B4 0A  04 01 99 22 C9 C6 A0 D9  |...."......"....|
00000290: CF D5 A0 D0 D2 CF CD C9  D3 C5 A0 CE CF D4 A0 D4  |................|
000002A0: CF A0 D4 C1 CB C5 A0 C1  C4 D6 C1 CE D4 C1 C7 C5  |................|
000002B0: A0 CF C6 22 00 D8 0A 0E  01 99 22 20 20 CD D9 A0  |..."......"  ...|
000002C0: C1 D2 D4 C9 C6 C9 C3 C9  C1 CC 20 C9 CE D4 C5 CC  |.......... .....|
000002D0: CC C5 C7 C5 CE C3 C5 22  00 02 0B 18 01 99 A3 36  |.......".......6|
000002E0: 29 22 D4 C8 C1 D4 A0 C4  CF C5 D3 CE 27 D4 A0 CB  |)"..........'...|
000002F0: CE CF D7 A0 D7 C8 C5 CE  A0 D4 CF A0 C6 CF CC C4  |................|
00000300: 2C 22 00 29 0B 22 01 99  A3 39 29 22 C9 20 D7 CF  |,".)."...9)". ..|
00000310: CE 27 D4 A0 D0 C5 C5 CB  A0 C1 D4 A0 D9 CF D5 D2  |.'..............|
00000320: A0 C3 C1 D2 C4 D3 20 21  22 00 33 0B 2C 01 8D 31  |...... !".3.,..1|
00000330: 35 35 30 00 56 0B 36 01  85 22 11 CF CB 20 20 D9  |550.V.6.."...  .|
00000340: 9D 9D 9D 22 3B 59 24 3A  99 22 93 22 3A 97 35 33  |...";Y$:.".":.53|
00000350: 32 37 32 2C 32 31 00 97  0B 40 01 99 22 93 11 11  |272,21...@.."...|
00000360: 11 11 20 20 20 20 44 45  41 4C 45 52 20 48 41 53  |..    DEALER HAS|
00000370: 22 50 42 3A 99 22 11 11  20 20 20 20 22 55 4E 24  |"PB:."..    "UN$|
00000380: 22 20 48 41 53 22 55 42  3A 8B 50 42 B1 30 AF 55  |" HAS"UB:.PB.0.U|
00000390: 42 B1 30 89 33 37 30 00  B5 0B 4A 01 59 24 B2 55  |B.0.370...J.Y$.U|
000003A0: 4E 24 3A 8B 50 42 B3 B2  30 A7 59 24 B2 22 44 45  |N$:.PB..0.Y$."DE|
000003B0: 41 4C 45 52 22 00 D1 0B  54 01 99 22 11 11 11 20  |ALER"...T.."... |
000003C0: 20 20 20 22 59 24 22 20  49 53 20 42 52 4F 4B 45  |   "Y$" IS BROKE|
000003D0: 22 00 0A 0C 5E 01 85 22  11 20 20 20 20 41 4E 4F  |"...^..".    ANO|
000003E0: 54 48 45 52 20 47 41 4D  45 20 20 59 9D 9D 9D 22  |THER GAME  Y..."|
000003F0: 3B 59 59 24 3A 59 24 B2  C8 28 59 59 24 2C 31 29  |;YY$:Y$..(YY$,1)|
00000400: 3A 8B 59 24 B2 22 4E 22  A7 80 00 31 0C 68 01 50  |:.Y$."N"...1.h.P|
00000410: 42 B2 35 30 30 3A 55 42  B2 35 30 30 3A 8B 59 24  |B.500:UB.500:.Y$|
00000420: B3 B1 22 59 22 A7 99 22  91 91 91 22 3A 89 33 35  |.."Y".."...":.35|
00000430: 30 00 48 0C 72 01 57 B2  32 30 30 3A 8D 31 33 39  |0.H.r.W.200:.139|
00000440: 30 3A 4B 4E 25 B2 35 32  00 6C 0C 7C 01 99 22 93  |0:KN%.52.l.|..".|
00000450: 22 3A 49 54 B2 31 30 3A  50 42 B2 50 42 AB 35 3A  |":IT.10:PB.PB.5:|
00000460: 55 42 B2 55 42 AB 35 3A  8D 39 30 30 00 A8 0C 86  |UB.UB.5:.900....|
00000470: 01 81 4D B2 30 A4 34 3A  8D 31 34 32 30 3A 55 48  |..M.0.4:.1420:UH|
00000480: 28 4D 29 B2 43 4E 3A 4C  4E B2 31 33 3A 4B 4C B2  |(M).CN:LN.13:KL.|
00000490: 4D AC 38 3A 8D 31 34 34  30 3A 8D 31 34 32 30 3A  |M.8:.1440:.1420:|
000004A0: 50 48 28 4D 29 B2 43 4E  00 C2 0C 90 01 58 25 28  |PH(M).CN.....X%(|
000004B0: 4D 29 B2 43 4E 3A 4C 4E  B2 31 3A 8D 31 35 31 30  |M).CN:LN.1:.1510|
000004C0: 3A 82 00 F3 0C 9A 01 99  C8 28 51 34 24 2C 31 32  |:........(Q4$,12|
000004D0: 29 A3 33 29 22 31 22 A3  31 31 29 22 32 22 A3 31  |).3)"1".11)"2".1|
000004E0: 39 29 22 33 22 A3 32 37  29 22 34 22 A3 33 35 29  |9)"3".27)"4".35)|
000004F0: 22 35 22 00 16 0D A4 01  42 52 B2 31 3A 8D 39 33  |"5".....BR.1:.93|
00000500: 30 3A 81 49 B2 30 A4 34  3A 50 48 28 49 29 B2 58  |0:.I.0.4:PH(I).X|
00000510: 25 28 49 29 3A 82 00 4E  0D AE 01 50 56 B2 56 3A  |%(I):..N...PV.V:|
00000520: 50 59 B2 54 59 3A 50 44  B2 56 44 3A 54 55 B2 31  |PY.TY:PD.VD:TU.1|
00000530: AB 54 55 3A 4D B2 30 3A  8B 54 55 A7 4D B2 B5 28  |.TU:M.0:.TU.M..(|
00000540: 50 59 AD 33 AA 31 29 AC  31 30 3A 4F B2 4D 00 62  |PY.3.1).10:O.M.b|
00000550: 0D B8 01 8D 37 31 30 3A  91 58 89 33 32 30 2C 34  |....710:.X.320,4|
00000560: 35 30 00 7C 0D C2 01 44  52 B2 30 3A 57 B2 31 35  |50.|...DR.0:W.15|
00000570: 30 3A 8D 31 33 39 30 3A  8D 39 30 30 00 A7 0D CC  |0:.1390:.900....|
00000580: 01 99 51 35 24 51 34 24  22 43 41 52 44 20 23 20  |..Q5$Q4$"CARD # |
00000590: 22 55 4E 24 22 2C 20 20  30 20 49 46 20 4E 4F 4E  |"UN$",  0 IF NON|
000005A0: 45 22 3B 3A 85 44 4E 00  B5 0D D6 01 8B 44 4E B2  |E";:.DN......DN.|
000005B0: 30 89 35 31 30 00 C8 0D  E0 01 8B 44 4E B3 31 B0  |0.510......DN.1.|
000005C0: 44 4E B1 35 89 34 36 30  00 E2 0D EA 01 44 4E B2  |DN.5.460.....DN.|
000005D0: 44 4E AB 31 3A 8B 55 48  28 44 4E 29 B3 30 89 34  |DN.1:.UH(DN).0.4|
000005E0: 36 30 00 16 0E F4 01 44  52 B2 44 52 AA 31 3A 55  |60.....DR.DR.1:U|
000005F0: 48 28 44 4E 29 B2 AB 31  3A 4C 4E B2 31 33 3A 4B  |H(DN)..1:LN.13:K|
00000600: 4C B2 44 4E AC 38 3A 8D  31 35 31 30 3A 8B 44 52  |L.DN.8:.1510:.DR|
00000610: B3 33 89 34 36 30 00 37  0E FE 01 99 51 35 24 51  |.3.460.7....Q5$Q|
00000620: 34 24 22 44 45 41 4C 45  52 20 54 41 4B 45 53 22  |4$"DEALER TAKES"|
00000630: 50 44 3A 8D 39 30 30 00  4D 0E 08 02 99 22 13 22  |PD:.900.M...."."|
00000640: 3A 4C 4E B2 31 33 3A 81  49 B2 30 A4 34 00 76 0E  |:LN.13:.I.0.4.v.|
00000650: 12 02 8B 55 48 28 49 29  B3 30 A7 8D 31 34 32 30  |...UH(I).0..1420|
00000660: 3A 55 48 28 49 29 B2 43  4E 3A 4B 4C B2 49 AC 38  |:UH(I).CN:KL.I.8|
00000670: 3A 8D 31 34 34 30 00 7C  0E 1C 02 82 00 A1 0E 26  |:.1440.|.......&|
00000680: 02 8B 50 44 B1 30 A7 81  49 B2 30 A4 50 44 AB 31  |..PD.0..I.0.PD.1|
00000690: 3A 8D 31 34 32 30 3A 50  48 28 49 29 B2 43 4E 3A  |:.1420:PH(I).CN:|
000006A0: 82 00 CF 0E 30 02 81 49  B2 30 A4 34 3A 58 25 28  |....0..I.0.4:X%(|
000006B0: 49 29 B2 50 48 28 49 29  3A 82 3A 42 52 B2 32 3A  |I).PH(I):.:BR.2:|
000006C0: 8D 39 33 30 3A 50 56 B2  56 3A 50 59 B2 54 59 00  |.930:PV.V:PY.TY.|
000006D0: FC 0E 3A 02 81 49 B2 30  A4 34 3A 58 25 28 49 29  |..:..I.0.4:X%(I)|
000006E0: B2 55 48 28 49 29 3A 82  3A 8D 39 33 30 3A 55 56  |.UH(I):.:.930:UV|
000006F0: B2 56 3A 55 59 B2 54 59  3A 4D B2 30 00 38 0F 44  |.V:UY.TY:M.0.8.D|
00000700: 02 8B 54 55 A7 4D B2 B5  28 50 59 AD 32 AA 31 29  |..TU.M..(PY.2.1)|
00000710: AC 31 30 3A 8B 50 59 B3  34 AF 50 59 B1 31 A7 8B  |.10:.PY.4.PY.1..|
00000720: 52 46 B2 30 A7 4D B2 4D  AA B5 28 31 32 AC BB 28  |RF.0.M.M..(12..(|
00000730: 31 29 AD 34 29 AC 31 30  00 45 0F 4E 02 4F B2 4D  |1).4).10.E.N.O.M|
00000740: 3A 8D 37 31 30 00 80 0F  58 02 4C 4E B2 31 3A 81  |:.710...X.LN.1:.|
00000750: 49 B2 30 A4 34 3A 4B 4C  B2 49 AC 38 3A 43 4E B2  |I.0.4:KL.I.8:CN.|
00000760: 50 48 28 49 29 3A 8D 31  34 34 30 3A 82 3A 49 B2  |PH(I):.1440:.:I.|
00000770: 50 59 3A 4A B2 55 59 3A  8B 58 B2 31 89 36 38 30  |PY:J.UY:.X.1.680|
00000780: 00 93 0F 62 02 8B 49 B2  4A A7 49 B2 50 56 3A 4A  |...b..I.J.I.PV:J|
00000790: B2 55 56 00 AD 0F 6C 02  8B 4A B1 49 A7 57 24 B2  |.UV...l..J.I.W$.|
000007A0: 55 4E 24 3A 4B B2 55 59  3A 89 36 34 30 00 C2 0F  |UN$:K.UY:.640...|
000007B0: 76 02 57 24 B2 22 44 45  41 4C 45 52 22 3A 4B B2  |v.W$."DEALER":K.|
000007C0: 50 59 00 E3 0F 80 02 99  51 35 24 51 34 24 57 24  |PY......Q5$Q4$W$|
000007D0: 22 20 57 49 4E 53 20 57  49 54 48 20 22 57 57 24  |" WINS WITH "WW$|
000007E0: 28 4B 29 00 FA 0F 8A 02  8B 49 B1 4A A7 50 42 B2  |(K)......I.J.PB.|
000007F0: 50 42 AA 49 54 3A 89 36  38 30 00 11 10 94 02 8B  |PB.IT:.680......|
00000800: 4A B1 49 A7 55 42 B2 55  42 AA 49 54 3A 89 36 38  |J.I.UB.UB.IT:.68|
00000810: 30 00 2F 10 9E 02 49 54  B2 49 54 AD 32 3A 50 42  |0./...IT.IT.2:PB|
00000820: B2 50 42 AA 49 54 3A 55  42 B2 55 42 AA 49 54 00  |.PB.IT:UB.UB.IT.|
00000830: 52 10 A8 02 99 51 36 24  22 48 49 54 20 41 4E 59  |R....Q6$"HIT ANY|
00000840: 20 4B 45 59 20 54 4F 20  43 4F 4E 54 49 4E 55 45  | KEY TO CONTINUE|
00000850: 22 3B 00 65 10 B2 02 A1  59 24 3A 8B 59 24 B2 22  |";.e....Y$:.Y$."|
00000860: 22 89 36 39 30 00 6E 10  BC 02 89 33 32 30 00 83  |".690.n....320..|
00000870: 10 C6 02 8D 39 30 30 3A  52 46 B2 30 3A 8B 4D 89  |....900:RF.0:.M.|
00000880: 37 34 30 00 AF 10 D0 02  99 51 35 24 51 34 24 55  |740......Q5$Q4$U|
00000890: 4E 24 22 20 42 45 54 53  22 3B 3A 85 52 3A 4F B2  |N$" BETS";:.R:O.|
000008A0: 52 3A 54 42 B2 52 3A 8B  52 B1 30 89 38 30 30 00  |R:TB.R:.R.0.800.|
000008B0: C2 10 DA 02 58 B2 31 3A  50 42 B2 50 42 AA 49 54  |....X.1:PB.PB.IT|
000008C0: 3A 8E 00 F7 10 E4 02 50  42 B2 50 42 AB 4D 3A 49  |:......PB.PB.M:I|
000008D0: 54 B2 49 54 AA 4D 3A 99  51 37 24 51 36 24 22 44  |T.IT.M:.Q7$Q6$"D|
000008E0: 45 41 4C 45 52 20 42 45  54 53 22 4D 3B 3A 8D 39  |EALER BETS"M;:.9|
000008F0: 31 30 3A 54 42 B2 4D 00  38 11 EE 02 52 B2 30 3A  |10:TB.M.8...R.0:|
00000900: 99 51 35 24 51 34 24 22  46 4F 4C 44 2C 43 41 4C  |.Q5$Q4$"FOLD,CAL|
00000910: 4C 2C 52 41 49 53 45 20  20 22 55 4E 24 3B 3A 85  |L,RAISE  "UN$;:.|
00000920: 22 20 20 43 9D 9D 9D 22  3B 59 59 24 3A 59 24 B2  |"  C...";YY$:Y$.|
00000930: C8 28 59 59 24 2C 31 29  00 53 11 F8 02 8B 59 24  |.(YY$,1).S....Y$|
00000940: B2 22 46 22 A7 50 42 B2  50 42 AA 49 54 3A 58 B2  |."F".PB.PB.IT:X.|
00000950: 31 3A 8E 00 78 11 02 03  8B 59 24 B2 22 43 22 A7  |1:..x....Y$."C".|
00000960: 55 42 B2 55 42 AB 4D 3A  49 54 B2 49 54 AA 4D 3A  |UB.UB.M:IT.IT.M:|
00000970: 58 B2 32 3A 89 39 30 30  00 89 11 0C 03 8B 59 24  |X.2:.900......Y$|
00000980: B3 B1 22 52 22 89 37 35  30 00 AF 11 16 03 99 51  |.."R".750......Q|
00000990: 34 24 A3 31 37 AA C3 28  55 4E 24 29 29 22 20 20  |4$.17..(UN$))"  |
000009A0: 52 41 49 53 45 22 3B 3A  85 52 3A 52 46 B2 31 00  |RAISE";:.R:RF.1.|
000009B0: DF 11 20 03 55 42 B2 55  42 AB 52 AB 4D 3A 49 54  |.. .UB.UB.R.M:IT|
000009C0: B2 49 54 AA 52 AA 4D 3A  58 B2 32 3A 54 42 B2 54  |.IT.R.M:X.2:TB.T|
000009D0: 42 AA 52 3A 4D 58 B2 28  50 59 AA 31 29 AC 4F 00  |B.R:MX.(PY.1).O.|
000009E0: F5 11 2A 03 99 51 37 24  51 36 24 22 44 45 41 4C  |..*..Q7$Q6$"DEAL|
000009F0: 45 52 20 22 3B 00 03 12  34 03 8B 50 59 B1 32 89  |ER ";...4..PY.2.|
00000A00: 38 37 30 00 16 12 3E 03  8B 42 52 B2 31 B0 50 59  |870...>..BR.1.PY|
00000A10: B1 30 89 38 36 30 00 2A  12 48 03 8B 50 56 B1 31  |.0.860.*.H..PV.1|
00000A20: 30 AC 31 33 AE 34 89 38  36 30 00 50 12 52 03 55  |0.13.4.860.P.R.U|
00000A30: 42 B2 55 42 AA 49 54 3A  58 B2 31 3A 99 22 46 4F  |B.UB.IT:X.1:."FO|
00000A40: 4C 44 53 22 3B 3A 8D 31  33 39 30 3A 89 39 31 30  |LDS";:.1390:.910|
00000A50: 00 73 12 5C 03 50 42 B2  50 42 AB 52 3A 49 54 B2  |.s.\.PB.PB.R:IT.|
00000A60: 49 54 AA 52 3A 99 22 43  41 4C 4C 53 22 3B 3A 89  |IT.R:."CALLS";:.|
00000A70: 39 31 30 00 83 12 66 03  8B 4D 58 B3 B2 54 42 89  |910...f..MX..TB.|
00000A80: 38 36 30 00 A6 12 70 03  4D B2 B5 28 4D 58 AB 54  |860...p.M..(MX.T|
00000A90: 42 29 3A 50 42 B2 50 42  AB 52 AB 4D 3A 49 54 B2  |B):PB.PB.R.M:IT.|
00000AA0: 49 54 AA 52 AA 4D 00 C0  12 7A 03 99 22 52 41 49  |IT.R.M...z.."RAI|
00000AB0: 53 45 53 22 4D 3B 3A 8D  39 31 30 3A 89 37 35 30  |SES"M;:.910:.750|
00000AC0: 00 C9 12 84 03 99 51 37  24 00 00 13 8E 03 99 22  |......Q7$......"|
00000AD0: 13 22 3A 99 51 36 24 A3  33 31 29 22 20 20 20 20  |.":.Q6$.31)"    |
00000AE0: 20 20 20 20 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |    ............|
00000AF0: 50 4F 54 3D 22 C4 28 49  54 29 3B 3A 99 22 13 22  |POT=".(IT);:."."|
00000B00: 00 06 13 98 03 8E 00 3C  13 A2 03 81 49 B2 30 A4  |.......<....I.0.|
00000B10: 34 3A 58 32 25 28 49 29  B2 B5 28 58 25 28 49 29  |4:X2%(I)..(X%(I)|
00000B20: AD 31 33 29 3A 58 25 28  49 29 B2 58 25 28 49 29  |.13):X%(I).X%(I)|
00000B30: AB 58 32 25 28 49 29 AC  31 33 3A 82 00 5A 13 AC  |.X2%(I).13:..Z..|
00000B40: 03 81 49 B2 31 A4 34 3A  54 32 B2 58 25 28 49 29  |..I.1.4:T2.X%(I)|
00000B50: 3A 54 33 B2 58 32 25 28  49 29 00 78 13 B6 03 81  |:T3.X2%(I).x....|
00000B60: 4A B2 49 AB 31 A4 30 A9  AB 31 3A 8B 54 32 B1 58  |J.I.1.0..1:.T2.X|
00000B70: 25 28 4A 29 89 39 37 30  00 9D 13 C0 03 58 25 28  |%(J).970.....X%(|
00000B80: 4A AA 31 29 B2 58 25 28  4A 29 3A 58 32 25 28 4A  |J.1).X%(J):X2%(J|
00000B90: AA 31 29 B2 58 32 25 28  4A 29 3A 82 4A 00 BB 13  |.1).X2%(J):.J...|
00000BA0: CA 03 58 25 28 4A AA 31  29 B2 54 32 3A 58 32 25  |..X%(J.1).T2:X2%|
00000BB0: 28 4A AA 31 29 B2 54 33  3A 82 49 00 EB 13 D4 03  |(J.1).T3:.I.....|
00000BC0: 46 4B B2 30 3A 46 53 B2  30 3A 53 4B B2 30 3A 53  |FK.0:FS.0:SK.0:S|
00000BD0: 53 B2 30 3A 50 4B B2 30  3A 50 53 B2 30 3A 56 B2  |S.0:PK.0:PS.0:V.|
00000BE0: 30 3A 56 44 B2 30 3A 54  59 B2 30 00 2B 14 DE 03  |0:VD.0:TY.0.+...|
00000BF0: 81 49 B2 30 A4 34 3A 54  31 B2 30 3A 54 32 B2 30  |.I.0.4:T1.0:T2.0|
00000C00: 3A 54 33 B2 30 3A 54 34  B2 30 3A 54 35 B2 30 3A  |:T3.0:T4.0:T5.0:|
00000C10: 54 36 B2 30 3A 54 38 B2  58 25 28 49 29 3A 54 37  |T6.0:T8.X%(I):T7|
00000C20: B2 54 38 AB 49 3A 45 B2  31 45 35 00 3D 14 E8 03  |.T8.I:E.1E5.=...|
00000C30: 81 4A B2 30 A4 34 3A 45  B2 45 AD 31 30 00 5D 14  |.J.0.4:E.E.10.].|
00000C40: F2 03 8B 58 25 28 4A 29  B2 54 37 AA 4A A7 54 31  |...X%(J).T7.J.T1|
00000C50: B2 54 31 AA 31 3A 54 32  B2 54 32 AA 45 00 7B 14  |.T1.1:T2.T2.E.{.|
00000C60: FC 03 8B 58 25 28 4A 29  B2 54 38 A7 54 33 B2 54  |...X%(J).T8.T3.T|
00000C70: 33 AA 31 3A 54 34 B2 54  34 AA 45 00 9A 14 06 04  |3.1:T4.T4.E.....|
00000C80: 8B 58 32 25 28 4A 29 B2  49 20 A7 54 35 B2 54 35  |.X2%(J).I .T5.T5|
00000C90: AA 31 3A 54 36 B2 54 36  AA 45 00 A1 14 10 04 82  |.1:T6.T6.E......|
00000CA0: 4A 00 B9 14 1A 04 8B 54  31 B1 B2 53 4B A7 53 4B  |J......T1..SK.SK|
00000CB0: B2 54 31 3A 53 53 B2 54  32 00 D1 14 24 04 8B 54  |.T1:SS.T2...$..T|
00000CC0: 33 B1 B2 50 4B A7 50 4B  B2 54 33 3A 50 53 B2 54  |3..PK.PK.T3:PS.T|
00000CD0: 34 00 E9 14 2E 04 8B 54  35 B1 B2 46 4B A7 46 4B  |4......T5..FK.FK|
00000CE0: B2 54 35 3A 46 53 B2 54  36 00 F0 14 38 04 82 49  |.T5:FS.T6...8..I|
00000CF0: 00 FF 14 42 04 8B 50 4B  B3 33 89 31 31 33 30 00  |...B..PK.3.1130.|
00000D00: 14 15 4C 04 8B 50 4B B2  34 A7 54 59 B2 38 3A 89  |..L..PK.4.TY.8:.|
00000D10: 31 32 38 30 00 3B 15 56  04 54 59 B2 36 3A 8D 31  |1280.;.V.TY.6:.1|
00000D20: 33 31 30 3A 8B 58 25 28  30 29 B3 B1 58 25 28 31  |310:.X%(0)..X%(1|
00000D30: 29 A7 54 59 B2 33 3A 56  44 B2 32 00 45 15 60 04  |).TY.3:VD.2.E.`.|
00000D40: 89 31 32 39 30 00 6F 15  6A 04 8B 53 4B B2 34 AF  |.1290.o.j..SK.4.|
00000D50: 28 58 25 28 33 29 B2 33  AF 58 25 28 34 29 B2 31  |(X%(3).3.X%(4).1|
00000D60: 32 29 A7 53 4B B2 35 3A  56 B2 39 30 32 34 35 00  |2).SK.5:V.90245.|
00000D70: 7E 15 74 04 8B 46 4B B2  35 A7 54 59 B2 35 00 90  |~.t..FK.5.TY.5..|
00000D80: 15 7E 04 8B 53 4B B2 35  A7 54 59 B2 54 59 AA 34  |.~..SK.5.TY.TY.4|
00000D90: 00 9C 15 88 04 8B 56 89  31 33 30 30 00 A9 15 92  |......V.1300....|
00000DA0: 04 8B 54 59 89 31 32 39  30 00 BC 15 9C 04 4A B2  |..TY.1290.....J.|
00000DB0: 30 3A 8B 42 52 B2 32 89  31 32 32 30 00 DE 15 A6  |0:.BR.2.1220....|
00000DC0: 04 4A B2 58 25 28 34 29  AB 58 25 28 30 29 3A 8B  |.J.X%(4).X%(0):.|
00000DD0: 46 4B B3 34 AF 53 4B B3  34 89 31 32 32 30 00 00  |FK.4.SK.4.1220..|
00000DE0: 16 B0 04 54 59 B2 31 2E  35 3A 56 44 B2 31 3A 50  |...TY.1.5:VD.1:P|
00000DF0: 53 B2 53 53 3A 8B 46 4B  B2 34 A7 50 53 B2 46 53  |S.SS:.FK.4.PS.FS|
00000E00: 00 0A 16 BA 04 89 31 32  38 30 00 1F 16 C4 04 8B  |......1280......|
00000E10: 50 4B B2 32 A7 8D 31 33  31 30 3A 54 59 B2 31 00  |PK.2..1310:TY.1.|
00000E20: 39 16 CE 04 8B 58 25 28  31 29 B2 58 25 28 32 29  |9....X%(1).X%(2)|
00000E30: A7 50 53 B2 30 31 31 31  31 00 53 16 D8 04 8B 58  |.PS.01111.S....X|
00000E40: 25 28 31 29 B2 58 25 28  30 29 A7 50 53 B2 31 31  |%(1).X%(0).PS.11|
00000E50: 30 31 31 00 6E 16 E2 04  8B 50 53 B1 31 31 A7 54  |011.n....PS.11.T|
00000E60: 59 B2 32 3A 56 44 B2 31  3A 89 31 32 38 30 00 7C  |Y.2:VD.1:.1280.||
00000E70: 16 EC 04 8B 4A B2 33 89  31 32 30 30 00 85 16 F6  |....J.3.1200....|
00000E80: 04 56 44 B2 33 00 8F 16  00 05 8D 31 33 31 30 00  |.VD.3......1310.|
00000E90: 9E 16 0A 05 8D 31 33 38  30 3A 56 B2 54 37 00 C3  |.....1380:V.T7..|
00000EA0: 16 14 05 81 49 B2 30 A4  34 3A 58 25 28 49 29 B2  |....I.0.4:X%(I).|
00000EB0: 58 25 28 49 29 AA 31 33  AC 58 32 25 28 49 29 3A  |X%(I).13.X2%(I):|
00000EC0: 82 3A 8E 00 04 17 1E 05  45 B2 31 45 35 3A 81 49  |.:......E.1E5:.I|
00000ED0: B2 30 A4 34 3A 45 B2 45  AD 31 30 3A 54 32 B2 B5  |.0.4:E.E.10:T2..|
00000EE0: 28 28 50 53 AA 31 45 AB  35 29 AD 45 29 3A 50 53  |((PS.1E.5).E):PS|
00000EF0: 25 28 49 29 B2 54 32 3A  50 53 B2 50 53 AB 54 32  |%(I).T2:PS.PS.T2|
00000F00: AC 45 3A 82 00 1D 17 28  05 81 49 B2 31 A4 34 3A  |.E:....(..I.1.4:|
00000F10: 8B 50 53 25 28 49 29 89  31 33 37 20 30 00 3E 17  |.PS%(I).137 0.>.|
00000F20: 32 05 54 32 B2 50 53 25  28 49 29 3A 54 33 B2 58  |2.T2.PS%(I):T3.X|
00000F30: 25 28 49 29 3A 54 34 B2  58 32 25 28 49 29 00 5E  |%(I):T4.X2%(I).^|
00000F40: 17 3C 05 81 4A B2 49 AB  31 A4 30 A9 AB 31 3A 8B  |.<..J.I.1.0..1:.|
00000F50: 50 53 25 28 4A 29 B2 30  89 31 33 36 20 30 00 93  |PS%(J).0.136 0..|
00000F60: 17 46 05 50 53 25 28 4A  AA 31 29 B2 50 53 25 28  |.F.PS%(J.1).PS%(|
00000F70: 4A 29 3A 58 25 28 4A AA  31 29 B2 58 25 28 4A 29  |J):X%(J.1).X%(J)|
00000F80: 3A 58 32 25 28 4A AA 31  29 B2 58 32 25 28 4A 29  |:X2%(J.1).X2%(J)|
00000F90: 3A 82 4A 00 BA 17 50 05  50 53 25 28 4A AA 31 29  |:.J...P.PS%(J.1)|
00000FA0: B2 54 32 3A 58 25 28 4A  AA 31 29 B2 54 33 3A 58  |.T2:X%(J.1).T3:X|
00000FB0: 32 25 28 4A AA 31 29 B2  54 34 00 C3 17 5A 05 82  |2%(J.1).T4...Z..|
00000FC0: 49 3A 8E 00 F0 17 64 05  54 37 B2 30 3A 45 B2 31  |I:....d.T7.0:E.1|
00000FD0: 3A 81 49 B2 30 A4 34 3A  54 37 B2 54 37 AA 58 25  |:.I.0.4:T7.T7.X%|
00000FE0: 28 49 29 AC 45 3A 45 B2  45 AC 31 33 3A 82 3A 8E  |(I).E:E.E.13:.:.|
00000FF0: 00 FA 17 6E 05 57 54 B2  54 49 00 0E 18 78 05 8B  |...n.WT.TI...x..|
00001000: 20 54 49 B3 57 54 AA 57  89 31 34 30 20 30 00 14  | TI.WT.W.140 0..|
00001010: 18 82 05 8E 00 50 18 8C  05 4B 25 B2 B5 28 4B 4E  |.....P...K%..(KN|
00001020: 25 AC BB 28 37 29 29 3A  43 4E B2 44 4B 25 28 4B  |%..(7)):CN.DK%(K|
00001030: 25 29 3A 81 4C 4C B2 4B  25 A4 35 30 3A 44 4B 25  |%):.LL.K%.50:DK%|
00001040: 28 4C 4C 29 B2 44 4B 25  28 4C 4C AA 31 29 3A 82  |(LL).DK%(LL.1):.|
00001050: 00 6B 18 96 05 44 4B 25  28 35 31 29 B2 43 4E 3A  |.k...DK%(51).CN:|
00001060: 4B 4E 25 B2 4B 4E 25 AB  31 3A 8E 00 74 18 A0 05  |KN%.KN%.1:..t...|
00001070: 8F 20 55 50 00 A0 18 AA  05 4A B2 B5 28 43 4E AD  |. UP.....J..(CN.|
00001080: 31 33 29 3A 4B B2 43 4E  AB 4A AC 31 33 3A 99 C8  |13):K.CN.J.13:..|
00001090: 28 51 34 24 2C 4C 4E 29  3B 3A 99 A3 4B 4C 29 3B  |(Q4$,LN);:..KL);|
000010A0: 00 CB 18 B4 05 99 22 12  20 20 20 20 20 20 20 22  |......".       "|
000010B0: 51 31 24 3B 3A 99 22 20  22 43 56 24 28 4B 2C 30  |Q1$;:." "CV$(K,0|
000010C0: 29 22 20 20 20 20 22 51  31 24 3B 00 F3 18 BE 05  |)"    "Q1$;.....|
000010D0: 99 22 20 22 53 55 24 28  4A 2C 33 29 3B 53 55 24  |." "SU$(J,3);SU$|
000010E0: 28 4A 2C 53 25 28 4B 2C  30 29 29 22 20 20 22 51  |(J,S%(K,0))"  "Q|
000010F0: 31 24 3B 00 1C 19 C8 05  81 4C B2 31 A4 35 3A 99  |1$;......L.1.5:.|
00001100: 22 20 20 22 53 55 24 28  4A 2C 53 25 28 4B 2C 4C  |"  "SU$(J,S%(K,L|
00001110: 29 29 22 20 20 22 51 31  24 3B 3A 82 00 5B 19 D2  |))"  "Q1$;:..[..|
00001120: 05 99 22 20 20 22 53 55  24 28 4A 2C 53 25 28 4B  |.."  "SU$(J,S%(K|
00001130: 2C 36 29 29 3B 53 55 24  28 4A 2C 33 29 22 20 22  |,6));SU$(J,3)" "|
00001140: 51 31 24 3B 3A 99 22 20  20 20 20 22 43 56 24 28  |Q1$;:."    "CV$(|
00001150: 4B 2C 31 29 22 20 22 51  31 24 3B 00 70 19 DC 05  |K,1)" "Q1$;.p...|
00001160: 99 22 20 20 20 20 20 20  20 92 22 51 31 24 3A 8E  |."       ."Q1$:.|
00001170: 00 87 19 E6 05 99 C8 28  51 34 24 2C 4C 4E 29 3B  |.......(Q4$,LN);|
00001180: 3A 99 A3 4B 4C 29 3B 00  A7 19 F0 05 99 22 12 20  |:..KL);......". |
00001190: 20 20 20 20 20 20 22 51  31 24 3B 3A 8F 20 46 41  |      "Q1$;:. FA|
000011A0: 43 45 20 44 4F 57 4E 00  C4 19 FA 05 81 4A B2 32  |CE DOWN......J.2|
000011B0: A4 31 30 3A 99 22 20 A6  A6 A6 A6 A6 20 22 51 31  |.10:." ..... "Q1|
000011C0: 24 3B 3A 82 00 CE 19 04  06 89 31 35 30 30 00 12  |$;:.......1500..|
000011D0: 1A 0E 06 51 31 24 B2 22  11 9D 9D 9D 9D 9D 9D 9D  |...Q1$."........|
000011E0: 22 3A 51 32 24 B2 22 91  91 91 91 91 91 91 91 91  |":Q2$.".........|
000011F0: 91 91 22 3A 51 34 24 B2  22 13 11 11 11 11 11 11  |..":Q4$.".......|
00001200: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00001210: 11 22 00 44 1A 18 06 58  58 24 B2 22 20 20 20 20  |.".D...XX$."    |
00001220: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001230: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001240: 20 20 20 22 00 81 1A 22  06 51 35 24 B2 51 34 24  |   "...".Q5$.Q4$|
00001250: AA 58 58 24 3A 51 36 24  B2 51 34 24 AA 22 11 22  |.XX$:Q6$.Q4$."."|
00001260: 3A 51 37 24 B2 51 36 24  AA 58 58 24 AA 22 13 22  |:Q7$.Q6$.XX$."."|
00001270: 3A 51 38 24 B2 22 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |:Q8$."..........|
00001280: 22 00 A1 1A 2C 06 55 42  B2 35 30 30 3A 50 42 B2  |"...,.UB.500:PB.|
00001290: 35 30 30 3A 54 55 B2 31  3A 49 B2 BB 28 AB 54 49  |500:TU.1:I..(.TI|
000012A0: 29 00 DF 1A 36 06 86 20  44 4B 25 28 35 32 29 2C  |)...6.. DK%(52),|
000012B0: 53 55 24 28 33 2C 31 33  29 2C 43 56 24 28 31 32  |SU$(3,13),CV$(12|
000012C0: 2C 31 29 2C 53 25 28 31  32 2C 36 29 2C 50 48 28  |,1),S%(12,6),PH(|
000012D0: 34 29 2C 55 48 28 34 29  2C 57 57 24 28 39 29 00  |4),UH(4),WW$(9).|
000012E0: F9 1A 40 06 86 20 58 25  28 34 29 2C 58 32 25 28  |..@.. X%(4),X2%(|
000012F0: 34 29 2C 50 53 25 28 34  29 00 10 1B 4A 06 81 4D  |4),PS%(4)...J..M|
00001300: B2 30 A4 35 32 3A 44 4B  25 28 4D 29 B2 4D 3A 82  |.0.52:DK%(M).M:.|
00001310: 00 3F 1B 54 06 81 4D B2  30 A4 33 3A 53 55 24 28  |.?.T..M.0.3:SU$(|
00001320: 4D 2C 30 29 B2 22 20 20  20 22 3A 81 4B B2 31 A4  |M,0)."   ":.K.1.|
00001330: 33 3A 87 53 55 24 28 4D  2C 4B 29 3A 82 3A 82 00  |3:.SU$(M,K):.:..|
00001340: 66 1B 5E 06 81 4B B2 34  A4 31 33 3A 87 41 24 3A  |f.^..K.4.13:.A$:|
00001350: 81 4D B2 30 A4 33 3A 53  55 24 28 4D 2C 4B 29 B2  |.M.0.3:SU$(M,K).|
00001360: 41 24 3A 82 3A 82 00 88  1B 68 06 81 4D B2 30 A4  |A$:.:....h..M.0.|
00001370: 31 32 3A 87 43 56 24 28  4D 2C 30 29 3A 87 43 56  |12:.CV$(M,0):.CV|
00001380: 24 28 4D 2C 31 29 3A 82  00 A8 1B 72 06 81 4D B2  |$(M,1):....r..M.|
00001390: 30 A4 31 32 3A 81 4B B2  30 A4 36 3A 87 53 25 28  |0.12:.K.0.6:.S%(|
000013A0: 4D 2C 4B 29 3A 82 3A 82  00 BE 1B 7C 06 81 4D B2  |M,K):.:....|..M.|
000013B0: 30 A4 39 3A 87 20 57 57  24 28 4D 29 3A 82 00 C4  |0.9:. WW$(M):...|
000013C0: 1B 86 06 8E 00 09 1C 90  06 83 22 20 D3 20 22 2C  |.........." . ",|
000013D0: 22 D3 20 D3 22 2C 22 D3  22 2C 22 20 DA 20 22 2C  |". .","."," . ",|
000013E0: 22 DA 20 DA 22 2C 22 DA  22 2C 22 20 D8 20 22 2C  |". .","."," . ",|
000013F0: 22 D8 20 D8 22 2C 22 D8  22 2C 22 20 C1 20 22 2C  |". .","."," . ",|
00001400: 22 C1 20 C1 22 2C 22 C1  22 00 4A 1C 9A 06 83 22  |". .",".".J...."|
00001410: 20 4A 20 22 2C 22 20 41  20 22 2C 22 20 43 20 22  | J "," A "," C "|
00001420: 2C 22 20 4B 20 22 2C 22  20 51 20 22 2C 22 20 55  |," K "," Q "," U|
00001430: 20 22 2C 22 20 45 20 22  2C 22 20 4E 20 22 2C 22  | "," E "," N ","|
00001440: 20 49 20 22 2C 22 20 47  20 22 00 95 1C A4 06 83  | I "," G "......|
00001450: 22 32 20 22 2C 22 20 32  22 2C 22 33 20 22 2C 22  |"2 "," 2","3 ","|
00001460: 20 33 22 2C 22 34 20 22  2C 22 20 34 22 2C 22 35  | 3","4 "," 4","5|
00001470: 20 22 2C 22 20 35 22 2C  22 36 20 22 2C 22 20 36  | "," 5","6 "," 6|
00001480: 22 2C 22 37 20 22 2C 22  20 37 22 2C 22 38 20 22  |","7 "," 7","8 "|
00001490: 2C 22 20 38 22 00 D6 1C  AE 06 83 22 39 20 22 2C  |," 8"......"9 ",|
000014A0: 22 20 39 22 2C 22 31 30  22 2C 22 31 30 22 2C 22  |" 9","10","10","|
000014B0: 4A 20 22 2C 22 20 4A 22  2C 22 51 20 22 2C 22 20  |J "," J","Q "," |
000014C0: 51 22 2C 22 4B 20 22 2C  22 20 4B 22 2C 22 41 20  |Q","K "," K","A |
000014D0: 22 2C 22 20 41 22 00 17  1D B8 06 83 20 30 2C 31  |"," A"...... 0,1|
000014E0: 2C 30 2C 30 2C 30 2C 31  2C 30 2C 20 30 2C 31 2C  |,0,0,0,1,0, 0,1,|
000014F0: 30 2C 31 2C 30 2C 31 2C  30 2C 20 30 2C 32 2C 30  |0,1,0,1,0, 0,2,0|
00001500: 2C 30 2C 30 2C 32 2C 30  2C 20 30 2C 32 2C 30 2C  |,0,0,2,0, 0,2,0,|
00001510: 31 2C 30 2C 32 2C 30 00  58 1D C2 06 83 20 30 2C  |1,0,2,0.X.... 0,|
00001520: 32 2C 30 2C 32 2C 30 2C  32 2C 30 2C 20 30 2C 32  |2,0,2,0,2,0, 0,2|
00001530: 2C 31 2C 32 2C 30 2C 32  2C 30 2C 20 30 2C 32 2C  |,1,2,0,2,0, 0,2,|
00001540: 31 2C 32 2C 31 2C 32 2C  30 2C 20 32 2C 31 2C 32  |1,2,1,2,0, 2,1,2|
00001550: 2C 30 2C 32 2C 30 2C 32  00 A2 1D CC 06 83 20 32  |,0,2,0,2...... 2|
00001560: 2C 31 2C 32 2C 30 2C 32  2C 31 2C 32 2C 20 30 2C  |,1,2,0,2,1,2, 0,|
00001570: 34 2C 35 2C 36 2C 37 2C  30 2C 30 2C 20 20 20 20  |4,5,6,7,0,0,    |
00001580: 30 2C 38 2C 39 2C 31 30  2C 31 30 2C 31 31 2C 30  |0,8,9,10,10,11,0|
00001590: 2C 20 30 2C 37 2C 31 32  2C 31 31 2C 31 33 2C 30  |, 0,7,12,11,13,0|
000015A0: 2C 30 00 B6 1D D6 06 83  20 30 2C 30 2C 30 2C 31  |,0...... 0,0,0,1|
000015B0: 2C 30 2C 30 2C 30 00 FF  1D E0 06 83 20 22 5A 49  |,0,0,0...... "ZI|
000015C0: 50 22 2C 22 41 20 50 41  49 52 22 2C 22 54 57 4F  |P","A PAIR","TWO|
000015D0: 20 50 41 49 52 22 2C 22  54 48 52 45 45 20 4F 46  | PAIR","THREE OF|
000015E0: 20 41 20 4B 49 4E 44 22  2C 22 41 20 53 54 52 41  | A KIND","A STRA|
000015F0: 49 47 48 54 22 2C 22 41  20 46 4C 55 53 48 22 00  |IGHT","A FLUSH".|
00001600: 3B 1E EA 06 83 22 41 20  46 55 4C 4C 20 48 4F 55  |;...."A FULL HOU|
00001610: 53 45 22 2C 22 37 22 2C  22 46 4F 55 52 20 4F 46  |SE","7","FOUR OF|
00001620: 20 41 20 4B 49 4E 44 22  2C 22 41 20 53 54 52 41  | A KIND","A STRA|
00001630: 49 47 48 54 20 46 4C 55  53 48 22 00 00 00        |IGHT FLUSH"...  |

....D.. DRAW POKER.0.N.. BY EARL WUCHTER
    1978.S.X.. ANYONE FOR COLOR & SOUND 
???......53272,21:.".         D R A W   
P O K E R".......10)"..EARL WUCHTER 1978
".X....".MY NAME IS DEALER. WHAT IS YOUR
S  MAN.....";UN$... ..C(UN$).8.UN$.H(UN$
,8).*....53272,23:."..OK. "UN$" HERE ARE
 THE HOUSE RULES:".U....".THE ANTE IS 5.
   NO LIMIT ON BETS."......"WE ALTERNATE
 OPENING. OPEN WITH ANYTHING"...H..".NO 
CHECKING. OPEN OR BET 0 (FOLD).".Z.R..".
WHEN ASKED TO FOLD,CALL,OR RAISE,"......
"REPLY WITH F OR C OR R AND RETURN."./..
.."WHEN ASKED TO BET, OR WHEN RAISING,".
T...."REPLY WITH AMOUNT AND RETURN."....
..".TO DRAW, ENTER EACH CARD NUMBER AND 
RET."......"IF YOU PROMISE NOT TO TAKE A
DVANTAGE OF".X...."  MY ARTIFICIAL INTEL
LEGENCE".......6)"THAT DOESN'T KNOW WHEN
 TO FOLD,".)."...9)"I WON'T PEEK AT YOUR
 CARDS !".3.,..1550.V.6..".OK  Y...";Y$:
.".":.53272,21...@..".....    DEALER HAS
"PB:."..    "UN$" HAS"UB:.PB.0.UB.0.370.
..J.Y$.UN$:.PB..0.Y$."DEALER".Q.T.."... 
   "Y$" IS BROKE"...^..".    ANOTHER GAM
E  Y...";YY$:Y$.H(YY$,1):.Y$."N"...1.H.P
B.500:UB.500:.Y$.."Y".."...":.350.H.R.W.
200:.1390:KN%.52.L.|..".":IT.10:PB.PB.5:
UB.UB.5:.900......M.0.4:.1420:UH(M).CN:L
N.13:KL.M.8:.1440:.1420:PH(M).CN.B...X%(
M).CN:LN.1:.1510:.......H(Q4$,12).3)"1".
11)"2".19)"3".27)"4".35)"5".....BR.1:.93
0:.I.0.4:PH(I).X%(I):..N...PV.V:PY.TY:PD
.VD:TU.1.TU:M.0:.TU.M..(PY.3.1).10:O.M.B
....710:.X.320,450.|.B.DR.0:W.150:.1390:
.900...L..Q5$Q4$"CARD # "UN$",  0 IF NON
E";:.DN...V..DN.0.510.H....DN.1.DN.5.460
.....DN.DN.1:.UH(DN).0.460.....DR.DR.1:U
H(DN)..1:LN.13:KL.DN.8:.1510:.DR.3.460.7
....Q5$Q4$"DEALER TAKES"PD:.900.M...."."
:LN.13:.I.0.4.V....UH(I).0..1420:UH(I).C
N:KL.I.8:.1440.|.......&..PD.0..I.0.PD.1
:.1420:PH(I).CN:..O.0..I.0.4:X%(I).PH(I)
:.:BR.2:.930:PV.V:PY.TY...:..I.0.4:X%(I)
.UH(I):.:.930:UV.V:UY.TY:M.0.8.D..TU.M..
(PY.2.1).10:.PY.4.PY.1..RF.0.M.M..(12..(
1).4).10.E.N.O.M:.710...X.LN.1:.I.0.4:KL
.I.8:CN.PH(I):.1440:.:I.PY:J.UY:.X.1.680
...B..I.J.I.PV:J.UV...L..J.I.W$.UN$:K.UY
:.640.B.V.W$."DEALER":K.PY......Q5$Q4$W$
" WINS WITH "WW$(K)......I.J.PB.PB.IT:.6
80......J.I.UB.UB.IT:.680./...IT.IT.2:PB
.PB.IT:UB.UB.IT.R....Q6$"HIT ANY KEY TO 
CONTINUE";.E....Y$:.Y$."".690.N....320..
.F..900:RF.0:.M.740...P..Q5$Q4$UN$" BETS
";:.R:O.R:TB.R:.R.0.800.B.Z.X.1:PB.PB.IT
:......PB.PB.M:IT.IT.M:.Q7$Q6$"DEALER BE
TS"M;:.910:TB.M.8...R.0:.Q5$Q4$"FOLD,CAL
L,RAISE  "UN$;:."  C...";YY$:Y$.H(YY$,1)
.S....Y$."F".PB.PB.IT:X.1:..X....Y$."C".
UB.UB.M:IT.IT.M:X.2:.900......Y$.."R".75
0......Q4$.17.C(UN$))"  RAISE";:.R:RF.1.
.. .UB.UB.R.M:IT.IT.R.M:X.2:TB.TB.R:MX.(
PY.1).O...*..Q7$Q6$"DEALER ";...4..PY.2.
870...>..BR.1.PY.0.860.*.H..PV.10.13.4.8
60.P.R.UB.UB.IT:X.1:."FOLDS";:.1390:.910
.S.\.PB.PB.R:IT.IT.R:."CALLS";:.910...F.
.MX..TB.860...P.M..(MX.TB):PB.PB.R.M:IT.
IT.R.M...Z.."RAISES"M;:.910:.750.I....Q7
$......".":.Q6$.31)"        ............
POT="D(IT);:.".".......<....I.0.4:X2%(I)
..(X%(I).13):X%(I).X%(I).X2%(I).13:..Z..
..I.1.4:T2.X%(I):T3.X2%(I).X....J.I.1.0.
.1:.T2.X%(J).970.....X%(J.1).X%(J):X2%(J
.1).X2%(J):.J...J.X%(J.1).T2:X2%(J.1).T3
:.I...T.FK.0:FS.0:SK.0:SS.0:PK.0:PS.0:V.
0:VD.0:TY.0.+....I.0.4:T1.0:T2.0:T3.0:T4
.0:T5.0:T6.0:T8.X%(I):T7.T8.I:E.1E5.=...
.J.0.4:E.E.10.]....X%(J).T7.J.T1.T1.1:T2
.T2.E.{....X%(J).T8.T3.T3.1:T4.T4.E.....
.X2%(J).I .T5.T5.1:T6.T6.E......J......T
1..SK.SK.T1:SS.T2.Q.$..T3..PK.PK.T3:PS.T
4......T5..FK.FK.T5:FS.T6...8..I...B..PK
.3.1130...L..PK.4.TY.8:.1280.;.V.TY.6:.1
310:.X%(0)..X%(1).TY.3:VD.2.E.`..1290.O.
J..SK.4.(X%(3).3.X%(4).12).SK.5:V.90245.
~.T..FK.5.TY.5...~..SK.5.TY.TY.4......V.
1300......TY.1290.....J.0:.BR.2.1220....
.J.X%(4).X%(0):.FK.4.SK.4.1220.....TY.1.
5:VD.1:PS.SS:.FK.4.PS.FS......1280...D..
PK.2..1310:TY.1.9.N..X%(1).X%(2).PS.0111
1.S.X..X%(1).X%(0).PS.11011.N....PS.11.T
Y.2:VD.1:.1280.|....J.3.1200.....VD.3...
...1310......1380:V.T7.C....I.0.4:X%(I).
X%(I).13.X2%(I):.:......E.1E5:.I.0.4:E.E
.10:T2..((PS.1E.5).E):PS%(I).T2:PS.PS.T2
.E:....(..I.1.4:.PS%(I).137 0.>.2.T2.PS%
(I):T3.X%(I):T4.X2%(I).^.<..J.I.1.0..1:.
PS%(J).0.136 0...F.PS%(J.1).PS%(J):X%(J.
1).X%(J):X2%(J.1).X2%(J):.J...P.PS%(J.1)
.T2:X%(J.1).T3:X2%(J.1).T4.C.Z..I:....D.
T7.0:E.1:.I.0.4:T7.T7.X%(I).E:E.E.13:.:.
...N.WT.TI...X.. TI.WT.W.140 0.......P..
.K%..(KN%..(7)):CN.DK%(K%):.LL.K%.50:DK%
(LL).DK%(LL.1):..K...DK%(51).CN:KN%.KN%.
1:..T. .. UP. ...J..(CN.13):K.CN.J.13:.H
(Q4$,LN);:..KL);.K....".       "Q1$;:." 
"CV$(K,0)"    "Q1$;......" "SU$(J,3);SU$
(J,S%(K,0))"  "Q1$;...H..L.1.5:."  "SU$(
J,S%(K,L))"  "Q1$;:..[.R.."  "SU$(J,S%(K
,6));SU$(J,3)" "Q1$;:."    "CV$(K,1)" "Q
1$;.P...."       ."Q1$:.......H(Q4$,LN);
:..KL);......".       "Q1$;:. FACE DOWN.
D....J.2.10:." ..... "Q1$;:..N....1500..
...Q1$."........":Q2$."...........":Q4$.
"........................".D...XX$."    
                                   "..."
.Q5$.Q4$.XX$:Q6$.Q4$.".":Q7$.Q6$.XX$."."
:Q8$.".........."...,.UB.500:PB.500:TU.1
:I..(.TI)...6.. DK%(52),SU$(3,13),CV$(12
,1),S%(12,6),PH(4),UH(4),WW$(9)...@.. X%
(4),X2%(4),PS%(4)...J..M.0.52:DK%(M).M:.
.?.T..M.0.3:SU$(M,0)."   ":.K.1.3:.SU$(M
,K):.:..F.^..K.4.13:.A$:.M.0.3:SU$(M,K).
A$:.:....H..M.0.12:.CV$(M,0):.CV$(M,1):.
...R..M.0.12:.K.0.6:.S%(M,K):.:....|..M.
0.9:. WW$(M):..D.........." S ","S S","S
"," Z ","Z Z","Z"," X ","X X","X"," A ",
"A A","A".J...." J "," A "," C "," K ","
 Q "," U "," E "," N "," I "," G "......
"2 "," 2","3 "," 3","4 "," 4","5 "," 5",
"6 "," 6","7 "," 7","8 "," 8".V...."9 ",
" 9","10","10","J "," J","Q "," Q","K ",
" K","A "," A"...... 0,1,0,0,0,1,0, 0,1,
0,1,0,1,0, 0,2,0,0,0,2,0, 0,2,0,1,0,2,0.
X.B.. 0,2,0,2,0,2,0, 0,2,1,2,0,2,0, 0,2,
1,2,1,2,0, 2,1,2,0,2,0,2...L.. 2,1,2,0,2
,1,2, 0,4,5,6,7,0,0,    0,8,9,10,10,11,0
, 0,7,12,11,13,0,0...V.. 0,0,0,1,0,0,0..
.... "ZIP","A PAIR","TWO PAIR","THREE OF
 A KIND","A STRAIGHT","A FLUSH".;...."A 
FULL HOUSE","7","FOUR OF A KIND","A STRA
IGHT FLUSH"...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL