POKER
FILE INFORMATION
FILENAME(S): POKER
FILE TYPE(S): PRG
FILE SIZE: 5.7K
FIRST SEEN: 2025-11-30 17:23:58
APPEARS ON: 1 disk(s)
FILE HASH
0f5b4586149526f7cb4fc2858dae5644cda7d746744a97c08980e0f9eb564e31
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ULTILITIES | POKER | PRG | Quetzal & Style | 8 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 0A 00 97 20 35 33 32 38 31 2C 30 00 |....... 53281,0.|
00000010: 1D 08 14 00 97 20 35 33 32 38 30 2C 31 00 2B 08 |..... 53280,1.+.|
00000020: 1E 00 97 20 35 35 37 39 36 2C 31 00 3C 08 64 00 |... 55796,1.<.d.|
00000030: 8F 20 44 52 41 57 20 50 4F 4B 45 52 00 59 08 6E |. DRAW POKER.Y.n|
00000040: 00 8F 20 42 59 20 53 49 4D 4F 4E 20 53 43 4F 54 |.. BY SIMON SCOT|
00000050: 54 20 20 20 20 31 39 38 37 00 7C 08 78 00 8F 20 |T 1987.|.x.. |
00000060: 41 4E 59 4F 4E 45 20 46 4F 52 20 43 4F 4C 4F 52 |ANYONE FOR COLOR|
00000070: 20 26 20 53 4F 55 4E 44 20 3F 3F 3F 00 AC 08 82 | & SOUND ???....|
00000080: 00 97 35 33 32 37 32 2C 32 31 3A 99 22 93 20 20 |..53272,21:.". |
00000090: 20 20 20 20 20 20 12 44 20 52 20 41 20 57 20 20 | .D R A W |
000000A0: 20 50 20 4F 20 4B 20 45 20 52 92 22 00 CD 08 8C | P O K E R."....|
000000B0: 00 99 A3 31 30 29 22 12 11 11 53 49 4D 4F 4E 20 |...10)"...SIMON |
000000C0: 53 43 4F 54 54 20 20 31 39 38 37 92 22 00 DF 08 |SCOTT 1987."...|
000000D0: 91 00 5A 5A 41 50 24 B2 22 53 49 4D 4F 4E 22 00 |..ZZAP$."SIMON".|
000000E0: 16 09 96 00 85 22 11 4D 59 20 4E 41 4D 45 20 49 |.....".MY NAME I|
000000F0: 53 20 44 45 41 4C 45 52 2E 20 57 48 41 54 20 49 |S DEALER. WHAT I|
00000100: 53 20 59 4F 55 52 53 20 20 4D 55 4D 9D 9D 9D 9D |S YOURS MUM....|
00000110: 9D 22 3B 55 4E 24 00 31 09 A0 00 8B C3 28 55 4E |.";UN$.1.....(UN|
00000120: 24 29 B1 38 A7 55 4E 24 B2 C8 28 55 4E 24 2C 38 |$).8.UN$..(UN$,8|
00000130: 29 00 4A 09 A5 00 97 20 35 33 32 38 30 2C 31 35 |).J.... 53280,15|
00000140: 3A 97 20 35 33 32 38 31 2C 36 00 81 09 AA 00 97 |:. 53281,6......|
00000150: 35 33 32 37 32 2C 32 33 3A 99 22 93 11 CF CB 2E |53272,23:.".....|
00000160: 20 22 55 4E 24 22 20 C8 C5 D2 C5 A0 C1 D2 C5 A0 | "UN$" .........|
00000170: D4 C8 C5 A0 C8 CF D5 D3 C5 20 D2 D5 CC C5 D3 3A |......... .....:|
00000180: 22 00 AC 09 B4 00 99 22 11 D4 C8 C5 A0 C1 CE D4 |"......"........|
00000190: C5 A0 C9 D3 A0 35 2E 20 20 20 CE CF A0 CC C9 CD |.....5. ......|
000001A0: C9 D4 A0 CF CE A0 C2 C5 D4 D3 2E 22 00 DC 09 BE |..........."....|
000001B0: 00 99 22 D7 C5 A0 C1 CC D4 C5 D2 CE C1 D4 C5 A0 |..".............|
000001C0: CF D0 C5 CE C9 CE C7 2E 20 CF D0 C5 CE A0 D7 C9 |........ .......|
000001D0: D4 C8 A0 C1 CE D9 D4 C8 C9 CE C7 22 00 07 0A C8 |..........."....|
000001E0: 00 99 22 91 CE CF A0 C3 C8 C5 C3 CB C9 CE C7 2E |..".............|
000001F0: 20 CF D0 C5 CE A0 CF D2 A0 C2 C5 D4 A0 30 A0 28 | ............0.(|
00000200: C6 CF CC C4 29 2E 22 00 31 0A D2 00 99 22 11 D7 |....).".1...."..|
00000210: C8 C5 CE A0 C1 D3 CB C5 C4 A0 D4 CF A0 C6 CF CC |................|
00000220: C4 2C C3 C1 CC CC 2C CF D2 A0 D2 C1 C9 D3 C5 2C |.,....,........,|
00000230: 22 00 5B 0A DC 00 99 22 D2 C5 D0 CC D9 A0 D7 C9 |".[...."........|
00000240: D4 C8 A0 C6 20 CF D2 A0 C3 20 CF D2 A0 D2 20 C1 |.... .... .... .|
00000250: CE C4 20 D2 C5 D4 D5 D2 CE 2E 22 00 86 0A E6 00 |.. .......".....|
00000260: 99 22 D7 C8 C5 CE A0 C1 D3 CB C5 C4 A0 D4 CF A0 |."..............|
00000270: C2 C5 D4 2C 20 CF D2 A0 D7 C8 C5 CE A0 D2 C1 C9 |..., ...........|
00000280: D3 C9 CE C7 2C 22 00 AB 0A F0 00 99 22 D2 C5 D0 |....,"......"...|
00000290: CC D9 A0 D7 C9 D4 C8 A0 C1 CD CF D5 CE D4 A0 C1 |................|
000002A0: CE C4 A0 D2 C5 D4 D5 D2 CE 2E 22 00 DC 0A FA 00 |..........".....|
000002B0: 99 22 11 D4 CF A0 C4 D2 C1 D7 2C 20 C5 CE D4 C5 |."........, ....|
000002C0: D2 A0 C5 C1 C3 C8 A0 C3 C1 D2 C4 20 CE D5 CD C2 |........... ....|
000002D0: C5 D2 A0 C1 CE C4 A0 D2 C5 D4 2E 22 00 0B 0B 04 |..........."....|
000002E0: 01 99 22 C9 C6 A0 D9 CF D5 A0 D0 D2 CF CD C9 D3 |..".............|
000002F0: C5 A0 CE CF D4 A0 D4 CF A0 D4 C1 CB C5 A0 C1 C4 |................|
00000300: D6 C1 CE D4 C1 C7 C5 A0 CF C6 22 00 2F 0B 0E 01 |.........."./...|
00000310: 99 22 20 20 CD D9 A0 C1 D2 D4 C9 C6 C9 C3 C9 C1 |." ............|
00000320: CC 20 C9 CE D4 C5 CC CC C5 C7 C5 CE C3 C5 22 00 |. ............".|
00000330: 59 0B 18 01 99 A3 36 29 22 D4 C8 C1 D4 A0 C4 CF |Y.....6)".......|
00000340: C5 D3 CE 27 D4 A0 CB CE CF D7 A0 D7 C8 C5 CE A0 |...'............|
00000350: D4 CF A0 C6 CF CC C4 2C 22 00 80 0B 22 01 99 A3 |.......,"..."...|
00000360: 39 29 22 C9 20 D7 CF CE 27 D4 A0 D0 C5 C5 CB A0 |9)". ...'.......|
00000370: C1 D4 A0 D9 CF D5 D2 A0 C3 C1 D2 C4 D3 20 21 22 |............. !"|
00000380: 00 8A 0B 2C 01 8D 31 35 35 30 00 AD 0B 36 01 85 |...,..1550...6..|
00000390: 22 11 CF CB 20 20 D9 9D 9D 9D 22 3B 59 24 3A 99 |"... ....";Y$:.|
000003A0: 22 93 22 3A 97 35 33 32 37 32 2C 32 31 00 BC 0B |".":.53272,21...|
000003B0: 3B 01 97 20 35 33 32 38 31 2C 30 37 00 FD 0B 40 |;.. 53281,07...@|
000003C0: 01 99 22 93 11 11 11 11 20 20 20 20 44 45 41 4C |.."..... DEAL|
000003D0: 45 52 20 48 41 53 22 50 42 3A 99 22 11 11 20 20 |ER HAS"PB:.".. |
000003E0: 20 20 22 55 4E 24 22 20 48 41 53 22 55 42 3A 8B | "UN$" HAS"UB:.|
000003F0: 50 42 B1 30 AF 55 42 B1 30 89 33 37 30 00 1B 0C |PB.0.UB.0.370...|
00000400: 4A 01 59 24 B2 55 4E 24 3A 8B 50 42 B3 B2 30 A7 |J.Y$.UN$:.PB..0.|
00000410: 59 24 B2 22 44 45 41 4C 45 52 22 00 37 0C 54 01 |Y$."DEALER".7.T.|
00000420: 99 22 11 11 11 20 20 20 20 22 59 24 22 20 49 53 |."... "Y$" IS|
00000430: 20 42 52 4F 4B 45 22 00 75 0C 5E 01 85 22 11 20 | BROKE".u.^..". |
00000440: 20 20 20 41 4E 4F 54 48 45 52 20 47 41 4D 45 20 | ANOTHER GAME |
00000450: 20 59 9D 9D 9D 22 3B 59 59 24 3A 59 24 B2 C8 28 | Y...";YY$:Y$..(|
00000460: 59 59 24 2C 31 29 3A 8B 59 24 B2 22 4E 22 A7 9E |YY$,1):.Y$."N"..|
00000470: 36 34 37 33 38 00 9C 0C 68 01 50 42 B2 35 30 30 |64738...h.PB.500|
00000480: 3A 55 42 B2 35 30 30 3A 8B 59 24 B3 B1 22 59 22 |:UB.500:.Y$.."Y"|
00000490: A7 99 22 91 91 91 22 3A 89 33 35 30 00 B3 0C 72 |.."...":.350...r|
000004A0: 01 57 B2 32 30 30 3A 8D 31 33 39 30 3A 4B 4E 25 |.W.200:.1390:KN%|
000004B0: B2 35 32 00 D7 0C 7C 01 99 22 93 22 3A 49 54 B2 |.52...|..".":IT.|
000004C0: 31 30 3A 50 42 B2 50 42 AB 35 3A 55 42 B2 55 42 |10:PB.PB.5:UB.UB|
000004D0: AB 35 3A 8D 39 30 30 00 13 0D 86 01 81 4D B2 30 |.5:.900......M.0|
000004E0: A4 34 3A 8D 31 34 32 30 3A 55 48 28 4D 29 B2 43 |.4:.1420:UH(M).C|
000004F0: 4E 3A 4C 4E B2 31 33 3A 4B 4C B2 4D AC 38 3A 8D |N:LN.13:KL.M.8:.|
00000500: 31 34 34 30 3A 8D 31 34 32 30 3A 50 48 28 4D 29 |1440:.1420:PH(M)|
00000510: B2 43 4E 00 2D 0D 90 01 58 25 28 4D 29 B2 43 4E |.CN.-...X%(M).CN|
00000520: 3A 4C 4E B2 31 3A 8D 31 35 31 30 3A 82 00 5E 0D |:LN.1:.1510:..^.|
00000530: 9A 01 99 C8 28 51 34 24 2C 31 32 29 A3 33 29 22 |....(Q4$,12).3)"|
00000540: 31 22 A3 31 31 29 22 32 22 A3 31 39 29 22 33 22 |1".11)"2".19)"3"|
00000550: A3 32 37 29 22 34 22 A3 33 35 29 22 35 22 00 81 |.27)"4".35)"5"..|
00000560: 0D A4 01 42 52 B2 31 3A 8D 39 33 30 3A 81 49 B2 |...BR.1:.930:.I.|
00000570: 30 A4 34 3A 50 48 28 49 29 B2 58 25 28 49 29 3A |0.4:PH(I).X%(I):|
00000580: 82 00 B9 0D AE 01 50 56 B2 56 3A 50 59 B2 54 59 |......PV.V:PY.TY|
00000590: 3A 50 44 B2 56 44 3A 54 55 B2 31 AB 54 55 3A 4D |:PD.VD:TU.1.TU:M|
000005A0: B2 30 3A 8B 54 55 A7 4D B2 B5 28 50 59 AD 33 AA |.0:.TU.M..(PY.3.|
000005B0: 31 29 AC 31 30 3A 4F B2 4D 00 CD 0D B8 01 8D 37 |1).10:O.M......7|
000005C0: 31 30 3A 91 58 89 33 32 30 2C 34 35 30 00 E7 0D |10:.X.320,450...|
000005D0: C2 01 44 52 B2 30 3A 57 B2 31 35 30 3A 8D 31 33 |..DR.0:W.150:.13|
000005E0: 39 30 3A 8D 39 30 30 00 12 0E CC 01 99 51 35 24 |90:.900......Q5$|
000005F0: 51 34 24 22 43 41 52 44 20 23 20 22 55 4E 24 22 |Q4$"CARD # "UN$"|
00000600: 2C 20 20 30 20 49 46 20 4E 4F 4E 45 22 3B 3A 85 |, 0 IF NONE";:.|
00000610: 44 4E 00 20 0E D6 01 8B 44 4E B2 30 89 35 31 30 |DN. ....DN.0.510|
00000620: 00 33 0E E0 01 8B 44 4E B3 31 B0 44 4E B1 35 89 |.3....DN.1.DN.5.|
00000630: 34 36 30 00 4D 0E EA 01 44 4E B2 44 4E AB 31 3A |460.M...DN.DN.1:|
00000640: 8B 55 48 28 44 4E 29 B3 30 89 34 36 30 00 81 0E |.UH(DN).0.460...|
00000650: F4 01 44 52 B2 44 52 AA 31 3A 55 48 28 44 4E 29 |..DR.DR.1:UH(DN)|
00000660: B2 AB 31 3A 4C 4E B2 31 33 3A 4B 4C B2 44 4E AC |..1:LN.13:KL.DN.|
00000670: 38 3A 8D 31 35 31 30 3A 8B 44 52 B3 33 89 34 36 |8:.1510:.DR.3.46|
00000680: 30 00 A2 0E FE 01 99 51 35 24 51 34 24 22 44 45 |0......Q5$Q4$"DE|
00000690: 41 4C 45 52 20 54 41 4B 45 53 22 50 44 3A 8D 39 |ALER TAKES"PD:.9|
000006A0: 30 30 00 B8 0E 08 02 99 22 13 22 3A 4C 4E B2 31 |00......".":LN.1|
000006B0: 33 3A 81 49 B2 30 A4 34 00 E1 0E 12 02 8B 55 48 |3:.I.0.4......UH|
000006C0: 28 49 29 B3 30 A7 8D 31 34 32 30 3A 55 48 28 49 |(I).0..1420:UH(I|
000006D0: 29 B2 43 4E 3A 4B 4C B2 49 AC 38 3A 8D 31 34 34 |).CN:KL.I.8:.144|
000006E0: 30 00 E7 0E 1C 02 82 00 0C 0F 26 02 8B 50 44 B1 |0.........&..PD.|
000006F0: 30 A7 81 49 B2 30 A4 50 44 AB 31 3A 8D 31 34 32 |0..I.0.PD.1:.142|
00000700: 30 3A 50 48 28 49 29 B2 43 4E 3A 82 00 3A 0F 30 |0:PH(I).CN:..:.0|
00000710: 02 81 49 B2 30 A4 34 3A 58 25 28 49 29 B2 50 48 |..I.0.4:X%(I).PH|
00000720: 28 49 29 3A 82 3A 42 52 B2 32 3A 8D 39 33 30 3A |(I):.:BR.2:.930:|
00000730: 50 56 B2 56 3A 50 59 B2 54 59 00 67 0F 3A 02 81 |PV.V:PY.TY.g.:..|
00000740: 49 B2 30 A4 34 3A 58 25 28 49 29 B2 55 48 28 49 |I.0.4:X%(I).UH(I|
00000750: 29 3A 82 3A 8D 39 33 30 3A 55 56 B2 56 3A 55 59 |):.:.930:UV.V:UY|
00000760: B2 54 59 3A 4D B2 30 00 A3 0F 44 02 8B 54 55 A7 |.TY:M.0...D..TU.|
00000770: 4D B2 B5 28 50 59 AD 32 AA 31 29 AC 31 30 3A 8B |M..(PY.2.1).10:.|
00000780: 50 59 B3 34 AF 50 59 B1 31 A7 8B 52 46 B2 30 A7 |PY.4.PY.1..RF.0.|
00000790: 4D B2 4D AA B5 28 31 32 AC BB 28 31 29 AD 34 29 |M.M..(12..(1).4)|
000007A0: AC 31 30 00 B0 0F 4E 02 4F B2 4D 3A 8D 37 31 30 |.10...N.O.M:.710|
000007B0: 00 EB 0F 58 02 4C 4E B2 31 3A 81 49 B2 30 A4 34 |...X.LN.1:.I.0.4|
000007C0: 3A 4B 4C B2 49 AC 38 3A 43 4E B2 50 48 28 49 29 |:KL.I.8:CN.PH(I)|
000007D0: 3A 8D 31 34 34 30 3A 82 3A 49 B2 50 59 3A 4A B2 |:.1440:.:I.PY:J.|
000007E0: 55 59 3A 8B 58 B2 31 89 36 38 30 00 FE 0F 62 02 |UY:.X.1.680...b.|
000007F0: 8B 49 B2 4A A7 49 B2 50 56 3A 4A B2 55 56 00 18 |.I.J.I.PV:J.UV..|
00000800: 10 6C 02 8B 4A B1 49 A7 57 24 B2 55 4E 24 3A 4B |.l..J.I.W$.UN$:K|
00000810: B2 55 59 3A 89 36 34 30 00 2D 10 76 02 57 24 B2 |.UY:.640.-.v.W$.|
00000820: 22 44 45 41 4C 45 52 22 3A 4B B2 50 59 00 4E 10 |"DEALER":K.PY.N.|
00000830: 80 02 99 51 35 24 51 34 24 57 24 22 20 57 49 4E |...Q5$Q4$W$" WIN|
00000840: 53 20 57 49 54 48 20 22 57 57 24 28 4B 29 00 65 |S WITH "WW$(K).e|
00000850: 10 8A 02 8B 49 B1 4A A7 50 42 B2 50 42 AA 49 54 |....I.J.PB.PB.IT|
00000860: 3A 89 36 38 30 00 7C 10 94 02 8B 4A B1 49 A7 55 |:.680.|....J.I.U|
00000870: 42 B2 55 42 AA 49 54 3A 89 36 38 30 00 9A 10 9E |B.UB.IT:.680....|
00000880: 02 49 54 B2 49 54 AD 32 3A 50 42 B2 50 42 AA 49 |.IT.IT.2:PB.PB.I|
00000890: 54 3A 55 42 B2 55 42 AA 49 54 00 BD 10 A8 02 99 |T:UB.UB.IT......|
000008A0: 51 36 24 22 48 49 54 20 41 4E 59 20 4B 45 59 20 |Q6$"HIT ANY KEY |
000008B0: 54 4F 20 43 4F 4E 54 49 4E 55 45 22 3B 00 D0 10 |TO CONTINUE";...|
000008C0: B2 02 A1 59 24 3A 8B 59 24 B2 22 22 89 36 39 30 |...Y$:.Y$."".690|
000008D0: 00 D9 10 BC 02 89 33 32 30 00 EE 10 C6 02 8D 39 |......320......9|
000008E0: 30 30 3A 52 46 B2 30 3A 8B 4D 89 37 34 30 00 1A |00:RF.0:.M.740..|
000008F0: 11 D0 02 99 51 35 24 51 34 24 55 4E 24 22 20 42 |....Q5$Q4$UN$" B|
00000900: 45 54 53 22 3B 3A 85 52 3A 4F B2 52 3A 54 42 B2 |ETS";:.R:O.R:TB.|
00000910: 52 3A 8B 52 B1 30 89 38 30 30 00 2D 11 DA 02 58 |R:.R.0.800.-...X|
00000920: B2 31 3A 50 42 B2 50 42 AA 49 54 3A 8E 00 62 11 |.1:PB.PB.IT:..b.|
00000930: E4 02 50 42 B2 50 42 AB 4D 3A 49 54 B2 49 54 AA |..PB.PB.M:IT.IT.|
00000940: 4D 3A 99 51 37 24 51 36 24 22 44 45 41 4C 45 52 |M:.Q7$Q6$"DEALER|
00000950: 20 42 45 54 53 22 4D 3B 3A 8D 39 31 30 3A 54 42 | BETS"M;:.910:TB|
00000960: B2 4D 00 A3 11 EE 02 52 B2 30 3A 99 51 35 24 51 |.M.....R.0:.Q5$Q|
00000970: 34 24 22 46 4F 4C 44 2C 43 41 4C 4C 2C 52 41 49 |4$"FOLD,CALL,RAI|
00000980: 53 45 20 20 22 55 4E 24 3B 3A 85 22 20 20 43 9D |SE "UN$;:." C.|
00000990: 9D 9D 22 3B 59 59 24 3A 59 24 B2 C8 28 59 59 24 |..";YY$:Y$..(YY$|
000009A0: 2C 31 29 00 BE 11 F8 02 8B 59 24 B2 22 46 22 A7 |,1)......Y$."F".|
000009B0: 50 42 B2 50 42 AA 49 54 3A 58 B2 31 3A 8E 00 E3 |PB.PB.IT:X.1:...|
000009C0: 11 02 03 8B 59 24 B2 22 43 22 A7 55 42 B2 55 42 |....Y$."C".UB.UB|
000009D0: AB 4D 3A 49 54 B2 49 54 AA 4D 3A 58 B2 32 3A 89 |.M:IT.IT.M:X.2:.|
000009E0: 39 30 30 00 F4 11 0C 03 8B 59 24 B3 B1 22 52 22 |900......Y$.."R"|
000009F0: 89 37 35 30 00 1A 12 16 03 99 51 34 24 A3 31 37 |.750......Q4$.17|
00000A00: AA C3 28 55 4E 24 29 29 22 20 20 52 41 49 53 45 |..(UN$))" RAISE|
00000A10: 22 3B 3A 85 52 3A 52 46 B2 31 00 4A 12 20 03 55 |";:.R:RF.1.J. .U|
00000A20: 42 B2 55 42 AB 52 AB 4D 3A 49 54 B2 49 54 AA 52 |B.UB.R.M:IT.IT.R|
00000A30: AA 4D 3A 58 B2 32 3A 54 42 B2 54 42 AA 52 3A 4D |.M:X.2:TB.TB.R:M|
00000A40: 58 B2 28 50 59 AA 31 29 AC 4F 00 60 12 2A 03 99 |X.(PY.1).O.`.*..|
00000A50: 51 37 24 51 36 24 22 44 45 41 4C 45 52 20 22 3B |Q7$Q6$"DEALER ";|
00000A60: 00 6E 12 34 03 8B 50 59 B1 32 89 38 37 30 00 81 |.n.4..PY.2.870..|
00000A70: 12 3E 03 8B 42 52 B2 31 B0 50 59 B1 30 89 38 36 |.>..BR.1.PY.0.86|
00000A80: 30 00 95 12 48 03 8B 50 56 B1 31 30 AC 31 33 AE |0...H..PV.10.13.|
00000A90: 34 89 38 36 30 00 BB 12 52 03 55 42 B2 55 42 AA |4.860...R.UB.UB.|
00000AA0: 49 54 3A 58 B2 31 3A 99 22 46 4F 4C 44 53 22 3B |IT:X.1:."FOLDS";|
00000AB0: 3A 8D 31 33 39 30 3A 89 39 31 30 00 DE 12 5C 03 |:.1390:.910...\.|
00000AC0: 50 42 B2 50 42 AB 52 3A 49 54 B2 49 54 AA 52 3A |PB.PB.R:IT.IT.R:|
00000AD0: 99 22 43 41 4C 4C 53 22 3B 3A 89 39 31 30 00 EE |."CALLS";:.910..|
00000AE0: 12 66 03 8B 4D 58 B3 B2 54 42 89 38 36 30 00 11 |.f..MX..TB.860..|
00000AF0: 13 70 03 4D B2 B5 28 4D 58 AB 54 42 29 3A 50 42 |.p.M..(MX.TB):PB|
00000B00: B2 50 42 AB 52 AB 4D 3A 49 54 B2 49 54 AA 52 AA |.PB.R.M:IT.IT.R.|
00000B10: 4D 00 2B 13 7A 03 99 22 52 41 49 53 45 53 22 4D |M.+.z.."RAISES"M|
00000B20: 3B 3A 8D 39 31 30 3A 89 37 35 30 00 34 13 84 03 |;:.910:.750.4...|
00000B30: 99 51 37 24 00 6B 13 8E 03 99 22 13 22 3A 99 51 |.Q7$.k....".":.Q|
00000B40: 36 24 A3 33 31 29 22 20 20 20 20 20 20 20 20 9D |6$.31)" .|
00000B50: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 50 4F 54 3D 22 |...........POT="|
00000B60: C4 28 49 54 29 3B 3A 99 22 13 22 00 71 13 98 03 |.(IT);:.".".q...|
00000B70: 8E 00 A7 13 A2 03 81 49 B2 30 A4 34 3A 58 32 25 |.......I.0.4:X2%|
00000B80: 28 49 29 B2 B5 28 58 25 28 49 29 AD 31 33 29 3A |(I)..(X%(I).13):|
00000B90: 58 25 28 49 29 B2 58 25 28 49 29 AB 58 32 25 28 |X%(I).X%(I).X2%(|
00000BA0: 49 29 AC 31 33 3A 82 00 C5 13 AC 03 81 49 B2 31 |I).13:.......I.1|
00000BB0: A4 34 3A 54 32 B2 58 25 28 49 29 3A 54 33 B2 58 |.4:T2.X%(I):T3.X|
00000BC0: 32 25 28 49 29 00 E3 13 B6 03 81 4A B2 49 AB 31 |2%(I)......J.I.1|
00000BD0: A4 30 A9 AB 31 3A 8B 54 32 B1 58 25 28 4A 29 89 |.0..1:.T2.X%(J).|
00000BE0: 39 37 30 00 08 14 C0 03 58 25 28 4A AA 31 29 B2 |970.....X%(J.1).|
00000BF0: 58 25 28 4A 29 3A 58 32 25 28 4A AA 31 29 B2 58 |X%(J):X2%(J.1).X|
00000C00: 32 25 28 4A 29 3A 82 4A 00 26 14 CA 03 58 25 28 |2%(J):.J.&...X%(|
00000C10: 4A AA 31 29 B2 54 32 3A 58 32 25 28 4A AA 31 29 |J.1).T2:X2%(J.1)|
00000C20: B2 54 33 3A 82 49 00 56 14 D4 03 46 4B B2 30 3A |.T3:.I.V...FK.0:|
00000C30: 46 53 B2 30 3A 53 4B B2 30 3A 53 53 B2 30 3A 50 |FS.0:SK.0:SS.0:P|
00000C40: 4B B2 30 3A 50 53 B2 30 3A 56 B2 30 3A 56 44 B2 |K.0:PS.0:V.0:VD.|
00000C50: 30 3A 54 59 B2 30 00 96 14 DE 03 81 49 B2 30 A4 |0:TY.0......I.0.|
00000C60: 34 3A 54 31 B2 30 3A 54 32 B2 30 3A 54 33 B2 30 |4:T1.0:T2.0:T3.0|
00000C70: 3A 54 34 B2 30 3A 54 35 B2 30 3A 54 36 B2 30 3A |:T4.0:T5.0:T6.0:|
00000C80: 54 38 B2 58 25 28 49 29 3A 54 37 B2 54 38 AB 49 |T8.X%(I):T7.T8.I|
00000C90: 3A 45 B2 31 45 35 00 A8 14 E8 03 81 4A B2 30 A4 |:E.1E5......J.0.|
00000CA0: 34 3A 45 B2 45 AD 31 30 00 C8 14 F2 03 8B 58 25 |4:E.E.10......X%|
00000CB0: 28 4A 29 B2 54 37 AA 4A A7 54 31 B2 54 31 AA 31 |(J).T7.J.T1.T1.1|
00000CC0: 3A 54 32 B2 54 32 AA 45 00 E6 14 FC 03 8B 58 25 |:T2.T2.E......X%|
00000CD0: 28 4A 29 B2 54 38 A7 54 33 B2 54 33 AA 31 3A 54 |(J).T8.T3.T3.1:T|
00000CE0: 34 B2 54 34 AA 45 00 05 15 06 04 8B 58 32 25 28 |4.T4.E......X2%(|
00000CF0: 4A 29 B2 49 20 A7 54 35 B2 54 35 AA 31 3A 54 36 |J).I .T5.T5.1:T6|
00000D00: B2 54 36 AA 45 00 0C 15 10 04 82 4A 00 24 15 1A |.T6.E......J.$..|
00000D10: 04 8B 54 31 B1 B2 53 4B A7 53 4B B2 54 31 3A 53 |..T1..SK.SK.T1:S|
00000D20: 53 B2 54 32 00 3C 15 24 04 8B 54 33 B1 B2 50 4B |S.T2.<.$..T3..PK|
00000D30: A7 50 4B B2 54 33 3A 50 53 B2 54 34 00 54 15 2E |.PK.T3:PS.T4.T..|
00000D40: 04 8B 54 35 B1 B2 46 4B A7 46 4B B2 54 35 3A 46 |..T5..FK.FK.T5:F|
00000D50: 53 B2 54 36 00 5B 15 38 04 82 49 00 6A 15 42 04 |S.T6.[.8..I.j.B.|
00000D60: 8B 50 4B B3 33 89 31 31 33 30 00 7F 15 4C 04 8B |.PK.3.1130...L..|
00000D70: 50 4B B2 34 A7 54 59 B2 38 3A 89 31 32 38 30 00 |PK.4.TY.8:.1280.|
00000D80: A6 15 56 04 54 59 B2 36 3A 8D 31 33 31 30 3A 8B |..V.TY.6:.1310:.|
00000D90: 58 25 28 30 29 B3 B1 58 25 28 31 29 A7 54 59 B2 |X%(0)..X%(1).TY.|
00000DA0: 33 3A 56 44 B2 32 00 B0 15 60 04 89 31 32 39 30 |3:VD.2...`..1290|
00000DB0: 00 DA 15 6A 04 8B 53 4B B2 34 AF 28 58 25 28 33 |...j..SK.4.(X%(3|
00000DC0: 29 B2 33 AF 58 25 28 34 29 B2 31 32 29 A7 53 4B |).3.X%(4).12).SK|
00000DD0: B2 35 3A 56 B2 39 30 32 34 35 00 E9 15 74 04 8B |.5:V.90245...t..|
00000DE0: 46 4B B2 35 A7 54 59 B2 35 00 FB 15 7E 04 8B 53 |FK.5.TY.5...~..S|
00000DF0: 4B B2 35 A7 54 59 B2 54 59 AA 34 00 07 16 88 04 |K.5.TY.TY.4.....|
00000E00: 8B 56 89 31 33 30 30 00 14 16 92 04 8B 54 59 89 |.V.1300......TY.|
00000E10: 31 32 39 30 00 27 16 9C 04 4A B2 30 3A 8B 42 52 |1290.'...J.0:.BR|
00000E20: B2 32 89 31 32 32 30 00 49 16 A6 04 4A B2 58 25 |.2.1220.I...J.X%|
00000E30: 28 34 29 AB 58 25 28 30 29 3A 8B 46 4B B3 34 AF |(4).X%(0):.FK.4.|
00000E40: 53 4B B3 34 89 31 32 32 30 00 6B 16 B0 04 54 59 |SK.4.1220.k...TY|
00000E50: B2 31 2E 35 3A 56 44 B2 31 3A 50 53 B2 53 53 3A |.1.5:VD.1:PS.SS:|
00000E60: 8B 46 4B B2 34 A7 50 53 B2 46 53 00 75 16 BA 04 |.FK.4.PS.FS.u...|
00000E70: 89 31 32 38 30 00 8A 16 C4 04 8B 50 4B B2 32 A7 |.1280......PK.2.|
00000E80: 8D 31 33 31 30 3A 54 59 B2 31 00 A4 16 CE 04 8B |.1310:TY.1......|
00000E90: 58 25 28 31 29 B2 58 25 28 32 29 A7 50 53 B2 30 |X%(1).X%(2).PS.0|
00000EA0: 31 31 31 31 00 BE 16 D8 04 8B 58 25 28 31 29 B2 |1111......X%(1).|
00000EB0: 58 25 28 30 29 A7 50 53 B2 31 31 30 31 31 00 D9 |X%(0).PS.11011..|
00000EC0: 16 E2 04 8B 50 53 B1 31 31 A7 54 59 B2 32 3A 56 |....PS.11.TY.2:V|
00000ED0: 44 B2 31 3A 89 31 32 38 30 00 E7 16 EC 04 8B 4A |D.1:.1280......J|
00000EE0: B2 33 89 31 32 30 30 00 F0 16 F6 04 56 44 B2 33 |.3.1200.....VD.3|
00000EF0: 00 FA 16 00 05 8D 31 33 31 30 00 09 17 0A 05 8D |......1310......|
00000F00: 31 33 38 30 3A 56 B2 54 37 00 2E 17 14 05 81 49 |1380:V.T7......I|
00000F10: B2 30 A4 34 3A 58 25 28 49 29 B2 58 25 28 49 29 |.0.4:X%(I).X%(I)|
00000F20: AA 31 33 AC 58 32 25 28 49 29 3A 82 3A 8E 00 6F |.13.X2%(I):.:..o|
00000F30: 17 1E 05 45 B2 31 45 35 3A 81 49 B2 30 A4 34 3A |...E.1E5:.I.0.4:|
00000F40: 45 B2 45 AD 31 30 3A 54 32 B2 B5 28 28 50 53 AA |E.E.10:T2..((PS.|
00000F50: 31 45 AB 35 29 AD 45 29 3A 50 53 25 28 49 29 B2 |1E.5).E):PS%(I).|
00000F60: 54 32 3A 50 53 B2 50 53 AB 54 32 AC 45 3A 82 00 |T2:PS.PS.T2.E:..|
00000F70: 88 17 28 05 81 49 B2 31 A4 34 3A 8B 50 53 25 28 |..(..I.1.4:.PS%(|
00000F80: 49 29 89 31 33 37 20 30 00 A9 17 32 05 54 32 B2 |I).137 0...2.T2.|
00000F90: 50 53 25 28 49 29 3A 54 33 B2 58 25 28 49 29 3A |PS%(I):T3.X%(I):|
00000FA0: 54 34 B2 58 32 25 28 49 29 00 C9 17 3C 05 81 4A |T4.X2%(I)...<..J|
00000FB0: B2 49 AB 31 A4 30 A9 AB 31 3A 8B 50 53 25 28 4A |.I.1.0..1:.PS%(J|
00000FC0: 29 B2 30 89 31 33 36 20 30 00 FE 17 46 05 50 53 |).0.136 0...F.PS|
00000FD0: 25 28 4A AA 31 29 B2 50 53 25 28 4A 29 3A 58 25 |%(J.1).PS%(J):X%|
00000FE0: 28 4A AA 31 29 B2 58 25 28 4A 29 3A 58 32 25 28 |(J.1).X%(J):X2%(|
00000FF0: 4A AA 31 29 B2 58 32 25 28 4A 29 3A 82 4A 00 25 |J.1).X2%(J):.J.%|
00001000: 18 50 05 50 53 25 28 4A AA 31 29 B2 54 32 3A 58 |.P.PS%(J.1).T2:X|
00001010: 25 28 4A AA 31 29 B2 54 33 3A 58 32 25 28 4A AA |%(J.1).T3:X2%(J.|
00001020: 31 29 B2 54 34 00 2E 18 5A 05 82 49 3A 8E 00 5B |1).T4...Z..I:..[|
00001030: 18 64 05 54 37 B2 30 3A 45 B2 31 3A 81 49 B2 30 |.d.T7.0:E.1:.I.0|
00001040: A4 34 3A 54 37 B2 54 37 AA 58 25 28 49 29 AC 45 |.4:T7.T7.X%(I).E|
00001050: 3A 45 B2 45 AC 31 33 3A 82 3A 8E 00 65 18 6E 05 |:E.E.13:.:..e.n.|
00001060: 57 54 B2 54 49 00 79 18 78 05 8B 20 54 49 B3 57 |WT.TI.y.x.. TI.W|
00001070: 54 AA 57 89 31 34 30 20 30 00 7F 18 82 05 8E 00 |T.W.140 0.......|
00001080: BB 18 8C 05 4B 25 B2 B5 28 4B 4E 25 AC BB 28 37 |....K%..(KN%..(7|
00001090: 29 29 3A 43 4E B2 44 4B 25 28 4B 25 29 3A 81 4C |)):CN.DK%(K%):.L|
000010A0: 4C B2 4B 25 A4 35 30 3A 44 4B 25 28 4C 4C 29 B2 |L.K%.50:DK%(LL).|
000010B0: 44 4B 25 28 4C 4C AA 31 29 3A 82 00 D6 18 96 05 |DK%(LL.1):......|
000010C0: 44 4B 25 28 35 31 29 B2 43 4E 3A 4B 4E 25 B2 4B |DK%(51).CN:KN%.K|
000010D0: 4E 25 AB 31 3A 8E 00 DF 18 A0 05 8F 20 55 50 00 |N%.1:....... UP.|
000010E0: 0B 19 AA 05 4A B2 B5 28 43 4E AD 31 33 29 3A 4B |....J..(CN.13):K|
000010F0: B2 43 4E AB 4A AC 31 33 3A 99 C8 28 51 34 24 2C |.CN.J.13:..(Q4$,|
00001100: 4C 4E 29 3B 3A 99 A3 4B 4C 29 3B 00 36 19 B4 05 |LN);:..KL);.6...|
00001110: 99 22 12 20 20 20 20 20 20 20 22 51 31 24 3B 3A |.". "Q1$;:|
00001120: 99 22 20 22 43 56 24 28 4B 2C 30 29 22 20 20 20 |." "CV$(K,0)" |
00001130: 20 22 51 31 24 3B 00 5E 19 BE 05 99 22 20 22 53 | "Q1$;.^...." "S|
00001140: 55 24 28 4A 2C 33 29 3B 53 55 24 28 4A 2C 53 25 |U$(J,3);SU$(J,S%|
00001150: 28 4B 2C 30 29 29 22 20 20 22 51 31 24 3B 00 87 |(K,0))" "Q1$;..|
00001160: 19 C8 05 81 4C B2 31 A4 35 3A 99 22 20 20 22 53 |....L.1.5:." "S|
00001170: 55 24 28 4A 2C 53 25 28 4B 2C 4C 29 29 22 20 20 |U$(J,S%(K,L))" |
00001180: 22 51 31 24 3B 3A 82 00 C6 19 D2 05 99 22 20 20 |"Q1$;:......." |
00001190: 22 53 55 24 28 4A 2C 53 25 28 4B 2C 36 29 29 3B |"SU$(J,S%(K,6));|
000011A0: 53 55 24 28 4A 2C 33 29 22 20 22 51 31 24 3B 3A |SU$(J,3)" "Q1$;:|
000011B0: 99 22 20 20 20 20 22 43 56 24 28 4B 2C 31 29 22 |." "CV$(K,1)"|
000011C0: 20 22 51 31 24 3B 00 DB 19 DC 05 99 22 20 20 20 | "Q1$;......" |
000011D0: 20 20 20 20 92 22 51 31 24 3A 8E 00 F2 19 E6 05 | ."Q1$:......|
000011E0: 99 C8 28 51 34 24 2C 4C 4E 29 3B 3A 99 A3 4B 4C |..(Q4$,LN);:..KL|
000011F0: 29 3B 00 12 1A F0 05 99 22 12 20 20 20 20 20 20 |);......". |
00001200: 20 22 51 31 24 3B 3A 8F 20 46 41 43 45 20 44 4F | "Q1$;:. FACE DO|
00001210: 57 4E 00 2F 1A FA 05 81 4A B2 32 A4 31 30 3A 99 |WN./....J.2.10:.|
00001220: 22 20 A6 A6 A6 A6 A6 20 22 51 31 24 3B 3A 82 00 |" ..... "Q1$;:..|
00001230: 39 1A 04 06 89 31 35 30 30 00 7D 1A 0E 06 51 31 |9....1500.}...Q1|
00001240: 24 B2 22 11 9D 9D 9D 9D 9D 9D 9D 22 3A 51 32 24 |$."........":Q2$|
00001250: B2 22 91 91 91 91 91 91 91 91 91 91 91 22 3A 51 |."...........":Q|
00001260: 34 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 11 |4$."............|
00001270: 11 11 11 11 11 11 11 11 11 11 11 11 22 00 AF 1A |............"...|
00001280: 18 06 58 58 24 B2 22 20 20 20 20 20 20 20 20 20 |..XX$." |
00001290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000012A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
000012B0: EC 1A 22 06 51 35 24 B2 51 34 24 AA 58 58 24 3A |..".Q5$.Q4$.XX$:|
000012C0: 51 36 24 B2 51 34 24 AA 22 11 22 3A 51 37 24 B2 |Q6$.Q4$.".":Q7$.|
000012D0: 51 36 24 AA 58 58 24 AA 22 13 22 3A 51 38 24 B2 |Q6$.XX$.".":Q8$.|
000012E0: 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 00 0C 1B 2C |".........."...,|
000012F0: 06 55 42 B2 35 30 30 3A 50 42 B2 35 30 30 3A 54 |.UB.500:PB.500:T|
00001300: 55 B2 31 3A 49 B2 BB 28 AB 54 49 29 00 4A 1B 36 |U.1:I..(.TI).J.6|
00001310: 06 86 20 44 4B 25 28 35 32 29 2C 53 55 24 28 33 |.. DK%(52),SU$(3|
00001320: 2C 31 33 29 2C 43 56 24 28 31 32 2C 31 29 2C 53 |,13),CV$(12,1),S|
00001330: 25 28 31 32 2C 36 29 2C 50 48 28 34 29 2C 55 48 |%(12,6),PH(4),UH|
00001340: 28 34 29 2C 57 57 24 28 39 29 00 64 1B 40 06 86 |(4),WW$(9).d.@..|
00001350: 20 58 25 28 34 29 2C 58 32 25 28 34 29 2C 50 53 | X%(4),X2%(4),PS|
00001360: 25 28 34 29 00 7B 1B 4A 06 81 4D B2 30 A4 35 32 |%(4).{.J..M.0.52|
00001370: 3A 44 4B 25 28 4D 29 B2 4D 3A 82 00 AA 1B 54 06 |:DK%(M).M:....T.|
00001380: 81 4D B2 30 A4 33 3A 53 55 24 28 4D 2C 30 29 B2 |.M.0.3:SU$(M,0).|
00001390: 22 20 20 20 22 3A 81 4B B2 31 A4 33 3A 87 53 55 |" ":.K.1.3:.SU|
000013A0: 24 28 4D 2C 4B 29 3A 82 3A 82 00 D1 1B 5E 06 81 |$(M,K):.:....^..|
000013B0: 4B B2 34 A4 31 33 3A 87 41 24 3A 81 4D B2 30 A4 |K.4.13:.A$:.M.0.|
000013C0: 33 3A 53 55 24 28 4D 2C 4B 29 B2 41 24 3A 82 3A |3:SU$(M,K).A$:.:|
000013D0: 82 00 F3 1B 68 06 81 4D B2 30 A4 31 32 3A 87 43 |....h..M.0.12:.C|
000013E0: 56 24 28 4D 2C 30 29 3A 87 43 56 24 28 4D 2C 31 |V$(M,0):.CV$(M,1|
000013F0: 29 3A 82 00 13 1C 72 06 81 4D B2 30 A4 31 32 3A |):....r..M.0.12:|
00001400: 81 4B B2 30 A4 36 3A 87 53 25 28 4D 2C 4B 29 3A |.K.0.6:.S%(M,K):|
00001410: 82 3A 82 00 29 1C 7C 06 81 4D B2 30 A4 39 3A 87 |.:..).|..M.0.9:.|
00001420: 20 57 57 24 28 4D 29 3A 82 00 2F 1C 86 06 8E 00 | WW$(M):../.....|
00001430: 74 1C 90 06 83 22 20 D3 20 22 2C 22 D3 20 D3 22 |t...." . ",". ."|
00001440: 2C 22 D3 22 2C 22 20 DA 20 22 2C 22 DA 20 DA 22 |,"."," . ",". ."|
00001450: 2C 22 DA 22 2C 22 20 D8 20 22 2C 22 D8 20 D8 22 |,"."," . ",". ."|
00001460: 2C 22 D8 22 2C 22 20 C1 20 22 2C 22 C1 20 C1 22 |,"."," . ",". ."|
00001470: 2C 22 C1 22 00 B5 1C 9A 06 83 22 20 4A 20 22 2C |,"."......" J ",|
00001480: 22 20 41 20 22 2C 22 20 43 20 22 2C 22 20 4B 20 |" A "," C "," K |
00001490: 22 2C 22 20 51 20 22 2C 22 20 55 20 22 2C 22 20 |"," Q "," U "," |
000014A0: 45 20 22 2C 22 20 4E 20 22 2C 22 20 49 20 22 2C |E "," N "," I ",|
000014B0: 22 20 47 20 22 00 00 1D A4 06 83 22 32 20 22 2C |" G "......"2 ",|
000014C0: 22 20 32 22 2C 22 33 20 22 2C 22 20 33 22 2C 22 |" 2","3 "," 3","|
000014D0: 34 20 22 2C 22 20 34 22 2C 22 35 20 22 2C 22 20 |4 "," 4","5 "," |
000014E0: 35 22 2C 22 36 20 22 2C 22 20 36 22 2C 22 37 20 |5","6 "," 6","7 |
000014F0: 22 2C 22 20 37 22 2C 22 38 20 22 2C 22 20 38 22 |"," 7","8 "," 8"|
00001500: 00 41 1D AE 06 83 22 39 20 22 2C 22 20 39 22 2C |.A...."9 "," 9",|
00001510: 22 31 30 22 2C 22 31 30 22 2C 22 4A 20 22 2C 22 |"10","10","J ","|
00001520: 20 4A 22 2C 22 51 20 22 2C 22 20 51 22 2C 22 4B | J","Q "," Q","K|
00001530: 20 22 2C 22 20 4B 22 2C 22 41 20 22 2C 22 20 41 | "," K","A "," A|
00001540: 22 00 82 1D B8 06 83 20 30 2C 31 2C 30 2C 30 2C |"...... 0,1,0,0,|
00001550: 30 2C 31 2C 30 2C 20 30 2C 31 2C 30 2C 31 2C 30 |0,1,0, 0,1,0,1,0|
00001560: 2C 31 2C 30 2C 20 30 2C 32 2C 30 2C 30 2C 30 2C |,1,0, 0,2,0,0,0,|
00001570: 32 2C 30 2C 20 30 2C 32 2C 30 2C 31 2C 30 2C 32 |2,0, 0,2,0,1,0,2|
00001580: 2C 30 00 C3 1D C2 06 83 20 30 2C 32 2C 30 2C 32 |,0...... 0,2,0,2|
00001590: 2C 30 2C 32 2C 30 2C 20 30 2C 32 2C 31 2C 32 2C |,0,2,0, 0,2,1,2,|
000015A0: 30 2C 32 2C 30 2C 20 30 2C 32 2C 31 2C 32 2C 31 |0,2,0, 0,2,1,2,1|
000015B0: 2C 32 2C 30 2C 20 32 2C 31 2C 32 2C 30 2C 32 2C |,2,0, 2,1,2,0,2,|
000015C0: 30 2C 32 00 0D 1E CC 06 83 20 32 2C 31 2C 32 2C |0,2...... 2,1,2,|
000015D0: 30 2C 32 2C 31 2C 32 2C 20 30 2C 34 2C 35 2C 36 |0,2,1,2, 0,4,5,6|
000015E0: 2C 37 2C 30 2C 30 2C 20 20 20 20 30 2C 38 2C 39 |,7,0,0, 0,8,9|
000015F0: 2C 31 30 2C 31 30 2C 31 31 2C 30 2C 20 30 2C 37 |,10,10,11,0, 0,7|
00001600: 2C 31 32 2C 31 31 2C 31 33 2C 30 2C 30 00 21 1E |,12,11,13,0,0.!.|
00001610: D6 06 83 20 30 2C 30 2C 30 2C 31 2C 30 2C 30 2C |... 0,0,0,1,0,0,|
00001620: 30 00 6A 1E E0 06 83 20 22 5A 49 50 22 2C 22 41 |0.j.... "ZIP","A|
00001630: 20 50 41 49 52 22 2C 22 54 57 4F 20 50 41 49 52 | PAIR","TWO PAIR|
00001640: 22 2C 22 54 48 52 45 45 20 4F 46 20 41 20 4B 49 |","THREE OF A KI|
00001650: 4E 44 22 2C 22 41 20 53 54 52 41 49 47 48 54 22 |ND","A STRAIGHT"|
00001660: 2C 22 41 20 46 4C 55 53 48 22 00 A6 1E EA 06 83 |,"A FLUSH"......|
00001670: 22 41 20 46 55 4C 4C 20 48 4F 55 53 45 22 2C 22 |"A FULL HOUSE","|
00001680: 37 22 2C 22 46 4F 55 52 20 4F 46 20 41 20 4B 49 |7","FOUR OF A KI|
00001690: 4E 44 22 2C 22 41 20 53 54 52 41 49 47 48 54 20 |ND","A STRAIGHT |
000016A0: 46 4C 55 53 48 22 00 00 00 |FLUSH"... |
....... 53281,0...... 53280,1.+.... 5579
6,1.<.D.. DRAW POKER.Y.N.. BY SIMON SCOT
T 1987.|.X.. ANYONE FOR COLOR & SOUND
???......53272,21:.". .D R A W
P O K E R.".M.....10)"...SIMON SCOTT 1
987.".....ZZAP$."SIMON"......".MY NAME I
S DEALER. WHAT IS YOURS MUM.....";UN$.1
. ..C(UN$).8.UN$.H(UN$,8).J.... 53280,15
:. 53281,6......53272,23:."..OK. "UN$" H
ERE ARE THE HOUSE RULES:"......".THE ANT
E IS 5. NO LIMIT ON BETS."......"WE AL
TERNATE OPENING. OPEN WITH ANYTHING"...H
..".NO CHECKING. OPEN OR BET 0 (FOLD).".
1.R..".WHEN ASKED TO FOLD,CALL,OR RAISE,
".[...."REPLY WITH F OR C OR R AND RETUR
N."......"WHEN ASKED TO BET, OR WHEN RAI
SING,"......"REPLY WITH AMOUNT AND RETUR
N."......".TO DRAW, ENTER EACH CARD NUMB
ER AND RET."......"IF YOU PROMISE NOT TO
TAKE ADVANTAGE OF"./...." MY ARTIFICIA
L INTELLEGENCE".Y.....6)"THAT DOESN'T KN
OW WHEN TO FOLD,"..."...9)"I WON'T PEEK
AT YOUR CARDS !"...,..1550...6..".OK Y.
..";Y$:.".":.53272,21...;.. 53281,07...@
.."..... DEALER HAS"PB:.".. "UN$"
HAS"UB:.PB.0.UB.0.370...J.Y$.UN$:.PB..0.
Y$."DEALER".7.T.."... "Y$" IS BROKE".
U.^..". ANOTHER GAME Y...";YY$:Y$.H(
YY$,1):.Y$."N"..64738...H.PB.500:UB.500:
.Y$.."Y".."...":.350...R.W.200:.1390:KN%
.52.W.|..".":IT.10:PB.PB.5:UB.UB.5:.900.
.....M.0.4:.1420:UH(M).CN:LN.13:KL.M.8:.
1440:.1420:PH(M).CN.-...X%(M).CN:LN.1:.1
510:..^....H(Q4$,12).3)"1".11)"2".19)"3"
.27)"4".35)"5".....BR.1:.930:.I.0.4:PH(I
).X%(I):......PV.V:PY.TY:PD.VD:TU.1.TU:M
.0:.TU.M..(PY.3.1).10:O.M.M....710:.X.32
0,450...B.DR.0:W.150:.1390:.900...L..Q5$
Q4$"CARD # "UN$", 0 IF NONE";:.DN. .V..
DN.0.510.3....DN.1.DN.5.460.M...DN.DN.1:
.UH(DN).0.460.....DR.DR.1:UH(DN)..1:LN.1
3:KL.DN.8:.1510:.DR.3.460......Q5$Q4$"DE
ALER TAKES"PD:.900......".":LN.13:.I.0.4
......UH(I).0..1420:UH(I).CN:KL.I.8:.144
0.........&..PD.0..I.0.PD.1:.1420:PH(I).
CN:..:.0..I.0.4:X%(I).PH(I):.:BR.2:.930:
PV.V:PY.TY.G.:..I.0.4:X%(I).UH(I):.:.930
:UV.V:UY.TY:M.0...D..TU.M..(PY.2.1).10:.
PY.4.PY.1..RF.0.M.M..(12..(1).4).10...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.P
V:J.UV...L..J.I.W$.UN$:K.UY:.640.-.V.W$.
"DEALER":K.PY.N....Q5$Q4$W$" WINS WITH "
WW$(K).E....I.J.PB.PB.IT:.680.|....J.I.U
B.UB.IT:.680.....IT.IT.2:PB.PB.IT:UB.UB.
IT......Q6$"HIT ANY KEY TO CONTINUE";.P.
...Y$:.Y$."".690.Y....320...F..900:RF.0:
.M.740...P..Q5$Q4$UN$" BETS";:.R:O.R:TB.
R:.R.0.800.-.Z.X.1:PB.PB.IT:..B...PB.PB.
M:IT.IT.M:.Q7$Q6$"DEALER BETS"M;:.910:TB
.M.....R.0:.Q5$Q4$"FOLD,CALL,RAISE "UN$
;:." C...";YY$:Y$.H(YY$,1)......Y$."F".
PB.PB.IT:X.1:.......Y$."C".UB.UB.M:IT.IT
.M:X.2:.900......Y$.."R".750......Q4$.17
.C(UN$))" RAISE";:.R:RF.1.J. .UB.UB.R.M
:IT.IT.R.M:X.2:TB.TB.R:MX.(PY.1).O.`.*..
Q7$Q6$"DEALER ";.N.4..PY.2.870...>..BR.1
.PY.0.860...H..PV.10.13.4.860...R.UB.UB.
IT:X.1:."FOLDS";:.1390:.910...\.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.4....Q7$.K....".":.Q
6$.31)" ............POT="D(IT);:.
".".Q..........I.0.4:X2%(I)..(X%(I).13):
X%(I).X%(I).X2%(I).13:..E....I.1.4:T2.X%
(I):T3.X2%(I)......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.V.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
.H....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.$....T1..SK.SK.T1:S
S.T2.<.$..T3..PK.PK.T3:PS.T4.T....T5..FK
.FK.T5:FS.T6.[.8..I.J.B..PK.3.1130..L..
PK.4.TY.8:.1280...V.TY.6:.1310:.X%(0)..X
%(1).TY.3:VD.2...`..1290.Z.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.I...J.X%(4).X%(0
):.FK.4.SK.4.1220.K...TY.1.5:VD.1:PS.SS:
.FK.4.PS.FS.U....1280...D..PK.2..1310:TY
.1...N..X%(1).X%(2).PS.01111...X..X%(1).
X%(0).PS.11011.Y....PS.11.TY.2:VD.1:.128
0......J.3.1200.....VD.3......1310......
1380:V.T7......I.0.4:X%(I).X%(I).13.X2%(
I):.:..O...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).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).T
3:X2%(J.1).T4...Z..I:..[.D.T7.0:E.1:.I.0
.4:T7.T7.X%(I).E:E.E.13:.:..E.N.WT.TI.Y.
X.. TI.WT.W.140 0..........K%..(KN%..(7
)):CN.DK%(K%):.LL.K%.50:DK%(LL).DK%(LL.1
):..V...DK%(51).CN:KN%.KN%.1:.... .. UP.
....J..(CN.13):K.CN.J.13:.H(Q4$,LN);:..K
L);.6....". "Q1$;:." "CV$(K,0)"
"Q1$;.^...." "SU$(J,3);SU$(J,S%(K,0))"
"Q1$;...H..L.1.5:." "SU$(J,S%(K,L))"
"Q1$;:..F.R.." "SU$(J,S%(K,6));SU$(J,3)
" "Q1$;:." "CV$(K,1)" "Q1$;......"
."Q1$:.......H(Q4$,LN);:..KL);......
". "Q1$;:. FACE DOWN./....J.2.10:.
" ..... "Q1$;:..9....1500.}...Q1$.".....
...":Q2$."...........":Q4$."............
............".....XX$."
"...".Q5$.Q4$.XX$:
Q6$.Q4$.".":Q7$.Q6$.XX$.".":Q8$.".......
..."...,.UB.500:PB.500:TU.1:I..(.TI).J.6
.. DK%(52),SU$(3,13),CV$(12,1),S%(12,6),
PH(4),UH(4),WW$(9).D.@.. X%(4),X2%(4),PS
%(4).{.J..M.0.52:DK%(M).M:....T..M.0.3:S
U$(M,0)." ":.K.1.3:.SU$(M,K):.:..Q.^..
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):
../.....T...." S ","S S","S"," Z ","Z Z"
,"Z"," X ","X X","X"," A ","A A","A"....
.." J "," A "," C "," K "," Q "," U ","
E "," N "," I "," G "......"2 "," 2","3
"," 3","4 "," 4","5 "," 5","6 "," 6","7
"," 7","8 "," 8".A...."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.C.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,1
3,0,0.!.V.. 0,0,0,1,0,0,0.J.... "ZIP","A
PAIR","TWO PAIR","THREE OF A KIND","A S
TRAIGHT","A FLUSH"......"A FULL HOUSE","
7","FOUR OF A KIND","A STRAIGHT FLUSH"..
.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL