BLACKJACK
FILE INFORMATION
FILENAME(S): BLACKJACK
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-10-19 22:35:25
APPEARS ON: 1 disk(s)
FILE HASH
ec6a17947d19ef95b6283c68ec34fda363fa13bcf840db23d408b800c831773c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| EVEN MORE GAMES | BLACKJACK | PRG | Radd Maxx | 22 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 01 00 4C B2 BB 28 AB 54 49 29 3A 97 |..)...L..(.TI):.|
00000010: 35 33 32 38 31 2C 31 3A 97 35 33 32 38 30 2C 31 |53281,1:.53280,1|
00000020: 3A 99 22 90 22 3A 89 31 37 00 59 08 02 00 99 C8 |:.".":.17.Y.....|
00000030: 28 44 24 2C 33 AC 48 AB 34 AC 28 57 B2 31 29 AB |(D$,3.H.4.(W.1).|
00000040: 31 31 AC 28 57 B2 32 29 AA 32 29 C8 28 52 24 2C |11.(W.2).2).(R$,|
00000050: 37 AA 32 AC 4B 29 3B 3A 8E 00 87 08 03 00 99 43 |7.2.K);:.......C|
00000060: 24 28 43 41 29 22 11 9D 22 CA 28 22 DA D3 C1 D8 |$(CA)"..".("....|
00000070: 22 2C 53 55 2C 31 29 22 91 1E A7 11 9D A7 11 9D |",SU,1)"........|
00000080: 9D A4 BA 22 3B 3A 8E 00 C6 08 04 00 53 55 B2 B5 |...";:......SU..|
00000090: 28 44 25 28 43 29 AD 31 33 AA 2E 30 31 29 AA 31 |(D%(C).13..01).1|
000000A0: 3A 43 41 B2 B5 28 31 33 AC 28 44 25 28 43 29 AD |:CA..(13.(D%(C).|
000000B0: 31 33 AB B5 28 44 25 28 43 29 AD 31 33 29 AA 2E |13..(D%(C).13)..|
000000C0: 30 31 29 29 3A 8E 00 F7 08 05 00 99 CA 28 22 90 |01)):........(".|
000000D0: 1C 22 2C 31 AB 28 44 25 28 43 29 B3 32 36 29 2C |.",1.(D%(C).26),|
000000E0: 31 29 3B 3A 43 56 B2 43 41 AA 31 3A 8B 43 56 B1 |1);:CV.CA.1:.CV.|
000000F0: 39 A7 43 56 B2 31 30 00 13 09 06 00 8B 43 56 B2 |9.CV.10......CV.|
00000100: 31 A7 43 56 B2 31 31 3A 41 28 4C 29 B2 41 28 4C |1.CV.11:A(L).A(L|
00000110: 29 AA 31 00 3B 09 07 00 43 28 4C 29 B2 43 28 4C |).1.;...C(L).C(L|
00000120: 29 AA 43 56 3A 43 B2 43 AA 31 3A 8B 4B B3 32 A7 |).CV:C.C.1:.K.2.|
00000130: 5A 25 28 4B 2C 57 29 B2 43 AB 31 00 43 09 08 00 |Z%(K,W).C.1.C...|
00000140: 89 31 35 00 55 09 09 00 8D 32 3A 8D 34 3A 8D 35 |.15.U....2:.4:.5|
00000150: 3A 8D 33 3A 8E 00 80 09 0A 00 99 44 24 42 31 24 |:.3:.......D$B1$|
00000160: 42 31 24 42 31 24 22 90 91 91 91 22 50 24 28 57 |B1$B1$"...."P$(W|
00000170: 29 22 20 54 4F 54 41 4C 3D 22 43 28 4C 29 3A 8E |)" TOTAL="C(L):.|
00000180: 00 AE 09 0B 00 99 C8 28 44 24 2C 37 AC 57 AA 32 |.......(D$,7.W.2|
00000190: AC 48 AA 31 29 22 12 1E 2A 22 3B 3A 8B 43 41 B1 |.H.1)"..*";:.CA.|
000001A0: 30 A7 99 22 57 49 4E 22 43 41 3A 89 31 34 00 C8 |0.."WIN"CA:.14..|
000001B0: 09 0C 00 8B 43 41 B3 30 A7 99 22 4C 4F 53 45 22 |....CA.0.."LOSE"|
000001C0: 3B AB 43 41 3A 89 31 34 00 D4 09 0D 00 99 22 45 |;.CA:.14......"E|
000001D0: 56 45 4E 22 00 E7 09 0E 00 4D 28 57 29 B2 4D 28 |VEN".....M(W).M(|
000001E0: 57 29 AA 43 41 3A 8E 00 18 0A 0F 00 8B 43 28 4C |W).CA:.......C(L|
000001F0: 29 B1 32 31 AF 41 28 4C 29 B1 30 A7 43 28 4C 29 |).21.A(L).0.C(L)|
00000200: B2 43 28 4C 29 AB 31 30 3A 41 28 4C 29 B2 41 28 |.C(L).10:A(L).A(|
00000210: 4C 29 AB 31 3A 89 31 35 00 1E 0A 10 00 8E 00 78 |L).1:.15.......x|
00000220: 0A 11 00 42 31 24 B2 22 20 20 20 20 20 20 20 20 |...B1$." |
00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 9D 94 20 | .. |
00000240: 1D 22 3A 44 24 B2 22 13 11 11 11 11 11 11 11 11 |.":D$.".........|
00000250: 11 11 11 11 11 11 11 11 11 11 11 22 3A 52 24 B2 |...........":R$.|
00000260: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000270: 1D 1D 1D 1D 1D 1D 1D 22 00 9A 0A 14 00 99 22 42 |......."......"B|
00000280: 55 53 49 4E 45 53 53 8D 20 20 20 20 4D 41 43 48 |USINESS. MACH|
00000290: 49 4E 45 53 2C 20 49 4E 43 2E 00 B4 0A 16 00 99 |INES, INC.......|
000002A0: 22 11 1C 31 20 4F 52 20 32 20 50 4C 41 59 45 52 |"..1 OR 2 PLAYER|
000002B0: 53 3A 22 3B 00 CE 0A 17 00 A1 41 24 3A 8B 41 24 |S:";......A$:.A$|
000002C0: B3 22 31 22 B0 41 24 B1 22 32 22 A7 32 33 00 1D |."1".A$."2".23..|
000002D0: 0B 18 00 50 B2 C5 28 41 24 29 3A 86 50 24 28 32 |...P..(A$):.P$(2|
000002E0: 29 2C 4D 28 50 29 2C 43 28 34 29 2C 42 28 50 AA |),M(P),C(4),B(P.|
000002F0: 32 29 2C 44 25 28 35 31 29 2C 43 24 28 31 32 29 |2),D%(51),C$(12)|
00000300: 2C 41 28 34 29 2C 5A 25 28 31 2C 34 29 3A 99 22 |,A(4),Z%(1,4):."|
00000310: 93 4E 41 4D 45 53 20 50 4C 45 41 53 45 00 5B 0B |.NAMES PLEASE.[.|
00000320: 19 00 81 4C B2 31 A4 50 3A 50 24 28 4C 29 B2 22 |...L.1.P:P$(L)."|
00000330: 50 4C 41 59 45 52 22 AA C7 28 4C AA 34 38 29 3A |PLAYER"..(L.48):|
00000340: 99 22 11 22 50 24 28 4C 29 3B 3A 85 50 24 28 4C |."."P$(L);:.P$(L|
00000350: 29 3A 4D 28 4C 29 B2 31 30 30 30 00 7C 0B 1A 00 |):M(L).1000.|...|
00000360: 8B C3 28 50 24 28 4C 29 29 B1 37 A7 50 24 28 4C |..(P$(L)).7.P$(L|
00000370: 29 B2 C8 28 50 24 28 4C 29 2C 37 29 00 C3 0B 1B |)..(P$(L),7)....|
00000380: 00 82 3A 50 24 28 30 29 B2 22 44 45 41 4C 45 52 |..:P$(0)."DEALER|
00000390: 22 3A 81 4C B2 30 A4 35 31 3A 44 25 28 4C 29 B2 |":.L.0.51:D%(L).|
000003A0: 4C 3A 82 3A 43 B2 35 30 3A 83 41 2C 32 2C 33 2C |L:.:C.50:.A,2,3,|
000003B0: 34 2C 35 2C 36 2C 37 2C 38 2C 39 2C 54 2C 4A 2C |4,5,6,7,8,9,T,J,|
000003C0: 51 2C 4B 00 D8 0B 1C 00 81 4C B2 30 A4 31 32 3A |Q,K......L.0.12:|
000003D0: 87 43 24 28 4C 29 3A 82 00 09 0C 1D 00 99 22 93 |.C$(L):.......".|
000003E0: 12 1E 22 3B 3A 81 4C B2 30 A4 31 38 3A 99 42 31 |..";:.L.0.18:.B1|
000003F0: 24 3B 3A 82 3A 99 22 12 1C 11 11 11 22 C8 28 42 |$;:.:.".....".(B|
00000400: 31 24 2C 32 33 29 22 20 13 00 35 0C 1E 00 99 22 |1$,23)" ..5...."|
00000410: 13 11 11 12 1E 44 45 41 4C 45 52 8D 8D 8D 8D 12 |.....DEALER.....|
00000420: 22 50 24 28 31 29 22 8D 8D 8D 8D 8D 8D 8D 12 22 |"P$(1)"........"|
00000430: 50 24 28 32 29 00 47 0C 1F 00 99 44 24 3B 3A 8B |P$(2).G....D$;:.|
00000440: 43 B3 33 35 A7 33 34 00 63 0C 20 00 99 42 31 24 |C.35.34.c. ..B1$|
00000450: 22 91 90 53 48 55 46 46 4C 49 4E 47 22 3A 99 22 |"..SHUFFLING":."|
00000460: 91 22 3B 00 A4 0C 21 00 81 4C B2 35 31 A4 31 A9 |.";...!..L.51.1.|
00000470: AB 31 3A 51 B2 B5 28 BB 28 31 29 AC 28 4C AA 31 |.1:Q..(.(1).(L.1|
00000480: 29 29 3A 52 B2 44 25 28 4C 29 3A 44 25 28 4C 29 |)):R.D%(L):D%(L)|
00000490: B2 44 25 28 51 29 3A 44 25 28 51 29 B2 52 3A 82 |.D%(Q):D%(Q).R:.|
000004A0: 3A 43 B2 30 00 C6 0C 22 00 99 42 31 24 22 91 90 |:C.0..."..B1$"..|
000004B0: 42 45 54 20 24 35 20 54 4F 20 24 35 30 30 22 3A |BET $5 TO $500":|
000004C0: 81 4C B2 31 A4 50 00 E3 0C 23 00 99 42 31 24 22 |.L.1.P...#..B1$"|
000004D0: 91 22 50 24 28 4C 29 22 20 48 41 53 20 24 22 4D |."P$(L)" HAS $"M|
000004E0: 28 4C 29 00 24 0D 24 00 99 42 31 24 22 91 42 45 |(L).$.$..B1$".BE|
000004F0: 54 1D 1D 05 35 9D 9D 9D 90 22 3B 3A 85 42 24 3A |T...5....";:.B$:|
00000500: 42 28 4C 29 B2 C5 28 42 24 29 3A 99 22 91 22 3B |B(L)..(B$):.".";|
00000510: 3A 8B 42 28 4C 29 B3 35 B0 42 28 4C 29 B1 35 30 |:.B(L).5.B(L).50|
00000520: 30 A7 33 36 00 62 0D 25 00 42 28 4C 29 B2 B5 28 |0.36.b.%.B(L)..(|
00000530: 42 28 4C 29 29 3A 41 28 4C 29 B2 30 3A 99 22 91 |B(L)):A(L).0:.".|
00000540: 22 3B 3A 82 3A 99 44 24 42 31 24 42 31 24 42 31 |";:.:.D$B1$B1$B1|
00000550: 24 3B 3A 81 4C B2 30 A4 34 3A 43 28 4C 29 B2 30 |$;:.L.0.4:C(L).0|
00000560: 3A 82 00 8E 0D 26 00 48 B2 30 3A 81 4B B2 30 A4 |:....&.H.0:.K.0.|
00000570: 31 3A 81 57 B2 30 A4 50 3A 4C B2 57 AA 32 AC 48 |1:.W.0.P:L.W.2.H|
00000580: 3A 8B 57 AA 4B B1 30 A7 8D 39 3A 89 34 30 00 AD |:.W.K.0..9:.40..|
00000590: 0D 27 00 8D 32 3A 8D 34 3A 8D 35 3A 99 22 9C A6 |.'..2:.4:.5:."..|
000005A0: A6 11 9D 9D A6 A6 11 9D 9D A6 A6 22 3B 00 D5 0D |...........";...|
000005B0: 28 00 82 3A 82 3A 99 44 24 3B 3A 81 57 B2 31 A4 |(..:.:.D$;:.W.1.|
000005C0: 50 3A 81 48 B2 30 A4 30 3A 4C B2 57 AA 32 AC 48 |P:.H.0.0:L.W.2.H|
000005D0: 3A 53 46 B2 30 00 19 0E 29 00 8D 31 30 3A 8B 43 |:SF.0...)..10:.C|
000005E0: 28 57 29 B2 32 31 A7 99 22 42 4C 41 43 4B 4A 41 |(W).21.."BLACKJA|
000005F0: 43 4B 21 22 3A 81 48 B2 30 A4 30 3A 43 41 B2 B5 |CK!":.H.0.0:CA..|
00000600: 28 42 28 57 29 AC 31 2E 35 29 3A 8D 31 31 3A 43 |(B(W).1.5):.11:C|
00000610: 28 57 29 B2 30 3A 89 36 33 00 4B 0E 2A 00 99 44 |(W).0:.63.K.*..D|
00000620: 24 22 11 22 42 31 24 42 31 24 22 91 91 4F 50 54 |$"."B1$B1$"..OPT|
00000630: 49 4F 4E 53 3A 8D 12 48 92 49 54 2F 12 53 92 54 |IONS:..H.IT/.S.T|
00000640: 41 59 2F 12 4F 92 54 48 45 52 22 00 63 0E 2C 00 |AY/.O.THER".c.,.|
00000650: 8D 37 36 3A 8B 41 24 B2 22 48 22 A7 4B B2 32 3A |.76:.A$."H".K.2:|
00000660: 89 35 39 00 72 0E 2D 00 8B 41 24 B2 22 53 22 A7 |.59.r.-..A$."S".|
00000670: 36 33 00 82 0E 2E 00 8B 41 24 B3 B1 22 4F 22 A7 |63......A$.."O".|
00000680: 34 34 00 C0 0E 2F 00 99 22 91 91 22 42 31 24 42 |44.../..".."B1$B|
00000690: 31 24 22 91 91 4F 50 54 49 4F 4E 53 3A 20 28 4F |1$"..OPTIONS: (O|
000006A0: 52 20 12 52 45 54 55 52 4E 92 29 8D 12 44 92 4F |R .RETURN.)..D.O|
000006B0: 55 42 4C 45 2F 12 47 92 49 56 45 20 55 50 22 3B |UBLE/.G.IVE UP";|
000006C0: 00 01 0F 30 00 43 30 B2 43 3A 43 B2 5A 25 28 30 |...0.C0.C:C.Z%(0|
000006D0: 2C 57 29 3A 8D 34 3A 43 42 B2 43 41 3A 43 B2 5A |,W):.4:CB.CA:C.Z|
000006E0: 25 28 31 2C 57 29 3A 8D 34 3A 8B 43 41 B2 43 42 |%(1,W):.4:.CA.CB|
000006F0: A7 99 22 2F 12 53 92 50 4C 49 54 22 3A 53 46 B2 |.."/.S.PLIT":SF.|
00000700: 31 00 21 0F 32 00 8D 37 36 3A 43 B2 43 30 3A 8B |1.!.2..76:C.C0:.|
00000710: 41 24 B2 C7 28 31 33 29 A7 53 46 B2 30 3A 89 34 |A$..(13).SF.0:.4|
00000720: 32 00 5A 0F 33 00 8B 41 24 B2 22 44 22 A7 4B B2 |2.Z.3..A$."D".K.|
00000730: 32 3A 42 28 4C 29 B2 42 28 4C 29 AC 32 3A 8D 39 |2:B(L).B(L).2:.9|
00000740: 3A 91 31 AB 28 43 28 57 29 B1 32 31 AF 41 28 57 |:.1.(C(W).21.A(W|
00000750: 29 B2 30 29 89 36 33 2C 35 36 00 83 0F 34 00 8B |).0).63,56...4..|
00000760: 41 24 B2 22 47 22 A7 43 41 B2 AB B5 28 42 28 57 |A$."G".CA...(B(W|
00000770: 29 AD 32 29 3A 43 28 57 29 B2 30 3A 8D 31 31 3A |).2):C(W).0:.11:|
00000780: 89 36 33 00 A1 0F 35 00 8B 28 41 24 B2 22 53 22 |.63...5..(A$."S"|
00000790: AF 53 46 B2 30 29 B0 41 24 B3 B1 22 53 22 A7 35 |.SF.0).A$.."S".5|
000007A0: 30 00 F6 0F 36 00 42 28 57 AA 32 29 B2 42 28 57 |0...6.B(W.2).B(W|
000007B0: 29 3A 41 28 57 29 B2 30 3A 41 28 57 AA 32 29 B2 |):A(W).0:A(W.2).|
000007C0: 30 3A 48 B2 30 3A 4B B2 30 3A 43 30 B2 43 3A 43 |0:H.0:K.0:C0.C:C|
000007D0: B2 5A 25 28 30 2C 57 29 3A 4C B2 57 AA 32 AC 48 |.Z%(0,W):L.W.2.H|
000007E0: 3A 43 28 4C 29 B2 30 3A 8D 39 3A 48 B2 31 3A 4C |:C(L).0:.9:H.1:L|
000007F0: B2 57 AA 32 AC 48 00 3F 10 37 00 43 28 4C 29 B2 |.W.2.H.?.7.C(L).|
00000800: 30 3A 43 B2 5A 25 28 31 2C 57 29 3A 8D 39 3A 43 |0:C.Z%(1,W):.9:C|
00000810: B2 43 30 3A 4B B2 31 3A 81 48 B2 30 A4 31 3A 4C |.C0:K.1:.H.0.1:L|
00000820: B2 57 AA 32 AC 48 3A 8D 39 3A 82 3A 81 48 B2 30 |.W.2.H:.9:.:.H.0|
00000830: A4 53 46 3A 4B B2 32 3A 4C B2 57 AA 32 AC 48 00 |.SF:K.2:L.W.2.H.|
00000840: 70 10 38 00 8D 31 30 3A 8B 43 28 4C 29 B1 32 31 |p.8..10:.C(L).21|
00000850: A7 99 22 42 55 53 54 22 3A 43 41 B2 AB 42 28 57 |.."BUST":CA..B(W|
00000860: 29 3A 8D 31 31 3A 43 28 4C 29 B2 30 3A 89 36 33 |):.11:C(L).0:.63|
00000870: 00 97 10 39 00 99 22 12 48 92 49 54 2F 12 53 92 |...9..".H.IT/.S.|
00000880: 54 41 59 22 3B 3A 8B 4B B2 32 A7 99 22 2F 12 44 |TAY";:.K.2.."/.D|
00000890: 92 4F 55 42 4C 45 22 00 9F 10 3A 00 8D 37 36 00 |.OUBLE"...:..76.|
000008A0: B8 10 3B 00 8B 41 24 B2 22 48 22 A7 8D 39 3A 4B |..;..A$."H"..9:K|
000008B0: B2 4B AA 31 3A 89 35 36 00 C7 10 3C 00 8B 41 24 |.K.1:.56...<..A$|
000008C0: B2 22 53 22 A7 36 33 00 E5 10 3D 00 8B 41 24 B3 |."S".63...=..A$.|
000008D0: B1 22 44 22 B0 28 41 24 B2 22 44 22 AF 4B B3 B1 |."D".(A$."D".K..|
000008E0: 32 29 A7 35 38 00 1D 11 3E 00 4B B2 32 3A 8D 39 |2).58...>.K.2:.9|
000008F0: 3A 42 28 4C 29 B2 42 28 4C 29 AC 32 3A 4B B2 33 |:B(L).B(L).2:K.3|
00000900: 3A 8B 43 28 4C 29 B1 32 31 A7 43 41 B2 AB 42 28 |:.C(L).21.CA..B(|
00000910: 4C 29 3A 8D 31 31 3A 43 28 4C 29 B2 30 00 66 11 |L):.11:C(L).0.f.|
00000920: 3F 00 82 48 2C 57 3A 81 4C B2 31 A4 34 3A 8B 43 |?..H,W:.L.1.4:.C|
00000930: 28 4C 29 B2 30 A7 82 3A 4B B2 30 3A 57 B2 30 3A |(L).0..:K.0:W.0:|
00000940: 48 B2 30 3A 43 30 B2 43 3A 43 B2 5A 25 28 30 2C |H.0:C0.C:C.Z%(0,|
00000950: 30 29 3A 4C B2 30 3A 8D 39 3A 43 B2 43 30 3A 8D |0):L.0:.9:C.C0:.|
00000960: 37 35 3A 89 32 39 00 B0 11 40 00 4C B2 30 3A 4B |75:.29...@.L.0:K|
00000970: B2 30 3A 57 B2 30 3A 48 B2 30 3A 43 30 B2 43 3A |.0:W.0:H.0:C0.C:|
00000980: 43 B2 5A 25 28 30 2C 30 29 3A 41 28 30 29 B2 30 |C.Z%(0,0):A(0).0|
00000990: 3A 43 28 30 29 B2 30 3A 8D 39 3A 4B B2 31 3A 43 |:C(0).0:.9:K.1:C|
000009A0: B2 5A 25 28 31 2C 30 29 3A 8D 39 3A 43 B2 43 30 |.Z%(1,0):.9:C.C0|
000009B0: 00 CE 11 41 00 8D 31 30 3A 8B 43 28 30 29 B3 31 |...A..10:.C(0).1|
000009C0: 37 A7 4B B2 4B AA 31 3A 8D 39 3A 89 36 35 00 DE |7.K.K.1:.9:.65..|
000009D0: 11 42 00 8B 43 28 30 29 B3 32 32 A7 37 30 00 0A |.B..C(0).22.70..|
000009E0: 12 43 00 99 22 44 45 41 4C 45 52 20 42 55 53 54 |.C.."DEALER BUST|
000009F0: 45 44 21 22 3A 81 57 B2 31 A4 50 3A 81 48 B2 30 |ED!":.W.1.P:.H.0|
00000A00: A4 31 3A 4C B2 57 AA 32 AC 48 00 2B 12 44 00 8B |.1:L.W.2.H.+.D..|
00000A10: 43 28 4C 29 B1 30 A7 8B 43 28 4C 29 B3 32 32 A7 |C(L).0..C(L).22.|
00000A20: 43 41 B2 42 28 57 29 3A 8D 31 31 00 3C 12 45 00 |CA.B(W):.11.<.E.|
00000A30: 82 48 2C 57 3A 8D 37 35 3A 89 32 39 00 61 12 46 |.H,W:.75:.29.a.F|
00000A40: 00 81 57 B2 31 A4 50 3A 81 48 B2 30 A4 31 3A 4C |..W.1.P:.H.0.1:L|
00000A50: B2 57 AA 32 AC 48 3A 8B 43 28 4C 29 B2 30 A7 37 |.W.2.H:.C(L).0.7|
00000A60: 34 00 80 12 47 00 8B 43 28 4C 29 B1 43 28 30 29 |4...G..C(L).C(0)|
00000A70: A7 43 41 B2 42 28 4C 29 3A 8D 31 31 3A 89 37 34 |.CA.B(L):.11:.74|
00000A80: 00 A0 12 48 00 8B 43 28 30 29 B1 43 28 4C 29 A7 |...H..C(0).C(L).|
00000A90: 43 41 B2 AB 42 28 4C 29 3A 8D 31 31 3A 89 37 34 |CA..B(L):.11:.74|
00000AA0: 00 AD 12 49 00 43 41 B2 30 3A 8D 31 31 00 BE 12 |...I.CA.0:.11...|
00000AB0: 4A 00 82 48 2C 57 3A 8D 37 35 3A 89 32 39 00 D9 |J..H,W:.75:.29..|
00000AC0: 12 4B 00 99 44 24 22 11 11 11 12 1C 48 49 54 20 |.K..D$".....HIT |
00000AD0: 41 4E 59 20 4B 45 59 22 3B 00 EB 12 4C 00 A1 41 |ANY KEY";...L..A|
00000AE0: 24 3A 8B 41 24 B2 22 22 A7 37 36 00 F1 12 4D 00 |$:.A$."".76...M.|
00000AF0: 8E 00 00 00 |.... |
..)...L..(.TI):.53281,1:.53280,1:.".":.1
7.Y....H(D$,3.H.4.(W.1).11.(W.2).2)H(R$,
7.2.K);:.......C$(CA)".."J("ZSAX",SU,1)"
...........";:..F...SU..(D%(C).13..01).1
:CA..(13.(D%(C).13..(D%(C).13)..01)):...
....J("..",1.(D%(C).26),1);:CV.CA.1:.CV.
9.CV.10......CV.1.CV.11:A(L).A(L).1.;...
C(L).C(L).CV:C.C.1:.K.2.Z%(K,W).C.1.C...
.15.U....2:.4:.5:.3:.......D$B1$B1$B1$".
..."P$(W)" TOTAL="C(L):.......H(D$,7.W.2
.H.1)"..*";:.CA.0.."WIN"CA:.14.H....CA.0
.."LOSE";.CA:.14.T...."EVEN".....M(W).M(
W).CA:.......C(L).21.A(L).0.C(L).C(L).10
:A(L).A(L).1:.15.......X...B1$."
.. .":D$.".................
...":R$."......................"......"B
USINESS. MACHINES, INC......."..1 OR
2 PLAYERS:";.N....A$:.A$."1".A$."2".23..
...P.E(A$):.P$(2),M(P),C(4),B(P.2),D%(51
),C$(12),A(4),Z%(1,4):.".NAMES PLEASE.[.
...L.1.P:P$(L)."PLAYER".G(L.48):."."P$(L
);:.P$(L):M(L).1000.|....C(P$(L)).7.P$(L
).H(P$(L),7).C....:P$(0)."DEALER":.L.0.5
1:D%(L).L:.:C.50:.A,2,3,4,5,6,7,8,9,T,J,
Q,K.X....L.0.12:.C$(L):......."...";:.L.
0.18:.B1$;:.:."....."H(B1$,23)" ..5...."
.....DEALER....."P$(1)"........"P$(2).G.
...D$;:.C.35.34.C. ..B1$"..SHUFFLING":."
.";...!..L.51.1..1:Q..(.(1).(L.1)):R.D%(
L):D%(L).D%(Q):D%(Q).R:.:C.0.F."..B1$"..
BET $5 TO $500":.L.1.P...#..B1$"."P$(L)"
HAS $"M(L).$.$..B1$".BET...5....";:.B$:
B(L).E(B$):.".";:.B(L).5.B(L).500.36.B.%
.B(L)..(B(L)):A(L).0:.".";:.:.D$B1$B1$B1
$;:.L.0.4:C(L).0:....&.H.0:.K.0.1:.W.0.P
:L.W.2.H:.W.K.0..9:.40...'..2:.4:.5:."..
...........";.U.(..:.:.D$;:.W.1.P:.H.0.0
:L.W.2.H:SF.0...)..10:.C(W).21.."BLACKJA
CK!":.H.0.0:CA..(B(W).1.5):.11:C(W).0:.6
3.K.*..D$"."B1$B1$"..OPTIONS:..H.IT/.S.T
AY/.O.THER".C.,..76:.A$."H".K.2:.59.R.-.
.A$."S".63......A$.."O".44.../..".."B1$B
1$"..OPTIONS: (OR .RETURN.)..D.OUBLE/.G.
IVE UP";...0.C0.C:C.Z%(0,W):.4:CB.CA:C.Z
%(1,W):.4:.CA.CB.."/.S.PLIT":SF.1.!.2..7
6:C.C0:.A$.G(13).SF.0:.42.Z.3..A$."D".K.
2:B(L).B(L).2:.9:.1.(C(W).21.A(W).0).63,
56...4..A$."G".CA...(B(W).2):C(W).0:.11:
.63...5..(A$."S".SF.0).A$.."S".50...6.B(
W.2).B(W):A(W).0:A(W.2).0:H.0:K.0:C0.C:C
.Z%(0,W):L.W.2.H:C(L).0:.9:H.1:L.W.2.H.?
.7.C(L).0:C.Z%(1,W):.9:C.C0:K.1:.H.0.1:L
.W.2.H:.9:.:.H.0.SF:K.2:L.W.2.H.P.8..10:
.C(L).21.."BUST":CA..B(W):.11:C(L).0:.63
...9..".H.IT/.S.TAY";:.K.2.."/.D.OUBLE".
..:..76...;..A$."H"..9:K.K.1:.56.G.<..A$
."S".63...=..A$.."D".(A$."D".K..2).58...
>.K.2:.9:B(L).B(L).2:K.3:.C(L).21.CA..B(
L):.11:C(L).0.F.?..H,W:.L.1.4:.C(L).0..:
K.0:W.0:H.0:C0.C:C.Z%(0,0):L.0:.9:C.C0:.
75:.29...@.L.0:K.0:W.0:H.0:C0.C:C.Z%(0,0
):A(0).0:C(0).0:.9:K.1:C.Z%(1,0):.9:C.C0
.N.A..10:.C(0).17.K.K.1:.9:.65...B..C(0)
.22.70...C.."DEALER BUSTED!":.W.1.P:.H.0
.1:L.W.2.H.+.D..C(L).0..C(L).22.CA.B(W):
.11.<.E..H,W:.75:.29.A.F..W.1.P:.H.0.1:L
.W.2.H:.C(L).0.74...G..C(L).C(0).CA.B(L)
:.11:.74. .H..C(0).C(L).CA..B(L):.11:.74
...I.CA.0:.11...J..H,W:.75:.29.Y.K..D$".
....HIT ANY KEY";...L..A$:.A$."".76...M.
....
> CLICK IMAGE PREVIEW FOR FULL MODAL