SOLITAIRE POKER

00000000: 01 04 23 04 01 00 8F 20  2A 2A 2A 20 44 52 41 57  |..#.... *** DRAW|
00000010: 20 50 4F 4B 45 52 20 42  59 20 44 41 56 45 20 48  | POKER BY DAVE H|
00000020: 4F 57 45 00 46 04 02 00  8F 20 20 20 20 20 53 55  |OWE.F....     SU|
00000030: 42 4D 49 54 54 45 44 20  42 59 20 45 44 20 48 45  |BMITTED BY ED HE|
00000040: 52 53 54 45 49 4E 00 4C  04 03 00 8F 00 65 04 04  |RSTEIN.L.....e..|
00000050: 00 8F 20 2A 2A 2A 20 50  45 54 20 55 53 45 52 20  |.. *** PET USER |
00000060: 47 52 4F 55 50 00 81 04  05 00 8F 20 20 20 20 20  |GROUP......     |
00000070: 53 4F 46 54 57 41 52 45  20 45 58 43 48 41 4E 47  |SOFTWARE EXCHANG|
00000080: 45 00 96 04 06 00 8F 20  20 20 20 20 50 4F 20 42  |E......     PO B|
00000090: 4F 58 20 33 37 31 00 BA  04 07 00 8F 20 20 20 20  |OX 371......    |
000000A0: 20 4D 4F 4E 54 47 4F 4D  45 52 59 56 49 4C 4C 45  | MONTGOMERYVILLE|
000000B0: 2C 20 50 41 20 31 38 39  33 36 00 C0 04 08 00 8F  |, PA 18936......|
000000C0: 00 E0 04 0A 00 86 47 31  28 35 29 2C 46 37 28 33  |......G1(5),F7(3|
000000D0: 35 29 2C 46 38 28 33 35  29 2C 46 39 28 33 35 29  |5),F8(35),F9(35)|
000000E0: 00 04 05 14 00 86 43 35  28 36 29 2C 43 36 28 35  |......C5(6),C6(5|
000000F0: 29 2C 43 37 28 35 29 2C  43 38 28 37 29 2C 43 39  |),C7(5),C8(7),C9|
00000100: 28 35 32 29 00 0F 05 1E  00 4D 24 B2 22 20 22 00  |(52).....M$." ".|
00000110: 22 05 28 00 50 31 B2 33  32 37 36 38 3A 50 32 B2  |".(.P1.32768:P2.|
00000120: 34 30 00 2A 05 32 00 57  B2 30 00 34 05 3C 00 99  |40.*.2.W.0.4.<..|
00000130: 22 93 22 3B 00 5E 05 46  00 99 3A 99 3A 99 3A 99  |".";.^.F..:.:.:.|
00000140: 3A 99 3A 99 22 47 45 54  20 52 45 41 44 59 20 46  |:.:."GET READY F|
00000150: 4F 52 20 44 52 41 57 20  50 4F 4B 45 52 22 00 68  |OR DRAW POKER".h|
00000160: 05 50 00 8D 35 37 30 30  00 72 05 5A 00 99 22 93  |.P..5700.r.Z..".|
00000170: 22 3B 00 90 05 64 00 99  22 4C 45 54 27 53 20 50  |";...d.."LET'S P|
00000180: 4C 41 59 20 44 52 41 57  20 50 4F 4B 45 52 22 3B  |LAY DRAW POKER";|
00000190: 00 A9 05 6E 00 99 A3 32  36 29 3B 22 48 41 4E 44  |...n...26);"HAND|
000001A0: 20 20 4F 44 44 53 22 3A  99 00 CA 05 78 00 99 A3  |  ODDS":....x...|
000001B0: 31 39 29 3B 22 52 4F 59  41 4C 20 46 4C 55 53 48  |19);"ROYAL FLUSH|
000001C0: 3A 32 30 30 20 54 4F 20  31 22 00 ED 05 82 00 99  |:200 TO 1"......|
000001D0: A3 31 36 29 3B 22 53 54  52 41 49 47 48 54 20 46  |.16);"STRAIGHT F|
000001E0: 4C 55 53 48 3A 35 30 20  54 4F 20 31 22 00 10 06  |LUSH:50 TO 1"...|
000001F0: 8C 00 99 A3 31 36 29 3B  22 46 4F 55 52 20 4F 46  |....16);"FOUR OF|
00000200: 20 41 20 4B 49 4E 44 3A  33 30 20 54 4F 20 31 22  | A KIND:30 TO 1"|
00000210: 00 2F 06 96 00 99 A3 32  30 29 3B 22 46 55 4C 4C  |./.....20);"FULL|
00000220: 20 48 4F 55 53 45 3A 32  30 20 54 4F 20 31 22 00  | HOUSE:20 TO 1".|
00000230: 49 06 A0 00 99 A3 32 35  29 3B 22 46 4C 55 53 48  |I.....25);"FLUSH|
00000240: 3A 31 30 20 54 4F 20 31  22 00 65 06 AA 00 99 A3  |:10 TO 1".e.....|
00000250: 32 32 29 3B 22 53 54 52  41 49 47 48 54 3A 37 20  |22);"STRAIGHT:7 |
00000260: 54 4F 20 31 22 00 88 06  B4 00 99 A3 31 35 29 3B  |TO 1".......15);|
00000270: 22 54 48 52 45 45 20 4F  46 20 41 20 4B 49 4E 44  |"THREE OF A KIND|
00000280: 3A 35 20 54 4F 20 31 22  00 A4 06 BE 00 99 A3 32  |:5 TO 1".......2|
00000290: 32 29 3B 22 54 57 4F 20  50 41 49 52 3A 32 20 54  |2);"TWO PAIR:2 T|
000002A0: 4F 20 31 22 00 AE 06 C8  00 8D 35 34 30 30 00 D9  |O 1"......5400..|
000002B0: 06 D2 00 85 22 50 4C 41  43 45 20 59 4F 55 52 20  |...."PLACE YOUR |
000002C0: 42 45 54 53 3A 20 48 4F  57 20 4D 41 4E 59 20 44  |BETS: HOW MANY D|
000002D0: 4F 4C 4C 41 52 53 22 3B  44 00 EB 06 D4 00 8B 44  |OLLARS";D......D|
000002E0: B1 31 30 30 30 30 89 35  39 35 30 00 F9 06 D7 00  |.10000.5950.....|
000002F0: 8B 44 B3 30 89 35 39 30  30 00 08 07 DC 00 50 B2  |.D.0.5900.....P.|
00000300: 50 31 AA 31 35 AC 50 32  00 13 07 E6 00 8D 20 36  |P1.15.P2...... 6|
00000310: 30 30 30 00 29 07 F0 00  4D 24 B2 22 59 4F 55 52  |000.)...M$."YOUR|
00000320: 20 42 45 54 20 49 53 3A  22 00 35 07 FA 00 4C B2  | BET IS:".5...L.|
00000330: C3 28 4D 24 29 00 43 07  04 01 50 B2 50 31 AA 32  |.(M$).C...P.P1.2|
00000340: AC 50 32 00 4D 07 0E 01  8D 36 31 30 30 00 5D 07  |.P2.M....6100.].|
00000350: 18 01 4D 24 B2 22 24 22  AA C4 28 44 29 00 69 07  |..M$."$"..(D).i.|
00000360: 22 01 4C B2 C3 28 4D 24  29 00 77 07 2C 01 50 B2  |".L..(M$).w.,.P.|
00000370: 50 31 AA 33 AC 50 32 00  81 07 36 01 8D 36 31 30  |P1.3.P2...6..610|
00000380: 30 00 A0 07 3B 01 4D 24  B2 22 59 4F 55 20 57 49  |0...;.M$."YOU WI|
00000390: 4E 22 3A 50 B2 50 31 AA  33 31 3A 8D 36 31 30 30  |N":P.P1.31:.6100|
000003A0: 00 AC 07 40 01 81 20 53  B2 31 A4 38 00 B6 07 4A  |...@.. S.1.8...J|
000003B0: 01 8D 35 32 30 30 00 CC  07 54 01 50 B2 50 31 AA  |..5200...T.P.P1.|
000003C0: 31 31 31 AA 50 32 AC 28  38 AB 53 29 00 D4 07 5E  |111.P2.(8.S)...^|
000003D0: 01 4C B2 38 00 E5 07 68  01 4D 24 B2 22 24 22 AA  |.L.8...h.M$."$".|
000003E0: C4 28 57 31 29 00 EF 07  72 01 8D 36 31 30 30 00  |.(W1)...r..6100.|
000003F0: F6 07 7C 01 82 53 00 00  08 86 01 8D 37 30 30 30  |..|..S......7000|
00000400: 00 0B 08 90 01 81 59 B2  31 A4 35 00 15 08 9A 01  |......Y.1.5.....|
00000410: 8D 37 31 30 30 00 1F 08  A4 01 8D 32 30 30 30 00  |.7100......2000.|
00000420: 26 08 AE 01 82 59 00 30  08 B8 01 8D 38 30 30 30  |&....Y.0....8000|
00000430: 00 39 08 C2 01 53 58 B2  53 00 43 08 CC 01 8D 35  |.9...SX.S.C....5|
00000440: 31 30 30 00 6F 08 F4 01  4D 24 B2 22 44 4F 20 59  |100.o...M$."DO Y|
00000450: 4F 55 20 57 49 53 48 20  54 4F 20 53 54 41 4E 44  |OU WISH TO STAND|
00000460: 3F 20 45 4E 54 45 52 20  59 20 4F 52 20 4E 22 00  |? ENTER Y OR N".|
00000470: 7E 08 FE 01 50 B2 50 31  AA 31 31 AC 50 32 00 88  |~...P.P1.11.P2..|
00000480: 08 08 02 8D 36 30 30 30  00 90 08 12 02 A1 51 24  |....6000......Q$|
00000490: 00 9F 08 1C 02 8B 51 24  B2 22 22 89 35 33 30 00  |......Q$."".530.|
000004A0: B0 08 26 02 8B 51 24 B2  22 59 22 89 31 35 30 30  |..&..Q$."Y".1500|
000004B0: 00 C0 08 30 02 8B 51 24  B2 22 4E 22 89 36 30 30  |...0..Q$."N".600|
000004C0: 00 D0 08 3A 02 8B 51 24  B3 22 30 22 89 35 33 30  |...:..Q$."0".530|
000004D0: 00 E0 08 44 02 8B 51 24  B1 22 35 22 89 35 33 30  |...D..Q$."5".530|
000004E0: 00 12 09 58 02 4D 24 B2  22 49 4E 44 49 43 41 54  |...X.M$."INDICAT|
000004F0: 45 20 43 41 52 44 20 54  4F 20 48 4F 4C 44 20 42  |E CARD TO HOLD B|
00000500: 59 20 45 4E 54 45 52 49  4E 47 20 43 41 52 44 20  |Y ENTERING CARD |
00000510: 23 22 00 21 09 62 02 50  B2 50 31 AA 31 31 AC 50  |#".!.b.P.P1.11.P|
00000520: 32 00 2B 09 6C 02 8D 36  30 30 30 00 56 09 76 02  |2.+.l..6000.V.v.|
00000530: 4D 24 B2 22 54 4F 20 43  41 4E 43 45 4C 20 59 4F  |M$."TO CANCEL YO|
00000540: 55 52 20 43 48 4F 49 43  45 53 2C 20 45 4E 54 45  |UR CHOICES, ENTE|
00000550: 52 20 27 43 27 22 00 65  09 80 02 50 B2 50 31 AA  |R 'C'".e...P.P1.|
00000560: 31 32 AC 50 32 00 6F 09  8A 02 8D 36 30 30 30 00  |12.P2.o....6000.|
00000570: 9E 09 94 02 4D 24 B2 22  57 48 45 4E 20 52 45 41  |....M$."WHEN REA|
00000580: 44 59 20 46 4F 52 20 44  52 41 57 2C 20 50 52 45  |DY FOR DRAW, PRE|
00000590: 53 53 20 52 45 54 55 52  4E 20 4B 45 59 22 00 AD  |SS RETURN KEY"..|
000005A0: 09 9E 02 50 B2 50 31 AA  31 33 AC 50 32 00 B7 09  |...P.P1.13.P2...|
000005B0: A8 02 8D 36 30 30 30 00  C2 09 BC 02 81 49 B2 31  |...6000......I.1|
000005C0: A4 35 00 CE 09 C6 02 47  31 28 49 29 B2 30 00 D5  |.5.....G1(I).0..|
000005D0: 09 D0 02 82 49 00 E4 09  DA 02 50 B2 50 31 AA 32  |....I.....P.P1.2|
000005E0: 34 AC 50 32 00 EE 09 E4  02 8D 36 30 30 30 00 FF  |4.P2......6000..|
000005F0: 09 EE 02 8B 51 24 B3 B1  22 43 22 89 38 31 30 00  |....Q$.."C".810.|
00000600: 07 0A 20 03 A1 51 24 00  16 0A 2A 03 8B 51 24 B2  |.. ..Q$...*..Q$.|
00000610: 22 22 89 38 30 30 00 22  0A 34 03 51 B2 C6 28 51  |"".800.".4.Q..(Q|
00000620: 24 29 00 30 0A 3E 03 8B  51 B2 31 33 89 39 37 30  |$).0.>..Q.13.970|
00000630: 00 40 0A 48 03 8B 51 24  B2 22 43 22 89 37 30 30  |.@.H..Q$."C".700|
00000640: 00 50 0A 52 03 8B 51 24  B3 22 31 22 89 38 30 30  |.P.R..Q$."1".800|
00000650: 00 60 0A 5C 03 8B 51 24  B1 22 35 22 89 38 30 30  |.`.\..Q$."5".800|
00000660: 00 6C 0A 84 03 59 B2 C5  28 51 24 29 00 78 0A 8E  |.l...Y..(Q$).x..|
00000670: 03 47 31 28 59 29 B2 31  00 91 0A 98 03 50 B2 50  |.G1(Y).1.....P.P|
00000680: 31 AA 32 34 AC 50 32 AA  32 AA 38 AC 28 59 AB 31  |1.24.P2.2.8.(Y.1|
00000690: 29 00 9F 0A A2 03 4D 24  B2 22 48 4F 4C 44 22 00  |).....M$."HOLD".|
000006A0: AB 0A AC 03 4C B2 C3 28  4D 24 29 00 B5 0A B6 03  |....L..(M$).....|
000006B0: 8D 36 31 30 30 00 BE 0A  C0 03 89 38 30 30 00 D3  |.6100......800..|
000006C0: 0A CA 03 50 B2 50 31 AA  31 31 AC 50 32 3A 8D 36  |...P.P1.11.P2:.6|
000006D0: 30 30 30 00 E8 0A D4 03  50 B2 50 31 AA 31 32 AC  |000.....P.P1.12.|
000006E0: 50 32 3A 8D 36 30 30 30  00 FD 0A DE 03 50 B2 50  |P2:.6000.....P.P|
000006F0: 31 AA 31 33 AC 50 32 3A  8D 36 30 30 30 00 08 0B  |1.13.P2:.6000...|
00000700: E8 03 81 59 B2 31 A4 35  00 1B 0B F2 03 8B 47 31  |...Y.1.5......G1|
00000710: 28 59 29 B2 30 A7 8D 35  30 30 30 00 22 0B FC 03  |(Y).0..5000."...|
00000720: 82 59 00 2C 0B 06 04 8D  38 30 30 30 00 3B 0B 10  |.Y.,....8000.;..|
00000730: 04 8B 53 58 B2 53 89 31  31 30 30 00 45 0B 1A 04  |..SX.S.1100.E...|
00000740: 8D 35 31 30 30 00 4E 0B  24 04 53 58 B2 53 00 59  |.5100.N.$.SX.S.Y|
00000750: 0B 4C 04 81 59 B2 31 A4  35 00 6B 0B 56 04 8B 47  |.L..Y.1.5.k.V..G|
00000760: 31 28 59 29 B2 31 89 31  31 34 30 00 75 0B 60 04  |1(Y).1.1140.u.`.|
00000770: 8D 37 31 30 30 00 7F 0B  6A 04 8D 32 30 30 30 00  |.7100...j..2000.|
00000780: 86 0B 74 04 82 59 00 90  0B 7E 04 8D 38 30 30 30  |..t..Y...~..8000|
00000790: 00 9F 0B 88 04 8B 53 58  B2 53 89 31 32 30 30 00  |......SX.S.1200.|
000007A0: A9 0B 92 04 8D 35 31 30  30 00 B2 0B 9C 04 53 58  |.....5100.....SX|
000007B0: B2 53 00 BC 0B A6 04 8D  35 31 30 30 00 C2 0B B0  |.S......5100....|
000007C0: 04 8F 00 CC 0B DC 05 8D  35 32 30 30 00 D7 0B E6  |........5200....|
000007D0: 05 57 B2 57 AA 57 31 00  02 0C F0 05 8B 57 B3 30  |.W.W.W1......W.0|
000007E0: A7 4D 24 B2 22 59 4F 55  52 20 54 4F 54 41 4C 20  |.M$."YOUR TOTAL |
000007F0: 4C 4F 53 45 53 20 41 52  45 20 24 22 AA C4 28 AB  |LOSES ARE $"..(.|
00000800: 57 29 00 30 0C FA 05 8B  57 B1 B2 30 A7 4D 24 B2  |W).0....W..0.M$.|
00000810: 22 59 4F 55 52 20 54 4F  54 41 4C 20 57 49 4E 4E  |"YOUR TOTAL WINN|
00000820: 49 4E 47 53 20 41 52 45  20 24 22 AA C4 28 57 29  |INGS ARE $"..(W)|
00000830: 00 3F 0C 04 06 50 B2 50  31 AA 31 31 AC 50 32 00  |.?...P.P1.11.P2.|
00000840: 49 0C 0E 06 8D 36 30 30  30 00 53 0C 40 06 58 B2  |I....6000.S.@.X.|
00000850: 33 30 30 00 5D 0C 4A 06  58 B2 58 AB 31 00 65 0C  |300.].J.X.X.1.e.|
00000860: 4C 06 A1 47 24 00 76 0C  4E 06 8B 47 24 B3 B1 22  |L..G$.v.N..G$.."|
00000870: 22 89 31 39 30 30 00 84  0C 54 06 8B 58 B1 30 89  |".1900...T..X.0.|
00000880: 31 36 31 30 00 8C 0C 6C  07 89 39 30 00 97 0C D0  |1610...l..90....|
00000890: 07 48 B2 43 32 AB 37 00  A4 0C E4 07 8B 48 B3 34  |.H.C2.7......H.4|
000008A0: A7 48 B2 31 00 AF 0C EE  07 81 49 B2 31 A4 37 00  |.H.1......I.1.7.|
000008B0: BB 0C F8 07 43 38 28 49  29 B2 48 00 C2 0C 02 08  |....C8(I).H.....|
000008C0: 82 49 00 0B 0D 34 08 91  43 32 89 32 31 31 30 2C  |.I...4..C2.2110,|
000008D0: 32 32 31 30 2C 32 32 30  30 2C 32 35 32 30 2C 32  |2210,2200,2520,2|
000008E0: 34 31 30 2C 32 35 31 30  2C 32 35 30 30 2C 32 33  |410,2510,2500,23|
000008F0: 31 30 2C 32 34 30 30 2C  32 33 30 30 2C 33 30 30  |10,2400,2300,300|
00000900: 30 2C 33 30 30 30 2C 33  30 30 30 00 17 0D 3E 08  |0,3000,3000...>.|
00000910: 43 38 28 34 29 B2 32 00  21 0D 48 08 89 33 30 30  |C8(4).2.!.H..300|
00000920: 30 00 2D 0D 98 08 43 38  28 34 29 B2 32 00 41 0D  |0.-...C8(4).2.A.|
00000930: A2 08 43 38 28 32 29 B2  32 3A 43 38 28 36 29 B2  |..C8(2).2:C8(6).|
00000940: 32 00 4B 0D B6 08 89 33  30 30 30 00 5F 0D FC 08  |2.K....3000._...|
00000950: 43 38 28 32 29 B2 32 3A  43 38 28 36 29 B2 32 00  |C8(2).2:C8(6).2.|
00000960: 73 0D 06 09 43 38 28 33  29 B2 33 3A 43 38 28 35  |s...C8(3).3:C8(5|
00000970: 29 B2 33 00 7D 0D 10 09  89 32 35 32 30 00 91 0D  |).3.}....2520...|
00000980: 60 09 43 38 28 33 29 B2  33 3A 43 38 28 35 29 B2  |`.C8(3).3:C8(5).|
00000990: 33 00 9D 0D 6A 09 43 38  28 34 29 B2 32 00 A7 0D  |3...j.C8(4).2...|
000009A0: 74 09 89 32 35 32 30 00  B3 0D C4 09 43 38 28 33  |t..2520.....C8(3|
000009B0: 29 B2 32 00 BF 0D CE 09  43 38 28 34 29 B2 33 00  |).2.....C8(4).3.|
000009C0: D3 0D D8 09 43 38 28 31  29 B2 33 3A 43 38 28 37  |....C8(1).3:C8(7|
000009D0: 29 B2 33 00 EA 0D B8 0B  41 B2 50 31 AA 31 35 AC  |).3.....A.P1.15.|
000009E0: 50 32 AA 38 AC 28 59 AB  31 29 00 01 0E C2 0B 43  |P2.8.(Y.1).....C|
000009F0: 33 B2 28 C6 28 43 32 24  29 AF 36 33 29 AA 31 32  |3.(.(C2$).63).12|
00000A00: 38 00 0B 0E CC 0B 97 41  2C 43 33 00 16 0E D6 0B  |8......A,C3.....|
00000A10: 41 31 B2 31 36 30 00 2F  0E E0 0B 8B 43 32 B2 31  |A1.160./....C2.1|
00000A20: 30 A7 41 31 B2 C6 28 22  30 22 29 AA 31 32 38 00  |0.A1..("0").128.|
00000A30: 37 0E EA 0B 45 B2 36 00  41 0E F4 0B 8D 34 30 30  |7...E.6.A....400|
00000A40: 30 00 4F 0E FE 0B 43 34  B2 C6 28 43 31 24 29 00  |0.O...C4..(C1$).|
00000A50: 66 0E 00 0C 46 37 28 35  29 B2 43 34 3A 46 37 28  |f...F7(5).C4:F7(|
00000A60: 33 31 29 B2 43 34 00 7D  0E 02 0C 46 38 28 31 29  |31).C4.}...F8(1)|
00000A70: B2 43 34 3A 46 38 28 33  35 29 B2 43 34 00 94 0E  |.C4:F8(35).C4...|
00000A80: 04 0C 46 39 28 31 29 B2  43 34 3A 46 39 28 33 35  |..F9(1).C4:F9(35|
00000A90: 29 B2 43 34 00 9F 0E 08  0C 81 49 B2 31 A4 37 00  |).C4......I.1.7.|
00000AA0: AA 0E 12 0C 41 B2 41 AA  34 30 00 B5 0E 1C 0C 97  |....A.A.40......|
00000AB0: 41 2C 31 36 30 00 DE 0E  26 0C 91 43 38 28 49 29  |A,160...&..C8(I)|
00000AC0: 8D 34 31 30 30 2C 34 32  30 30 2C 34 33 30 30 2C  |.4100,4200,4300,|
00000AD0: 34 34 30 30 2C 34 35 30  30 2C 34 36 30 30 00 EB  |4400,4500,4600..|
00000AE0: 0E 30 0C 97 41 AA 36 2C  31 36 30 00 F2 0E 3A 0C  |.0..A.6,160...:.|
00000AF0: 82 49 00 FD 0E 44 0C 41  B2 41 AA 33 39 00 0C 0F  |.I...D.A.A.39...|
00000B00: 4E 0C 8B 43 32 B2 31 30  A7 45 B2 35 00 16 0F 58  |N..C2.10.E.5...X|
00000B10: 0C 8D 34 30 30 30 00 24  0F 62 0C 97 41 AA 45 AA  |..4000.$.b..A.E.|
00000B20: 31 2C 43 33 00 3F 0F 6C  0C 8B 43 32 B2 31 30 A7  |1,C3.?.l..C2.10.|
00000B30: 97 41 AA 37 2C C6 28 22  30 22 29 AA 31 32 38 00  |.A.7,.("0").128.|
00000B40: 4C 0F 76 0C 43 36 28 59  29 B2 43 31 00 59 0F 80  |L.v.C6(Y).C1.Y..|
00000B50: 0C 43 37 28 59 29 B2 43  32 00 5F 0F E4 0C 8E 00  |.C7(Y).C2._.....|
00000B60: 6A 0F A0 0F 81 49 B2 31  A4 45 00 76 0F AA 0F 97  |j....I.1.E.v....|
00000B70: 41 AA 49 2C 41 31 00 81  0F B4 0F 41 31 B2 31 36  |A.I,A1.....A1.16|
00000B80: 30 00 88 0F BE 0F 82 49  00 8E 0F C8 0F 8E 00 99  |0......I........|
00000B90: 0F 04 10 81 58 B2 31 A4  35 00 A6 0F 0E 10 97 41  |....X.1.5......A|
00000BA0: AA 58 2C 31 36 30 00 AD  0F 18 10 82 58 00 B3 0F  |.X,160......X...|
00000BB0: 22 10 8E 00 C0 0F 68 10  97 41 AA 31 2C 31 36 30  |".....h..A.1,160|
00000BC0: 00 CD 0F 72 10 97 41 AA  32 2C 31 36 30 00 D9 0F  |...r..A.2,160...|
00000BD0: 7C 10 97 41 AA 33 2C 43  34 00 E6 0F 86 10 97 41  ||..A.3,C4......A|
00000BE0: AA 34 2C 31 36 30 00 F3  0F 90 10 97 41 AA 35 2C  |.4,160......A.5,|
00000BF0: 31 36 30 00 F9 0F 9A 10  8E 00 05 10 CC 10 97 41  |160............A|
00000C00: AA 31 2C 43 34 00 12 10  D6 10 97 41 AA 32 2C 31  |.1,C4......A.2,1|
00000C10: 36 30 00 1F 10 E0 10 97  41 AA 33 2C 31 36 30 00  |60......A.3,160.|
00000C20: 2C 10 EA 10 97 41 AA 34  2C 31 36 30 00 38 10 F4  |,....A.4,160.8..|
00000C30: 10 97 41 AA 35 2C 43 34  00 3E 10 FE 10 8E 00 49  |..A.5,C4.>.....I|
00000C40: 10 30 11 81 58 B2 31 A4  35 00 5A 10 3A 11 58 31  |.0..X.1.5.Z.:.X1|
00000C50: B2 35 AC 28 49 AB 31 29  AA 58 00 6A 10 44 11 97  |.5.(I.1).X.j.D..|
00000C60: 41 AA 58 2C 46 37 28 58  31 29 00 71 10 4E 11 82  |A.X,F7(X1).q.N..|
00000C70: 58 00 77 10 58 11 8E 00  82 10 94 11 81 58 B2 31  |X.w.X........X.1|
00000C80: A4 35 00 93 10 9E 11 58  31 B2 35 AC 28 49 AB 31  |.5.....X1.5.(I.1|
00000C90: 29 AA 58 00 A3 10 A8 11  97 41 AA 58 2C 46 38 28  |).X......A.X,F8(|
00000CA0: 58 31 29 00 AA 10 B2 11  82 58 00 B0 10 BC 11 8E  |X1)......X......|
00000CB0: 00 BB 10 F8 11 81 58 B2  31 A4 35 00 CC 10 02 12  |......X.1.5.....|
00000CC0: 58 31 B2 35 AC 28 49 AB  31 29 AA 58 00 DC 10 0C  |X1.5.(I.1).X....|
00000CD0: 12 97 41 AA 58 2C 46 39  28 58 31 29 00 E3 10 16  |..A.X,F9(X1)....|
00000CE0: 12 82 58 00 E9 10 20 12  8E 00 FA 10 88 13 8F 20  |..X... ........ |
00000CF0: 43 4C 45 41 52 20 43 41  52 44 00 13 11 92 13 41  |CLEAR CARD.....A|
00000D00: B2 50 31 AA 31 35 AC 50  32 AA 38 AC 28 59 AB 31  |.P1.15.P2.8.(Y.1|
00000D10: 29 AB 31 00 1E 11 9C 13  81 49 B2 31 A4 39 00 29  |).1......I.1.9.)|
00000D20: 11 A6 13 81 58 B2 31 A4  37 00 35 11 B0 13 97 41  |....X.1.7.5....A|
00000D30: AA 58 2C 33 32 00 3C 11  BA 13 82 58 00 47 11 C4  |.X,32.<....X.G..|
00000D40: 13 41 B2 41 AA 34 30 00  4E 11 CE 13 82 49 00 5F  |.A.A.40.N....I._|
00000D50: 11 D3 13 43 36 28 59 29  B2 31 35 AA 32 AC 59 00  |...C6(Y).15.2.Y.|
00000D60: 70 11 D6 13 43 37 28 59  29 B2 31 35 AA 32 AC 59  |p...C7(Y).15.2.Y|
00000D70: 00 76 11 D8 13 8E 00 8D  11 EC 13 8F 20 48 49 47  |.v.......... HIG|
00000D80: 48 4C 49 47 48 54 20 53  43 52 45 45 4E 00 9C 11  |HLIGHT SCREEN...|
00000D90: F4 13 8B 53 58 B2 30 89  35 31 39 30 00 B2 11 F6  |...SX.0.5190....|
00000DA0: 13 50 B2 50 31 AA 39 34  AA 50 32 AC 28 38 AB 53  |.P.P1.94.P2.(8.S|
00000DB0: 58 29 00 BA 11 00 14 58  B2 30 00 C7 11 0A 14 81  |X).....X.0......|
00000DC0: 20 49 B2 31 A4 32 34 00  D4 11 14 14 4E B2 C2 28  | I.1.24.....N..(|
00000DD0: 50 AA 49 29 00 EB 11 1E  14 8B 28 4E B2 33 32 29  |P.I)......(N.32)|
00000DE0: AF 28 58 B2 30 29 89 35  31 38 30 00 F3 11 28 14  |.(X.0).5180...(.|
00000DF0: 58 B2 31 00 08 12 32 14  97 50 AA 49 2C 28 4E AA  |X.1...2..P.I,(N.|
00000E00: 31 32 38 29 AF 32 35 35  00 0F 12 3C 14 82 49 00  |128).255...<..I.|
00000E10: 15 12 46 14 8E 00 44 12  50 14 91 53 89 35 32 32  |..F...D.P..S.522|
00000E20: 30 2C 35 32 34 30 2C 35  32 36 30 2C 35 32 38 30  |0,5240,5260,5280|
00000E30: 2C 35 33 30 30 2C 35 33  32 30 2C 35 33 34 30 2C  |,5300,5320,5340,|
00000E40: 35 33 36 30 00 4E 12 55  14 57 31 B2 AB 44 00 54  |5360.N.U.W1..D.T|
00000E50: 12 5A 14 8E 00 5F 12 64  14 57 31 B2 32 AC 44 00  |.Z..._.d.W1.2.D.|
00000E60: 65 12 6E 14 8E 00 70 12  78 14 57 31 B2 35 AC 44  |e.n...p.x.W1.5.D|
00000E70: 00 76 12 82 14 8E 00 81  12 8C 14 57 31 B2 37 AC  |.v.........W1.7.|
00000E80: 44 00 87 12 96 14 8E 00  93 12 A0 14 57 31 B2 31  |D...........W1.1|
00000E90: 30 AC 44 00 99 12 AA 14  8E 00 A5 12 B4 14 57 31  |0.D...........W1|
00000EA0: B2 32 30 AC 44 00 AB 12  BE 14 8E 00 B7 12 C8 14  |.20.D...........|
00000EB0: 57 31 B2 33 30 AC 44 00  BD 12 D2 14 8E 00 C9 12  |W1.30.D.........|
00000EC0: DC 14 57 31 B2 35 30 AC  44 00 CF 12 E6 14 8E 00  |..W1.50.D.......|
00000ED0: DC 12 F0 14 57 31 B2 32  30 30 AC 44 00 E2 12 FA  |....W1.200.D....|
00000EE0: 14 8E 00 E8 12 18 15 99  00 F3 12 22 15 8B 57 B2  |..........."..W.|
00000EF0: 30 A7 99 00 1A 13 2C 15  8B 57 B3 30 A7 99 22 59  |0.....,..W.0.."Y|
00000F00: 4F 55 52 20 54 4F 54 41  4C 20 4C 4F 53 45 53 20  |OUR TOTAL LOSES |
00000F10: 20 41 52 FF 20 24 22 3B  AB 57 00 42 13 36 15 8B  | AR. $";.W.B.6..|
00000F20: 57 B1 30 A7 99 22 59 4F  55 52 20 54 4F 54 41 4C  |W.0.."YOUR TOTAL|
00000F30: 20 57 49 4E 4E 49 4E 47  53 20 41 52 45 20 24 22  | WINNINGS ARE $"|
00000F40: 3B 57 00 4C 13 40 15 99  3A 99 3A 99 00 52 13 4A  |;W.L.@..:.:..R.J|
00000F50: 15 8E 00 7F 13 7C 15 46  24 B2 22 20 5F A0 29 20  |.....|.F$." _.) |
00000F60: 47 2A 35 54 20 47 A0 A0  A0 20 47 A0 A0 A0 48 20  |G*5T G... G...H |
00000F70: A0 A0 A0 48 20 59 36 34  48 20 A9 A0 DF 20 22 00  |...H Y64H ... ".|
00000F80: 85 13 86 15 8E 00 B2 13  9A 15 46 24 B2 22 20 29  |..........F$." )|
00000F90: 23 54 20 A9 47 20 35 20  A0 A0 A0 A0 3B A0 A0 A0  |#T .G 5 ....;...|
00000FA0: A0 A0 3C A0 A0 A0 A0 20  36 20 48 29 20 59 24 A9  |..<.... 6 H) Y$.|
00000FB0: 20 22 00 B8 13 A4 15 8E  00 E5 13 B8 15 46 24 B2  | "...........F$.|
00000FC0: 22 20 5F A0 A0 29 20 27  20 26 42 A9 A0 A0 A0 BC  |" _..) ' &B.....|
00000FD0: A0 A0 A0 A0 A0 BB A0 A0  A0 29 5D 26 20 25 20 A9  |.........)]& % .|
00000FE0: A0 A0 DF 20 22 00 EB 13  C2 15 8E 00 F9 13 E0 15  |... "...........|
00000FF0: 46 37 28 58 31 29 B2 46  31 00 FF 13 F4 15 8E 00  |F7(X1).F1.......|
00001000: 0D 14 FE 15 46 38 28 58  31 29 B2 46 31 00 13 14  |....F8(X1).F1...|
00001010: 12 16 8E 00 21 14 1C 16  46 39 28 58 31 29 B2 46  |....!...F9(X1).F|
00001020: 31 00 27 14 30 16 8E 00  32 14 44 16 81 58 B2 31  |1.'.0...2.D..X.1|
00001030: A4 33 00 3F 14 4E 16 81  58 31 B2 31 A4 33 35 00  |.3.?.N..X1.1.35.|
00001040: 55 14 58 16 91 58 8D 35  35 30 30 2C 35 35 33 30  |U.X..X.5500,5530|
00001050: 2C 35 35 36 30 00 6A 14  62 16 46 31 B2 C6 28 CA  |,5560.j.b.F1..(.|
00001060: 28 46 24 2C 58 31 2C 31  29 29 00 7A 14 6C 16 8B  |(F$,X1,1)).z.l..|
00001070: 46 31 B3 39 36 89 35 37  36 30 00 8F 14 76 16 8B  |F1.96.5760...v..|
00001080: 46 31 B3 31 39 32 A7 46  31 B2 46 31 AA 36 34 00  |F1.192.F1.F1.64.|
00001090: A3 14 80 16 8B 46 31 B3  36 34 A7 46 31 B2 46 31  |.....F1.64.F1.F1|
000010A0: AA 36 34 00 B7 14 8A 16  46 31 B2 28 46 31 AA 31  |.64.....F1.(F1.1|
000010B0: 32 38 29 AF 32 35 35 00  CD 14 94 16 91 58 8D 35  |28).255......X.5|
000010C0: 36 30 30 2C 35 36 33 30  2C 35 36 36 30 00 D5 14  |600,5630,5660...|
000010D0: 9E 16 82 58 31 00 DC 14  A8 16 82 58 00 E2 14 B2  |...X1......X....|
000010E0: 16 8E 00 F8 14 0C 17 99  3A 99 22 49 4E 56 41 4C  |........:."INVAL|
000010F0: 49 44 20 42 45 54 20 22  00 02 15 16 17 89 35 39  |ID BET "......59|
00001100: 36 30 00 30 15 3E 17 99  3A 99 22 42 45 54 20 54  |60.0.>..:."BET T|
00001110: 4F 4F 20 48 49 47 48 2C  20 48 4F 55 53 45 20 4C  |OO HIGH, HOUSE L|
00001120: 49 4D 49 54 20 49 53 20  24 31 30 2C 30 30 30 22  |IMIT IS $10,000"|
00001130: 00 3A 15 48 17 58 B2 31  30 30 00 44 15 52 17 58  |.:.H.X.100.D.R.X|
00001140: B2 58 AB 31 00 52 15 5C  17 8B 58 B1 30 89 35 39  |.X.1.R.\..X.0.59|
00001150: 37 30 00 5A 15 66 17 89  39 30 00 63 15 70 17 4C  |70.Z.f..90.c.p.L|
00001160: B2 34 30 00 6D 15 D4 17  41 B2 50 AB 31 00 7A 15  |.40.m...A.P.1.z.|
00001170: DE 17 4C 31 B2 C3 28 4D  24 29 00 86 15 E8 17 81  |..L1..(M$)......|
00001180: 49 B2 31 A4 4C 31 00 98  15 ED 17 4D 31 24 B2 CA  |I.1.L1.....M1$..|
00001190: 28 4D 24 2C 49 2C 31 29  00 AB 15 F2 17 97 41 AA  |(M$,I,1)......A.|
000011A0: 49 2C C6 28 4D 31 24 29  AF 36 33 00 B2 15 FC 17  |I,.(M1$).63.....|
000011B0: 82 49 00 BD 15 06 18 41  B2 41 AA 4C 31 00 C8 15  |.I.....A.A.L1...|
000011C0: 10 18 4C B2 4C AB 4C 31  00 D7 15 1A 18 8B 4C B3  |..L.L.L1......L.|
000011D0: B2 30 89 36 32 31 30 00  E2 15 24 18 81 49 B2 31  |.0.6210...$..I.1|
000011E0: A4 4C 00 EE 15 2E 18 97  41 AA 49 2C 33 32 00 F5  |.L......A.I,32..|
000011F0: 15 38 18 82 49 00 00 16  42 18 4D 24 B2 22 20 22  |.8..I...B.M$." "|
00001200: 00 06 16 4C 18 8E 00 0C  16 C0 18 4B 00 18 16 58  |...L.......K...X|
00001210: 1B 81 49 B2 31 A4 35 32  00 24 16 62 1B 43 39 28  |..I.1.52.$.b.C9(|
00001220: 49 29 B2 30 00 2C 16 76  1B 82 20 49 00 35 16 80  |I).0.,.v.. I.5..|
00001230: 1B 42 31 B2 30 00 3B 16  8A 1B 8E 00 4C 16 BC 1B  |.B1.0.;.....L...|
00001240: 8B 42 31 B2 35 32 A7 8D  37 30 30 30 00 5D 16 D0  |.B1.52..7000.]..|
00001250: 1B 43 B2 B5 28 35 32 AC  BB 28 31 29 29 00 72 16  |.C..(52..(1)).r.|
00001260: DA 1B 8B 43 39 28 43 AA  31 29 B3 B1 30 89 37 31  |...C9(C.1)..0.71|
00001270: 32 30 00 7E 16 E4 1B 42  31 B2 42 31 AA 31 00 8C  |20.~...B1.B1.1..|
00001280: 16 EE 1B 43 39 28 43 AA  31 29 B2 31 00 9D 16 F8  |...C9(C.1).1....|
00001290: 1B 43 31 B2 B5 28 43 AD  31 33 29 AA 31 00 B2 16  |.C1..(C.13).1...|
000012A0: 02 1C 43 32 B2 43 AB 31  33 AC 28 43 31 AB 31 29  |..C2.C.13.(C1.1)|
000012B0: AA 31 00 C9 16 20 1C 43  31 24 B2 CA 28 22 C1 D3  |.1... .C1$..("..|
000012C0: DA D8 22 2C 43 31 2C 31  29 00 E9 16 2A 1C 43 32  |..",C1,1)...*.C2|
000012D0: 24 B2 CA 28 22 41 32 33  34 35 36 37 38 39 31 4A  |$..("A234567891J|
000012E0: 51 4B 22 2C 43 32 2C 31  29 00 EF 16 3E 1C 8E 00  |QK",C2,1)...>...|
000012F0: F7 16 40 1F 53 B2 30 00  00 17 4A 1F 53 32 B2 30  |..@.S.0...J.S2.0|
00001300: 00 0B 17 54 1F 81 49 B2  31 A4 36 00 19 17 5E 1F  |...T..I.1.6...^.|
00001310: 43 35 28 49 29 B2 31 30  30 00 20 17 68 1F 82 49  |C5(I).100. .h..I|
00001320: 00 2B 17 72 1F 81 49 B2  31 A4 35 00 33 17 7C 1F  |.+.r..I.1.5.3.|.|
00001330: 58 B2 35 00 49 17 86 1F  8B 43 37 28 49 29 B1 43  |X.5.I....C7(I).C|
00001340: 35 28 58 29 89 38 31 31  30 00 5B 17 90 1F 43 35  |5(X).8110.[...C5|
00001350: 28 58 AA 31 29 B2 43 35  28 58 29 00 65 17 9A 1F  |(X.1).C5(X).e...|
00001360: 58 B2 58 AB 31 00 73 17  A4 1F 8B 58 B1 30 89 38  |X.X.1.s....X.0.8|
00001370: 30 37 30 00 85 17 AE 1F  43 35 28 58 AA 31 29 B2  |070.....C5(X.1).|
00001380: 43 37 28 49 29 00 8C 17  B8 1F 82 49 00 A2 17 C2  |C7(I)......I....|
00001390: 1F 8B 43 35 28 31 29 B2  31 A7 43 35 28 36 29 B2  |..C5(1).1.C5(6).|
000013A0: 31 34 00 AB 17 CC 1F 53  31 B2 30 00 B6 17 12 20  |14.....S1.0.... |
000013B0: 81 49 B2 31 A4 34 00 D1  17 1C 20 8B 43 36 28 49  |.I.1.4.... .C6(I|
000013C0: 29 B2 43 36 28 49 AA 31  29 A7 53 31 B2 53 31 AA  |).C6(I.1).S1.S1.|
000013D0: 31 00 D8 17 26 20 82 49  00 E6 17 30 20 8B 53 31  |1...& .I...0 .S1|
000013E0: B2 34 A7 53 B2 34 00 EF  17 3A 20 53 31 B2 30 00  |.4.S.4...: S1.0.|
000013F0: FA 17 44 20 81 49 B2 31  A4 35 00 17 18 4E 20 8B  |..D .I.1.5...N .|
00001400: 43 35 28 49 29 AA 31 B2  43 35 28 49 AA 31 29 A7  |C5(I).1.C5(I.1).|
00001410: 53 31 B2 53 31 AA 31 00  1E 18 58 20 82 49 00 31  |S1.S1.1...X .I.1|
00001420: 18 62 20 8B 53 31 B2 34  A7 53 B2 53 AA 53 31 AB  |.b .S1.4.S.S.S1.|
00001430: 31 00 4D 18 6C 20 8B 28  53 B2 37 29 AF 28 43 35  |1.M.l .(S.7).(C5|
00001440: 28 35 29 B2 31 33 29 A7  53 B2 53 AA 31 00 57 18  |(5).13).S.S.1.W.|
00001450: 8A 20 53 31 B2 AB 31 00  62 18 94 20 81 49 B2 31  |. S1..1.b.. .I.1|
00001460: A4 34 00 7D 18 9E 20 8B  43 35 28 49 29 B2 43 35  |.4.}.. .C5(I).C5|
00001470: 28 49 AA 31 29 A7 53 31  B2 53 31 AA 31 00 98 18  |(I.1).S1.S1.1...|
00001480: A8 20 8B 43 35 28 49 29  B2 43 35 28 49 AA 32 29  |. .C5(I).C5(I.2)|
00001490: A7 53 31 B2 53 31 AA 31  00 9F 18 B2 20 82 49 00  |.S1.S1.1.... .I.|
000014A0: B1 18 BC 20 8B 53 31 B1  32 A7 53 31 B2 53 31 AA  |... .S1.2.S1.S1.|
000014B0: 32 00 C0 18 C6 20 8B 53  31 B1 53 A7 53 B2 53 31  |2.... .S1.S.S.S1|
000014C0: 00 C6 18 D0 20 8E 00 D1  18 28 23 81 49 B2 31 A4  |.... ....(#.I.1.|
000014D0: 35 00 F9 18 32 23 85 22  45 4E 54 45 52 20 53 55  |5...2#."ENTER SU|
000014E0: 49 54 20 23 2C 20 43 41  52 44 20 23 22 3B 43 36  |IT #, CARD #";C6|
000014F0: 28 49 29 2C 43 37 28 49  29 00 00 19 3C 23 82 49  |(I),C7(I)...<#.I|
00001500: 00 0A 19 46 23 8D 38 30  30 30 00 10 19 4B 23 99  |...F#.8000...K#.|
00001510: 00 1C 19 50 23 99 22 53  3D 22 3B 53 00 22 19 54  |...P#."S=";S.".T|
00001520: 23 99 00 35 19 55 23 99  22 43 35 22 2C 22 43 36  |#..5.U#."C5","C6|
00001530: 22 2C 22 43 37 00 40 19  5A 23 81 49 B2 31 A4 36  |","C7.@.Z#.I.1.6|
00001540: 00 57 19 64 23 99 43 35  28 49 29 2C 43 36 28 49  |.W.d#.C5(I),C6(I|
00001550: 29 2C 43 37 28 49 29 00  5E 19 6E 23 82 49 00 68  |),C7(I).^.n#.I.h|
00001560: 19 78 23 89 39 30 30 30  00 00 00                 |.x#.9000...     |

..#.... *** DRAW POKER BY DAVE HOWE.F...
.     SUBMITTED BY ED HERSTEIN.L.....E..
.. *** PET USER GROUP......     SOFTWARE
 EXCHANGE......     PO BOX 371......    
 MONTGOMERYVILLE, PA 18936............G1
(5),F7(35),F8(35),F9(35)......C5(6),C6(5
),C7(5),C8(7),C9(52).....M$." ".".(.P1.3
2768:P2.40.*.2.W.0.4.<..".";.^.F..:.:.:.
:.:."GET READY FOR DRAW POKER".H.P..5700
.R.Z..".";...D.."LET'S PLAY DRAW POKER";
...N...26);"HAND  ODDS":..J.X...19);"ROY
AL FLUSH:200 TO 1".......16);"STRAIGHT F
LUSH:50 TO 1".......16);"FOUR OF A KIND:
30 TO 1"./.....20);"FULL HOUSE:20 TO 1".
I. ...25);"FLUSH:10 TO 1".E.....22);"STR
AIGHT:7 TO 1".......15);"THREE OF A KIND
:5 TO 1".......22);"TWO PAIR:2 TO 1"...H
..5400.Y.R.."PLACE YOUR BETS: HOW MANY D
OLLARS";D...T..D.10000.5950...W..D.0.590
0.....P.P1.15.P2...... 6000.)...M$."YOUR
 BET IS:".5...L.C(M$).C...P.P1.2.P2.M...
.6100.]...M$."$".D(D).I.".L.C(M$).W.,.P.
P1.3.P2...6..6100. .;.M$."YOU WIN":P.P1.
31:.6100...@.. S.1.8...J..5200.L.T.P.P1.
111.P2.(8.S).T.^.L.8...H.M$."$".D(W1)...
R..6100...|..S......7000......Y.1.5.....
.7100......2000.&....Y.0....8000.9.B.SX.
S.C.L..5100.O...M$."DO YOU WISH TO STAND
? ENTER Y OR N".~...P.P1.11.P2......6000
......Q$......Q$."".530...&..Q$."Y".1500
...0..Q$."N".600.P.:..Q$."0".530...D..Q$
."5".530...X.M$."INDICATE CARD TO HOLD B
Y ENTERING CARD #".!.B.P.P1.11.P2.+.L..6
000.V.V.M$."TO CANCEL YOUR CHOICES, ENTE
R 'C'".E...P.P1.12.P2.O....6000.....M$."
WHEN READY FOR DRAW, PRESS RETURN KEY"..
...P.P1.13.P2......6000.B....I.1.5.N.F.G
1(I).0.U.P..I...Z.P.P1.24.P2......6000..
....Q$.."C".810... ..Q$...*..Q$."".800."
.4.Q.F(Q$).0.>..Q.13.970.@.H..Q$."C".700
.P.R..Q$."1".800.`.\..Q$."5".800.L...Y.E
(Q$).X...G1(Y).1.....P.P1.24.P2.2.8.(Y.1
).....M$."HOLD".....L.C(M$)......6100...
...800.S.J.P.P1.11.P2:.6000...T.P.P1.12.
P2:.6000.....P.P1.13.P2:.6000......Y.1.5
......G1(Y).0..5000."....Y.,....8000.;..
..SX.S.1100.E....5100.N.$.SX.S.Y.L..Y.1.
5.K.V..G1(Y).1.1140.U.`..7100..J..2000.
..T..Y...~..8000......SX.S.1200......510
0.....SX.S......5100.B.....L....5200.W..
.W.W.W1......W.0.M$."YOUR TOTAL LOSES AR
E $".D(.W).0....W..0.M$."YOUR TOTAL WINN
INGS ARE $".D(W).?...P.P1.11.P2.I....600
0.S.@.X.300.].J.X.X.1.E.L..G$.V.N..G$.."
".1900...T..X.0.1610...L..90...P.H.C2.7.
.....H.4.H.1......I.1.7.....C8(I).H.B...
.I...4..C2.2110,2210,2200,2520,2410,2510
,2500,2310,2400,2300,3000,3000,3000...>.
C8(4).2.!.H..3000.-...C8(4).2.A...C8(2).
2:C8(6).2.K....3000._...C8(2).2:C8(6).2.
S...C8(3).3:C8(5).3.}....2520...`.C8(3).
3:C8(5).3...J.C8(4).2...T..2520...D.C8(3
).2...N.C8(4).3.S.X.C8(1).3:C8(7).3.....
A.P1.15.P2.8.(Y.1)...B.C3.(F(C2$).63).12
8...L..A,C3...V.A1.160./....C2.10.A1.F("
0").128.7...E.6.A....4000.O...C4.F(C1$).
F...F7(5).C4:F7(31).C4.}...F8(1).C4:F8(3
5).C4.....F9(1).C4:F9(35).C4......I.1.7.
....A.A.40......A,160...&..C8(I).4100,42
00,4300,4400,4500,4600...0..A.6,160...:.
.I...D.A.A.39...N..C2.10.E.5...X..4000.$
.B..A.E.1,C3.?.L..C2.10..A.7,F("0").128.
L.V.C6(Y).C1.Y...C7(Y).C2._.....J. ..I.1
.E.V....A.I,A1.....A1.160......I...H....
....X.1.5......A.X,160......X...".....H.
.A.1,160.M.R..A.2,160.Y.|..A.3,C4......A
.4,160......A.5,160.........L..A.1,C4...
V..A.2,160......A.3,160.,....A.4,160.8..
..A.5,C4.>.....I.0..X.1.5.Z.:.X1.5.(I.1)
.X.J.D..A.X,F7(X1).Q.N..X.W.X........X.1
.5.....X1.5.(I.1).X......A.X,F8(X1).....
.X............X.1.5.L...X1.5.(I.1).X....
..A.X,F9(X1)......X... ........ CLEAR CA
RD.....A.P1.15.P2.8.(Y.1).1......I.1.9.)
....X.1.7.5....A.X,32.<....X.G.D.A.A.40.
N.N..I._.S.C6(Y).15.2.Y.P.V.C7(Y).15.2.Y
.V.X........ HIGHLIGHT SCREEN......SX.0.
5190.....P.P1.94.P2.(8.SX).....X.0.G....
 I.1.24.T...N.B(P.I)......(N.32).(X.0).5
180...(.X.1...2..P.I,(N.128).255...<..I.
..F...D.P..S.5220,5240,5260,5280,5300,53
20,5340,5360.N.U.W1..D.T.Z..._.D.W1.2.D.
E.N...P.X.W1.5.D.V.........W1.7.D.......
.. .W1.10.D...........W1.20.D.........H.
W1.30.D...R...I...W1.50.D.O.........W1.2
00.D..............."..W.0.....,..W.0.."Y
OUR TOTAL LOSES  AR. $";.W.B.6..W.0.."YO
UR TOTAL WINNINGS ARE $";W.L.@..:.:..R.J
....|.F$." _ ) G*5T G    G   H    H Y64
H . . "...........F$." )#T .G 5     ;   
  <     6 H) Y$. "...........F$." _  ) '
 &B.   .     .   )]& % .  . "...B.......
F7(X1).F1...........F8(X1).F1.......!...
F9(X1).F1.'.0...2.D..X.1.3.?.N..X1.1.35.
U.X..X.5500,5530,5560.J.B.F1.F(J(F$,X1,1
)).Z.L..F1.96.5760...V..F1.192.F1.F1.64.
.....F1.64.F1.F1.64.....F1.(F1.128).255.
M....X.5600,5630,5660.U....X1......X....
........:."INVALID BET "......5960.0.>..
:."BET TOO HIGH, HOUSE LIMIT IS $10,000"
.:.H.X.100.D.R.X.X.1.R.\..X.0.5970.Z.F..
90.C.P.L.40.M.T.A.P.1.Z...L1.C(M$)......
I.1.L1.....M1$.J(M$,I,1)......A.I,F(M1$)
.63......I.....A.A.L1.H...L.L.L1.W....L.
.0.6210...$..I.1.L......A.I,32...8..I...
B.M$." "...L.......K...X..I.1.52.$.B.C9(
I).0.,.V.. I.5...B1.0.;.....L....B1.52..
7000.].P.C..(52..(1)).R.Z..C9(C.1)..0.71
20.~...B1.B1.1.....C9(C.1).1.....C1..(C.
13).1.....C2.C.13.(C1.1).1.I. .C1$.J("AS
ZX",C1,1)...*.C2$.J("A234567891JQK",C2,1
)...>.....@.S.0...J.S2.0...T..I.1.6...^.
C5(I).100. .H..I.+.R..I.1.5.3.|.X.5.I...
.C7(I).C5(X).8110.[...C5(X.1).C5(X).E...
X.X.1.S....X.0.8070.....C5(X.1).C7(I)...
...I...B..C5(1).1.C5(6).14...L.S1.0.... 
.I.1.4.Q.. .C6(I).C6(I.1).S1.S1.1.X.& .I
...0 .S1.4.S.4...: S1.0...D .I.1.5...N .
C5(I).1.C5(I.1).S1.S1.1...X .I.1.B .S1.4
.S.S.S1.1.M.L .(S.7).(C5(5).13).S.S.1.W.
. S1..1.B.. .I.1.4.}.. .C5(I).C5(I.1).S1
.S1.1.... .C5(I).C5(I.2).S1.S1.1.... .I.
... .S1.2.S1.S1.2...F .S1.S.S.S1.F.P ..Q
.(#.I.1.5...2#."ENTER SUIT #, CARD #";C6
(I),C7(I)...<#.I...F#.8000...K#....P#."S
=";S.".T#..5.U#."C5","C6","C7.@.Z#.I.1.6
.W.D#.C5(I),C6(I),C7(I).^.N#.I.H.X#.9000
...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL