BLACKJACK
FILE INFORMATION
FILENAME(S): BLACKJACK
FILE TYPE(S): PRG
FILE SIZE: 11.3K
FIRST SEEN: 2025-11-30 18:12:51
APPEARS ON: 1 disk(s)
FILE HASH
eb5bf8a01777aae3c6e24e197cf8014f2064e9cf3eff8ccc2d368349c75e408b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LCG0501 V3 5 AT | BLACKJACK | PRG | Sailor, Ganheden | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 01 00 97 20 35 33 32 38 30 2C 30 3A |....... 53280,0:|
00000010: 97 20 35 33 32 38 31 2C 33 00 21 08 06 00 89 31 |. 53281,3.!....1|
00000020: 31 00 39 08 0B 00 89 31 34 34 36 81 20 49 4E 81 |1.9....1446. IN.|
00000030: 4D 41 54 49 91 20 23 36 35 00 5D 08 10 00 83 39 |MATI. #65.]....9|
00000040: 39 2C 31 31 39 2C 31 32 30 2C 32 32 36 2C 32 34 |9,119,120,226,24|
00000050: 39 2C 32 33 39 2C 32 32 38 2C 32 32 34 00 6F 08 |9,239,228,224.o.|
00000060: 15 00 9C 3A 4D 4F B2 31 30 30 30 3A 89 33 36 00 |...:MO.1000:.36.|
00000070: 94 08 1A 00 99 42 24 A3 38 29 22 11 2D 2D 2D 20 |.....B$.8)".--- |
00000080: 50 52 45 53 53 20 53 50 41 43 45 20 42 41 52 20 |PRESS SPACE BAR |
00000090: 2D 2D 2D 22 00 A8 08 1F 00 A1 57 24 3A 8B 57 24 |---"......W$:.W$|
000000A0: B3 B1 22 20 22 A7 33 31 00 CC 08 24 00 4D 4F B2 |.." ".31...$.MO.|
000000B0: 4D 4F AC 31 30 3A 8F 20 53 48 55 46 46 4C 45 20 |MO.10:. SHUFFLE |
000000C0: 43 4F 4D 45 20 49 4E 20 48 45 52 45 00 E5 08 29 |COME IN HERE...)|
000000D0: 00 97 38 33 35 2C 30 3A 97 38 33 34 2C 30 3A 97 |..835,0:.834,0:.|
000000E0: 38 32 30 2C 30 00 12 09 2E 00 44 B2 B5 28 4D 4F |820,0.....D..(MO|
000000F0: AD 32 35 36 29 3A 97 38 33 35 2C 44 3A 97 38 33 |.256):.835,D:.83|
00000100: 34 2C 4D 4F AB 44 AC 32 35 36 3A 97 38 32 30 2C |4,MO.D.256:.820,|
00000110: 42 45 00 1D 09 33 00 99 22 93 22 3A 9C 00 38 09 |BE...3..".":..8.|
00000120: 38 00 41 24 B2 22 13 11 11 11 11 11 11 11 11 11 |8.A$."..........|
00000130: 11 11 11 11 11 11 11 22 00 48 09 3D 00 42 24 B2 |.......".H.=.B$.|
00000140: C8 28 41 24 2C 31 31 29 00 57 09 42 00 43 24 B2 |.(A$,11).W.B.C$.|
00000150: C8 28 41 24 2C 38 29 00 88 09 47 00 44 24 B2 22 |.(A$,8)...G.D$."|
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000180: 20 20 20 20 20 20 20 22 00 94 09 4B 00 46 46 24 | "...K.FF$|
00000190: B2 22 30 22 00 AC 09 4C 00 51 51 24 B2 22 41 32 |."0"...L.QQ$."A2|
000001A0: 33 34 35 36 37 38 39 30 4A 51 4B 22 00 BB 09 51 |34567890JQK"...Q|
000001B0: 00 56 56 24 B2 22 D3 D8 DA C1 22 00 DE 09 56 00 |.VV$."...."...V.|
000001C0: 4D 4F B2 32 35 36 AC C2 28 38 33 35 29 AA C2 28 |MO.256..(835)..(|
000001D0: 38 33 34 29 3A 42 45 B2 C2 28 38 32 30 29 00 EB |834):BE..(820)..|
000001E0: 09 5B 00 4D 4F B2 4D 4F AD 31 30 00 21 0A 60 00 |.[.MO.MO.10.!.`.|
000001F0: 99 42 24 22 11 20 20 20 20 20 20 22 C7 28 33 34 |.B$". ".(34|
00000200: 29 22 2E 2E 2E 53 48 55 46 46 4C 45 2E 2E 2E 2E |)"...SHUFFLE....|
00000210: 2E 53 48 55 46 46 4C 45 2E 2E 2E 22 C7 28 33 34 |.SHUFFLE...".(34|
00000220: 29 00 34 0A 65 00 8D 34 33 31 3A 8F 20 53 48 55 |).4.e..431:. SHU|
00000230: 46 46 4C 45 00 3D 0A 6A 00 89 31 32 31 00 5D 0A |FFLE.=.j..121.].|
00000240: 6F 00 22 20 20 44 45 41 4C 20 54 48 45 20 48 41 |o." DEAL THE HA|
00000250: 4E 44 2C 36 35 35 33 35 43 41 52 44 53 00 7B 0A |ND,65535CARDS.{.|
00000260: 74 00 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |t." ...........|
00000270: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 8C 0A 79 00 |..............y.|
00000280: 8B 20 53 42 B3 B1 30 20 A7 31 33 36 00 9C 0A 7E |. SB..0 .136...~|
00000290: 00 8B 20 51 41 B2 32 20 A7 39 35 36 00 B6 0A 83 |.. QA.2 .956....|
000002A0: 00 8F 20 52 45 53 45 54 20 46 4F 52 20 4E 45 58 |.. RESET FOR NEX|
000002B0: 54 20 48 41 4E 44 00 F5 0A 88 00 46 42 B2 30 3A |T HAND.....FB.0:|
000002C0: 53 42 B2 30 3A 53 4D B2 30 3A 53 52 B2 30 3A 44 |SB.0:SM.0:SR.0:D|
000002D0: 42 4A B2 30 3A 45 B2 30 3A 46 B2 30 3A 47 B2 30 |BJ.0:E.0:F.0:G.0|
000002E0: 3A 48 B2 30 3A 8B 20 44 4F B2 31 20 A7 20 42 45 |:H.0:. DO.1 . BE|
000002F0: B2 42 45 AD 32 00 31 0B 8D 00 4A B2 30 3A 4B B2 |.BE.2.1...J.0:K.|
00000300: 30 3A 4C B2 30 3A 4D B2 30 3A 4E B2 30 3A 50 B2 |0:L.0:M.0:N.0:P.|
00000310: 30 3A 44 4F B2 30 3A 51 51 B2 30 3A 51 41 B2 30 |0:DO.0:QQ.0:QA.0|
00000320: 3A 8B 20 4D 4F B2 B1 36 30 30 30 20 A7 31 30 34 |:. MO..6000 .104|
00000330: 36 00 40 0B 92 00 8B 20 49 B1 33 34 20 A7 32 36 |6.@.... I.34 .26|
00000340: 00 53 0B 97 00 99 41 24 22 11 11 11 11 11 11 11 |.S....A$".......|
00000350: 22 44 24 00 8A 0B 9C 00 47 24 B2 C4 28 4D 4F 29 |"D$.....G$..(MO)|
00000360: 3A 99 42 24 22 11 20 20 59 4F 55 20 48 41 56 45 |:.B$". YOU HAVE|
00000370: 20 24 22 47 24 22 2C 20 50 4C 41 43 45 20 59 4F | $"G$", PLACE YO|
00000380: 55 52 20 42 45 54 20 22 42 45 00 A1 0B A1 00 99 |UR BET "BE......|
00000390: A3 32 38 AA C3 28 47 24 29 29 3B 22 91 3F 20 22 |.28..(G$));".? "|
000003A0: 3B 00 CD 0B A3 00 55 53 24 B2 22 31 32 33 34 35 |;.....US$."12345|
000003B0: 36 37 38 39 30 51 22 3A 55 4C B2 33 3A 8D 36 30 |67890Q":UL.3:.60|
000003C0: 30 30 30 3A 42 45 B2 C5 28 55 52 24 29 00 E5 0B |000:BE..(UR$)...|
000003D0: A5 00 8B C8 28 55 52 24 2C 31 29 B2 22 51 22 A7 |....(UR$,1)."Q".|
000003E0: 36 33 30 30 30 00 EE 0B A6 00 89 39 39 31 00 21 |63000......991.!|
000003F0: 0C AB 00 99 22 93 22 41 24 22 11 11 11 11 11 11 |...."."A$"......|
00000400: 11 59 4F 55 20 48 4F 4C 44 20 24 22 53 48 22 2C |.YOU HOLD $"SH",|
00000410: 20 59 4F 55 52 20 42 45 54 20 49 53 20 24 22 42 | YOUR BET IS $"B|
00000420: 45 00 39 0C B0 00 8F 20 50 4C 41 59 45 52 20 46 |E.9.... PLAYER F|
00000430: 49 52 53 54 20 43 41 52 44 00 5A 0C B5 00 54 B2 |IRST CARD.Z...T.|
00000440: 30 3A 99 41 24 3B 3A 8D 34 38 36 3A 8D 35 36 31 |0:.A$;:.486:.561|
00000450: 3A 41 B2 4E 55 3A 8D 35 37 36 00 7A 0C BA 00 8F |:A.NU:.576.z....|
00000460: 20 4E 4F 57 20 47 45 54 20 44 45 41 4C 45 52 20 | NOW GET DEALER |
00000470: 46 49 52 53 54 20 43 41 52 44 00 A4 0C BF 00 8D |FIRST CARD......|
00000480: 35 34 36 3A 99 22 13 11 22 3B 3A 8D 34 38 36 3A |546:."..";:.486:|
00000490: 8D 35 36 31 3B 3A 8D 35 37 36 3A 42 B2 4E 55 3A |.561;:.576:B.NU:|
000004A0: 8D 35 34 36 00 D1 0C C4 00 54 B2 36 3A 99 22 13 |.546.....T.6:.".|
000004B0: 22 41 24 3B 3A 8D 34 38 36 3A 8D 35 36 31 3A 8D |"A$;:.486:.561:.|
000004C0: 35 37 36 3A 43 B2 4E 55 3A 51 51 B2 43 25 28 49 |576:C.NU:QQ.C%(I|
000004D0: 29 00 EC 0C C9 00 8F 20 4E 4F 57 20 44 45 41 4C |)...... NOW DEAL|
000004E0: 45 52 20 44 4F 57 4E 20 43 41 52 44 00 19 0D CE |ER DOWN CARD....|
000004F0: 00 8D 35 34 36 3A 99 22 13 11 22 3B 3A 8D 34 38 |..546:."..";:.48|
00000500: 36 3A 8D 35 36 31 3A 44 B2 4E 55 3A 5A 5A B2 43 |6:.561:D.NU:ZZ.C|
00000510: 25 28 49 29 3A 8D 35 34 36 00 22 0D D3 00 89 32 |%(I):.546."....2|
00000520: 32 36 00 44 0D D8 00 22 20 20 43 48 45 43 4B 20 |26.D..." CHECK |
00000530: 44 45 41 4C 45 52 20 46 4F 52 20 42 4C 41 43 4B |DEALER FOR BLACK|
00000540: 4A 41 43 4B 00 66 0D DD 00 22 20 20 B8 B8 B8 B8 |JACK.f..." ....|
00000550: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000560: B8 B8 B8 B8 B8 B8 00 97 0D E2 00 8B 20 42 B2 31 |............ B.1|
00000570: 20 A7 20 8D 37 38 36 3A 8F 20 44 45 41 4C 45 52 | . .786:. DEALER|
00000580: 20 20 20 20 20 48 41 53 20 41 4E 20 41 43 45 20 | HAS AN ACE |
00000590: 53 48 4F 57 49 4E 47 00 AF 0D E7 00 8B 20 42 B2 |SHOWING...... B.|
000005A0: 31 20 AF 20 44 B1 39 20 A7 20 44 42 4A B2 31 00 |1 . D.9 . DBJ.1.|
000005B0: C7 0D EC 00 8B 20 44 B2 31 20 AF 20 42 B1 39 20 |..... D.1 . B.9 |
000005C0: A7 20 44 42 4A B2 31 00 D0 0D F1 00 89 32 35 36 |. DBJ.1......256|
000005D0: 00 F3 0D F6 00 22 20 20 43 48 45 43 4B 20 50 4C |....." CHECK PL|
000005E0: 41 59 45 52 20 46 4F 52 20 42 4C 41 43 4B 20 4A |AYER FOR BLACK J|
000005F0: 41 43 4B 00 16 0E FB 00 22 20 20 B8 B8 B8 B8 B8 |ACK....." .....|
00000600: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000610: B8 B8 B8 B8 B8 B8 00 2B 0E 00 01 8B 20 41 B2 31 |.......+.... A.1|
00000620: 20 AF 20 43 B1 39 20 A7 32 39 31 00 40 0E 05 01 | . C.9 .291.@...|
00000630: 8B 20 43 B2 31 20 AF 20 41 B1 39 20 A7 32 39 31 |. C.1 . A.9 .291|
00000640: 00 49 0E 0A 01 89 32 38 31 00 6E 0E 0F 01 22 20 |.I....281.n..." |
00000650: 20 49 46 20 4F 4E 45 20 4F 52 20 42 4F 54 48 20 | IF ONE OR BOTH |
00000660: 48 41 56 45 20 42 4C 41 43 4B 4A 41 43 4B 00 93 |HAVE BLACKJACK..|
00000670: 0E 14 01 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |..." ..........|
00000680: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000690: B8 B8 B8 00 AB 0E 19 01 8B 20 44 42 4A B2 30 20 |......... DBJ.0 |
000006A0: A7 20 8D 35 34 36 3A 89 33 33 36 00 D3 0E 1E 01 |. .546:.336.....|
000006B0: 99 43 24 22 11 11 44 45 41 4C 45 52 07 20 42 4C |.C$"..DEALER. BL|
000006C0: 41 43 4B 4A 41 43 4B 22 3A 8D 31 30 38 36 3A 89 |ACKJACK":.1086:.|
000006D0: 33 31 36 00 E4 0E 23 01 8B 20 44 42 4A B2 31 20 |316...#.. DBJ.1 |
000006E0: A7 33 31 31 00 1B 0F 28 01 8B 20 51 41 B2 31 20 |.311...(.. QA.1 |
000006F0: A7 20 99 22 91 91 07 42 4C 41 43 4B 4A 41 43 4B |. ."...BLACKJACK|
00000700: 22 3A 8D 35 34 36 3A 53 42 B2 31 3A 46 42 B2 31 |":.546:SB.1:FB.1|
00000710: 3A 8D 31 31 32 36 3A 89 38 37 31 00 52 0F 2D 01 |:.1126:.871.R.-.|
00000720: 8B 20 51 41 B2 32 20 A7 20 99 22 91 91 91 91 91 |. QA.2 . .".....|
00000730: 91 91 07 42 4C 41 43 4B 4A 41 43 4B 22 3A 53 42 |...BLACKJACK":SB|
00000740: B2 32 3A 8D 35 34 36 3A 8D 31 31 32 36 3A 89 39 |.2:.546:.1126:.9|
00000750: 32 31 00 88 0F 32 01 99 22 11 11 20 20 20 20 20 |21...2..".. |
00000760: 20 20 20 20 20 20 50 4C 41 59 45 52 07 20 42 4C | PLAYER. BL|
00000770: 41 43 4B 4A 41 43 4B 22 3A 8D 35 34 36 3A 8D 31 |ACKJACK":.546:.1|
00000780: 31 32 36 3A 89 33 31 36 00 AF 0F 37 01 99 22 11 |126:.316...7..".|
00000790: 11 20 20 20 20 20 20 20 20 20 20 50 55 53 48 2D |. PUSH-|
000007A0: 2D 4E 4F 07 20 57 49 4E 4E 45 52 53 20 21 21 00 |-NO. WINNERS !!.|
000007B0: B9 0F 3C 01 8D 31 33 38 31 00 CE 0F 41 01 89 31 |..<..1381...A..1|
000007C0: 32 31 3A 8F 20 4E 45 58 54 20 48 41 4E 44 00 ED |21:. NEXT HAND..|
000007D0: 0F 46 01 22 20 20 44 45 43 49 53 49 4F 4E 20 4F |.F." DECISION O|
000007E0: 4E 20 48 49 54 20 4F 52 20 48 4F 4C 44 00 0C 10 |N HIT OR HOLD...|
000007F0: 4B 01 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |K." ...........|
00000800: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 1D 10 50 |...............P|
00000810: 01 8B 20 51 41 B3 B1 30 20 A7 33 35 36 00 5A 10 |.. QA..0 .356.Z.|
00000820: 55 01 8B 20 41 B2 43 20 B0 20 20 41 B1 39 20 AF |U.. A.C . A.9 .|
00000830: 20 43 B1 39 20 A7 20 99 42 24 22 90 11 11 11 11 | C.9 . .B$".....|
00000840: 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 53 |DO YOU WANT TO S|
00000850: 50 4C 49 54 20 3F 20 28 53 29 00 88 10 5A 01 99 |PLIT ? (S)...Z..|
00000860: 42 24 22 11 11 90 59 4F 55 20 57 41 4E 54 20 4F |B$"...YOU WANT O|
00000870: 4E 45 20 43 41 52 44 20 46 4F 52 20 44 4F 55 42 |NE CARD FOR DOUB|
00000880: 4C 45 20 3F 20 28 44 29 00 A5 10 5F 01 8F 20 43 |LE ? (D)..._.. C|
00000890: 4F 4D 45 20 49 4E 20 48 45 52 45 20 41 46 54 45 |OME IN HERE AFTE|
000008A0: 52 20 48 49 54 00 D1 10 64 01 99 42 24 22 91 91 |R HIT...d..B$"..|
000008B0: 90 44 4F 20 59 4F 55 20 57 41 4E 54 20 41 20 43 |.DO YOU WANT A C|
000008C0: 41 52 44 20 3F 20 28 53 50 41 43 45 20 42 41 52 |ARD ? (SPACE BAR|
000008D0: 29 00 EC 10 69 01 99 42 24 22 90 44 4F 20 59 4F |)...i..B$".DO YO|
000008E0: 55 20 48 4F 4C 44 20 3F 20 28 48 29 00 03 11 6E |U HOLD ? (H)...n|
000008F0: 01 A1 20 57 24 3A 20 8B 20 57 24 B2 22 22 20 A7 |.. W$: . W$."" .|
00000900: 33 36 36 00 20 11 73 01 8B 20 57 24 B2 22 20 22 |366. .s.. W$." "|
00000910: A7 35 39 36 3A 8F 20 54 41 4B 45 20 43 41 52 44 |.596:. TAKE CARD|
00000920: 00 38 11 78 01 8B 20 57 24 B2 22 48 22 A7 36 39 |.8.x.. W$."H".69|
00000930: 31 3A 8F 20 48 4F 4C 44 00 5B 11 7D 01 8B 20 57 |1:. HOLD.[.}.. W|
00000940: 24 B2 22 44 22 20 AF 20 54 B3 31 32 20 AF 20 51 |$."D" . T.12 . Q|
00000950: 41 B2 30 20 A7 20 89 31 31 30 36 00 8E 11 82 01 |A.0 . .1106.....|
00000960: 8B 20 57 24 B2 22 53 22 AF 20 41 B2 43 20 B0 20 |. W$."S". A.C . |
00000970: 41 B1 39 20 AF 20 43 B1 39 20 20 20 20 20 20 20 |A.9 . C.9 |
00000980: 20 20 AF 20 51 41 B2 30 20 A7 31 30 36 36 00 97 | . QA.0 .1066..|
00000990: 11 87 01 89 33 36 36 00 B5 11 8C 01 22 20 20 A2 |....366....." .|
000009A0: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
000009B0: A2 A2 A2 A2 A2 00 D3 11 91 01 22 20 20 B8 B8 B8 |.........." ...|
000009C0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
000009D0: B8 B8 B8 00 F1 11 96 01 22 20 20 42 45 47 49 4E |........" BEGIN|
000009E0: 20 41 4C 4C 20 53 55 42 20 52 4F 55 54 49 4E 45 | ALL SUB ROUTINE|
000009F0: 53 00 0F 12 9B 01 22 20 20 A2 A2 A2 A2 A2 A2 A2 |S....." .......|
00000A00: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 00 |................|
00000A10: 2D 12 A0 01 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 |-..." .........|
00000A20: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 45 12 |..............E.|
00000A30: A5 01 22 20 20 53 48 55 46 46 4C 45 20 54 48 45 |.." SHUFFLE THE|
00000A40: 20 44 45 43 4B 00 5D 12 AA 01 22 20 20 B8 B8 B8 | DECK.]..." ...|
00000A50: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 71 12 |..............q.|
00000A60: AF 01 86 20 43 4B 28 35 32 29 2C 43 25 28 35 32 |... CK(52),C%(52|
00000A70: 29 00 92 12 B4 01 81 20 49 B2 31 20 A4 20 35 30 |)...... I.1 . 50|
00000A80: 3A 8F 20 4C 41 53 54 20 32 20 4E 4F 54 20 55 53 |:. LAST 2 NOT US|
00000A90: 45 44 00 9F 12 B9 01 58 B2 BB 28 AB 54 49 29 00 |ED.....X..(.TI).|
00000AA0: B0 12 BE 01 52 25 B2 35 32 AC BB 28 31 29 AA 31 |....R%.52..(1).1|
00000AB0: 00 C7 12 C3 01 8B 20 43 4B 28 52 25 29 20 B3 B1 |...... CK(R%) ..|
00000AC0: 20 30 20 89 34 34 36 00 DF 12 C8 01 43 25 28 49 | 0 .446.....C%(I|
00000AD0: 29 B2 52 25 20 3A 20 43 4B 28 52 25 29 B2 31 00 |).R% : CK(R%).1.|
00000AE0: E5 12 CD 01 82 00 26 13 D2 01 8F 20 43 25 28 31 |......&.... C%(1|
00000AF0: 29 20 54 48 52 55 20 43 25 28 35 30 29 20 41 52 |) THRU C%(50) AR|
00000B00: 45 20 4E 55 4D 42 45 52 53 20 20 20 20 20 20 20 |E NUMBERS |
00000B10: 31 20 54 48 52 55 20 35 32 20 49 4E 20 52 4E 44 |1 THRU 52 IN RND|
00000B20: 20 4F 52 44 45 52 00 35 13 D7 01 49 B2 30 3A 99 | ORDER.5...I.0:.|
00000B30: 22 93 22 3A 8E 00 52 13 DC 01 22 20 20 41 44 44 |".":..R..." ADD|
00000B40: 49 54 49 4F 4E 41 4C 20 43 41 52 44 53 20 48 45 |ITIONAL CARDS HE|
00000B50: 52 45 00 6F 13 E1 01 22 20 20 B8 B8 B8 B8 B8 B8 |RE.o..." ......|
00000B60: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 |................|
00000B70: 79 13 E6 01 49 B2 49 AA 31 00 8A 13 EB 01 4E 55 |y...I.I.1.....NU|
00000B80: 4D 42 45 52 B2 43 25 28 49 29 00 B8 13 F0 01 8B |MBER.C%(I)......|
00000B90: 20 4E 55 4D 42 45 52 20 B1 33 39 20 A7 20 53 55 | NUMBER .39 . SU|
00000BA0: 49 54 B2 34 3A 4E 55 B2 4E 55 AB 33 39 20 20 20 |IT.4:NU.NU.39 |
00000BB0: 20 20 20 3A 89 35 32 36 00 E6 13 F5 01 8B 20 4E | :.526...... N|
00000BC0: 55 4D 42 45 52 20 B1 32 36 20 A7 20 53 55 49 54 |UMBER .26 . SUIT|
00000BD0: B2 33 3A 4E 55 B2 4E 55 AB 32 36 20 20 20 20 20 |.3:NU.NU.26 |
00000BE0: 20 3A 89 35 32 36 00 14 14 FA 01 8B 20 4E 55 4D | :.526...... NUM|
00000BF0: 42 45 52 20 B1 31 33 20 A7 20 53 55 49 54 B2 32 |BER .13 . SUIT.2|
00000C00: 3A 4E 55 B2 4E 55 AB 31 33 20 20 20 20 20 20 3A |:NU.NU.13 :|
00000C10: 89 35 32 36 00 2C 14 FF 01 53 55 49 54 B2 31 3A |.526.,...SUIT.1:|
00000C20: 89 35 32 36 3A 8F 20 4E 55 3D 4E 55 00 50 14 04 |.526:. NU=NU.P..|
00000C30: 02 22 20 20 54 55 52 4E 20 4E 55 4D 42 45 52 20 |." TURN NUMBER |
00000C40: 49 4E 54 4F 20 43 41 52 44 20 26 20 53 55 49 54 |INTO CARD & SUIT|
00000C50: 00 74 14 09 02 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 |.t..." ........|
00000C60: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000C70: B8 B8 B8 B8 00 87 14 0E 02 4E 24 B2 CA 28 51 51 |.........N$..(QQ|
00000C80: 24 2C 4E 55 2C 31 29 00 9C 14 13 02 53 24 B2 CA |$,NU,1).....S$..|
00000C90: 28 56 56 24 2C 53 55 2C 31 29 3A 8E 00 AF 14 18 |(VV$,SU,1):.....|
00000CA0: 02 22 20 20 44 45 4C 41 59 20 54 49 4D 45 52 00 |." DELAY TIMER.|
00000CB0: C2 14 1D 02 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 |...." .........|
00000CC0: B8 B8 00 D4 14 22 02 81 51 B2 31 A4 32 30 30 20 |....."..Q.1.200 |
00000CD0: 3A 82 3A 8E 00 F6 14 27 02 22 20 20 50 55 54 20 |:.:....'." PUT |
00000CE0: 54 48 45 20 43 41 52 44 20 4F 4E 20 54 48 45 20 |THE CARD ON THE |
00000CF0: 53 43 52 45 45 4E 00 18 15 2C 02 22 20 20 B8 B8 |SCREEN...,." ..|
00000D00: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000D10: B8 B8 B8 B8 B8 B8 B8 B8 00 60 15 31 02 99 A3 54 |.........`.1...T|
00000D20: 29 22 81 D5 C0 C0 C0 C9 9D 9D 9D 9D 9D 11 DD DC |)"..............|
00000D30: 20 20 DD 9D 9D 9D 9D 9D 11 DD DC DC 20 DD 9D 9D | .......... ...|
00000D40: 9D 9D 9D 11 DD 20 DC DC DD 9D 9D 9D 9D 9D 11 DD |..... ..........|
00000D50: 20 20 DC DD 9D 9D 9D 9D 9D 11 CA C0 C0 C0 CB 22 | ............."|
00000D60: 00 66 15 36 02 8E 00 86 15 3B 02 22 20 20 B8 B8 |.f.6.....;." ..|
00000D70: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000D80: B8 B8 B8 B8 B8 B8 00 C2 15 40 02 8B 4E 24 B2 22 |.........@..N$."|
00000D90: 30 22 A7 4E 24 B2 22 31 30 22 3A 99 A3 54 29 22 |0".N$."10":..T)"|
00000DA0: 90 91 91 91 91 91 1D 12 22 4E 24 AA 53 24 3B 3A |........"N$.S$;:|
00000DB0: 99 22 90 9D 9D 9D 11 11 11 12 22 53 24 AA 4E 24 |."........"S$.N$|
00000DC0: 3A 8E 00 FA 15 45 02 99 A3 54 29 22 90 91 91 91 |:....E...T)"....|
00000DD0: 91 91 1D 12 22 4E 24 3B 22 12 20 22 3B 53 24 3B |...."N$;". ";S$;|
00000DE0: 3A 99 22 90 9D 9D 9D 11 11 11 12 22 3B 3A 99 53 |:."........";:.S|
00000DF0: 24 3B 3A 99 22 12 20 22 4E 24 00 00 16 4A 02 8E |$;:.". "N$...J..|
00000E00: 00 1B 16 4F 02 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 |...O." ........|
00000E10: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 48 16 54 02 |............H.T.|
00000E20: 99 42 24 22 91 91 22 44 24 3A 99 42 24 AA 44 24 |.B$".."D$:.B$.D$|
00000E30: 3A 99 42 24 22 11 11 22 44 24 3A 99 42 24 22 11 |:.B$".."D$:.B$".|
00000E40: 11 11 11 22 44 24 3A 99 00 6D 16 59 02 54 B2 54 |..."D$:..m.Y.T.T|
00000E50: AA 36 3A 8B 20 54 B1 32 38 20 A7 20 54 B2 54 AB |.6:. T.28 . T.T.|
00000E60: 31 3A 8B 20 54 B1 33 35 20 A7 36 39 31 00 86 16 |1:. T.35 .691...|
00000E70: 5E 02 8D 34 38 36 3A 8F 20 47 45 54 20 4E 45 58 |^..486:. GET NEX|
00000E80: 54 20 43 41 52 44 00 98 16 63 02 8B 20 54 B2 31 |T CARD...c.. T.1|
00000E90: 32 20 A7 20 45 B2 4E 55 00 AA 16 68 02 8B 20 54 |2 . E.NU...h.. T|
00000EA0: B2 31 38 20 A7 20 46 B2 4E 55 00 BC 16 6D 02 8B |.18 . F.NU...m..|
00000EB0: 20 54 B2 32 34 20 A7 20 47 B2 4E 55 00 CE 16 72 | T.24 . G.NU...r|
00000EC0: 02 8B 20 54 B2 32 39 20 A7 20 48 B2 4E 55 00 E0 |.. T.29 . H.NU..|
00000ED0: 16 77 02 8B 20 54 B2 33 34 20 A7 20 4A B2 4E 55 |.w.. T.34 . J.NU|
00000EE0: 00 F4 16 7C 02 8D 35 36 31 3A 8D 35 37 36 3A 8D |...|..561:.576:.|
00000EF0: 31 33 33 31 00 09 17 81 02 54 54 B2 41 AA 43 AA |1331.....TT.A.C.|
00000F00: 45 AA 46 AA 47 AA 48 AA 4A 00 3B 17 86 02 8B 20 |E.F.G.H.J.;.... |
00000F10: 54 54 B1 32 31 20 A7 20 99 22 91 91 91 91 91 91 |TT.21 . ."......|
00000F20: 91 59 4F 55 20 48 41 56 45 22 54 54 22 59 4F 55 |.YOU HAVE"TT"YOU|
00000F30: 20 4C 4F 53 45 22 3A 89 36 36 31 00 4B 17 8B 02 | LOSE":.661.K...|
00000F40: 8B 20 44 4F B2 31 20 A7 36 39 31 00 66 17 90 02 |. DO.1 .691.f...|
00000F50: 89 33 35 36 3A 8F 20 42 41 43 4B 20 46 4F 52 20 |.356:. BACK FOR |
00000F60: 43 48 4F 49 43 45 00 7A 17 95 02 8B 20 51 41 B3 |CHOICE.z.... QA.|
00000F70: B1 31 20 A7 20 8D 31 30 38 36 00 8A 17 9A 02 8B |.1 . .1086......|
00000F80: 20 51 41 B2 31 20 A7 38 37 31 00 A2 17 9F 02 8B | QA.1 .871......|
00000F90: 20 51 41 B2 32 20 AF 20 54 41 B3 32 32 20 A7 39 | QA.2 . TA.22 .9|
00000FA0: 32 31 00 B6 17 A4 02 8D 31 33 38 31 3A 8D 35 34 |21......1381:.54|
00000FB0: 36 3A 89 31 32 31 00 D9 17 A9 02 22 20 20 27 48 |6:.121....." 'H|
00000FC0: 4F 4C 44 27 20 43 48 45 43 4B 20 50 4C 41 59 45 |OLD' CHECK PLAYE|
00000FD0: 52 53 20 50 4F 49 4E 54 53 00 FC 17 AE 02 22 20 |RS POINTS....." |
00000FE0: 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 | ...............|
00000FF0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 37 18 B3 |.............7..|
00001000: 02 99 42 24 22 91 91 22 44 24 3A 99 42 24 AA 44 |..B$".."D$:.B$.D|
00001010: 24 3A 99 42 24 22 11 11 22 44 24 3A 99 42 24 22 |$:.B$".."D$:.B$"|
00001020: 11 11 11 11 22 44 24 3A 8F 20 43 4C 45 41 52 20 |...."D$:. CLEAR |
00001030: 43 48 4F 49 43 45 53 00 55 18 B8 02 8D 31 33 33 |CHOICES.U....133|
00001040: 31 3A 8F 46 41 43 45 20 43 41 52 44 53 20 54 4F |1:.FACE CARDS TO|
00001050: 20 31 30 27 53 00 6A 18 BD 02 54 54 B2 41 AA 43 | 10'S.j...TT.A.C|
00001060: AA 45 AA 46 AA 47 AA 48 AA 4A 00 A4 18 C2 02 41 |.E.F.G.H.J.....A|
00001070: B2 41 AB 28 41 B2 31 29 AC 31 30 3A 8D 37 35 36 |.A.(A.1).10:.756|
00001080: 3A 43 B2 43 AB 28 43 B2 31 29 AC 31 30 3A 8D 37 |:C.C.(C.1).10:.7|
00001090: 35 36 3A 45 B2 45 AB 28 45 B2 31 29 AC 31 30 3A |56:E.E.(E.1).10:|
000010A0: 8D 37 35 36 00 DE 18 C7 02 46 B2 46 AB 28 46 B2 |.756.....F.F.(F.|
000010B0: 31 29 AC 31 30 3A 8D 37 35 36 3A 47 B2 47 AB 28 |1).10:.756:G.G.(|
000010C0: 47 B2 31 29 AC 31 30 3A 8D 37 35 36 3A 48 B2 48 |G.1).10:.756:H.H|
000010D0: AB 28 48 B2 31 29 AC 31 30 3A 8D 37 35 36 00 F4 |.(H.1).10:.756..|
000010E0: 18 CC 02 4A B2 4A AB 28 4A B2 31 29 AC 31 30 3A |...J.J.(J.1).10:|
000010F0: 8D 37 35 36 00 07 19 D1 02 99 22 91 59 4F 55 20 |.756......".YOU |
00001100: 48 41 56 45 22 54 54 00 17 19 D6 02 8B 20 51 41 |HAVE"TT...... QA|
00001110: B2 31 20 A7 38 37 31 00 27 19 DB 02 8B 20 51 41 |.1 .871.'.... QA|
00001120: B2 32 20 A7 39 32 31 00 31 19 E0 02 8D 31 33 38 |.2 .921.1....138|
00001130: 31 00 3B 19 E5 02 89 31 31 34 36 00 55 19 EA 02 |1.;....1146.U...|
00001140: 22 20 20 53 55 42 20 53 55 42 20 20 46 4F 52 20 |" SUB SUB FOR |
00001150: 31 31 30 30 30 00 6F 19 EF 02 22 20 20 B7 B7 B7 |11000.o..." ...|
00001160: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 00 |................|
00001170: 83 19 F4 02 52 B2 41 AA 43 AA 45 AA 46 AA 47 AA |....R.A.C.E.F.G.|
00001180: 48 AA 4A 00 95 19 F9 02 8B 20 52 B3 32 32 20 A7 |H.J...... R.22 .|
00001190: 20 53 4D B2 52 00 AB 19 FE 02 8B 20 53 4D 20 B1 | SM.R...... SM .|
000011A0: 20 54 54 20 A7 20 54 54 B2 53 4D 00 B1 19 03 03 | TT . TT.SM.....|
000011B0: 8E 00 C2 19 08 03 22 20 20 49 4E 53 55 52 41 4E |......" INSURAN|
000011C0: 43 45 00 D3 19 0D 03 22 20 20 B8 B8 B8 B8 B8 B8 |CE....." ......|
000011D0: B8 B8 B8 00 E7 19 12 03 8B 20 41 B2 31 20 AF 20 |......... A.1 . |
000011E0: 43 B1 39 20 A7 20 8E 00 24 1A 17 03 8B 20 43 B2 |C.9 . ..$.... C.|
000011F0: 31 20 AF 20 41 B1 39 20 A7 20 8E 3A 8F 20 20 20 |1 . A.9 . .:. |
00001200: 20 20 20 20 20 49 46 20 50 4C 41 59 45 52 20 42 | IF PLAYER B|
00001210: 4A 20 4E 4F 20 49 4E 53 55 52 41 4E 43 45 20 4F |J NO INSURANCE O|
00001220: 46 46 45 52 00 42 1A 1C 03 99 42 24 22 07 49 4E |FFER.B....B$".IN|
00001230: 53 55 52 41 4E 43 45 20 3F 20 28 59 2F 4E 29 20 |SURANCE ? (Y/N) |
00001240: 22 3B 00 62 1A 21 03 55 53 24 B2 22 59 4E 22 3A |";.b.!.US$."YN":|
00001250: 55 4C B2 31 3A 8D 36 30 30 30 30 3A 57 24 B2 55 |UL.1:.60000:W$.U|
00001260: 52 24 00 93 1A 26 03 8B 20 57 24 B2 22 4E 22 A7 |R$...&.. W$."N".|
00001270: 20 99 20 42 24 44 24 3A 8E 3A 20 20 20 20 20 20 | . B$D$:.: |
00001280: 8F 20 49 4E 53 55 52 41 4E 43 45 20 52 45 46 55 |. INSURANCE REFU|
00001290: 53 45 44 00 CF 1A 2B 03 8B 53 48 B3 42 45 AD 32 |SED...+..SH.BE.2|
000012A0: A7 99 42 24 44 24 22 91 20 53 4F 52 52 59 2C 20 |..B$D$". SORRY, |
000012B0: 4E 4F 20 43 52 45 44 49 54 2E 22 3A 81 57 B2 31 |NO CREDIT.":.W.1|
000012C0: A4 32 30 30 30 3A 82 3A 99 42 24 44 24 3A 8E 00 |.2000:.:.B$D$:..|
000012D0: 0D 1B 30 03 8B 44 B1 39 A7 99 42 24 44 24 3A 4D |..0..D.9..B$D$:M|
000012E0: 4F B2 4D 4F AA 42 45 3A 8E 3A 8F 20 44 45 41 4C |O.MO.BE:.:. DEAL|
000012F0: 45 52 20 42 4A 20 47 49 56 45 20 24 20 4E 4F 57 |ER BJ GIVE $ NOW|
00001300: 20 4C 4F 53 45 20 24 20 4C 41 54 45 52 00 42 1B | LOSE $ LATER.B.|
00001310: 35 03 4D 4F B2 4D 4F AB 42 45 AD 32 3A 99 42 24 |5.MO.MO.BE.2:.B$|
00001320: 44 24 22 91 20 4E 4F 20 42 4C 41 43 4B 4A 41 43 |D$". NO BLACKJAC|
00001330: 4B 2C 20 59 4F 55 20 4C 4F 53 45 20 24 22 42 45 |K, YOU LOSE $"BE|
00001340: AD 32 00 55 1B 3A 03 99 41 24 22 11 11 11 11 11 |.2.U.:..A$".....|
00001350: 11 11 22 44 24 00 8A 1B 3F 03 99 41 24 22 11 11 |.."D$...?..A$"..|
00001360: 11 11 11 11 11 59 4F 55 20 48 4F 4C 44 20 24 22 |.....YOU HOLD $"|
00001370: 53 48 AB 42 45 AD 32 22 2C 20 59 4F 55 52 20 42 |SH.BE.2", YOUR B|
00001380: 45 54 20 49 53 20 24 22 42 45 00 A2 1B 44 03 81 |ET IS $"BE...D..|
00001390: 57 B2 31 A4 32 30 30 30 3A 82 3A 99 42 24 44 24 |W.1.2000:.:.B$D$|
000013A0: 3A 8E 00 BC 1B 49 03 22 20 20 50 4C 41 59 45 52 |:....I." PLAYER|
000013B0: 20 53 50 4C 49 54 53 20 50 41 49 52 00 D6 1B 4E | SPLITS PAIR...N|
000013C0: 03 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |." ............|
000013D0: B8 B8 B8 B8 B8 B8 00 F4 1B 53 03 99 41 24 3B 3A |.........S..A$;:|
000013E0: 81 51 B2 31 A4 36 3A 99 A3 36 29 22 20 20 20 20 |.Q.1.6:..6)" |
000013F0: 20 22 3A 82 00 0E 1C 58 03 99 41 24 22 91 22 3A | ":....X..A$".":|
00001400: 8D 34 38 36 3A 8D 35 36 31 3A 8D 35 37 36 00 35 |.486:.561:.576.5|
00001410: 1C 5D 03 54 B2 36 3A 43 B2 4E 55 3A 51 41 B2 31 |.].T.6:C.NU:QA.1|
00001420: 3A 99 42 24 22 11 11 22 44 24 AA 42 24 22 11 11 |:.B$".."D$.B$"..|
00001430: 11 11 22 44 24 00 50 1C 62 03 89 33 33 36 3A 8F |.."D$.P.b..336:.|
00001440: 20 47 4F 20 46 4F 52 20 44 45 43 49 53 49 4F 4E | GO FOR DECISION|
00001450: 00 67 1C 67 03 99 A3 32 30 29 22 91 20 46 49 52 |.g.g...20)". FIR|
00001460: 53 54 20 48 41 4E 44 00 99 1C 6C 03 99 42 24 22 |ST HAND...l..B$"|
00001470: 11 11 20 20 2D 2D 2D 20 50 52 45 53 53 20 41 4E |.. --- PRESS AN|
00001480: 59 20 4B 45 59 20 46 4F 52 20 53 45 43 4F 4E 44 |Y KEY FOR SECOND|
00001490: 20 48 41 4E 44 20 2D 2D 2D 00 C6 1C 71 03 54 41 | HAND ---...q.TA|
000014A0: B2 54 54 3A 54 54 B2 30 3A 51 41 B2 32 3A 45 B2 |.TT:TT.0:QA.2:E.|
000014B0: 30 3A 46 B2 30 3A 47 B2 30 3A 48 B2 30 3A 4A B2 |0:F.0:G.0:H.0:J.|
000014C0: 30 3A 53 4D B2 30 00 D9 1C 76 03 A1 57 24 3A 8B |0:SM.0...v..W$:.|
000014D0: 57 24 B2 22 22 A7 38 38 36 00 F8 1C 7B 03 99 42 |W$."".886...{..B|
000014E0: 24 3A 8F 20 43 4C 45 41 52 20 46 49 52 53 54 20 |$:. CLEAR FIRST |
000014F0: 48 41 4E 44 20 41 57 59 00 0D 1D 80 03 81 20 51 |HAND AWY...... Q|
00001500: B2 31 20 A4 20 31 31 3A 99 44 24 3A 82 00 2B 1D |.1 . 11:.D$:..+.|
00001510: 85 03 8F 20 46 49 52 53 54 20 43 41 52 44 2C 32 |... FIRST CARD,2|
00001520: 20 45 44 20 4F 46 20 50 41 49 52 00 54 1D 8A 03 | ED OF PAIR.T...|
00001530: 54 B2 30 3A 99 41 24 22 91 22 3A 4E 55 B2 51 51 |T.0:.A$".":NU.QQ|
00001540: 3A 8D 34 39 36 3A 8D 35 36 31 3A 8D 35 37 36 3A |:.496:.561:.576:|
00001550: 41 B2 4E 55 00 85 1D 8F 03 54 B2 36 3A 99 41 24 |A.NU.....T.6:.A$|
00001560: 22 91 22 3A 8D 34 38 36 3A 8D 35 36 31 3A 8D 35 |".":.486:.561:.5|
00001570: 37 36 3A 43 B2 4E 55 3A 8F 20 53 45 43 4F 4E 44 |76:C.NU:. SECOND|
00001580: 20 43 41 52 44 00 A0 1D 94 03 89 33 33 36 3A 8F | CARD......336:.|
00001590: 20 47 4F 20 46 4F 52 20 44 45 43 49 53 49 4F 4E | GO FOR DECISION|
000015A0: 00 B8 1D 99 03 99 A3 32 30 29 22 91 20 53 45 43 |.......20)". SEC|
000015B0: 4F 4E 44 20 48 41 4E 44 00 C2 1D 9E 03 8D 31 33 |OND HAND......13|
000015C0: 38 31 00 D9 1D A3 03 8B 20 53 42 B2 32 20 AF 20 |81...... SB.2 . |
000015D0: 46 42 B2 31 20 A7 31 33 36 00 F1 1D A8 03 8B 20 |FB.1 .136...... |
000015E0: 53 42 B2 32 20 AF 20 54 41 B1 32 31 20 A7 39 36 |SB.2 . TA.21 .96|
000015F0: 31 00 09 1E AD 03 8B 20 53 42 B2 31 20 AF 20 54 |1...... SB.1 . T|
00001600: 54 B1 32 31 20 A7 31 33 36 00 22 1E B2 03 8B 20 |T.21 .136.".... |
00001610: 54 41 B1 32 31 20 AF 20 54 54 B1 32 31 20 A7 31 |TA.21 . TT.21 .1|
00001620: 32 31 00 2C 1E B7 03 89 31 31 34 36 00 3C 1E BC |21.,....1146.<..|
00001630: 03 8B 20 53 42 B2 31 20 A7 31 33 36 00 4D 1E C1 |.. SB.1 .136.M..|
00001640: 03 8B 20 54 41 B1 32 31 20 A7 39 38 31 00 84 1E |.. TA.21 .981...|
00001650: C6 03 8B 20 44 54 B2 54 41 20 A7 20 99 42 24 22 |... DT.TA . .B$"|
00001660: 11 11 11 59 4F 55 20 48 41 56 45 22 54 41 22 50 |...YOU HAVE"TA"P|
00001670: 55 53 48 20 46 49 52 53 54 20 48 41 4E 44 22 3A |USH FIRST HAND":|
00001680: 89 31 33 36 00 9D 1E CB 03 8B 20 44 54 B1 54 41 |.136...... DT.TA|
00001690: 20 AF 20 44 54 B3 32 32 20 A7 39 38 31 00 D3 1E | . DT.22 .981...|
000016A0: D0 03 99 42 24 22 11 11 11 59 4F 55 20 48 41 56 |...B$"...YOU HAV|
000016B0: 45 22 54 41 22 59 4F 55 20 57 49 4E 20 46 49 52 |E"TA"YOU WIN FIR|
000016C0: 53 54 20 48 41 4E 44 22 3A 8D 31 30 32 36 3A 89 |ST HAND":.1026:.|
000016D0: 31 33 36 00 0A 1F D5 03 99 42 24 22 11 11 11 59 |136......B$"...Y|
000016E0: 4F 55 20 48 41 56 45 22 54 41 22 59 4F 55 20 4C |OU HAVE"TA"YOU L|
000016F0: 4F 53 45 20 46 49 52 53 54 20 48 41 4E 44 22 3A |OSE FIRST HAND":|
00001700: 8D 31 30 38 36 3A 89 31 33 36 00 17 1F DA 03 22 |.1086:.136....."|
00001710: 20 20 4D 4F 4E 45 59 00 52 1F DF 03 8B 4D 4F B3 | MONEY.R....MO.|
00001720: B2 30 A7 99 22 93 22 43 24 22 11 11 11 11 20 20 |.0.."."C$".... |
00001730: 20 20 20 20 20 20 20 20 53 4F 52 52 59 2C 20 59 | SORRY, Y|
00001740: 4F 55 27 52 45 20 42 52 4F 4B 45 22 3A 89 31 36 |OU'RE BROKE":.16|
00001750: 36 31 00 58 1F E4 03 8F 00 65 1F E7 03 99 22 93 |61.X.....e....".|
00001760: 22 3B 42 45 24 00 9A 1F E9 03 8B 42 45 B1 32 30 |";BE$......BE.20|
00001770: 30 A7 99 22 93 22 43 24 22 53 4F 52 52 59 07 2C |0.."."C$"SORRY.,|
00001780: 20 24 32 30 30 20 42 45 54 54 49 4E 47 20 4C 49 | $200 BETTING LI|
00001790: 4D 49 54 2E 22 3A 89 31 35 31 00 D3 1F EE 03 8B |MIT.":.151......|
000017A0: 20 42 45 B1 4D 4F 20 A7 20 99 22 93 22 43 24 22 | BE.MO . ."."C$"|
000017B0: 20 20 20 20 20 20 20 20 20 20 20 53 4F 52 52 59 | SORRY|
000017C0: 07 2C 20 4E 4F 20 43 52 45 44 49 54 2E 22 3A 89 |., NO CREDIT.":.|
000017D0: 31 35 31 00 E5 1F F3 03 53 48 B2 4D 4F AB 42 45 |151.....SH.MO.BE|
000017E0: 3A 89 31 37 31 00 F0 1F F8 03 22 20 20 57 49 4E |:.171....." WIN|
000017F0: 00 FB 1F FD 03 22 20 20 B7 B7 B7 00 08 20 02 04 |....." ..... ..|
00001800: 4D 4F B2 4D 4F AA 42 45 00 0E 20 07 04 8E 00 24 |MO.MO.BE.. ....$|
00001810: 20 0C 04 22 20 20 42 52 45 41 4B 20 54 48 45 20 | .." BREAK THE |
00001820: 42 41 4E 4B 00 3A 20 11 04 22 20 20 B7 B7 B7 B7 |BANK.: .." ....|
00001830: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 00 4E 20 16 04 81 |...........N ...|
00001840: 51 B2 31 A4 31 30 30 30 3A A1 41 24 3A 82 00 8C |Q.1.1000:.A$:...|
00001850: 20 1B 04 99 22 93 22 42 24 22 11 11 11 11 11 11 | ..."."B$"......|
00001860: 11 11 43 4F 4E 47 52 41 54 55 4C 41 54 49 4F 4E |..CONGRATULATION|
00001870: 53 07 20 59 4F 55 20 48 41 56 45 20 42 52 4F 4B |S. YOU HAVE BROK|
00001880: 45 20 54 48 45 07 20 42 41 4E 4B 2E 00 92 20 20 |E THE. BANK... |
00001890: 04 8F 00 9C 20 25 04 89 31 36 36 31 00 DA 20 2A |.... %..1661.. *|
000018A0: 04 8B 20 4D 4F B3 42 45 AC 32 20 A7 99 42 24 22 |.. MO.BE.2 ..B$"|
000018B0: 11 11 11 11 53 4F 52 52 59 20 4E 4F 54 20 45 4E |....SORRY NOT EN|
000018C0: 4F 55 47 48 20 4D 4F 4E 45 59 2C 20 4E 4F 20 53 |OUGH MONEY, NO S|
000018D0: 50 4C 49 54 22 3A 89 33 36 36 00 E3 20 2F 04 89 |PLIT":.366.. /..|
000018E0: 38 35 31 00 EF 20 34 04 22 20 20 4C 4F 53 45 00 |851.. 4." LOSE.|
000018F0: FB 20 39 04 22 20 20 B7 B7 B7 B7 00 08 21 3E 04 |. 9." ......!>.|
00001900: 4D 4F B2 4D 4F AB 42 45 00 0E 21 43 04 8E 00 21 |MO.MO.BE..!C...!|
00001910: 21 48 04 22 20 20 44 4F 55 42 4C 45 20 54 45 53 |!H." DOUBLE TES|
00001920: 54 00 34 21 4D 04 22 20 20 B7 B7 B7 B7 B7 B7 B7 |T.4!M." .......|
00001930: B7 B7 B7 B7 00 77 21 52 04 8B 20 4D 4F B3 42 45 |.....w!R.. MO.BE|
00001940: AC 32 20 A7 20 99 42 24 22 11 11 20 20 53 4F 52 |.2 . .B$".. SOR|
00001950: 52 59 07 2C 20 4E 4F 54 20 45 4E 4F 55 47 48 20 |RY., NOT ENOUGH |
00001960: 4D 4F 4E 45 59 2C 20 4E 4F 20 44 4F 55 42 4C 45 |MONEY, NO DOUBLE|
00001970: 2E 22 3A 89 33 36 36 00 8D 21 57 04 44 4F B2 31 |.":.366..!W.DO.1|
00001980: 3A 42 45 B2 42 45 AC 32 3A 89 35 39 36 00 9E 21 |:BE.BE.2:.596..!|
00001990: 5C 04 22 20 20 42 4C 41 43 4B 4A 41 43 4B 00 AF |\." BLACKJACK..|
000019A0: 21 61 04 22 20 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 00 |!a." ..........|
000019B0: C0 21 66 04 4D 4F B2 4D 4F AA 42 45 AC 31 2E 35 |.!f.MO.MO.BE.1.5|
000019C0: 00 C6 21 6B 04 8E 00 DF 21 70 04 22 20 20 50 4C |..!k....!p." PL|
000019D0: 41 59 20 44 45 41 4C 45 52 53 20 48 41 4E 44 00 |AY DEALERS HAND.|
000019E0: F8 21 75 04 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 |.!u." .........|
000019F0: B8 B8 B8 B8 B8 B8 B8 B8 00 02 22 7A 04 8D 31 33 |.........."z..13|
00001A00: 39 36 00 17 22 7F 04 44 54 B2 42 AA 44 AA 4B AA |96.."..DT.B.D.K.|
00001A10: 4C AA 4D AA 4E AA 50 00 40 22 84 04 8B 20 44 54 |L.M.N.P.@"... DT|
00001A20: B1 32 31 20 A7 20 99 20 43 24 20 22 11 44 45 41 |.21 . . C$ ".DEA|
00001A30: 4C 45 52 20 48 41 53 22 44 54 3A 89 31 32 39 36 |LER HAS"DT:.1296|
00001A40: 00 69 22 89 04 8B 20 44 54 B1 31 36 20 A7 20 99 |.i"... DT.16 . .|
00001A50: 20 43 24 20 22 11 44 45 41 4C 45 52 20 48 41 53 | C$ ".DEALER HAS|
00001A60: 22 44 54 3A 89 31 32 37 36 00 A6 22 8E 04 42 B2 |"DT:.1276.."..B.|
00001A70: 42 AB 28 42 B2 31 29 AC 31 30 3A 8D 31 32 34 36 |B.(B.1).10:.1246|
00001A80: 3A 44 B2 44 AB 28 44 B2 31 29 AC 31 30 3A 8D 31 |:D.D.(D.1).10:.1|
00001A90: 32 34 36 3A 4B B2 4B AB 28 4B B2 31 29 AC 31 30 |246:K.K.(K.1).10|
00001AA0: 3A 8D 31 32 34 36 00 E3 22 93 04 4C B2 4C AB 28 |:.1246.."..L.L.(|
00001AB0: 4C B2 31 29 AC 31 30 3A 8D 31 32 34 36 3A 4D B2 |L.1).10:.1246:M.|
00001AC0: 4D AB 28 4D B2 31 29 AC 31 30 3A 8D 31 32 34 36 |M.(M.1).10:.1246|
00001AD0: 3A 4E B2 4E AB 28 4E B2 31 29 AC 31 30 3A 8D 31 |:N.N.(N.1).10:.1|
00001AE0: 32 34 36 00 FA 22 98 04 50 B2 50 AB 28 50 B2 31 |246.."..P.P.(P.1|
00001AF0: 29 AC 31 30 3A 8D 31 32 34 36 00 23 23 9D 04 8B |).10:.1246.##...|
00001B00: 20 44 54 B1 31 36 20 A7 20 99 20 43 24 20 22 11 | DT.16 . . C$ ".|
00001B10: 44 45 41 4C 45 52 20 48 41 53 22 44 54 3A 89 31 |DEALER HAS"DT:.1|
00001B20: 32 37 36 00 5F 23 A2 04 42 B2 42 AA 28 42 B2 31 |276._#..B.B.(B.1|
00001B30: 31 29 AC 31 30 3A 44 B2 44 AA 28 44 B2 31 31 29 |1).10:D.D.(D.11)|
00001B40: AC 31 30 3A 4B B2 4B AA 28 4B B2 31 31 29 AC 31 |.10:K.K.(K.11).1|
00001B50: 30 3A 4C B2 4C AA 28 4C B2 31 31 29 AC 31 30 00 |0:L.L.(L.11).10.|
00001B60: 8D 23 A7 04 4D B2 4D AA 28 4D B2 31 31 29 AC 31 |.#..M.M.(M.11).1|
00001B70: 30 3A 4E B2 4E AA 28 4E B2 31 31 29 AC 31 30 3A |0:N.N.(N.11).10:|
00001B80: 50 B2 50 AA 28 50 B2 31 31 29 AC 31 30 00 B3 23 |P.P.(P.11).10..#|
00001B90: AC 04 54 B2 54 AA 36 3A 8B 20 54 B1 32 38 20 A7 |..T.T.6:. T.28 .|
00001BA0: 20 54 B2 54 AB 31 3A 20 8B 54 B1 33 35 20 A7 31 | T.T.1: .T.35 .1|
00001BB0: 32 37 36 00 BC 23 B1 04 8D 34 38 36 00 CE 23 B6 |276..#...486..#.|
00001BC0: 04 8B 20 54 B2 31 32 20 A7 20 4B B2 4E 55 00 E0 |.. T.12 . K.NU..|
00001BD0: 23 BB 04 8B 20 54 B2 31 38 20 A7 20 4C B2 4E 55 |#... T.18 . L.NU|
00001BE0: 00 F2 23 C0 04 8B 20 54 B2 32 34 20 A7 20 4D B2 |..#... T.24 . M.|
00001BF0: 4E 55 00 04 24 C5 04 8B 20 54 B2 32 39 20 A7 20 |NU..$... T.29 . |
00001C00: 4E B2 4E 55 00 16 24 CA 04 8B 20 54 B2 33 34 20 |N.NU..$... T.34 |
00001C10: A7 20 50 B2 4E 55 00 39 24 CF 04 99 22 13 22 3A |. P.NU.9$...".":|
00001C20: 8D 35 36 31 3A 8D 35 37 36 3A 8D 35 34 36 3A 8D |.561:.576:.546:.|
00001C30: 35 34 36 3A 89 31 31 34 36 00 52 24 D4 04 22 20 |546:.1146.R$.." |
00001C40: 20 53 55 42 20 53 55 42 20 46 4F 52 20 31 35 30 | SUB SUB FOR 150|
00001C50: 30 30 00 6B 24 D9 04 22 20 20 B7 B7 B7 B7 B7 B7 |00.k$.." ......|
00001C60: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 00 7F 24 DE 04 |.............$..|
00001C70: 55 B2 42 AA 44 AA 4B AA 4C AA 4D AA 4E AA 50 00 |U.B.D.K.L.M.N.P.|
00001C80: 91 24 E3 04 8B 20 55 B3 32 32 20 A7 20 53 52 B2 |.$... U.22 . SR.|
00001C90: 55 00 A5 24 E8 04 8B 20 53 52 B1 44 54 20 A7 20 |U..$... SR.DT . |
00001CA0: 44 54 B2 53 52 00 AB 24 ED 04 8E 00 C1 24 F2 04 |DT.SR..$.....$..|
00001CB0: 22 20 20 43 4F 4D 50 41 52 45 20 53 43 4F 52 45 |" COMPARE SCORE|
00001CC0: 53 00 D7 24 F7 04 22 20 20 B8 B8 B8 B8 B8 B8 B8 |S..$.." .......|
00001CD0: B8 B8 B8 B8 B8 B8 B8 00 E8 24 FC 04 8B 20 54 54 |.........$... TT|
00001CE0: B1 32 31 20 A7 39 35 36 00 F9 24 01 05 8B 20 53 |.21 .956..$... S|
00001CF0: 42 B2 32 20 A7 31 33 31 31 00 1C 25 06 05 8B 20 |B.2 .1311..%... |
00001D00: 44 54 B2 54 54 20 A7 20 99 41 24 A3 31 32 29 22 |DT.TT . .A$.12)"|
00001D10: 91 91 50 55 53 48 22 3A 89 31 32 31 00 49 25 0B |..PUSH":.121.I%.|
00001D20: 05 8B 20 44 54 B1 54 54 20 A7 20 99 41 24 A3 31 |.. DT.TT . .A$.1|
00001D30: 32 29 22 91 91 59 4F 55 20 4C 4F 53 45 22 3A 8D |2)"..YOU LOSE":.|
00001D40: 31 30 38 36 3A 89 31 32 31 00 5A 25 10 05 8B 20 |1086:.121.Z%... |
00001D50: 54 54 B1 32 31 20 A7 39 35 36 00 6A 25 15 05 8B |TT.21 .956.j%...|
00001D60: 20 53 42 B2 32 20 A7 39 37 36 00 74 25 1A 05 89 | SB.2 .976.t%...|
00001D70: 31 33 31 36 00 85 25 1F 05 8B 20 54 41 B3 32 31 |1316..%... TA.21|
00001D80: 20 A7 39 35 36 00 A7 25 24 05 99 41 24 A3 31 32 | .956..%$..A$.12|
00001D90: 29 22 91 91 59 4F 55 20 57 49 4E 22 3A 8D 31 30 |)"..YOU WIN":.10|
00001DA0: 32 36 3A 89 31 32 31 00 CA 25 29 05 22 20 20 43 |26:.121..%)." C|
00001DB0: 48 41 4E 47 45 20 50 4C 41 59 45 52 53 20 46 41 |HANGE PLAYERS FA|
00001DC0: 43 45 20 54 4F 20 31 30 27 53 00 ED 25 2E 05 22 |CE TO 10'S..%.."|
00001DD0: 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 | ..............|
00001DE0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 00 26 |...............&|
00001DF0: 33 05 8B 20 41 20 B1 20 39 20 A7 20 41 B2 31 30 |3.. A . 9 . A.10|
00001E00: 00 13 26 38 05 8B 20 43 20 B1 20 39 20 A7 20 43 |..&8.. C . 9 . C|
00001E10: B2 31 30 00 26 26 3D 05 8B 20 45 20 B1 20 39 20 |.10.&&=.. E . 9 |
00001E20: A7 20 45 B2 31 30 00 39 26 42 05 8B 20 46 20 B1 |. E.10.9&B.. F .|
00001E30: 20 39 20 A7 20 46 B2 31 30 00 4C 26 47 05 8B 20 | 9 . F.10.L&G.. |
00001E40: 47 20 B1 20 39 20 A7 20 47 B2 31 30 00 5F 26 4C |G . 9 . G.10._&L|
00001E50: 05 8B 20 48 20 B1 20 39 20 A7 20 48 B2 31 30 00 |.. H . 9 . H.10.|
00001E60: 72 26 51 05 8B 20 4A 20 B1 20 39 20 A7 20 4A B2 |r&Q.. J . 9 . J.|
00001E70: 31 30 00 78 26 56 05 8E 00 97 26 5B 05 22 20 20 |10.x&V....&[." |
00001E80: 50 52 49 4E 54 20 44 45 41 4C 45 52 53 20 46 41 |PRINT DEALERS FA|
00001E90: 43 45 20 43 41 52 44 00 B6 26 60 05 22 20 20 B8 |CE CARD..&`." .|
00001EA0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00001EB0: B8 B8 B8 B8 B8 B8 00 E0 26 65 05 4E 55 B2 5A 5A |........&e.NU.ZZ|
00001EC0: 3A 54 B2 36 3A 8D 34 39 36 3A 99 22 13 11 11 11 |:T.6:.496:."....|
00001ED0: 11 11 11 22 3A 8D 35 37 36 3A 8D 35 34 36 3A 8E |...":.576:.546:.|
00001EE0: 00 FD 26 6A 05 22 20 20 44 45 41 4C 45 52 53 20 |..&j." DEALERS |
00001EF0: 46 41 43 45 53 20 54 4F 20 31 30 27 53 00 1A 27 |FACES TO 10'S..'|
00001F00: 6F 05 22 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |o." ...........|
00001F10: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 2B 27 74 05 8B |...........+'t..|
00001F20: 20 42 B1 39 20 A7 20 42 B2 31 30 00 3C 27 79 05 | B.9 . B.10.<'y.|
00001F30: 8B 20 44 B1 39 20 A7 20 44 B2 31 30 00 4D 27 7E |. D.9 . D.10.M'~|
00001F40: 05 8B 20 4B B1 39 20 A7 20 4B B2 31 30 00 5E 27 |.. K.9 . K.10.^'|
00001F50: 83 05 8B 20 4C B1 39 20 A7 20 4C B2 31 30 00 6F |... L.9 . L.10.o|
00001F60: 27 88 05 8B 20 4D B1 39 20 A7 20 4D B2 31 30 00 |'... M.9 . M.10.|
00001F70: 80 27 8D 05 8B 20 4E B1 39 20 A7 20 4E B2 31 30 |.'... N.9 . N.10|
00001F80: 00 91 27 92 05 8B 20 50 B1 39 20 A7 20 50 B2 31 |..'... P.9 . P.1|
00001F90: 30 00 97 27 97 05 8E 00 AA 27 9C 05 22 20 20 49 |0..'.....'.." I|
00001FA0: 4E 46 4F 52 4D 41 54 49 4F 4E 00 BD 27 A1 05 22 |NFORMATION..'.."|
00001FB0: 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 F7 27 | .............'|
00001FC0: A6 05 99 22 93 22 3A 9C 3A 41 B2 33 32 37 36 37 |...".":.:A.32767|
00001FD0: 3A 42 B2 31 3A 43 B2 33 33 36 38 37 3A 8B C2 28 |:B.1:C.33687:..(|
00001FE0: 35 37 33 34 35 29 B2 38 36 A7 41 B2 31 30 32 33 |57345).86.A.1023|
00001FF0: 3A 43 B2 31 39 34 33 00 0D 28 AB 05 81 50 B2 31 |:C.1943..(...P.1|
00002000: A4 32 35 3A 81 4A B2 31 A4 38 3A 87 44 00 1B 28 |.25:.J.1.8:.D..(|
00002010: B0 05 81 49 B2 31 A4 34 30 A9 42 00 30 28 B5 05 |...I.1.40.B.0(..|
00002020: 97 41 AA 49 2C 44 3A 82 49 2C 4A 3A 42 B2 33 39 |.A.I,D:.I,J:B.39|
00002030: 00 3D 28 BA 05 8B 41 B2 43 A7 42 B2 31 00 4C 28 |.=(...A.C.B.1.L(|
00002040: BF 05 8C 3A 41 B2 41 AA 34 30 3A 82 00 86 28 C4 |...:A.A.40:...(.|
00002050: 05 41 B2 41 AB 39 35 38 3A 97 41 2C 31 36 30 3A |.A.A.958:.A,160:|
00002060: 97 41 AA 31 2C 31 32 36 3A 97 41 AA 34 30 2C 31 |.A.1,126:.A.40,1|
00002070: 32 36 3A 97 41 AA 33 37 2C 31 36 30 3A 97 41 AA |26:.A.37,160:.A.|
00002080: 33 36 2C 31 32 34 00 BD 28 C9 05 97 41 AA 37 37 |36,124..(...A.77|
00002090: 2C 31 32 34 3A 41 B2 43 AA 32 3A 97 41 AB 34 30 |,124:A.C.2:.A.40|
000020A0: 2C 31 32 33 3A 97 41 2C 31 36 30 3A 97 41 AA 31 |,123:.A,160:.A.1|
000020B0: 2C 31 32 33 3A 97 41 AB 33 2C 31 30 38 00 D5 28 |,123:.A.3,108..(|
000020C0: CE 05 97 41 AA 33 36 2C 31 30 38 3A 97 41 AA 33 |...A.36,108:.A.3|
000020D0: 37 2C 31 36 30 00 05 29 D3 05 99 22 13 22 A3 37 |7,160..)...".".7|
000020E0: 29 22 1C 11 11 11 11 11 D5 C0 C0 C0 C0 C0 C0 C0 |)"..............|
000020F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00002100: C9 9D 11 DD 91 00 2F 29 D8 05 99 A3 37 29 22 DD |....../)....7)".|
00002110: 9D 11 DD 20 20 D3 D8 DA C1 20 42 4C 41 43 4B 4A |... .... BLACKJ|
00002120: 41 43 4B 20 D3 D8 DA C1 20 20 DD 9D 11 DD 91 00 |ACK .... ......|
00002130: 55 29 DD 05 99 A3 37 29 22 DD 9D 11 CA C0 C0 C0 |U)....7)".......|
00002140: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00002150: C0 C0 C0 C0 CB 00 7D 29 E2 05 99 A3 36 29 22 11 |......})....6)".|
00002160: 11 46 52 4F 4D 20 47 52 45 45 4E 20 56 41 4C 4C |.FROM GREEN VALL|
00002170: 45 59 20 50 55 42 4C 49 53 48 49 4E 47 00 AB 29 |EY PUBLISHING..)|
00002180: E7 05 99 A3 35 29 22 1F 11 11 11 44 4F 20 59 4F |....5)"....DO YO|
00002190: 55 20 57 41 4E 54 20 49 4E 53 54 52 55 43 54 49 |U WANT INSTRUCTI|
000021A0: 4F 4E 53 20 3F 20 28 59 2F 4E 29 00 C9 29 EC 05 |ONS ? (Y/N)..)..|
000021B0: A1 51 24 3A 8B 51 24 B3 B1 22 59 22 AF 51 24 B3 |.Q$:.Q$.."Y".Q$.|
000021C0: B1 22 4E 22 A7 31 35 31 36 00 DA 29 F1 05 8B 51 |."N".1516..)...Q|
000021D0: 24 B2 22 59 22 A7 31 35 33 31 00 E2 29 F6 05 89 |$."Y".1531..)...|
000021E0: 32 31 00 2E 2A FB 05 99 22 93 11 52 55 4C 45 53 |21..*..."..RULES|
000021F0: 20 44 49 46 46 45 52 20 41 4D 4F 4E 47 20 43 41 | DIFFER AMONG CA|
00002200: 53 49 4E 4F 53 2C 20 54 48 45 22 3A 99 22 46 4F |SINOS, THE":."FO|
00002210: 4C 4C 4F 57 49 4E 47 20 41 52 45 20 54 48 45 20 |LLOWING ARE THE |
00002220: 4D 4F 53 54 20 50 4F 50 55 4C 41 52 2E 22 00 65 |MOST POPULAR.".e|
00002230: 2A 00 06 99 22 11 59 4F 55 20 43 41 4E 20 47 4F |*...".YOU CAN GO|
00002240: 20 27 44 4F 57 4E 20 46 4F 52 20 44 4F 55 42 4C | 'DOWN FOR DOUBL|
00002250: 45 27 20 57 49 54 48 20 41 4E 59 20 20 20 4E 55 |E' WITH ANY NU|
00002260: 4D 42 45 52 2E 00 AE 2A 05 06 99 22 11 59 4F 55 |MBER...*...".YOU|
00002270: 20 43 41 4E 20 53 50 4C 49 54 20 41 4E 59 20 50 | CAN SPLIT ANY P|
00002280: 41 49 52 2E 20 20 59 4F 55 20 43 41 4E 20 4F 4E |AIR. YOU CAN ON|
00002290: 4C 59 20 20 20 53 50 4C 49 54 20 4F 4E 43 45 2E |LY SPLIT ONCE.|
000022A0: 20 20 59 4F 55 20 43 41 4E 4E 4F 54 22 3B 00 E6 | YOU CANNOT";..|
000022B0: 2A 0A 06 99 22 20 47 4F 20 44 4F 57 4E 20 46 4F |*..." GO DOWN FO|
000022C0: 52 20 20 20 20 20 44 4F 55 42 4C 45 20 4F 4E 20 |R DOUBLE ON |
000022D0: 41 20 53 50 4C 49 54 2C 20 4F 52 20 42 4C 41 43 |A SPLIT, OR BLAC|
000022E0: 4B 4A 41 43 4B 2E 00 12 2B 0F 06 99 22 11 44 45 |KJACK...+...".DE|
000022F0: 41 4C 45 52 20 4D 55 53 54 20 48 49 54 20 31 36 |ALER MUST HIT 16|
00002300: 2C 20 41 4E 44 20 53 54 41 4E 44 20 4F 4E 20 31 |, AND STAND ON 1|
00002310: 37 2E 00 32 2B 14 06 99 22 11 42 4C 41 43 4B 4A |7..2+...".BLACKJ|
00002320: 41 43 4B 20 50 41 59 53 20 31 2E 35 20 54 4F 20 |ACK PAYS 1.5 TO |
00002330: 31 2E 00 7A 2B 19 06 99 22 11 43 41 52 44 20 43 |1..z+...".CARD C|
00002340: 4F 55 4E 54 49 4E 47 20 57 4F 52 4B 53 2E 20 41 |OUNTING WORKS. A|
00002350: 54 20 54 48 45 20 45 4E 44 20 4F 46 20 41 20 20 |T THE END OF A |
00002360: 20 20 48 41 4E 44 2C 20 49 46 20 54 48 45 20 27 | HAND, IF THE '|
00002370: 44 45 41 4C 45 52 27 20 22 3B 00 B9 2B 1E 06 99 |DEALER' ";..+...|
00002380: 22 48 41 53 20 4C 45 53 53 20 54 48 41 4E 20 31 |"HAS LESS THAN 1|
00002390: 38 20 20 43 41 52 44 53 20 4C 45 46 54 2C 20 54 |8 CARDS LEFT, T|
000023A0: 48 45 20 44 45 43 4B 20 57 49 4C 4C 20 42 45 20 |HE DECK WILL BE |
000023B0: 53 48 55 46 46 4C 45 44 2E 00 E7 2B 23 06 99 22 |SHUFFLED...+#.."|
000023C0: 11 59 4F 55 20 4D 41 59 20 27 57 41 54 43 48 27 |.YOU MAY 'WATCH'|
000023D0: 20 41 20 48 41 4E 44 20 42 59 20 42 45 54 54 49 | A HAND BY BETTI|
000023E0: 4E 47 20 27 30 27 2E 00 05 2C 28 06 99 A3 31 30 |NG '0'...,(...10|
000023F0: 29 22 11 11 28 50 52 45 53 53 20 53 50 41 43 45 |)"..(PRESS SPACE|
00002400: 20 42 41 52 29 00 1B 2C 2D 06 A1 51 24 3A 8B 51 | BAR)..,-..Q$:.Q|
00002410: 24 B3 B1 22 20 22 A7 31 35 38 31 00 62 2C 32 06 |$.." ".1581.b,2.|
00002420: 99 22 93 11 49 46 20 59 4F 55 20 57 49 4E 20 24 |."..IF YOU WIN $|
00002430: 35 30 30 30 20 59 4F 55 20 48 41 56 45 20 27 42 |5000 YOU HAVE 'B|
00002440: 52 4F 4B 45 20 54 48 45 20 20 20 20 54 41 42 4C |ROKE THE TABL|
00002450: 45 27 20 41 4E 44 20 54 48 45 20 54 41 42 4C 45 |E' AND THE TABLE|
00002460: 22 3B 00 75 2C 37 06 99 22 20 57 49 4C 4C 20 43 |";.u,7.." WILL C|
00002470: 4C 4F 53 45 2E 00 A0 2C 3C 06 99 22 11 4D 41 58 |LOSE...,<..".MAX|
00002480: 49 4D 55 4D 20 42 45 54 20 49 53 20 24 32 30 30 |IMUM BET IS $200|
00002490: 2C 20 4D 49 4E 49 4D 55 4D 20 49 53 20 24 31 2E |, MINIMUM IS $1.|
000024A0: 00 E2 2C 41 06 99 22 11 46 4F 52 20 45 41 53 45 |..,A..".FOR EASE|
000024B0: 20 4F 46 20 50 4C 41 59 49 4E 47 2C 20 59 4F 55 | OF PLAYING, YOU|
000024C0: 20 43 41 4E 20 52 45 50 45 41 54 20 59 4F 55 52 | CAN REPEAT YOUR|
000024D0: 50 52 45 56 49 4F 55 53 20 42 45 54 20 42 59 20 |PREVIOUS BET BY |
000024E0: 22 3B 00 28 2D 46 06 99 22 48 49 54 54 49 4E 47 |";.(-F.."HITTING|
000024F0: 20 27 52 45 54 55 52 4E 27 2E 20 4F 54 48 45 52 | 'RETURN'. OTHER|
00002500: 2D 57 49 53 45 2C 20 45 4E 54 45 52 20 54 48 45 |-WISE, ENTER THE|
00002510: 20 41 4D 4F 55 4E 54 20 59 4F 55 20 57 49 53 48 | AMOUNT YOU WISH|
00002520: 20 54 4F 20 42 45 54 22 00 45 2D 4B 06 99 22 4F | TO BET".E-K.."O|
00002530: 52 20 45 4E 54 45 52 20 27 51 27 20 54 4F 20 51 |R ENTER 'Q' TO Q|
00002540: 55 49 54 2E 22 00 87 2D 50 06 99 22 49 46 20 54 |UIT."..-P.."IF T|
00002550: 48 45 20 44 45 41 4C 45 52 20 48 41 53 20 41 4E |HE DEALER HAS AN|
00002560: 20 41 43 45 20 55 50 2C 20 59 4F 55 20 4D 41 59 | ACE UP, YOU MAY|
00002570: 20 42 55 59 49 4E 53 55 52 41 4E 43 45 20 41 47 | BUYINSURANCE AG|
00002580: 41 49 4E 53 54 22 3B 00 B6 2D 55 06 99 22 20 41 |AINST";..-U.." A|
00002590: 20 44 45 41 4C 45 52 53 20 42 4C 41 43 4B 4A 41 | DEALERS BLACKJA|
000025A0: 43 4B 20 20 20 46 4F 52 20 31 2F 32 20 59 4F 55 |CK FOR 1/2 YOU|
000025B0: 52 20 42 45 54 2E 00 E2 2D 5A 06 99 22 11 11 59 |R BET...-Z.."..Y|
000025C0: 4F 55 20 48 41 56 45 20 24 31 30 30 30 20 54 4F |OU HAVE $1000 TO|
000025D0: 20 53 54 41 52 54 2C 20 47 4F 4F 44 20 4C 55 43 | START, GOOD LUC|
000025E0: 4B 2E 00 00 2E 5F 06 99 A3 31 30 29 22 11 11 28 |K...._...10)"..(|
000025F0: 50 52 45 53 53 20 53 50 41 43 45 20 42 41 52 29 |PRESS SPACE BAR)|
00002600: 00 16 2E 64 06 A1 51 24 3A 8B 51 24 B3 B1 22 20 |...d..Q$:.Q$.." |
00002610: 22 A7 31 36 33 36 00 1E 2E 69 06 89 32 31 00 3F |".1636...i..21.?|
00002620: 2E 6E 06 22 B6 A1 20 31 38 36 20 41 4E 44 20 31 |.n.".. 186 AND 1|
00002630: 39 36 20 54 4F 20 27 47 4F 54 4F 20 36 34 27 00 |96 TO 'GOTO 64'.|
00002640: 84 2E 73 06 22 B6 A1 20 49 46 20 59 4F 55 20 57 |..s.".. IF YOU W|
00002650: 41 4E 54 20 42 4C 41 43 4B 4A 41 43 4B 20 54 4F |ANT BLACKJACK TO|
00002660: 20 50 41 59 20 20 20 20 20 20 20 20 20 20 20 20 | PAY |
00002670: 44 4F 55 42 4C 45 20 43 48 41 4E 47 45 20 32 33 |DOUBLE CHANGE 23|
00002680: 39 20 54 4F 00 97 2E 78 06 22 B6 A1 20 4D 4F 3D |9 TO...x.".. MO=|
00002690: 4D 4F 2B 42 45 2A 32 00 C9 2E 7D 06 99 22 11 11 |MO+BE*2...}.."..|
000026A0: 11 11 20 20 57 4F 55 4C 44 20 59 4F 55 20 4C 49 |.. WOULD YOU LI|
000026B0: 4B 45 20 54 4F 20 50 4C 41 59 20 41 47 41 49 4E |KE TO PLAY AGAIN|
000026C0: 20 28 59 2F 4E 29 3F 22 3B 00 DC 2E 82 06 A1 59 | (Y/N)?";......Y|
000026D0: 24 3A 8B 59 24 B2 22 59 22 A7 32 31 00 EE 2E 87 |$:.Y$."Y".21....|
000026E0: 06 8B 59 24 B2 22 4E 22 A7 36 33 30 30 30 00 F8 |..Y$."N".63000..|
000026F0: 2E 8C 06 89 31 36 36 36 00 1C 2F 91 06 97 20 35 |....1666../... 5|
00002700: 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A |3280,0:.53281,0:|
00002710: 99 C7 28 31 34 32 29 C7 28 38 29 3B 00 53 2F 96 |..(142).(8);.S/.|
00002720: 06 99 22 9A 93 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00002730: 20 20 20 20 20 4D 41 4B 45 20 53 55 52 45 20 54 | MAKE SURE T|
00002740: 48 45 20 4D 41 53 54 45 52 20 44 49 53 4B 45 54 |HE MASTER DISKET|
00002750: 54 45 22 00 7B 2F 9B 06 99 22 11 11 20 20 20 20 |TE".{/...".. |
00002760: 20 20 20 20 20 20 49 53 20 49 4E 20 54 48 45 20 | IS IN THE |
00002770: 44 49 53 4B 20 44 52 49 56 45 22 00 BE 2F A0 06 |DISK DRIVE"../..|
00002780: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00002790: 11 11 11 11 11 11 11 11 11 11 20 20 20 20 20 20 |.......... |
000027A0: 20 9E 12 50 52 45 53 53 20 41 4E 59 20 4B 45 59 | ..PRESS ANY KEY|
000027B0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 92 22 00 D5 | TO CONTINUE."..|
000027C0: 2F A5 06 A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 |/... A$:. A$."" |
000027D0: A7 31 37 30 31 00 F3 2F AA 06 9F 31 2C 38 2C 32 |.1701../...1,8,2|
000027E0: 2C 22 4D 45 4E 55 32 2C 50 2C 52 22 3A A1 23 31 |,"MENU2,P,R":.#1|
000027F0: 2C 41 24 00 0B 30 AF 06 8B 20 53 54 B3 B1 30 20 |,A$..0... ST..0 |
00002800: A7 20 A0 31 3A 89 36 33 30 30 30 00 12 30 B4 06 |. .1:.63000..0..|
00002810: A0 31 00 35 30 B9 06 99 22 93 90 4C 4F 41 44 22 |.1.50..."..LOAD"|
00002820: C7 28 33 34 29 22 4D 45 4E 55 32 22 C7 28 33 34 |.(34)"MENU2".(34|
00002830: 29 22 2C 38 22 00 55 30 BE 06 97 20 36 33 36 2C |)",8".U0... 636,|
00002840: 30 3A 97 36 34 2C 30 3A 97 34 38 2C 38 3A 97 35 |0:.64,0:.48,8:.5|
00002850: 32 2C 31 36 30 00 76 30 C3 06 97 20 35 34 2C 30 |2,160.v0... 54,0|
00002860: 3A 97 35 36 2C 31 36 30 3A 97 35 37 2C 30 3A 97 |:.56,160:.57,0:.|
00002870: 35 38 2C 32 35 35 00 80 30 C8 06 97 36 32 2C 30 |58,255..0...62,0|
00002880: 00 8F 30 CD 06 99 22 11 11 11 11 52 55 4E 22 00 |..0..."....RUN".|
00002890: B8 30 D2 06 99 22 11 11 11 11 11 11 11 22 A3 31 |.0...".......".1|
000028A0: 34 29 22 9A 4C 4F 41 44 49 4E 47 2E 2E 2E 2E 90 |4)".LOADING.....|
000028B0: 22 3A 97 31 39 38 2C 33 00 E2 30 D7 06 97 36 33 |":.198,3..0...63|
000028C0: 31 2C 31 39 3A 97 36 33 32 2C 31 33 3A 97 36 33 |1,19:.632,13:.63|
000028D0: 33 2C 31 33 3A 97 35 39 2C 30 3A 97 36 30 2C 30 |3,13:.59,0:.60,0|
000028E0: 3A A2 00 F5 30 60 EA 8F 20 49 4E 50 55 54 20 53 |:...0`.. INPUT S|
000028F0: 54 52 49 4E 47 00 0E 31 6A EA 55 52 24 B2 22 22 |TRING..1j.UR$.""|
00002900: 3A 55 49 24 B2 22 22 3A 97 32 30 34 2C 30 00 1F |:UI$."":.204,0..|
00002910: 31 6F EA 8B 20 55 4C B2 30 A7 55 4C B2 38 30 00 |1o.. UL.0.UL.80.|
00002920: 2F 31 71 EA 97 36 34 37 2C C2 28 36 34 36 29 00 |/1q..647,.(646).|
00002930: 46 31 74 EA A1 55 49 24 3A 8B 55 49 24 B2 22 22 |F1t..UI$:.UI$.""|
00002940: A7 36 30 30 32 30 00 56 31 79 EA 97 36 34 37 2C |.60020.V1y..647,|
00002950: C2 28 36 34 36 29 00 7A 31 7B EA 8B 55 49 24 B2 |.(646).z1{..UI$.|
00002960: C7 28 31 33 29 AF C3 28 55 52 24 29 B2 30 A7 97 |.(13)..(UR$).0..|
00002970: 32 30 34 2C 31 3A 89 39 39 31 00 A1 31 7E EA 8B |204,1:.991..1~..|
00002980: 55 49 24 B2 C7 28 31 33 29 AF C3 28 55 52 24 29 |UI$..(13)..(UR$)|
00002990: B1 B2 31 A7 97 32 30 34 2C 31 3A 99 22 20 22 3A |..1..204,1:." ":|
000029A0: 8E 00 B6 31 88 EA 8B 55 49 24 B2 C7 28 32 30 29 |...1...UI$..(20)|
000029B0: A7 36 30 30 38 30 00 CC 31 92 EA 8B C3 28 55 52 |.60080..1....(UR|
000029C0: 24 29 B1 B2 55 4C A7 36 30 30 32 30 00 D7 31 9C |$)..UL.60020..1.|
000029D0: EA 8D 36 30 31 31 30 00 FF 31 A6 EA 55 52 24 B2 |..60110..1..UR$.|
000029E0: 55 52 24 AA 55 49 24 3A 99 55 49 24 3B 22 20 20 |UR$.UI$:.UI$;" |
000029F0: 20 20 9D 9D 9D 9D 22 3B 3A 89 36 30 30 32 30 00 | ....";:.60020.|
00002A00: 14 32 B0 EA 8B 20 C3 28 55 52 24 29 B3 31 A7 36 |.2... .(UR$).1.6|
00002A10: 30 30 32 30 00 2C 32 BA EA 55 52 24 B2 C8 28 55 |0020.,2..UR$..(U|
00002A20: 52 24 2C C3 28 55 52 24 29 AB 31 29 00 3F 32 C4 |R$,.(UR$).1).?2.|
00002A30: EA 99 C7 28 32 30 29 3B 3A 89 36 30 30 32 30 00 |...(20);:.60020.|
00002A40: 54 32 CE EA 8B 20 C3 28 55 53 24 29 B2 30 A7 36 |T2... .(US$).0.6|
00002A50: 30 31 36 30 00 67 32 D8 EA 81 20 55 53 B2 31 A4 |0160.g2... US.1.|
00002A60: 20 C3 28 55 53 24 29 00 7E 32 E2 EA 8B 55 49 24 | .(US$).~2...UI$|
00002A70: B2 CA 28 55 53 24 2C 55 53 2C 31 29 A7 8E 00 86 |..(US$,US,1)....|
00002A80: 32 EC EA 82 55 53 00 93 32 F6 EA 55 49 24 B2 22 |2...US..2..UI$."|
00002A90: 22 3A 8E 00 A6 32 00 EB 8B C6 28 55 49 24 29 B2 |":...2....(UI$).|
00002AA0: 34 36 20 A7 20 8E 00 B7 32 0A EB 8B 55 49 24 B2 |46 . ...2...UI$.|
00002AB0: C7 28 33 32 29 A7 8E 00 CE 32 0F EB 8B 55 49 24 |.(32)....2...UI$|
00002AC0: B2 C7 28 33 34 29 A7 55 49 24 B2 22 27 22 00 EE |..(34).UI$."'"..|
00002AD0: 32 28 EB 8B C6 28 55 49 24 29 B3 33 33 B0 C6 28 |2(...(UI$).33..(|
00002AE0: 55 49 24 29 B1 39 30 20 A7 36 30 32 32 30 00 F4 |UI$).90 .60220..|
00002AF0: 32 32 EB 8E 00 18 33 3C EB 8B C6 28 55 49 24 29 |22....3<...(UI$)|
00002B00: B3 31 39 33 B0 C6 28 55 49 24 29 B1 32 31 38 A7 |.193..(UI$).218.|
00002B10: 55 49 24 B2 22 22 3A 8E 00 1E 33 46 EB 8E 00 42 |UI$."":...3F...B|
00002B20: 33 18 F6 97 20 35 33 32 38 30 2C 30 3A 97 35 33 |3... 53280,0:.53|
00002B30: 32 38 31 2C 30 3A 99 C7 28 31 34 32 29 C7 28 38 |281,0:..(142).(8|
00002B40: 29 3B 00 79 33 22 F6 99 22 9A 93 11 11 11 11 11 |);.y3"..".......|
00002B50: 11 11 11 11 11 11 20 20 20 20 20 4D 41 4B 45 20 |...... MAKE |
00002B60: 53 55 52 45 20 54 48 45 20 4D 41 53 54 45 52 20 |SURE THE MASTER |
00002B70: 44 49 53 4B 45 54 54 45 22 00 A1 33 2C F6 99 22 |DISKETTE"..3,.."|
00002B80: 11 11 20 20 20 20 20 20 20 20 20 20 49 53 20 49 |.. IS I|
00002B90: 4E 20 54 48 45 20 44 49 53 4B 20 44 52 49 56 45 |N THE DISK DRIVE|
00002BA0: 22 00 E2 33 36 F6 99 22 05 13 11 11 11 11 11 11 |"..36.."........|
00002BB0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00002BC0: 11 20 20 20 20 20 20 20 50 52 45 53 53 20 41 4E |. PRESS AN|
00002BD0: 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 |Y KEY TO CONTINU|
00002BE0: 45 22 00 ED 33 40 F6 97 31 39 38 2C 30 00 05 34 |E"..3@..198,0..4|
00002BF0: 4A F6 A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 |J.. A$:. A$."" .|
00002C00: 36 33 30 35 30 00 10 34 54 F6 A0 31 3A A0 31 35 |63050..4T..1:.15|
00002C10: 00 30 34 5E F6 9F 31 35 2C 38 2C 31 35 3A 9F 31 |.04^..15,8,15:.1|
00002C20: 2C 38 2C 32 2C 22 4D 45 4E 55 32 2C 50 2C 52 22 |,8,2,"MENU2,P,R"|
00002C30: 00 3A 34 68 F6 84 31 35 2C 41 00 4B 34 72 F6 8B |.:4h..15,A.K4r..|
00002C40: 20 41 B1 30 20 A7 36 33 30 30 30 00 56 34 7C F6 | A.0 .63000.V4|.|
00002C50: A0 31 3A A0 31 35 00 79 34 86 F6 99 22 93 90 4C |.1:.15.y4..."..L|
00002C60: 4F 41 44 22 C7 28 33 34 29 22 4D 45 4E 55 32 22 |OAD".(34)"MENU2"|
00002C70: C7 28 33 34 29 22 2C 38 22 00 99 34 90 F6 97 20 |.(34)",8"..4... |
00002C80: 36 34 36 2C 30 3A 97 36 34 2C 30 3A 97 34 38 2C |646,0:.64,0:.48,|
00002C90: 38 3A 97 35 32 2C 31 36 30 00 BA 34 9A F6 97 20 |8:.52,160..4... |
00002CA0: 35 34 2C 30 3A 97 35 36 2C 31 36 30 3A 97 35 37 |54,0:.56,160:.57|
00002CB0: 2C 30 3A 97 35 38 2C 32 35 35 00 C4 34 A4 F6 97 |,0:.58,255..4...|
00002CC0: 36 32 2C 30 00 D3 34 AE F6 99 22 11 11 11 11 52 |62,0..4..."....R|
00002CD0: 55 4E 22 00 03 35 B8 F6 99 22 11 11 11 11 11 11 |UN"..5..."......|
00002CE0: 11 22 A3 31 34 29 22 9A 4C 4F 41 44 49 4E 47 2E |.".14)".LOADING.|
00002CF0: 2E 2E 2E 90 22 3A 97 31 39 38 2C 33 3A 97 36 34 |....":.198,3:.64|
00002D00: 37 2C 30 00 2D 35 C2 F6 97 36 33 31 2C 31 39 3A |7,0.-5...631,19:|
00002D10: 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 33 3A |.632,13:.633,13:|
00002D20: 97 35 39 2C 30 3A 97 36 30 2C 30 3A A2 00 00 00 |.59,0:.60,0:....|
....... 53280,0:. 53281,3.!....11.9....1
446. IN.MATI. #65.]....99,119,120,226,24
9,239,228,224.O....:MO.1000:.36......B$.
8)".--- PRESS SPACE BAR ---"......W$:.W$
.." ".31.L.$.MO.MO.10:. SHUFFLE COME IN
HERE...)..835,0:.834,0:.820,0.....D..(MO
.256):.835,D:.834,MO.D.256:.820,BE...3..
".":..8.8.A$.".................".H.=.B$.
H(A$,11).W.B.C$.H(A$,8)...G.D$."
"...K.FF$
."0"...L.QQ$."A234567890JQK"...Q.VV$."SX
ZA"...V.MO.256.B(835).B(834):BE.B(820)..
.[.MO.MO.10.!.`..B$". "G(34)"...SHU
FFLE.....SHUFFLE..."G(34).4.E..431:. SHU
FFLE.=.J..121.].O." DEAL THE HAND,65535
CARDS.{.T." .........................Y.
. SB..0 .136...~.. QA.2 .956...... RESET
FOR NEXT HAND.....FB.0:SB.0:SM.0:SR.0:D
BJ.0:E.0:F.0:G.0:H.0:. DO.1 . BE.BE.2.1.
..J.0:K.0:L.0:M.0:N.0:P.0:DO.0:QQ.0:QA.0
:. MO..6000 .1046.@.... I.34 .26.S....A$
"......."D$.....G$.D(MO):.B$". YOU HAVE
$"G$", PLACE YOUR BET "BE.......28.C(G$
));".? ";.M...US$."1234567890Q":UL.3:.60
000:BE.E(UR$)......H(UR$,1)."Q".63000...
...991.!...."."A$".......YOU HOLD $"SH",
YOUR BET IS $"BE.9.... PLAYER FIRST CAR
D.Z...T.0:.A$;:.486:.561:A.NU:.576.Z....
NOW GET DEALER FIRST CARD......546:."..
";:.486:.561;:.576:B.NU:.546.Q.D.T.6:.".
"A$;:.486:.561:.576:C.NU:QQ.C%(I)...I..
NOW DEALER DOWN CARD...N..546:."..";:.48
6:.561:D.NU:ZZ.C%(I):.546.".S..226.D.X."
CHECK DEALER FOR BLACKJACK.F..." ....
............................ B.1 . .786:
. DEALER HAS AN ACE SHOWING...... B.
1 . D.9 . DBJ.1.G.... D.1 . B.9 . DBJ.1.
P....256....." CHECK PLAYER FOR BLACK J
ACK....." ............................+
.... A.1 . C.9 .291.@.... C.1 . A.9 .291
.I....281.N..." IF ONE OR BOTH HAVE BLA
CKJACK....." ..........................
......... DBJ.0 . .546:.336.S....C$"..DE
ALER. BLACKJACK":.1086:.316...#.. DBJ.1
.311...(.. QA.1 . ."...BLACKJACK":.546:S
B.1:FB.1:.1126:.871.R.-.. QA.2 . .".....
...BLACKJACK":SB.2:.546:.1126:.921...2..
".. PLAYER. BLACKJACK":.546:.1
126:.316...7..".. PUSH--NO. WIN
NERS !!...<..1381.N.A..121:. NEXT HAND..
.F." DECISION ON HIT OR HOLD...K." ...
.......................P.. QA..0 .356.Z.
U.. A.C . A.9 . C.9 . .B$".....DO YOU W
ANT TO SPLIT ? (S)...Z..B$"...YOU WANT O
NE CARD FOR DOUBLE ? (D)..._.. COME IN H
ERE AFTER HIT.Q.D..B$"...DO YOU WANT A C
ARD ? (SPACE BAR)...I..B$".DO YOU HOLD ?
(H)...N.. W$: . W$."" .366. .S.. W$." "
.596:. TAKE CARD.8.X.. W$."H".691:. HOLD
.[.}.. W$."D" . T.12 . QA.0 . .1106.....
. W$."S". A.C . A.9 . C.9 . QA.0
.1066......366....." .................
......S..." ...........................
" BEGIN ALL SUB ROUTINES....." .......
................-. ." .................
......E..." SHUFFLE THE DECK.]..." ...
..............Q.... CK(52),C%(52)......
I.1 . 50:. LAST 2 NOT USED.....X..(.TI).
....R%.52..(1).1.G.C.. CK(R%) .. 0 .446.
..H.C%(I).R% : CK(R%).1...M...&.R.. C%(1
) THRU C%(50) ARE NUMBERS 1 THRU 5
2 IN RND ORDER.5.W.I.0:.".":..R..." ADD
ITIONAL CARDS HERE.O..." ..............
........Y...I.I.1.....NUMBER.C%(I)......
NUMBER .39 . SUIT.4:NU.NU.39 :.526
...... NUMBER .26 . SUIT.3:NU.NU.26
:.526...... NUMBER .13 . SUIT.2:NU.NU.1
3 :.526.,...SUIT.1:.526:. NU=NU.P..
." TURN NUMBER INTO CARD & SUIT.T..."
.................................N$.J(QQ
$,NU,1).....S$.J(VV$,SU,1):......" DELA
Y TIMER.B..." ............T."..Q.1.200
:.:....'." PUT THE CARD ON THE SCREEN..
.,." ...........................`.1...T
)".U...I........ .......... ........ ..
........ ........J...K".F.6.....;." ..
.......................B.@..N$."0".N$."1
0":..T)"........"N$.S$;:."........"S$.N$
:....E...T)"........"N$;". ";S$;:.".....
...";:.S$;:.". "N$...J.....O." ........
............H.T..B$".."D$:.B$.D$:.B$".."
D$:.B$"...."D$:..M.Y.T.T.6:. T.28 . T.T.
1:. T.35 .691...^..486:. GET NEXT CARD..
.C.. T.12 . E.NU...H.. T.18 . F.NU...M..
T.24 . G.NU.N.R.. T.29 . H.NU...W.. T.3
4 . J.NU...|..561:.576:.1331.....TT.A.C.
E.F.G.H.J.;.... TT.21 . .".......YOU HAV
E"TT"YOU LOSE":.661.K.... DO.1 .691.F...
.356:. BACK FOR CHOICE.Z.... QA..1 . .10
86...... QA.1 .871...... QA.2 . TA.22 .9
21......1381:.546:.121.Y..." 'HOLD' CHE
CK PLAYERS POINTS....." ...............
.............7....B$".."D$:.B$.D$:.B$"..
"D$:.B$"...."D$:. CLEAR CHOICES.U....133
1:.FACE CARDS TO 10'S.J...TT.A.C.E.F.G.H
.J...B.A.A.(A.1).10:.756:C.C.(C.1).10:.7
56:E.E.(E.1).10:.756...G.F.F.(F.1).10:.7
56:G.G.(G.1).10:.756:H.H.(H.1).10:.756..
.L.J.J.(J.1).10:.756...Q..".YOU HAVE"TT.
..V.. QA.1 .871.'.... QA.2 .921.1....138
1.;....1146.U..." SUB SUB FOR 11000.O.
.." .......................R.A.C.E.F.G.
H.J...... R.22 . SM.R...... SM . TT . TT
.SM.......B..." INSURANCE.S..." ......
......... A.1 . C.9 . ..$.... C.1 . A.9
. .:. IF PLAYER BJ NO INSURANCE O
FFER.B....B$".INSURANCE ? (Y/N) ";.B.!.U
S$."YN":UL.1:.60000:W$.UR$...&.. W$."N".
. B$D$:.: . INSURANCE REFUSED.O.+.
.SH.BE.2..B$D$". SORRY, NO CREDIT.":.W.1
.2000:.:.B$D$:....0..D.9..B$D$:MO.MO.BE:
.:. DEALER BJ GIVE $ NOW LOSE $ LATER.B.
5.MO.MO.BE.2:.B$D$". NO BLACKJACK, YOU L
OSE $"BE.2.U.:..A$"......."D$...?..A$"..
.....YOU HOLD $"SH.BE.2", YOUR BET IS $"
BE...D..W.1.2000:.:.B$D$:....I." PLAYER
SPLITS PAIR.V.N." ....................
.S..A$;:.Q.1.6:..6)" ":....X..A$".":
.486:.561:.576.5.].T.6:C.NU:QA.1:.B$".."
D$.B$"...."D$.P.B..336:. GO FOR DECISION
.G.G...20)". FIRST HAND...L..B$".. ---
PRESS ANY KEY FOR SECOND HAND ---.F.Q.TA
.TT:TT.0:QA.2:E.0:F.0:G.0:H.0:J.0:SM.0.Y
.V..W$:.W$."".886...{..B$:. CLEAR FIRST
HAND AWY...... Q.1 . 11:.D$:..+.... FIRS
T CARD,2 ED OF PAIR.T...T.0:.A$".":NU.QQ
:.496:.561:.576:A.NU.....T.6:.A$".":.486
:.561:.576:C.NU:. SECOND CARD. ....336:.
GO FOR DECISION.......20)". SECOND HAND
.B....1381.Y.... SB.2 . FB.1 .136......
SB.2 . TA.21 .961...... SB.1 . TT.21 .13
6.".... TA.21 . TT.21 .121.,....1146.<..
.. SB.1 .136.M.A.. TA.21 .981...F.. DT.T
A . .B$"...YOU HAVE"TA"PUSH FIRST HAND":
.136...K.. DT.TA . DT.22 .981.S.P..B$"..
.YOU HAVE"TA"YOU WIN FIRST HAND":.1026:.
136...U..B$"...YOU HAVE"TA"YOU LOSE FIRS
T HAND":.1086:.136...Z." MONEY.R....MO.
.0.."."C$".... SORRY, YOU'RE BR
OKE":.1661.X.....E....".";BE$......BE.20
0.."."C$"SORRY., $200 BETTING LIMIT.":.1
51.S.... BE.MO . ."."C$" SORRY
., NO CREDIT.":.151.....SH.MO.BE:.171...
.." WIN....." ..... ..MO.MO.BE.. ....$
.." BREAK THE BANK.: .." ............
...N ...Q.1.1000:.A$:... ..."."B$"......
..CONGRATULATIONS. YOU HAVE BROKE THE. B
ANK... .... %..1661.Z *.. MO.BE.2 ..B$"
....SORRY NOT ENOUGH MONEY, NO SPLIT":.3
66.. /..851.. 4." LOSE.. 9." ......!>.
MO.MO.BE..!C...!!H." DOUBLE TEST.4!M."
............W!R.. MO.BE.2 . .B$".. SOR
RY., NOT ENOUGH MONEY, NO DOUBLE.":.366.
.!W.DO.1:BE.BE.2:.596..!\." BLACKJACK..
!A." ...........!F.MO.MO.BE.1.5.F!K....
!P." PLAY DEALERS HAND..!U." .........
.........."Z..1396..".DT.B.D.K.L.M.N.P.
@"... DT.21 . . C$ ".DEALER HAS"DT:.1296
.I"... DT.16 . . C$ ".DEALER HAS"DT:.127
6.."..B.B.(B.1).10:.1246:D.D.(D.1).10:.1
246:K.K.(K.1).10:.1246.."..L.L.(L.1).10:
.1246:M.M.(M.1).10:.1246:N.N.(N.1).10:.1
246.."..P.P.(P.1).10:.1246.##... DT.16 .
. C$ ".DEALER HAS"DT:.1276._#..B.B.(B.1
1).10:D.D.(D.11).10:K.K.(K.11).10:L.L.(L
.11).10..#..M.M.(M.11).10:N.N.(N.11).10:
P.P.(P.11).10..#..T.T.6:. T.28 . T.T.1:
.T.35 .1276..#...486.N#... T.12 . K.NU..
#... T.18 . L.NU..#... T.24 . M.NU..$E..
T.29 . N.NU..$J.. T.34 . P.NU.9$O..".":
.561:.576:.546:.546:.1146.R$T." SUB SUB
FOR 15000.K$Y." ..................$..
U.B.D.K.L.M.N.P..$... U.22 . SR.U..$...
SR.DT . DT.SR..$....A$.." COMPARE SCORE
S.W$.." ................$... TT.21 .956
..$... SB.2 .1311..%... DT.TT . .A$.12)"
..PUSH":.121.I%... DT.TT . .A$.12)"..YOU
LOSE":.1086:.121.Z%... TT.21 .956.J%...
SB.2 .976.T%...1316..%... TA.21 .956..%
$..A$.12)"..YOU WIN":.1026:.121.J%)." C
HANGE PLAYERS FACE TO 10'S..%.." ......
.......................&3.. A . 9 . A.10
..&8.. C . 9 . C.10.&&=.. E . 9 . E.10.9
&B.. F . 9 . F.10.L&G.. G . 9 . G.10._&L
.. H . 9 . H.10.R&Q.. J . 9 . J.10.X&V..
..&[." PRINT DEALERS FACE CARD..&`." .
........................&E.NU.ZZ:T.6:.49
6:.".......":.576:.546:...&J." DEALERS
FACES TO 10'S..'O." ...................
...+'T.. B.9 . B.10.<'Y.. D.9 . D.10.M'~
.. K.9 . K.10.^'... L.9 . L.10.O'... M.9
. M.10..'... N.9 . N.10..'... P.9 . P.1
0..'.....'.." INFORMATION..'.." ......
.......'...".":.:A.32767:B.1:C.33687:.B(
57345).86.A.1023:C.1943..(...P.1.25:.J.1
.8:.D..(...I.1.40.B.0(...A.I,D:.I,J:B.39
.=(...A.C.B.1.L(...:A.A.40:...(D.A.A.958
:.A,160:.A.1,126:.A.40,126:.A.37,160:.A.
36,124..(I..A.77,124:A.C.2:.A.40,123:.A,
160:.A.1,123:.A.3,108.U(N..A.36,108:.A.3
7,160..)S..".".7)"......U...............
........I...../)X...7)".... SXZA BLACKJ
ACK SXZA ......U)....7)"...J...........
............K.})....6)"..FROM GREEN VALL
EY PUBLISHING..)....5)"....DO YOU WANT I
NSTRUCTIONS ? (Y/N).I)...Q$:.Q$.."Y".Q$.
."N".1516.Z)...Q$."Y".1531..)...21..*...
"..RULES DIFFER AMONG CASINOS, THE":."FO
LLOWING ARE THE MOST POPULAR.".E*...".YO
U CAN GO 'DOWN FOR DOUBLE' WITH ANY NU
MBER...*...".YOU CAN SPLIT ANY PAIR. YO
U CAN ONLY SPLIT ONCE. YOU CANNOT";..
*..." GO DOWN FOR DOUBLE ON A SPLIT,
OR BLACKJACK...+...".DEALER MUST HIT 16
, AND STAND ON 17..2+...".BLACKJACK PAYS
1.5 TO 1..Z+...".CARD COUNTING WORKS. A
T THE END OF A HAND, IF THE 'DEALER'
";..+..."HAS LESS THAN 18 CARDS LEFT, T
HE DECK WILL BE SHUFFLED...+#..".YOU MAY
'WATCH' A HAND BY BETTING '0'...,(...10
)"..(PRESS SPACE BAR)..,-..Q$:.Q$.." ".1
581.B,2.."..IF YOU WIN $5000 YOU HAVE 'B
ROKE THE TABLE' AND THE TABLE";.U,7..
" WILL CLOSE.. ,<..".MAXIMUM BET IS $200
, MINIMUM IS $1...,A..".FOR EASE OF PLAY
ING, YOU CAN REPEAT YOURPREVIOUS BET BY
";.(-F.."HITTING 'RETURN'. OTHER-WISE, E
NTER THE AMOUNT YOU WISH TO BET".E-K.."O
R ENTER 'Q' TO QUIT."..-P.."IF THE DEALE
R HAS AN ACE UP, YOU MAY BUYINSURANCE AG
AINST";..-U.." A DEALERS BLACKJACK FOR
1/2 YOUR BET...-Z.."..YOU HAVE $1000 TO
START, GOOD LUCK...._...10)"..(PRESS SP
ACE BAR)...D..Q$:.Q$.." ".1636...I..21.?
.N.".. 186 AND 196 TO 'GOTO 64'...S."..
IF YOU WANT BLACKJACK TO PAY
DOUBLE CHANGE 239 TO...X.".. MO=MO+BE*2.
I.}..".... WOULD YOU LIKE TO PLAY AGAIN
(Y/N)?";......Y$:.Y$."Y".21......Y$."N"
.63000......1666../... 53280,0:.53281,0:
.G(142)G(8);.S/..."............. MAK
E SURE THE MASTER DISKETTE".{/..."..
IS IN THE DISK DRIVE"../ .."......
.................. ..PRESS ANY KEY
TO CONTINUE.".U/... A$:. A$."" .1701../
...1,8,2,"MENU2,P,R":.#1,A$..0... ST..0
. 1:.63000..0.. 1.50..."..LOAD"G(34)"ME
NU2"G(34)",8".U0... 636,0:.64,0:.48,8:.5
2,160.V0C.. 54,0:.56,160:.57,0:.58,255..
0H..62,0..0M.."....RUN"..0R..".......".1
4)".LOADING.....":.198,3..0W..631,19:.63
2,13:.633,13:.59,0:.60,0:...0`.. INPUT S
TRING..1J.UR$."":UI$."":.204,0..1O.. UL.
0.UL.80./1Q..647,B(646).F1T..UI$:.UI$.""
.60020.V1Y..647,B(646).Z1{..UI$.G(13).C(
UR$).0..204,1:.991..1~..UI$.G(13).C(UR$)
..1..204,1:." ":...1...UI$.G(20).60080.L
1...C(UR$)..UL.60020.W1...60110..1..UR$.
UR$.UI$:.UI$;" ....";:.60020..2... C(
UR$).1.60020.,2..UR$.H(UR$,C(UR$).1).?2D
..G(20);:.60020.T2N.. C(US$).0.60160.G2X
.. US.1. C(US$).~2...UI$.J(US$,US,1)....
2...US..2..UI$."":...2...F(UI$).46 . ...
2...UI$.G(32)...N2...UI$.G(34).UI$."'"..
2(..F(UI$).33.F(UI$).90 .60220..22....3<
..F(UI$).193.F(UI$).218.UI$."":...3F...B
3... 53280,0:.53281,0:.G(142)G(8);.Y3"..
"............. MAKE SURE THE MASTER
DISKETTE"..3,..".. IS IN THE DI
SK DRIVE"..36.."........................
. PRESS ANY KEY TO CONTINUE"..3@..
198,0..4J.. A$:. A$."" .63050..4T. 1: 15
.04^..15,8,15:.1,8,2,"MENU2,P,R".:4H..15
,A.K4R.. A.0 .63000.V4|. 1: 15.Y4..."..L
OAD"G(34)"MENU2"G(34)",8"..4... 646,0:.6
4,0:.48,8:.52,160..4... 54,0:.56,160:.57
,0:.58,255.D4...62,0.S4..."....RUN"..5..
.".......".14)".LOADING.....":.198,3:.64
7,0.-5B..631,19:.632,13:.633,13:.59,0:.6
0,0:....
> CLICK IMAGE PREVIEW FOR FULL MODAL