BLACKJACK
FILE INFORMATION
FILENAME(S): BLACKJACK
FILE TYPE(S): PRG
FILE SIZE: 4.4K
FIRST SEEN: 2025-11-30 20:22:11
APPEARS ON: 1 disk(s)
FILE HASH
924560c18eead427548d42a1d77ed0d67bdda97564b6c3e7327a6d3ec28c5167
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| B0RGE KLAUSEN | BLACKJACK | PRG | Curtcool, Misc | 30 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 35 08 64 00 86 43 28 35 31 29 2C 50 24 28 |..5.d..C(51),P$(| 00000010: 31 32 29 2C 56 28 31 32 29 2C 53 24 28 33 29 2C |12),V(12),S$(3),| 00000020: 59 28 35 29 2C 4D 28 35 29 2C 42 24 28 34 29 2C |Y(5),M(5),B$(4),| 00000030: 4B 24 28 35 29 00 71 08 6E 00 46 24 B2 22 D5 C0 |K$(5).q.n.F$."..| 00000040: C0 C0 C9 9D 11 DD 9D 11 DD 9D 11 DD 9D 11 DD 9D |................| 00000050: 11 DD 9D 11 CB 9D 9D C0 9D 9D C0 9D 9D C0 9D 9D |................| 00000060: CA 9D 91 DD 9D 91 DD 9D 91 DD 9D 91 DD 9D 91 DD |................| 00000070: 22 00 94 08 78 00 83 22 41 20 20 22 2C 22 20 20 |"...x.."A "," | 00000080: 20 22 2C 22 20 58 20 22 2C 22 20 20 20 22 2C 22 | "," X "," ","| 00000090: 20 20 41 22 00 B7 08 82 00 83 22 32 20 20 22 2C | A"......"2 ",| 000000A0: 22 20 58 20 22 2C 22 20 20 20 22 2C 22 20 58 20 |" X "," "," X | 000000B0: 22 2C 22 20 20 32 22 00 DA 08 8C 00 83 22 33 20 |"," 2"......"3 | 000000C0: 20 22 2C 22 20 58 20 22 2C 22 20 58 20 22 2C 22 | "," X "," X ","| 000000D0: 20 58 20 22 2C 22 20 20 33 22 00 FD 08 96 00 83 | X "," 3"......| 000000E0: 22 34 20 20 22 2C 22 58 20 58 22 2C 22 20 20 20 |"4 ","X X"," | 000000F0: 22 2C 22 58 20 58 22 2C 22 20 20 34 22 00 20 09 |","X X"," 4". .| 00000100: A0 00 83 22 35 20 20 22 2C 22 58 20 58 22 2C 22 |..."5 ","X X","| 00000110: 20 58 20 22 2C 22 58 20 58 22 2C 22 20 20 35 22 | X ","X X"," 5"| 00000120: 00 43 09 AA 00 83 22 36 20 20 22 2C 22 58 20 58 |.C...."6 ","X X| 00000130: 22 2C 22 58 20 58 22 2C 22 58 20 58 22 2C 22 20 |","X X","X X"," | 00000140: 20 36 22 00 66 09 B4 00 83 22 37 20 20 22 2C 22 | 6".f...."7 ","| 00000150: 58 20 58 22 2C 22 58 58 58 22 2C 22 58 20 58 22 |X X","XXX","X X"| 00000160: 2C 22 20 20 37 22 00 89 09 BE 00 83 22 38 20 20 |," 7"......"8 | 00000170: 22 2C 22 58 58 58 22 2C 22 58 20 58 22 2C 22 58 |","XXX","X X","X| 00000180: 58 58 22 2C 22 20 20 38 22 00 AC 09 C8 00 83 22 |XX"," 8"......"| 00000190: 39 20 58 22 2C 22 58 20 58 22 2C 22 58 58 58 22 |9 X","X X","XXX"| 000001A0: 2C 22 58 20 58 22 2C 22 58 20 39 22 00 CF 09 D2 |,"X X","X 9"....| 000001B0: 00 83 22 31 30 58 22 2C 22 58 58 58 22 2C 22 58 |.."10X","XXX","X| 000001C0: 20 58 22 2C 22 58 58 58 22 2C 22 58 31 30 22 00 | X","XXX","X10".| 000001D0: F2 09 DC 00 83 22 4A 20 58 22 2C 22 41 20 20 22 |....."J X","A "| 000001E0: 2C 22 43 20 20 22 2C 22 4B 20 20 22 2C 22 58 20 |,"C ","K ","X | 000001F0: 4A 22 00 15 0A E6 00 83 22 51 20 58 22 2C 22 55 |J"......"Q X","U| 00000200: 20 20 22 2C 22 45 20 20 22 2C 22 45 20 20 22 2C | ","E ","E ",| 00000210: 22 4E 20 51 22 00 38 0A F0 00 83 22 4B 20 58 22 |"N Q".8...."K X"| 00000220: 2C 22 49 20 20 22 2C 22 4E 20 20 22 2C 22 47 20 |,"I ","N ","G | 00000230: 20 22 2C 22 58 20 4B 22 00 6F 0A FA 00 81 4A B2 | ","X K".o....J.| 00000240: 30 A4 31 32 3A 87 50 24 28 4A 29 3A 81 4B B2 30 |0.12:.P$(J):.K.0| 00000250: A4 33 3A 87 50 24 3A 50 24 28 4A 29 B2 50 24 28 |.3:.P$:P$(J).P$(| 00000260: 4A 29 AA 22 11 9D 9D 9D 22 AA 50 24 3A 82 4B 00 |J)."....".P$:.K.| 00000270: 8B 0A 04 01 50 24 28 4A 29 B2 50 24 28 4A 29 AA |....P$(J).P$(J).| 00000280: 22 1D 91 91 91 91 91 22 3A 82 4A 00 A5 0A 0E 01 |"......":.J.....| 00000290: 83 20 22 C1 22 2C 22 D8 22 2C 22 1C D3 90 22 2C |. ".",".","...",| 000002A0: 22 1C DA 90 22 00 BA 0A 18 01 81 4A B2 30 A4 33 |"..."......J.0.3| 000002B0: 3A 87 53 24 28 4A 29 3A 82 4A 00 DE 0A 22 01 83 |:.S$(J):.J..."..| 000002C0: 20 31 2C 32 2C 33 2C 34 2C 35 2C 36 2C 37 2C 38 | 1,2,3,4,5,6,7,8| 000002D0: 2C 39 2C 31 30 2C 31 30 2C 31 30 2C 31 30 00 F3 |,9,10,10,10,10..| 000002E0: 0A 2C 01 81 4A B2 30 A4 31 32 3A 87 56 28 4A 29 |.,..J.0.12:.V(J)| 000002F0: 3A 82 4A 00 10 0B 36 01 56 24 B2 22 13 11 11 11 |:.J...6.V$."....| 00000300: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."| 00000310: 00 3F 0B 40 01 48 24 B2 22 1D 1D 1D 1D 1D 1D 1D |.?.@.H$.".......| 00000320: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000330: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 |..............".| 00000340: 68 0B 4A 01 4E 24 B2 22 20 20 20 9D 9D 9D 11 20 |h.J.N$." .... | 00000350: 20 20 9D 9D 9D 11 20 20 20 9D 9D 9D 11 20 20 20 | .... .... | 00000360: 9D 9D 9D 11 20 20 20 22 00 B5 0B 54 01 83 20 22 |.... "...T.. "| 00000370: 49 27 4C 4C 20 48 41 56 45 20 4F 4E 45 2C 54 4F |I'LL HAVE ONE,TO| 00000380: 4F 22 2C 22 54 48 41 54 20 43 41 4C 4C 53 20 46 |O","THAT CALLS F| 00000390: 4F 52 20 41 20 44 52 49 4E 4B 22 2C 22 4D 41 59 |OR A DRINK","MAY| 000003A0: 42 45 20 49 27 4C 4C 20 48 41 56 45 20 41 4E 4F |BE I'LL HAVE ANO| 000003B0: 54 48 45 52 22 00 EE 0B 5E 01 83 20 22 49 27 4C |THER"...^.. "I'L| 000003C0: 4C 20 4A 55 53 54 20 48 41 56 45 20 41 20 53 4E |L JUST HAVE A SN| 000003D0: 4F 52 54 20 48 45 52 45 22 2C 22 41 4E 4F 54 48 |ORT HERE","ANOTH| 000003E0: 45 52 20 4C 49 27 4C 20 44 52 49 4E 4B 22 00 03 |ER LI'L DRINK"..| 000003F0: 0C 68 01 81 4A B2 30 A4 34 3A 87 42 24 28 4A 29 |.h..J.0.4:.B$(J)| 00000400: 3A 82 4A 00 37 0C 72 01 83 20 22 22 2C 22 2C 20 |:.J.7.r.. "",", | 00000410: 46 52 49 45 4E 44 22 2C 22 2C 20 50 41 4C 22 2C |FRIEND",", PAL",| 00000420: 22 2C 20 42 55 44 44 59 22 2C 22 2C 20 4F 4C 44 |", BUDDY",", OLD| 00000430: 20 42 55 44 44 59 22 00 4C 0C 7C 01 81 4A B2 31 | BUDDY".L.|..J.1| 00000440: A4 35 3A 87 4B 24 28 4A 29 3A 82 4A 00 55 0C 86 |.5:.K$(J):.J.U..| 00000450: 01 54 B2 54 49 00 74 0C 90 01 58 B2 BB 28 AB 54 |.T.TI.t...X..(.T| 00000460: 29 3A 54 B2 54 AD 31 30 30 30 3A 8B 54 B1 B2 31 |):T.T.1000:.T..1| 00000470: 89 34 30 30 00 A5 0C 9A 01 99 22 93 11 20 42 55 |.400......".. BU| 00000480: 54 54 45 52 46 49 45 4C 44 20 53 4F 43 49 41 4C |TTERFIELD SOCIAL| 00000490: 20 26 20 52 45 43 52 45 41 54 49 4F 4E 41 4C 20 | & RECREATIONAL | 000004A0: 43 4C 55 42 22 00 CA 0C A4 01 85 22 11 48 4F 57 |CLUB"......".HOW| 000004B0: 20 4D 55 43 48 20 4D 4F 4E 45 59 20 44 4F 20 59 | MUCH MONEY DO Y| 000004C0: 4F 55 20 48 41 56 45 22 3B 46 00 EE 0C AE 01 8B |OU HAVE";F......| 000004D0: 46 B3 31 30 30 A7 99 22 11 53 43 52 41 4D 2C 20 |F.100..".SCRAM, | 000004E0: 43 48 45 41 50 53 4B 41 54 45 21 22 3A 80 00 FE |CHEAPSKATE!":...| 000004F0: 0C B8 01 4D 31 B2 31 3A 4B 24 B2 22 23 22 00 18 |...M1.1:K$."#"..| 00000500: 0D C2 01 4D 31 B2 4D 31 AC 31 30 3A 8B 46 AD 4D |...M1.M1.10:.F.M| 00000510: 31 B1 35 30 89 34 35 30 00 30 0D CC 01 46 31 B2 |1.50.450.0...F1.| 00000520: B5 28 31 30 AC BB 28 31 29 AA 31 32 29 AC 4D 31 |.(10..(1).12).M1| 00000530: 00 5D 0D D6 01 8B 46 31 B3 46 A7 99 22 4D 45 4D |.]....F1.F.."MEM| 00000540: 42 45 52 53 48 49 50 20 46 45 45 53 20 41 52 45 |BERSHIP FEES ARE| 00000550: 20 24 22 3B 46 AB 46 31 3A 46 B2 46 31 00 7E 0D | $";F.F1:F.F1.~.| 00000560: E0 01 99 22 11 4D 49 4E 49 4D 55 4D 20 42 45 54 |...".MINIMUM BET| 00000570: 20 49 53 20 24 22 3B 4D 31 3A 46 31 B2 46 00 C7 | IS $";M1:F1.F..| 00000580: 0D EA 01 99 22 11 44 52 49 4E 4B 53 20 41 52 45 |....".DRINKS ARE| 00000590: 20 4F 4E 20 54 48 45 20 48 4F 55 53 45 2D 2D 22 | ON THE HOUSE--"| 000005A0: 3A 99 22 50 4F 55 52 20 59 4F 55 52 53 45 4C 46 |:."POUR YOURSELF| 000005B0: 20 4F 4E 45 20 57 48 49 4C 45 20 49 20 53 48 55 | ONE WHILE I SHU| 000005C0: 46 46 4C 45 2E 11 22 00 DE 0D F4 01 8B BB 28 31 |FFLE..".......(1| 000005D0: 29 AC 35 B3 44 31 AC 44 32 89 31 31 30 30 00 ED |).5.D1.D2.1100..| 000005E0: 0D FE 01 8B 44 31 B2 35 89 31 30 32 30 00 10 0E |....D1.5.1020...| 000005F0: 08 02 99 42 24 28 44 31 29 3A 99 22 53 48 55 46 |...B$(D1):."SHUF| 00000600: 46 4C 49 4E 47 2E 2E 22 3A 44 31 B2 44 31 AA 31 |FLING..":D1.D1.1| 00000610: 00 26 0E 12 02 81 4A B2 30 A4 35 31 3A 43 28 4A |.&....J.0.51:C(J| 00000620: 29 B2 4A 3A 82 4A 00 61 0E 1C 02 81 4A B2 30 A4 |).J:.J.a....J.0.| 00000630: 35 31 3A 53 B2 B5 28 BB 28 31 29 AC 35 32 29 3A |51:S..(.(1).52):| 00000640: 53 31 B2 43 28 4A 29 3A 43 28 4A 29 B2 43 28 53 |S1.C(J):C(J).C(S| 00000650: 29 3A 43 28 53 29 B2 53 31 3A 82 4A 3A 44 B2 35 |):C(S).S1:.J:D.5| 00000660: 31 00 6E 0E 26 02 8B 44 B3 39 89 35 30 30 00 7D |1.n.&..D.9.500.}| 00000670: 0E 30 02 8B 46 B3 4D 31 89 31 31 39 30 00 9C 0E |.0..F.M1.1190...| 00000680: 3A 02 8B C6 28 4B 24 29 B3 B1 33 33 AF BB 28 31 |:...(K$)..33..(1| 00000690: 29 B1 2E 37 A7 87 4B 24 3A 99 4B 24 00 D0 0E 3F |)..7..K$:.K$...?| 000006A0: 02 99 22 59 4F 55 20 48 41 56 45 20 24 22 3B 46 |.."YOU HAVE $";F| 000006B0: 3B 22 3A 59 4F 55 52 20 42 45 54 22 3B 4B 24 28 |;":YOUR BET";K$(| 000006C0: 44 31 29 3B 3A 85 42 3A 8B 42 B1 46 89 35 37 30 |D1);:.B:.B.F.570| 000006D0: 00 DE 0E 44 02 8B 42 B2 30 89 31 32 30 30 00 05 |...D..B.0.1200..| 000006E0: 0F 4E 02 8B 42 B3 4D 31 A7 99 22 4D 49 4E 49 4D |.N..B.M1.."MINIM| 000006F0: 55 4D 20 42 45 54 20 49 53 20 24 22 3B 4D 31 3B |UM BET IS $";M1;| 00000700: 3A 89 35 37 30 00 13 0F 58 02 97 20 35 33 32 38 |:.570...X.. 5328| 00000710: 31 2C 35 00 43 0F 5D 02 99 22 90 93 22 3A 4D B2 |1,5.C.].."..":M.| 00000720: 30 3A 59 B2 30 3A 8D 38 35 30 3A 8D 38 36 30 3A |0:Y.0:.850:.860:| 00000730: 8D 39 34 30 3A 8D 38 34 30 3A 8D 38 36 30 3A 8D |.940:.840:.860:.| 00000740: 39 34 30 00 5C 0F 62 02 8D 38 35 30 3A 8D 38 36 |940.\.b..850:.86| 00000750: 30 3A 43 24 B2 4E 24 3A 8D 39 34 30 00 6F 0F 6C |0:C$.N$:.940.o.l| 00000760: 02 8D 38 34 30 3A 8D 38 36 30 3A 8D 39 34 30 00 |..840:.860:.940.| 00000770: 91 0F 76 02 41 B2 30 3A 54 B2 30 3A 81 4A B2 31 |..v.A.0:T.0:.J.1| 00000780: A4 59 3A 43 B2 59 28 4A 29 3A 8D 38 36 30 3A 82 |.Y:C.Y(J):.860:.| 00000790: 4A 00 A8 0F 80 02 54 31 B2 54 AA 41 3A 8B 54 31 |J.....T1.T.A:.T1| 000007A0: B1 32 31 A7 54 31 B2 54 00 D6 0F 8A 02 99 22 13 |.21.T1.T......".| 000007B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000007C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000007D0: 20 20 20 20 20 22 00 F3 0F 94 02 99 22 13 59 4F | "......".YO| 000007E0: 55 52 20 54 4F 54 41 4C 3D 22 3B 54 31 3B 22 9D |UR TOTAL=";T1;".| 000007F0: 20 22 3B 00 0F 10 9E 02 8B 54 31 B1 32 31 A7 99 | ";......T1.21..| 00000800: 22 2A 42 55 53 54 45 44 2A 22 3A 89 38 33 30 00 |"*BUSTED*":.830.| 00000810: 2D 10 A8 02 8B 59 B2 35 A7 99 22 2A 35 2D 43 41 |-....Y.5.."*5-CA| 00000820: 52 44 20 57 49 4E 2A 22 3A 89 38 31 30 00 46 10 |RD WIN*":.810.F.| 00000830: B2 02 85 22 2E 2E 48 49 54 20 4F 52 20 53 54 41 |..."..HIT OR STA| 00000840: 4E 44 22 3B 5A 24 00 68 10 BC 02 8B C6 28 5A 24 |ND";Z$.h.....(Z$| 00000850: 29 B3 38 33 A7 8D 38 34 30 3A 8D 38 36 30 3A 8D |).83..840:.860:.| 00000860: 39 34 30 3A 89 36 34 30 00 94 10 C6 02 41 B2 30 |940:.640.....A.0| 00000870: 3A 54 B2 30 3A 58 31 B2 39 3A 81 58 B2 31 A4 4D |:T.0:X1.9:.X.1.M| 00000880: 3A 43 B2 4D 28 58 29 3A 8D 38 36 30 3A 82 58 3A |:C.M(X):.860:.X:| 00000890: 8D 39 34 30 00 AB 10 D0 02 54 32 B2 54 AA 41 3A |.940.....T2.T.A:| 000008A0: 8B 54 32 B1 32 31 A7 54 32 B2 54 00 CE 10 DA 02 |.T2.21.T2.T.....| 000008B0: 99 C8 28 56 24 2C 31 37 29 3B 22 4D 59 20 54 4F |..(V$,17);"MY TO| 000008C0: 54 41 4C 3D 22 3B 54 32 3B 22 9D 20 22 3B 00 EA |TAL=";T2;". ";..| 000008D0: 10 E4 02 8B 54 32 B1 32 31 A7 99 22 2A 42 55 53 |....T2.21.."*BUS| 000008E0: 54 45 44 2A 22 3A 89 38 31 30 00 08 11 EE 02 8B |TED*":.810......| 000008F0: 4D B2 35 A7 99 22 2A 35 2D 43 41 52 44 20 57 49 |M.5.."*5-CARD WI| 00000900: 4E 2A 22 3A 89 38 33 30 00 1C 11 F8 02 8B 54 B1 |N*":.830......T.| 00000910: 31 35 B0 54 32 B1 31 37 89 37 38 30 00 34 11 02 |15.T2.17.780.4..| 00000920: 03 8D 38 35 30 3A 8D 38 36 30 3A 8D 39 34 30 3A |..850:.860:.940:| 00000930: 89 37 32 30 00 43 11 0C 03 8B 54 32 B1 54 31 89 |.720.C....T2.T1.| 00000940: 38 33 30 00 52 11 16 03 8B 54 31 B1 54 32 89 38 |830.R....T1.T2.8| 00000950: 31 30 00 6A 11 20 03 99 56 24 3B 22 20 4E 4F 20 |10.j. ..V$;" NO | 00000960: 57 49 4E 20 22 3A 89 35 35 30 00 96 11 2A 03 99 |WIN ":.550...*..| 00000970: 56 24 3B 22 20 59 4F 55 20 57 49 4E 20 22 3A 46 |V$;" YOU WIN ":F| 00000980: B2 46 AA 42 3A 57 31 B2 57 31 AA 31 3A 8B 57 31 |.F.B:W1.W1.1:.W1| 00000990: B2 33 89 39 35 30 00 9F 11 34 03 89 35 35 30 00 |.3.950...4..550.| 000009A0: C0 11 3E 03 99 56 24 3B 22 49 20 57 49 4E 22 3A |..>..V$;"I WIN":| 000009B0: 46 B2 46 AB 42 3A 57 31 B2 57 32 3A 89 35 35 30 |F.F.B:W1.W2:.550| 000009C0: 00 E9 11 48 03 59 B2 59 AA 31 3A 58 B2 59 3A 58 |...H.Y.Y.1:X.Y:X| 000009D0: 31 B2 32 3A 43 B2 43 28 44 29 3A 44 B2 44 AB 31 |1.2:C.C(D):D.D.1| 000009E0: 3A 59 28 59 29 B2 43 3A 8E 00 12 12 52 03 4D B2 |:Y(Y).C:....R.M.| 000009F0: 4D AA 31 3A 58 B2 4D 3A 58 31 B2 39 3A 43 B2 43 |M.1:X.M:X1.9:C.C| 00000A00: 28 44 29 3A 44 B2 44 AB 31 3A 4D 28 4D 29 B2 43 |(D):D.D.1:M(M).C| 00000A10: 3A 8E 00 30 12 5C 03 56 B2 B5 28 43 AD 34 29 3A |:..0.\.V..(C.4):| 00000A20: 53 B2 43 AB 56 AC 34 3A 53 24 B2 53 24 28 53 29 |S.C.V.4:S$.S$(S)| 00000A30: 00 4E 12 66 03 50 24 B2 50 24 28 56 29 3A 43 24 |.N.f.P$.P$(V):C$| 00000A40: B2 22 22 3A 81 4B B2 31 A4 C3 28 50 24 29 00 6D |."":.K.1..(P$).m| 00000A50: 12 70 03 4D 24 B2 CA 28 50 24 2C 4B 2C 31 29 3A |.p.M$..(P$,K,1):| 00000A60: 8B 4D 24 B2 22 58 22 A7 4D 24 B2 53 24 00 90 12 |.M$."X".M$.S$...| 00000A70: 7A 03 43 24 B2 43 24 AA 4D 24 3A 82 4B 3A 54 B2 |z.C$.C$.M$:.K:T.| 00000A80: 54 AA 56 28 56 29 3A 8B 56 B2 30 A7 41 B2 31 30 |T.V(V):.V.0.A.10| 00000A90: 00 C6 12 84 03 48 B2 B5 28 58 AC 35 AA BB 28 31 |.....H..(X.5..(1| 00000AA0: 29 AC 44 31 AB 44 31 AD 32 AA 2E 35 29 3A 56 31 |).D1.D1.2..5):V1| 00000AB0: B2 58 31 AA B5 28 BB 28 31 29 AC 44 31 AB 44 31 |.X1..(.(1).D1.D1| 00000AC0: AD 32 AA 2E 35 29 00 DA 12 8E 03 8B 58 B2 32 A7 |.2..5)......X.2.| 00000AD0: 48 B2 31 30 3A 56 31 B2 58 31 00 E9 12 98 03 8B |H.10:V1.X1......| 00000AE0: 56 31 B3 32 A7 56 31 B2 32 00 EF 12 A2 03 8E 00 |V1.2.V1.2.......| 00000AF0: 0D 13 AC 03 99 C8 28 56 24 2C 56 31 29 3B C8 28 |......(V$,V1);.(| 00000B00: 48 24 2C 48 29 3B 46 24 3B 43 24 3A 8E 00 2B 13 |H$,H);F$;C$:..+.| 00000B10: B6 03 99 22 D3 48 49 2E 2E 4D 59 20 4E 41 4D 45 |...".HI..MY NAME| 00000B20: 20 49 53 20 54 4F 4F 54 53 D3 22 00 49 13 C0 03 | IS TOOTS.".I...| 00000B30: 99 22 D3 53 55 52 45 20 4C 49 4B 45 20 59 4F 55 |.".SURE LIKE YOU| 00000B40: 52 20 53 54 59 4C 45 D3 22 00 75 13 CA 03 99 22 |R STYLE.".u...."| 00000B50: D3 43 4F 55 4C 44 4E 27 54 20 48 45 4C 50 20 4E |.COULDN'T HELP N| 00000B60: 4F 54 49 43 49 4E 47 20 59 4F 55 52 20 46 4C 41 |OTICING YOUR FLA| 00000B70: 53 48 59 D3 22 00 9A 13 D4 03 99 22 D3 50 4C 41 |SHY."......".PLA| 00000B80: 59 49 4E 47 20 41 4E 44 20 59 4F 55 52 20 42 49 |YING AND YOUR BI| 00000B90: 47 20 57 41 4C 4C 45 54 D3 22 00 C3 13 DE 03 99 |G WALLET."......| 00000BA0: 22 D3 4D 41 59 42 45 20 57 45 20 43 41 4E 20 47 |".MAYBE WE CAN G| 00000BB0: 45 54 20 54 4F 47 45 54 48 45 52 20 4C 41 54 45 |ET TOGETHER LATE| 00000BC0: 52 D3 22 00 E9 13 E8 03 99 22 D3 49 27 4C 4C 20 |R."......".I'LL | 00000BD0: 42 45 20 4F 56 45 52 20 42 59 20 54 48 45 20 43 |BE OVER BY THE C| 00000BE0: 41 53 48 49 45 52 D3 11 22 00 F7 13 F2 03 57 32 |ASHIER..".....W2| 00000BF0: B2 34 3A 89 35 35 30 00 33 14 FC 03 81 4A B2 31 |.4:.550.3....J.1| 00000C00: A4 31 45 33 3A 82 3A 99 22 93 11 11 4C 45 53 48 |.1E3:.:."...LESH| 00000C10: 20 48 41 56 45 20 4E 55 54 48 45 52 20 44 52 49 | HAVE NUTHER DRI| 00000C20: 4E 4B 20 57 48 49 4C 45 20 49 20 53 48 55 46 46 |NK WHILE I SHUFF| 00000C30: 4C 45 22 00 69 14 06 04 81 4A B2 31 A4 32 30 3A |LE".i....J.1.20:| 00000C40: 99 C8 28 56 24 2C 34 AA BB 28 31 29 AC 31 35 29 |..(V$,4..(1).15)| 00000C50: 3B C8 28 48 24 2C BB 28 31 29 AC 33 30 AA 31 29 |;.(H$,.(1).30.1)| 00000C60: 3B 46 24 3B 4E 24 3A 82 4A 00 A9 14 10 04 99 56 |;F$;N$:.J......V| 00000C70: 24 3B 22 11 11 11 11 11 53 48 4F 52 52 59 2C 20 |$;".....SHORRY, | 00000C80: 49 20 44 52 4F 50 50 45 44 20 54 48 45 20 43 11 |I DROPPED THE C.| 00000C90: 41 11 52 11 44 11 53 11 2E 11 2E 22 3A 81 4A B2 |A.R.D.S....":.J.| 00000CA0: 31 A4 32 30 30 30 3A 82 4A 00 C5 14 1A 04 99 22 |1.2000:.J......"| 00000CB0: 11 11 20 20 20 12 20 41 4E 4E 4F 55 4E 43 45 4D |.. . ANNOUNCEM| 00000CC0: 45 4E 54 20 22 00 EF 14 24 04 99 22 11 54 48 45 |ENT "...$..".THE| 00000CD0: 20 4D 41 4E 41 47 45 4D 45 4E 54 20 52 45 47 52 | MANAGEMENT REGR| 00000CE0: 45 54 53 20 54 48 45 20 44 45 41 4C 45 52 22 00 |ETS THE DEALER".| 00000CF0: 15 15 2E 04 99 22 11 48 41 56 49 4E 47 20 53 4C |.....".HAVING SL| 00000D00: 49 44 20 55 4E 44 45 52 20 59 4F 55 52 20 54 41 |ID UNDER YOUR TA| 00000D10: 42 4C 45 11 22 00 3C 15 38 04 99 22 41 20 4E 45 |BLE.".<.8.."A NE| 00000D20: 57 20 44 45 41 4C 45 52 20 57 49 4C 4C 20 52 45 |W DEALER WILL RE| 00000D30: 50 4C 41 43 45 20 48 49 4D 2E 11 22 00 4F 15 42 |PLACE HIM..".O.B| 00000D40: 04 44 31 B2 30 3A 44 32 B2 31 3A 89 35 30 30 00 |.D1.0:D2.1:.500.| 00000D50: 82 15 4C 04 81 4A B2 31 A4 31 45 33 3A 82 3A 99 |..L..J.1.1E3:.:.| 00000D60: 22 93 11 2A 4F 50 45 4E 20 55 50 20 2D 20 54 48 |"..*OPEN UP - TH| 00000D70: 49 53 20 49 53 20 54 48 45 20 50 4F 4C 49 43 45 |IS IS THE POLICE| 00000D80: 2A 22 00 B3 15 56 04 99 22 57 48 41 54 3F 22 3A |*"...V.."WHAT?":| 00000D90: 99 22 2A 59 4F 55 20 47 4F 54 20 41 20 4C 49 43 |."*YOU GOT A LIC| 00000DA0: 45 4E 53 45 20 46 4F 52 20 47 41 4D 42 4C 49 4E |ENSE FOR GAMBLIN| 00000DB0: 47 2A 22 00 DE 15 60 04 99 22 55 48 2E 2E 22 3A |G*"...`.."UH..":| 00000DC0: 99 22 2A 4F 4B 2C 20 59 4F 55 20 42 45 54 54 45 |."*OK, YOU BETTE| 00000DD0: 52 20 43 4F 4D 45 20 41 4C 4F 4E 47 2A 22 00 10 |R COME ALONG*"..| 00000DE0: 16 6A 04 99 22 42 55 54 2E 2E 22 3A 99 22 2A 54 |.j.."BUT..":."*T| 00000DF0: 48 49 53 20 59 4F 55 52 20 4D 4F 4E 45 59 3F 20 |HIS YOUR MONEY? | 00000E00: 20 49 54 27 53 20 45 56 49 44 45 4E 43 45 2A 22 | IT'S EVIDENCE*"| 00000E10: 00 42 16 74 04 99 22 57 45 4C 4C 2E 2E 22 3A 99 |.B.t.."WELL..":.| 00000E20: 22 2A 4F 4B 41 59 2C 54 48 41 54 27 53 20 49 54 |"*OKAY,THAT'S IT| 00000E30: 20 2E 2E 20 45 56 45 52 59 42 4F 44 59 20 4F 55 | .. EVERYBODY OU| 00000E40: 54 22 00 6F 16 7E 04 99 22 11 2A 42 55 44 44 59 |T".o.~..".*BUDDY| 00000E50: 2C 20 4C 45 54 20 4D 45 20 47 49 56 45 20 59 4F |, LET ME GIVE YO| 00000E60: 55 20 53 4F 4D 45 20 41 44 56 49 43 45 2A 22 00 |U SOME ADVICE*".| 00000E70: AD 16 88 04 99 22 2A 4E 45 56 45 52 20 47 41 4D |....."*NEVER GAM| 00000E80: 42 4C 45 20 2E 2E 22 3A 99 22 2A 45 53 50 45 43 |BLE ..":."*ESPEC| 00000E90: 49 41 4C 4C 59 20 49 4E 20 41 20 4A 4F 49 4E 54 |IALLY IN A JOINT| 00000EA0: 20 4C 49 4B 45 20 54 48 49 53 2E 2A 22 00 E6 16 | LIKE THIS.*"...| 00000EB0: 92 04 99 22 11 42 45 46 4F 52 45 20 54 48 45 20 |...".BEFORE THE | 00000EC0: 52 41 49 44 2C 20 59 4F 55 20 48 41 44 20 24 22 |RAID, YOU HAD $"| 00000ED0: 3B 46 3A 99 22 4E 4F 57 20 59 4F 55 20 48 41 56 |;F:."NOW YOU HAV| 00000EE0: 45 20 24 30 2E 22 00 06 17 9C 04 99 22 11 48 41 |E $0."......".HA| 00000EF0: 56 45 20 41 20 4E 49 43 45 20 57 41 4C 4B 20 48 |VE A NICE WALK H| 00000F00: 4F 4D 45 22 3A 80 00 35 17 A6 04 99 22 42 45 41 |OME":..5...."BEA| 00000F10: 54 20 49 54 20 2D 20 57 45 20 44 4F 4E 27 54 20 |T IT - WE DON'T | 00000F20: 41 4C 4C 4F 57 20 44 45 41 44 42 45 41 54 53 20 |ALLOW DEADBEATS | 00000F30: 48 45 52 45 22 00 54 17 B0 04 8B 46 B1 46 31 A7 |HERE".T....F.F1.| 00000F40: 99 22 59 4F 55 20 47 41 49 4E 45 44 20 24 22 3B |."YOU GAINED $";| 00000F50: 46 AB 46 31 00 71 17 BA 04 8B 46 B3 46 31 A7 99 |F.F1.q....F.F1..| 00000F60: 22 59 4F 55 20 4C 4F 53 54 20 24 22 3B 46 31 AB |"YOU LOST $";F1.| 00000F70: 46 00 8E 17 C4 04 8B 46 B2 46 31 A7 99 22 59 4F |F......F.F1.."YO| 00000F80: 55 20 42 52 4F 4B 45 20 45 56 45 4E 21 22 00 A9 |U BROKE EVEN!"..| 00000F90: 17 CE 04 99 22 2E 2E 41 4E 44 20 4C 45 46 54 20 |...."..AND LEFT | 00000FA0: 57 49 54 48 20 24 22 3B 46 00 D3 17 D8 04 83 20 |WITH $";F...... | 00000FB0: 22 49 20 55 53 45 44 20 54 4F 20 57 4F 52 4B 20 |"I USED TO WORK | 00000FC0: 49 4E 20 56 45 47 41 53 2C 20 59 4F 55 20 4B 4E |IN VEGAS, YOU KN| 00000FD0: 4F 57 22 00 F8 17 E2 04 83 20 22 57 48 41 54 20 |OW"...... "WHAT | 00000FE0: 41 20 43 52 55 4D 4D 59 20 4A 4F 49 4E 54 20 54 |A CRUMMY JOINT T| 00000FF0: 48 49 53 20 49 53 2E 22 00 22 18 EC 04 83 20 22 |HIS IS.".".... "| 00001000: 42 4F 59 2C 20 57 45 20 47 45 54 20 57 45 49 52 |BOY, WE GET WEIR| 00001010: 44 20 43 55 53 54 4F 4D 45 52 53 20 48 45 52 45 |D CUSTOMERS HERE| 00001020: 2E 22 00 50 18 F6 04 83 20 22 41 20 42 55 4E 43 |.".P.... "A BUNC| 00001030: 48 20 4F 46 20 43 48 45 41 50 53 4B 41 54 45 53 |H OF CHEAPSKATES| 00001040: 20 52 55 4E 20 54 48 49 53 20 44 55 4D 50 2E 22 | RUN THIS DUMP."| 00001050: 00 78 18 00 05 83 20 22 54 48 45 20 52 4F 55 4C |.x.... "THE ROUL| 00001060: 45 54 54 45 20 57 48 45 45 4C 20 49 53 20 4D 4F |ETTE WHEEL IS MO| 00001070: 52 45 20 46 55 4E 2E 22 00 94 18 0A 05 83 20 22 |RE FUN."...... "| 00001080: 46 4F 4F 44 20 48 45 52 45 20 49 53 20 4C 4F 55 |FOOD HERE IS LOU| 00001090: 53 59 2E 22 00 C2 18 14 05 83 20 22 49 20 47 45 |SY."...... "I GE| 000010A0: 54 20 53 49 43 4B 20 4F 46 20 4C 4F 4F 4B 49 4E |T SICK OF LOOKIN| 000010B0: 47 20 41 54 20 54 48 45 53 45 20 43 41 52 44 53 |G AT THESE CARDS| 000010C0: 2E 22 00 E6 18 1E 05 83 20 22 4D 59 20 42 4F 53 |."...... "MY BOS| 000010D0: 53 20 49 53 20 41 20 4D 45 41 4E 20 4F 4C 44 20 |S IS A MEAN OLD | 000010E0: 43 52 41 42 2E 22 00 10 19 28 05 83 20 22 4D 41 |CRAB."...(.. "MA| 000010F0: 59 42 45 20 49 20 53 48 4F 55 4C 44 20 57 4F 52 |YBE I SHOULD WOR| 00001100: 4B 20 41 54 20 54 48 45 20 52 41 43 45 53 2E 22 |K AT THE RACES."| 00001110: 00 37 19 32 05 83 20 22 54 48 49 53 20 49 53 20 |.7.2.. "THIS IS | 00001120: 41 20 4C 4F 55 53 59 20 4A 4F 42 2C 20 59 4F 55 |A LOUSY JOB, YOU| 00001130: 20 4B 4E 4F 57 2E 22 00 66 19 3C 05 83 20 22 42 | KNOW.".f.<.. "B| 00001140: 49 47 20 44 45 41 4C 3B 20 4C 41 53 20 56 45 47 |IG DEAL; LAS VEG| 00001150: 41 53 20 57 49 54 48 20 50 45 45 4C 49 4E 47 20 |AS WITH PEELING | 00001160: 50 41 49 4E 54 22 00 92 19 46 05 83 20 22 21 49 |PAINT"...F.. "!I| 00001170: 46 20 4D 59 20 4D 4F 54 48 45 52 20 4B 4E 45 57 |F MY MOTHER KNEW| 00001180: 20 49 20 57 4F 52 4B 45 44 20 48 45 52 45 2E 2E | I WORKED HERE..| 00001190: 2E 22 00 00 00 B3 99 14 |."...... |
..5.D..C(51),P$(12),V(12),S$(3),Y(5),M(5
),B$(4),K$(5).Q.N.F$."U...I.............
....K...........J..............."...X.."
A "," "," X "," "," A"......"2 ",
" X "," "," X "," 2".Z...."3 "," X "
," X "," X "," 3"......"4 ","X X","
","X X"," 4". . .."5 ","X X"," X ","X
X"," 5".C...."6 ","X X","X X","X X","
6".F...."7 ","X X","XXX","X X"," 7"..
...."8 ","XXX","X X","XXX"," 8"...H.."
9 X","X X","XXX","X X","X 9".O.R.."10X",
"XXX","X X","XXX","X10"......"J X","A "
,"C ","K ","X J"......"Q X","U ","E
","E ","N Q".8...."K X","I ","N ","G
","X K".O....J.0.12:.P$(J):.K.0.3:.P$:P
$(J).P$(J)."....".P$:.K.....P$(J).P$(J).
"......":.J...... "A","X",".S.",".Z."...
...J.0.3:.S$(J):.J...".. 1,2,3,4,5,6,7,8
,9,10,10,10,10...,..J.0.12:.V(J):.J...6.
V$."...................".?.@.H$.".......
..............................".H.J.N$."
.... .... .... .... "...T.. "
I'LL HAVE ONE,TOO","THAT CALLS FOR A DRI
NK","MAYBE I'LL HAVE ANOTHER"...^.. "I'L
L JUST HAVE A SNORT HERE","ANOTHER LI'L
DRINK"...H..J.0.4:.B$(J):.J.7.R.. "",",
FRIEND",", PAL",", BUDDY",", OLD BUDDY".
L.|..J.1.5:.K$(J):.J.U...T.TI.T...X..(.T
):T.T.1000:.T..1.400......".. BUTTERFIEL
D SOCIAL & RECREATIONAL CLUB".J....".HOW
MUCH MONEY DO YOU HAVE";F......F.100.."
.SCRAM, CHEAPSKATE!":......M1.1:K$."#"..
.B.M1.M1.10:.F.M1.50.450.0.L.F1..(10..(1
).12).M1.].V..F1.F.."MEMBERSHIP FEES ARE
$";F.F1:F.F1.~....".MINIMUM BET IS $";M
1:F1.F.G....".DRINKS ARE ON THE HOUSE--"
:."POUR YOURSELF ONE WHILE I SHUFFLE..".
......(1).5.D1.D2.1100......D1.5.1020...
...B$(D1):."SHUFFLING..":D1.D1.1.&....J.
0.51:C(J).J:.J.A....J.0.51:S..(.(1).52):
S1.C(J):C(J).C(S):C(S).S1:.J:D.51.N.&..D
.9.500.}.0..F.M1.1190...:..F(K$)..33..(1
)..7..K$:.K$.P.?.."YOU HAVE $";F;":YOUR
BET";K$(D1);:.B:.B.F.570...D..B.0.1200..
.N..B.M1.."MINIMUM BET IS $";M1;:.570...
X.. 53281,5.C.].."..":M.0:Y.0:.850:.860:
.940:.840:.860:.940.\.B..850:.860:C$.N$:
.940.O.L..840:.860:.940...V.A.0:T.0:.J.1
.Y:C.Y(J):.860:.J.....T1.T.A:.T1.21.T1.T
.V....".
"......".YOUR TOTAL=";T1;". ";.....
.T1.21.."*BUSTED*":.830.-....Y.5.."*5-CA
RD WIN*":.810.F...."..HIT OR STAND";Z$.H
....F(Z$).83..840:.860:.940:.640...F.A.0
:T.0:X1.9:.X.1.M:C.M(X):.860:.X:.940...P
.T2.T.A:.T2.21.T2.T.N.Z..H(V$,17);"MY TO
TAL=";T2;". ";......T2.21.."*BUSTED*":.8
10......M.5.."*5-CARD WIN*":.830......T.
15.T2.17.780.4....850:.860:.940:.720.C..
..T2.T1.830.R....T1.T2.810.J. ..V$;" NO
WIN ":.550...*..V$;" YOU WIN ":F.F.B:W1.
W1.1:.W1.3.950...4..550...>..V$;"I WIN":
F.F.B:W1.W2:.550...H.Y.Y.1:X.Y:X1.2:C.C(
D):D.D.1:Y(Y).C:....R.M.M.1:X.M:X1.9:C.C
(D):D.D.1:M(M).C:..0.\.V..(C.4):S.C.V.4:
S$.S$(S).N.F.P$.P$(V):C$."":.K.1.C(P$).M
.P.M$.J(P$,K,1):.M$."X".M$.S$...Z.C$.C$.
M$:.K:T.T.V(V):.V.0.A.10.F...H..(X.5..(1
).D1.D1.2..5):V1.X1..(.(1).D1.D1.2..5).Z
....X.2.H.10:V1.X1......V1.2.V1.2.......
.....H(V$,V1);H(H$,H);F$;C$:..+...."SHI.
.MY NAME IS TOOTSS".I...."SSURE LIKE YOU
R STYLES".U.J.."SCOULDN'T HELP NOTICING
YOUR FLASHYS"...T.."SPLAYING AND YOUR BI
G WALLETS".C...."SMAYBE WE CAN GET TOGET
HER LATERS"......"SI'LL BE OVER BY THE C
ASHIERS.".....W2.4:.550.3....J.1.1E3:.:.
"...LESH HAVE NUTHER DRINK WHILE I SHUFF
LE".I....J.1.20:.H(V$,4..(1).15);H(H$,.(
1).30.1);F$;N$:.J......V$;".....SHORRY,
I DROPPED THE C.A.R.D.S....":.J.1.2000:.
J.E....".. . ANNOUNCEMENT "...$..".THE
MANAGEMENT REGRETS THE DEALER"......".H
AVING SLID UNDER YOUR TABLE.".<.8.."A NE
W DEALER WILL REPLACE HIM..".O.B.D1.0:D2
.1:.500...L..J.1.1E3:.:."..*OPEN UP - TH
IS IS THE POLICE*"...V.."WHAT?":."*YOU G
OT A LICENSE FOR GAMBLING*"...`.."UH..":
."*OK, YOU BETTER COME ALONG*"...J.."BUT
..":."*THIS YOUR MONEY? IT'S EVIDENCE*"
.B.T.."WELL..":."*OKAY,THAT'S IT .. EVER
YBODY OUT".O.~..".*BUDDY, LET ME GIVE YO
U SOME ADVICE*"......"*NEVER GAMBLE ..":
."*ESPECIALLY IN A JOINT LIKE THIS.*"...
...".BEFORE THE RAID, YOU HAD $";F:."NOW
YOU HAVE $0."......".HAVE A NICE WALK H
OME":..5...."BEAT IT - WE DON'T ALLOW DE
ADBEATS HERE".T....F.F1.."YOU GAINED $";
F.F1.Q....F.F1.."YOU LOST $";F1.F...D..F
.F1.."YOU BROKE EVEN!"...N.."..AND LEFT
WITH $";F.S.X.. "I USED TO WORK IN VEGAS
, YOU KNOW"...... "WHAT A CRUMMY JOINT T
HIS IS.".".... "BOY, WE GET WEIRD CUSTOM
ERS HERE.".P.... "A BUNCH OF CHEAPSKATES
RUN THIS DUMP.".X.... "THE ROULETTE WHE
EL IS MORE FUN."...... "FOOD HERE IS LOU
SY.".B.... "I GET SICK OF LOOKING AT THE
SE CARDS."...... "MY BOSS IS A MEAN OLD
CRAB."...(.. "MAYBE I SHOULD WORK AT THE
RACES.".7.2.. "THIS IS A LOUSY JOB, YOU
KNOW.".F.<.. "BIG DEAL; LAS VEGAS WITH
PEELING PAINT"...F.. "!IF MY MOTHER KNEW
I WORKED HERE..."......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL