Home » Recent acquisitions » Commodore_16 » tape009a_c16_commodore_16_games_pack_1.wav » blackjack
blackjack
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » Recent acquisitions » Commodore_16 » tape009a_c16_commodore_16_games_pack_1.wav |
| Filename: | blackjack |
| Read OK: | ✔ |
| File size: | 0BC9 bytes |
| Load address: | 1001 |
| Exec address: | 0000 |
File contents
10 BL$="▚▚▚▚▚▚<cursor down><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>":CL$=" <cursor down><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>":CN$="<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>"
20 CA$="<cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>":NL$=" "
30 C$="🭸🭸🭸🭸🭸🭸":D$="🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲":CR=500:DC$="<cursor down><cursor down>"
40 VOL8:DIMSS$(3):DIMPC(9):DIMCC(9)
50 DIMCD$(12):DIMCN%(12):FORI=0TO12:READCD$(I):CD$(I)=CD$(I)+" ":CN%(I)=15:NEXTI
60 DATAA,2,3,4,5,6,7,8,9,10,J,Q,K
70 CD$(9)="10":SS$(0)="<red>♥":SS$(1)="<red>♦":SS$(2)="<black>♣":SS$(3)="<black>♠"
80 PRINT"<clr><red> BLACKJACK"
90 PRINT"<pink><cursor down><cursor down><cursor right>C<cursor down><cursor left>O<cursor down><cursor left>M<cursor down><cursor left>P<cursor down><cursor left>U<cursor down><cursor left>T<cursor down><cursor left>E<cursor down><cursor left>R<cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor left><blue>Y<cursor down><cursor left> <cursor down><cursor left>O<cursor down><cursor left> <cursor down><cursor left>U"
100 L=0:CX$="<cursor right><cursor right><cursor right><cursor right>":SQ=0:B=0:CN=-1:PN=-1:DB=0:S=0
110 CY$=CN$+DC$:GOSUB320:P1$=DT$:PS=X:PN=0:PC(PN)=Y:GOSUB420
120 CY$=DC$:GOSUB320:C1$=DT$:CS1=X:CN=0:CC(CN)=Y
130 GOSUB560:CY$=CN$+DC$:DT$=P1$:X=PS:GOSUB380:RC$=CX$:RP$=CX$
140 PRINTCN$;CA$;"<light blue>ENTER BET<black>";:INPUTB
150 PRINTCN$;CA$;NL$
160 IFB<1ORB>CRTHEN140
170 GOSUB550
180 CY$=CN$+DC$:GOSUB320:PN=PN+1:PC(PN)=Y:P1$=DT$:PS=X
190 CY$=DC$:CX$=RC$:GOSUB320:C2$=DT$:CS2=X:CN=CN+1:CC(CN)=Y
200 CY$=CN$+DC$:CX$=RP$:DT$=P1$:X=PS:GOSUB380:GOSUB420
210 IFPV=21THEN290
220 PRINTCN$;CA$;"<brown>STICK OR TWIST";
230 GETA$:IFA$=""THEN230
240 IFA$<>"S"ANDA$<>"T"ANDA$<>"D"THENPRINTCN$;CA$;NL$:SOUND1,350,5:GOTO210
250 IFA$="T"THENGOSUB320:PN=PN+1:PC(PN)=Y:GOSUB380:GOSUB420:GOSUB600:GOTO210
260 IFA$<>"D"ORDB>0ORB>CRTHEN280
270 GOSUB550:DB=1:GOTO210
280 IFA$<>"S"ORPV<12THEN210
290 S=1:GOSUB570:GOSUB480
300 GOSUB600
310 GOSUB320:CN=CN+1:CC(CN)=Y:GOSUB380:GOSUB480:GOTO300
320 SOUND3,700,5:Y=INT(RND(0)*13):IFCN%(Y)=0THEN320
330 DT$=CD$(Y):X=INT(RND(0)*4)
340 IF(CN%(Y)AND(2^X))=0THEN320
350 CN%(Y)=CN%(Y)-2^X
360 PRINT"<home><black>";CY$;CX$;"╭";C$;"╮<cursor down><cursor left>";D$;"<home>";CY$;CX$;"<cursor down>";D$;"<cursor down><cursor left>╰";C$;"╯";
370 PRINT"<home>";CY$;CX$;"<cursor down><cursor right>";BL$;BL$;BL$;BL$;BL$;BL$;BL$;BL$;:FORI=1TO100:NEXT:RETURN
380 CC$=LEFT$(SS$(X),1)
390 FORI=1TO500:NEXT:PRINT"<home>";CY$;CX$;"<cursor down><cursor right>";CC$;DT$;" <cursor down><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>";SS$(X);" <cursor down><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>";
400 PRINTCL$;CL$;CL$;CL$;CL$;CL$;:CX$=CX$+"<cursor right><cursor right><cursor right>"
410 SOUND1,1000,3:FORI=1TO500:NEXT:RETURN
420 PV=0:AC=0:FORI=0TOPN:PV=PV+PC(I)+1:IFPC(I)=0THENPV=PV+10:AC=AC+1
430 IFPC(I)>9THENPV=PV-PC(I)+9
440 NEXT
450 IFPV>21ANDAC>0THENPV=PV-10:AC=AC-1:GOTO450
460 IFPV>21THENL=1
470 RETURN
480 IFCN<0THENRETURN
490 CV=0:AC=0:FORI=0TOCN:CV=CV+CC(I)+1:IFCC(I)=0THENCV=CV+10:AC=AC+1
500 IFCC(I)>9THENCV=CV-CC(I)+9
510 NEXT
520 IFCV>21ANDAC>0THENCV=CV-10:AC=AC-1:GOTO520
530 IFCV>21THENL=-1
540 RETURN
550 SQ=SQ+B:PRINTCN$;"<orange><cursor down><cursor right>STAKE £ <cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><medium gray>";SQ:CR=CR-B
560 PRINTCN$;"<orange><cursor right>CREDIT £ <cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><medium gray>";CR:RETURN
570 PRINT"<home><cursor down><cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right>";C1$;"<cursor down><cursor left><cursor left>";SS$(CS1);" <cursor down><cursor left><cursor left> <cursor down><cursor left><cursor left> <cursor down><cursor left><cursor left> <cursor down><cursor left><cursor left> <cursor down><cursor left><cursor left> <cursor down><cursor left><cursor left> "
580 SOUND1,1000,3
590 CY$=DC$:CX$=RC$:DT$=C2$:X=CS1:GOSUB380:GOSUB480:RETURN
600 IFL=1THENPRINTCN$;CA$;"<red> YOU <flash on>BUSTED!<flash off> ":SOUND1,800,10:SOUND1,700,20:GOTO780
610 IFL<>-1THEN640
620 PRINTCN$;CA$;NL$;CN$;CA$;"<purple> I BUSTED":CR=CR+2*SQ
630 SOUND1,800,10:FORI=1TO50:NEXT:SOUND1,900,10:GOTO790
640 IFCV<>21ORCN<>1THEN670
650 PRINTCN$;CA$;"<black><flash on>I GOT BLACKJACK!<flash off>":SOUND1,900,20:IFPV=21ANDPN=1THENCR=CR-3*SQ
660 FORI=1TO10:SOUND1,800+10*I,10:NEXT:CR=CR-SQ:GOTO790
670 IFS=0THENRETURN
680 IFPV<>21ORPN<>1THEN710
690 PRINTCN$;CA$;"<black><flash on>YOU GOT BLACKJACK!<flash off>":CR=CR+3*SQ:GOSUB570
700 FORI=1TO30:SOUND1,300+10*I,10:SOUND2,420+10*I,10::FORJ=1TO50:NEXTJ:NEXTI:GOTO790
710 IFCV<17THENPRINTCN$;CA$;"<brown> I TWIST... ":RETURN
720 IFCV<PVTHEN740
730 PRINTCN$;CA$;"<medium gray> YOU LOSE...":SOUND1,700,10:FORI=1TO50:NEXT:SOUND1,600,25:GOTO790
740 PRINTCN$;CA$;"<green> I LOSE... "
750 FORI=1TO10:SOUND1,900+10*I,10:FORJ=1TO50:NEXTJ:SOUND1,1000-10*I,10:NEXT
760 CR=CR+2*SQ
770 GOTO790
780 GOSUB570
790 GOSUB560:PRINTCN$;"<cursor down><cursor right>";NL$;CN$;CA$;"<green><cursor down> ANOTHER GAME ?"
800 GETA$:IFA$=""THEN800
810 IFA$="N"THENEND
820 IFCR>0THEN80
830 PRINTCN$;CA$;"<light blue><flash on> BANKRUPT!<flash off>":END
B
BL$�"������������":CL$�" ������":CN$�"" { CA$�" ":NL$�" " � C$�"������":D$�"���������������":CR�500:DC$�"" �( �8:�SS$(3):�PC(9):�CC(9) 2 �CD$(12):�CN%(12):�I�0�12:�CD$(I):CD$(I)�CD$(I)�" ":CN%(I)�15:�I 9< �A,2,3,4,5,6,7,8,9,10,J,Q,K yF CD$(9)�"10":SS$(0)�" �":SS$(1)�" �":SS$(2)�"��":SS$(3)�"��" �P �"� BLACKJACK" �Z �"� C�O�M�P�U�T�E�R� Y� �O� �U" d L�0:CX$�" ":SQ�0:B�0:CN��1:PN��1:DB�0:S�0 9n CY$�CN$�DC$:�320:P1$�DT$:PS�X:PN�0:PC(PN)�Y:�420 fx CY$�DC$:�320:C1$�DT$:CS1�X:CN�0:CC(CN)�Y �� �560:CY$�CN$�DC$:DT$�P1$:X�PS:�380:RC$�CX$:RP$�CX$ �� �CN$;CA$;"�ENTER BET�";:�B �� �CN$;CA$;NL$ �� �B�1�B�CR�140 �� �550 � CY$�CN$�DC$:�320:PN�PN�1:PC(PN)�Y:P1$�DT$:PS�X S� CY$�DC$:CX$�RC$:�320:C2$�DT$:CS2�X:CN�CN�1:CC(CN)�Y �� CY$�CN$�DC$:CX$�RP$:DT$�P1$:X�PS:�380:�420 �� �PV�21�290 �� �CN$;CA$;"�STICK OR TWIST"; �� �A$:�A$�""�230 �� �A$��"S"�A$��"T"�A$��"D"��CN$;CA$;NL$:�1,350,5:�210 2� �A$�"T"��320:PN�PN�1:PC(PN)�Y:�380:�420:�600:�210 M�A$��"D"�DB�0�B�CR�280 `�550:DB�1:�210 w�A$��"S"�PV�12�210 �"S�1:�570:�480 �,�600 �6�320:CN�CN�1:CC(CN)�Y:�380:�480:�300 �@�3,700,5:Y��(�(0)�13):�CN%(Y)�0�320 �JDT$�CD$(Y):X��(�(0)�4) T�(CN%(Y)�(2�X))�0�320 .^CN%(Y)�CN%(Y)�2�X qh�"�";CY$;CX$;"�";C$;"��";D$;"";CY$;CX$;"";D$;"��";C$;"�"; �r�"";CY$;CX$;" ";BL$;BL$;BL$;BL$;BL$;BL$;BL$;BL$;:�I�1�100:�:� �|CC$��(SS$(X),1) ��I�1�500:�:�"";CY$;CX$;" ";CC$;DT$;" ������";SS$(X);" ������"; C��CL$;CL$;CL$;CL$;CL$;CL$;:CX$�CX$�" " ^��1,1000,3:�I�1�500:�:� ��PV�0:AC�0:�I�0�PN:PV�PV�PC(I)�1:�PC(I)�0�PV�PV�10:AC�AC�1 ���PC(I)�9�PV�PV�PC(I)�9 ��� ���PV�21�AC�0�PV�PV�10:AC�AC�1:�450 ���PV�21�L�1 ��� ��CN�0�� B�CV�0:AC�0:�I�0�CN:CV�CV�CC(I)�1:�CC(I)�0�CV�CV�10:AC�AC�1 ]��CC(I)�9�CV�CV�CC(I)�9 c�� ��CV�21�AC�0�CV�CV�10:AC�AC�1:�520 ��CV�21�L��1 � � �&SQ�SQ�B:�CN$;"� STAKE \ ���������";SQ:CR�CR�B 0�CN$;"� CREDIT \ ���������";CR:� L:�" ";C1$;"��";SS$(CS1);" �� �� �� �� �� �� " ZD�1,1000,3 �NCY$�DC$:CX$�RC$:DT$�C2$:X�CS1:�380:�480:� �X�L�1��CN$;CA$;" YOU �BUSTED!� ":�1,800,10:�1,700,20:�780 �b�L���1�640 l�CN$;CA$;NL$;CN$;CA$;"� I BUSTED":CR�CR�2�SQ 2v�1,800,10:�I�1�50:�:�1,900,10:�790 H��CV��21�CN��1�670 ���CN$;CA$;"��I GOT BLACKJACK!�":�1,900,20:�PV�21�PN�1�CR�CR�3�SQ ���I�1�10:�1,800�10�I,10:�:CR�CR�SQ:�790 ���S�0�� ���PV��21�PN��1�710
��CN$;CA$;"��YOU GOT BLACKJACK!�":CR�CR�3�SQ:�570 K��I�1�30:�1,300�10�I,10:�2,420�10�I,10::�J�1�50:�J:�I:�790 w��CV�17��CN$;CA$;"� I TWIST... ":� ���CV�PV�740 ���CN$;CA$;"� YOU LOSE...":�1,700,10:�I�1�50:�:�1,600,25:�790 ���CN$;CA$;" I LOSE... " $��I�1�10:�1,900�10�I,10:�J�1�50:�J:�1,1000�10�I,10:� 3�CR�CR�2�SQ <�790 E �570 x�560:�CN$;" ";NL$;CN$;CA$;" ANOTHER GAME ?" � �A$:�A$�""�800 �*�A$�"N"�� �4�CR�0�80 �>�CN$;CA$;"�� BANKRUPT!�":� bPJ@bl$."......Q......":cl$." Q......":cn$."SQQQQQQQQQQQQQ"@.PT@ca$."]]]]]]]]]]]]]]]]]":nl$." "@.P.@c$."......":d$.".Q..Q..Q..Q..Q..Q..Q..":cr.500:dc$."QQ"@.P(@.8:.ss$(3):.pc(9):.cc(9)@YQ2@.cd$(12):.cn%(12):.i.0.12:.cd$(i):cd$(i).cd$(i)." ":cn%(i).15:.i@9Q<@.a,2,3,4,5,6,7,8,9,10,j,q,k@YQf@cd$(9)."10":ss$(0)."£.":ss$(1)."£.":ss$(2)."..":ss$(3).".."@.Qp@.".£ blackjack"@.Qz@.".QQ]cQ.oQ.mQ.pQ.uQ.tQ.eQ.rQQQQQQQ..yQ. Q.oQ. Q.u"@DRD@l.0:cx$."]]]]":sq.0:b.0:cn..1:pn..1:db.0:s.0@9RN@cy$.cn$.dc$:.320:p1$.dt$:ps.x:pn.0:pc(pn).y:.420@FRX@cy$.dc$:.320:c1$.dt$:cs1.x:cn.0:cc(cn).y@.R.@.560:cy$.cn$.dc$:dt$.p1$:x.ps:.380:rc$.cx$:rp$.cx$@.R.@.cn$;ca$;".enter bet.";:.b@.R.@.cn$;ca$;nl$@.R.@.b.1.b.cr.140@.R.@.550@[S.@cy$.cn$.dc$:.320:pn.pn.1:pc(pn).y:p1$.dt$:ps.x@sS.@cy$.dc$:cx$.rc$:.320:c2$.dt$:cs2.x:cn.cn.1:cc(cn).y@.S.@cy$.cn$.dc$:cx$.rp$:dt$.p1$:x.ps:.380:.420@.S.@.pv.21.290@.S.@.cn$;ca$;".stick or twist";@.S.@.a$:.a$."".230@.S.@.a$.."s".a$.."t".a$.."d"..cn$;ca$;nl$:.1,350,5:.210@2T.@.a$."t"..320:pn.pn.1:pc(pn).y:.380:.420:.600:.210@mTDA.a$.."d".db.0.b.cr.280@.TNA.550:db.1:.210@WTXA.a$.."s".pv.12.210@.T"As.1:.570:.480@.T,A.600@.T6A.320:cn.cn.1:cc(cn).y:.380:.480:.300@.T@A.3,700,5:y..(.(0).13):.cn%(y).0.320@.TjAdt$.cd$(y):x..(.(0).4)@XUtA.(cn%(y).(2.x)).0.320@.U.Acn%(y).cn%(y).2.x@QUHA."S.";cy$;cx$;".";c$;".Q.";d$;"S";cy$;cx$;"Q";d$;"Q..";c$;".";@.URA."S";cy$;cx$;"Q]";bl$;bl$;bl$;bl$;bl$;bl$;bl$;bl$;:.i.1.100:.:.@.U.Acc$..(ss$(x),1)@WV.A.i.1.500:.:."S";cy$;cx$;"Q]";cc$;dt$;" Q......";ss$(x);" Q......";@cV.A.cl$;cl$;cl$;cl$;cl$;cl$;:cx$.cx$."]]]"@.V.A.1,1000,3:.i.1.500:.:.@.V.Apv.0:ac.0:.i.0.pn:pv.pv.pc(i).1:.pc(i).0.pv.pv.10:ac.ac.1@.V.A.pc(i).9.pv.pv.pc(i).9@.V.A.@.V.A.pv.21.ac.0.pv.pv.10:ac.ac.1:.450@.V.A.pv.21.l.1@.V.A.@DW.A.cn.0..@bW.Acv.0:ac.0:.i.0.cn:cv.cv.cc(i).1:.cc(i).0.cv.cv.10:ac.ac.1@]W.A.cc(i).9.cv.cv.cc(i).9@CW.A.@.WHB.cv.21.ac.0.cv.cv.10:ac.ac.1:.520@.WRB.cv.21.l..1@.W£B.@.W&Bsq.sq.b:.cn$;".Q]stake £ .........";sq:cr.cr.b@FX0B.cn$;".]credit £ .........";cr:.@lX:B."SQQQ]]]]]";c1$;"Q..";ss$(cs1);" Q.. Q.. Q.. Q.. Q.. Q.. "@zXdB.1,1000,3@.XnBcy$.dc$:cx$.rc$:dt$.c2$:x.cs1:.380:.480:.@.XxB.l.1..cn$;ca$;"£ you .busted!. ":.1,800,10:.1,700,20:.780@.XBB.l...1.640@KYLB.cn$;ca$;nl$;cn$;ca$;". i busted":cr.cr.2.sq@2YVB.1,800,10:.i.1.50:.:.1,900,10:.790@hY.B.cv..21.cn..1.670@.Y.B.cn$;ca$;"..i got blackjack!.":.1,900,20:.pv.21.pn.1.cr.cr.3.sq@.Y.B.i.1.10:.1,800.10.i,10:.:cr.cr.sq:.790@.Y.B.s.0..@.Y.B.pv..21.pn..1.710@MZ.B.cn$;ca$;"..you got blackjack!.":cr.cr.3.sq:.570@kZ.B.i.1.30:.1,300.10.i,10:.2,420.10.i,10::.j.1.50:.j:.i:.790@WZ.B.cv.17..cn$;ca$;". i twist... ":.@.Z.B.cv.pv.740@.Z.B.cn$;ca$;". you lose...":.1,700,10:.i.1.50:.:.1,600,25:.790@.Z.B.cn$;ca$;". i lose... "@$[.B.i.1.10:.1,900.10.i,10:.j.1.50:.j:.1,1000.10.i,10:.@3[.Bcr.cr.2.sq@<[BC.790@e[LC.570@X[VC.560:.cn$;"Q]";nl$;cn$;ca$;".Q another game ?"@.[ C.a$:.a$."".800@.[*C.a$."n"..@.[4C.cr.0.80@.[>C.cn$;ca$;".. bankrupt!.":.@@@
00000000 42 10 0a 00 42 4c 24 b2 22 bf bf bf bf bf bf 11 |B...BL$.".......|
00000010 9d 9d 9d 9d 9d 9d 22 3a 43 4c 24 b2 22 20 20 20 |......":CL$." |
00000020 20 20 20 11 9d 9d 9d 9d 9d 9d 22 3a 43 4e 24 b2 | .......":CN$.|
00000030 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |".............."|
00000040 00 7b 10 14 00 43 41 24 b2 22 1d 1d 1d 1d 1d 1d |.{...CA$."......|
00000050 1d 1d 1d 1d 1d 1d 1d 1d 1d 1d 1d 22 3a 4e 4c 24 |...........":NL$|
00000060 b2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00000070 20 20 20 20 20 20 20 20 22 00 b7 10 1e 00 43 24 | ".....C$|
00000080 b2 22 c3 c3 c3 c3 c3 c3 22 3a 44 24 b2 22 c2 11 |."......":D$."..|
00000090 9d c2 11 9d c2 11 9d c2 11 9d c2 11 9d c2 11 9d |................|
000000a0 c2 11 9d c2 22 3a 43 52 b2 35 30 30 3a 44 43 24 |....":CR.500:DC$|
000000b0 b2 22 11 11 22 00 d4 10 28 00 db 38 3a 86 53 53 |.".."...(..8:.SS|
000000c0 24 28 33 29 3a 86 50 43 28 39 29 3a 86 43 43 28 |$(3):.PC(9):.CC(|
000000d0 39 29 00 19 11 32 00 86 43 44 24 28 31 32 29 3a |9)...2..CD$(12):|
000000e0 86 43 4e 25 28 31 32 29 3a 81 49 b2 30 a4 31 32 |.CN%(12):.I.0.12|
000000f0 3a 87 43 44 24 28 49 29 3a 43 44 24 28 49 29 b2 |:.CD$(I):CD$(I).|
00000100 43 44 24 28 49 29 aa 22 20 22 3a 43 4e 25 28 49 |CD$(I)." ":CN%(I|
00000110 29 b2 31 35 3a 82 49 00 39 11 3c 00 83 41 2c 32 |).15:.I.9.<..A,2|
00000120 2c 33 2c 34 2c 35 2c 36 2c 37 2c 38 2c 39 2c 31 |,3,4,5,6,7,8,9,1|
00000130 30 2c 4a 2c 51 2c 4b 00 79 11 46 00 43 44 24 28 |0,J,Q,K.y.F.CD$(|
00000140 39 29 b2 22 31 30 22 3a 53 53 24 28 30 29 b2 22 |9)."10":SS$(0)."|
00000150 1c d3 22 3a 53 53 24 28 31 29 b2 22 1c da 22 3a |..":SS$(1)."..":|
00000160 53 53 24 28 32 29 b2 22 90 d8 22 3a 53 53 24 28 |SS$(2)."..":SS$(|
00000170 33 29 b2 22 90 c1 22 00 9b 11 50 00 99 22 93 1c |3).".."...P.."..|
00000180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 | B|
00000190 4c 41 43 4b 4a 41 43 4b 22 00 d3 11 5a 00 99 22 |LACKJACK"...Z.."|
000001a0 96 11 11 1d 43 11 9d 4f 11 9d 4d 11 9d 50 11 9d |....C..O..M..P..|
000001b0 55 11 9d 54 11 9d 45 11 9d 52 11 11 11 11 11 11 |U..T..E..R......|
000001c0 11 9d 1f 59 11 9d 20 11 9d 4f 11 9d 20 11 9d 55 |...Y.. ..O.. ..U|
000001d0 22 00 04 12 64 00 4c b2 30 3a 43 58 24 b2 22 1d |"...d.L.0:CX$.".|
000001e0 1d 1d 1d 22 3a 53 51 b2 30 3a 42 b2 30 3a 43 4e |...":SQ.0:B.0:CN|
000001f0 b2 ab 31 3a 50 4e b2 ab 31 3a 44 42 b2 30 3a 53 |..1:PN..1:DB.0:S|
00000200 b2 30 00 39 12 6e 00 43 59 24 b2 43 4e 24 aa 44 |.0.9.n.CY$.CN$.D|
00000210 43 24 3a 8d 33 32 30 3a 50 31 24 b2 44 54 24 3a |C$:.320:P1$.DT$:|
00000220 50 53 b2 58 3a 50 4e b2 30 3a 50 43 28 50 4e 29 |PS.X:PN.0:PC(PN)|
00000230 b2 59 3a 8d 34 32 30 00 66 12 78 00 43 59 24 b2 |.Y:.420.f.x.CY$.|
00000240 44 43 24 3a 8d 33 32 30 3a 43 31 24 b2 44 54 24 |DC$:.320:C1$.DT$|
00000250 3a 43 53 31 b2 58 3a 43 4e b2 30 3a 43 43 28 43 |:CS1.X:CN.0:CC(C|
00000260 4e 29 b2 59 00 9d 12 82 00 8d 35 36 30 3a 43 59 |N).Y......560:CY|
00000270 24 b2 43 4e 24 aa 44 43 24 3a 44 54 24 b2 50 31 |$.CN$.DC$:DT$.P1|
00000280 24 3a 58 b2 50 53 3a 8d 33 38 30 3a 52 43 24 b2 |$:X.PS:.380:RC$.|
00000290 43 58 24 3a 52 50 24 b2 43 58 24 00 bc 12 8c 00 |CX$:RP$.CX$.....|
000002a0 99 43 4e 24 3b 43 41 24 3b 22 9a 45 4e 54 45 52 |.CN$;CA$;".ENTER|
000002b0 20 42 45 54 90 22 3b 3a 85 42 00 cd 12 96 00 99 | BET.";:.B......|
000002c0 43 4e 24 3b 43 41 24 3b 4e 4c 24 00 df 12 a0 00 |CN$;CA$;NL$.....|
000002d0 8b 42 b3 31 b0 42 b1 43 52 a7 31 34 30 00 e8 12 |.B.1.B.CR.140...|
000002e0 aa 00 8d 35 35 30 00 1b 13 b4 00 43 59 24 b2 43 |...550.....CY$.C|
000002f0 4e 24 aa 44 43 24 3a 8d 33 32 30 3a 50 4e b2 50 |N$.DC$:.320:PN.P|
00000300 4e aa 31 3a 50 43 28 50 4e 29 b2 59 3a 50 31 24 |N.1:PC(PN).Y:P1$|
00000310 b2 44 54 24 3a 50 53 b2 58 00 53 13 be 00 43 59 |.DT$:PS.X.S...CY|
00000320 24 b2 44 43 24 3a 43 58 24 b2 52 43 24 3a 8d 33 |$.DC$:CX$.RC$:.3|
00000330 32 30 3a 43 32 24 b2 44 54 24 3a 43 53 32 b2 58 |20:C2$.DT$:CS2.X|
00000340 3a 43 4e b2 43 4e aa 31 3a 43 43 28 43 4e 29 b2 |:CN.CN.1:CC(CN).|
00000350 59 00 82 13 c8 00 43 59 24 b2 43 4e 24 aa 44 43 |Y.....CY$.CN$.DC|
00000360 24 3a 43 58 24 b2 52 50 24 3a 44 54 24 b2 50 31 |$:CX$.RP$:DT$.P1|
00000370 24 3a 58 b2 50 53 3a 8d 33 38 30 3a 8d 34 32 30 |$:X.PS:.380:.420|
00000380 00 91 13 d2 00 8b 50 56 b2 32 31 a7 32 39 30 00 |......PV.21.290.|
00000390 b1 13 dc 00 99 43 4e 24 3b 43 41 24 3b 22 95 53 |.....CN$;CA$;".S|
000003a0 54 49 43 4b 20 4f 52 20 54 57 49 53 54 22 3b 00 |TICK OR TWIST";.|
000003b0 c4 13 e6 00 a1 41 24 3a 8b 41 24 b2 22 22 a7 32 |.....A$:.A$."".2|
000003c0 33 30 00 fc 13 f0 00 8b 41 24 b3 b1 22 53 22 af |30......A$.."S".|
000003d0 41 24 b3 b1 22 54 22 af 41 24 b3 b1 22 44 22 a7 |A$.."T".A$.."D".|
000003e0 99 43 4e 24 3b 43 41 24 3b 4e 4c 24 3a da 31 2c |.CN$;CA$;NL$:.1,|
000003f0 33 35 30 2c 35 3a 89 32 31 30 00 32 14 fa 00 8b |350,5:.210.2....|
00000400 41 24 b2 22 54 22 a7 8d 33 32 30 3a 50 4e b2 50 |A$."T"..320:PN.P|
00000410 4e aa 31 3a 50 43 28 50 4e 29 b2 59 3a 8d 33 38 |N.1:PC(PN).Y:.38|
00000420 30 3a 8d 34 32 30 3a 8d 36 30 30 3a 89 32 31 30 |0:.420:.600:.210|
00000430 00 4d 14 04 01 8b 41 24 b3 b1 22 44 22 b0 44 42 |.M....A$.."D".DB|
00000440 b1 30 b0 42 b1 43 52 a7 32 38 30 00 60 14 0e 01 |.0.B.CR.280.`...|
00000450 8d 35 35 30 3a 44 42 b2 31 3a 89 32 31 30 00 77 |.550:DB.1:.210.w|
00000460 14 18 01 8b 41 24 b3 b1 22 53 22 b0 50 56 b3 31 |....A$.."S".PV.1|
00000470 32 a7 32 31 30 00 89 14 22 01 53 b2 31 3a 8d 35 |2.210...".S.1:.5|
00000480 37 30 3a 8d 34 38 30 00 92 14 2c 01 8d 36 30 30 |70:.480...,..600|
00000490 00 bb 14 36 01 8d 33 32 30 3a 43 4e b2 43 4e aa |...6..320:CN.CN.|
000004a0 31 3a 43 43 28 43 4e 29 b2 59 3a 8d 33 38 30 3a |1:CC(CN).Y:.380:|
000004b0 8d 34 38 30 3a 89 33 30 30 00 e3 14 40 01 da 33 |.480:.300...@..3|
000004c0 2c 37 30 30 2c 35 3a 59 b2 b5 28 bb 28 30 29 ac |,700,5:Y..(.(0).|
000004d0 31 33 29 3a 8b 43 4e 25 28 59 29 b2 30 a7 33 32 |13):.CN%(Y).0.32|
000004e0 30 00 fe 14 4a 01 44 54 24 b2 43 44 24 28 59 29 |0...J.DT$.CD$(Y)|
000004f0 3a 58 b2 b5 28 bb 28 30 29 ac 34 29 00 18 15 54 |:X..(.(0).4)...T|
00000500 01 8b 28 43 4e 25 28 59 29 af 28 32 ae 58 29 29 |..(CN%(Y).(2.X))|
00000510 b2 30 a7 33 32 30 00 2e 15 5e 01 43 4e 25 28 59 |.0.320...^.CN%(Y|
00000520 29 b2 43 4e 25 28 59 29 ab 32 ae 58 00 71 15 68 |).CN%(Y).2.X.q.h|
00000530 01 99 22 13 90 22 3b 43 59 24 3b 43 58 24 3b 22 |.."..";CY$;CX$;"|
00000540 d5 22 3b 43 24 3b 22 c9 11 9d 22 3b 44 24 3b 22 |.";C$;"...";D$;"|
00000550 13 22 3b 43 59 24 3b 43 58 24 3b 22 11 22 3b 44 |.";CY$;CX$;".";D|
00000560 24 3b 22 11 9d ca 22 3b 43 24 3b 22 cb 22 3b 00 |$;"...";C$;".";.|
00000570 b5 15 72 01 99 22 13 22 3b 43 59 24 3b 43 58 24 |..r..".";CY$;CX$|
00000580 3b 22 11 1d 22 3b 42 4c 24 3b 42 4c 24 3b 42 4c |;"..";BL$;BL$;BL|
00000590 24 3b 42 4c 24 3b 42 4c 24 3b 42 4c 24 3b 42 4c |$;BL$;BL$;BL$;BL|
000005a0 24 3b 42 4c 24 3b 3a 81 49 b2 31 a4 31 30 30 3a |$;BL$;:.I.1.100:|
000005b0 82 3a 8e 00 c9 15 7c 01 43 43 24 b2 c8 28 53 53 |.:....|.CC$..(SS|
000005c0 24 28 58 29 2c 31 29 00 17 16 86 01 81 49 b2 31 |$(X),1)......I.1|
000005d0 a4 35 30 30 3a 82 3a 99 22 13 22 3b 43 59 24 3b |.500:.:.".";CY$;|
000005e0 43 58 24 3b 22 11 1d 22 3b 43 43 24 3b 44 54 24 |CX$;"..";CC$;DT$|
000005f0 3b 22 20 20 20 20 11 9d 9d 9d 9d 9d 9d 22 3b 53 |;" .......";S|
00000600 53 24 28 58 29 3b 22 20 20 20 20 20 11 9d 9d 9d |S$(X);" ....|
00000610 9d 9d 9d 22 3b 00 43 16 90 01 99 43 4c 24 3b 43 |...";.C....CL$;C|
00000620 4c 24 3b 43 4c 24 3b 43 4c 24 3b 43 4c 24 3b 43 |L$;CL$;CL$;CL$;C|
00000630 4c 24 3b 3a 43 58 24 b2 43 58 24 aa 22 1d 1d 1d |L$;:CX$.CX$."...|
00000640 22 00 5e 16 9a 01 da 31 2c 31 30 30 30 2c 33 3a |".^....1,1000,3:|
00000650 81 49 b2 31 a4 35 30 30 3a 82 3a 8e 00 9c 16 a4 |.I.1.500:.:.....|
00000660 01 50 56 b2 30 3a 41 43 b2 30 3a 81 49 b2 30 a4 |.PV.0:AC.0:.I.0.|
00000670 50 4e 3a 50 56 b2 50 56 aa 50 43 28 49 29 aa 31 |PN:PV.PV.PC(I).1|
00000680 3a 8b 50 43 28 49 29 b2 30 a7 50 56 b2 50 56 aa |:.PC(I).0.PV.PV.|
00000690 31 30 3a 41 43 b2 41 43 aa 31 00 b7 16 ae 01 8b |10:AC.AC.1......|
000006a0 50 43 28 49 29 b1 39 a7 50 56 b2 50 56 ab 50 43 |PC(I).9.PV.PV.PC|
000006b0 28 49 29 aa 39 00 bd 16 b8 01 82 00 e3 16 c2 01 |(I).9...........|
000006c0 8b 50 56 b1 32 31 af 41 43 b1 30 a7 50 56 b2 50 |.PV.21.AC.0.PV.P|
000006d0 56 ab 31 30 3a 41 43 b2 41 43 ab 31 3a 89 34 35 |V.10:AC.AC.1:.45|
000006e0 30 00 f2 16 cc 01 8b 50 56 b1 32 31 a7 4c b2 31 |0......PV.21.L.1|
000006f0 00 f8 16 d6 01 8e 00 04 17 e0 01 8b 43 4e b3 30 |............CN.0|
00000700 a7 8e 00 42 17 ea 01 43 56 b2 30 3a 41 43 b2 30 |...B...CV.0:AC.0|
00000710 3a 81 49 b2 30 a4 43 4e 3a 43 56 b2 43 56 aa 43 |:.I.0.CN:CV.CV.C|
00000720 43 28 49 29 aa 31 3a 8b 43 43 28 49 29 b2 30 a7 |C(I).1:.CC(I).0.|
00000730 43 56 b2 43 56 aa 31 30 3a 41 43 b2 41 43 aa 31 |CV.CV.10:AC.AC.1|
00000740 00 5d 17 f4 01 8b 43 43 28 49 29 b1 39 a7 43 56 |.]....CC(I).9.CV|
00000750 b2 43 56 ab 43 43 28 49 29 aa 39 00 63 17 fe 01 |.CV.CC(I).9.c...|
00000760 82 00 89 17 08 02 8b 43 56 b1 32 31 af 41 43 b1 |.......CV.21.AC.|
00000770 30 a7 43 56 b2 43 56 ab 31 30 3a 41 43 b2 41 43 |0.CV.CV.10:AC.AC|
00000780 ab 31 3a 89 35 32 30 00 99 17 12 02 8b 43 56 b1 |.1:.520......CV.|
00000790 32 31 a7 4c b2 ab 31 00 9f 17 1c 02 8e 00 da 17 |21.L..1.........|
000007a0 26 02 53 51 b2 53 51 aa 42 3a 99 43 4e 24 3b 22 |&.SQ.SQ.B:.CN$;"|
000007b0 81 11 1d 53 54 41 4b 45 20 20 5c 20 20 20 20 20 |...STAKE \ |
000007c0 20 20 20 9d 9d 9d 9d 9d 9d 9d 9d 98 22 3b 53 51 | .........";SQ|
000007d0 3a 43 52 b2 43 52 ab 42 00 06 18 30 02 99 43 4e |:CR.CR.B...0..CN|
000007e0 24 3b 22 81 1d 43 52 45 44 49 54 20 5c 20 20 20 |$;"..CREDIT \ |
000007f0 20 20 20 20 20 9d 9d 9d 9d 9d 9d 9d 9d 98 22 3b | .........";|
00000800 43 52 3a 8e 00 4c 18 3a 02 99 22 13 11 11 11 1d |CR:..L.:..".....|
00000810 1d 1d 1d 1d 22 3b 43 31 24 3b 22 11 9d 9d 22 3b |....";C1$;"...";|
00000820 53 53 24 28 43 53 31 29 3b 22 20 11 9d 9d 20 20 |SS$(CS1);" ... |
00000830 11 9d 9d 20 20 11 9d 9d 20 20 11 9d 9d 20 20 11 |... ... ... .|
00000840 9d 9d 20 20 11 9d 9d 20 20 22 00 5a 18 44 02 da |.. ... ".Z.D..|
00000850 31 2c 31 30 30 30 2c 33 00 88 18 4e 02 43 59 24 |1,1000,3...N.CY$|
00000860 b2 44 43 24 3a 43 58 24 b2 52 43 24 3a 44 54 24 |.DC$:CX$.RC$:DT$|
00000870 b2 43 32 24 3a 58 b2 43 53 31 3a 8d 33 38 30 3a |.C2$:X.CS1:.380:|
00000880 8d 34 38 30 3a 8e 00 c9 18 58 02 8b 4c b2 31 a7 |.480:....X..L.1.|
00000890 99 43 4e 24 3b 43 41 24 3b 22 1c 20 20 59 4f 55 |.CN$;CA$;". YOU|
000008a0 20 82 42 55 53 54 45 44 21 84 20 20 20 22 3a da | .BUSTED!. ":.|
000008b0 31 2c 38 30 30 2c 31 30 3a da 31 2c 37 30 30 2c |1,800,10:.1,700,|
000008c0 32 30 3a 89 37 38 30 00 d8 18 62 02 8b 4c b3 b1 |20:.780...b..L..|
000008d0 ab 31 a7 36 34 30 00 0b 19 6c 02 99 43 4e 24 3b |.1.640...l..CN$;|
000008e0 43 41 24 3b 4e 4c 24 3b 43 4e 24 3b 43 41 24 3b |CA$;NL$;CN$;CA$;|
000008f0 22 9c 20 20 20 49 20 42 55 53 54 45 44 22 3a 43 |". I BUSTED":C|
00000900 52 b2 43 52 aa 32 ac 53 51 00 32 19 76 02 da 31 |R.CR.2.SQ.2.v..1|
00000910 2c 38 30 30 2c 31 30 3a 81 49 b2 31 a4 35 30 3a |,800,10:.I.1.50:|
00000920 82 3a da 31 2c 39 30 30 2c 31 30 3a 89 37 39 30 |.:.1,900,10:.790|
00000930 00 48 19 80 02 8b 43 56 b3 b1 32 31 b0 43 4e b3 |.H....CV..21.CN.|
00000940 b1 31 a7 36 37 30 00 8c 19 8a 02 99 43 4e 24 3b |.1.670......CN$;|
00000950 43 41 24 3b 22 90 82 49 20 47 4f 54 20 42 4c 41 |CA$;"..I GOT BLA|
00000960 43 4b 4a 41 43 4b 21 84 22 3a da 31 2c 39 30 30 |CKJACK!.":.1,900|
00000970 2c 32 30 3a 8b 50 56 b2 32 31 af 50 4e b2 31 a7 |,20:.PV.21.PN.1.|
00000980 43 52 b2 43 52 ab 33 ac 53 51 00 b7 19 94 02 81 |CR.CR.3.SQ......|
00000990 49 b2 31 a4 31 30 3a da 31 2c 38 30 30 aa 31 30 |I.1.10:.1,800.10|
000009a0 ac 49 2c 31 30 3a 82 3a 43 52 b2 43 52 ab 53 51 |.I,10:.:CR.CR.SQ|
000009b0 3a 89 37 39 30 00 c2 19 9e 02 8b 53 b2 30 a7 8e |:.790......S.0..|
000009c0 00 d8 19 a8 02 8b 50 56 b3 b1 32 31 b0 50 4e b3 |......PV..21.PN.|
000009d0 b1 31 a7 37 31 30 00 0d 1a b2 02 99 43 4e 24 3b |.1.710......CN$;|
000009e0 43 41 24 3b 22 90 82 59 4f 55 20 47 4f 54 20 42 |CA$;"..YOU GOT B|
000009f0 4c 41 43 4b 4a 41 43 4b 21 84 22 3a 43 52 b2 43 |LACKJACK!.":CR.C|
00000a00 52 aa 33 ac 53 51 3a 8d 35 37 30 00 4b 1a bc 02 |R.3.SQ:.570.K...|
00000a10 81 49 b2 31 a4 33 30 3a da 31 2c 33 30 30 aa 31 |.I.1.30:.1,300.1|
00000a20 30 ac 49 2c 31 30 3a da 32 2c 34 32 30 aa 31 30 |0.I,10:.2,420.10|
00000a30 ac 49 2c 31 30 3a 3a 81 4a b2 31 a4 35 30 3a 82 |.I,10::.J.1.50:.|
00000a40 4a 3a 82 49 3a 89 37 39 30 00 77 1a c6 02 8b 43 |J:.I:.790.w....C|
00000a50 56 b3 31 37 a7 99 43 4e 24 3b 43 41 24 3b 22 95 |V.17..CN$;CA$;".|
00000a60 20 20 20 20 49 20 54 57 49 53 54 2e 2e 2e 20 20 | I TWIST... |
00000a70 20 20 22 3a 8e 00 86 1a d0 02 8b 43 56 b3 50 56 | ":.......CV.PV|
00000a80 a7 37 34 30 00 c9 1a da 02 99 43 4e 24 3b 43 41 |.740......CN$;CA|
00000a90 24 3b 22 98 20 20 20 20 59 4f 55 20 4c 4f 53 45 |$;". YOU LOSE|
00000aa0 2e 2e 2e 22 3a da 31 2c 37 30 30 2c 31 30 3a 81 |...":.1,700,10:.|
00000ab0 49 b2 31 a4 35 30 3a 82 3a da 31 2c 36 30 30 2c |I.1.50:.:.1,600,|
00000ac0 32 35 3a 89 37 39 30 00 ec 1a e4 02 99 43 4e 24 |25:.790......CN$|
00000ad0 3b 43 41 24 3b 22 1e 20 20 20 20 49 20 4c 4f 53 |;CA$;". I LOS|
00000ae0 45 2e 2e 2e 20 20 20 20 20 22 00 24 1b ee 02 81 |E... ".$....|
00000af0 49 b2 31 a4 31 30 3a da 31 2c 39 30 30 aa 31 30 |I.1.10:.1,900.10|
00000b00 ac 49 2c 31 30 3a 81 4a b2 31 a4 35 30 3a 82 4a |.I,10:.J.1.50:.J|
00000b10 3a da 31 2c 31 30 30 30 ab 31 30 ac 49 2c 31 30 |:.1,1000.10.I,10|
00000b20 3a 82 00 33 1b f8 02 43 52 b2 43 52 aa 32 ac 53 |:..3...CR.CR.2.S|
00000b30 51 00 3c 1b 02 03 89 37 39 30 00 45 1b 0c 03 8d |Q.<....790.E....|
00000b40 35 37 30 00 78 1b 16 03 8d 35 36 30 3a 99 43 4e |570.x....560:.CN|
00000b50 24 3b 22 11 1d 22 3b 4e 4c 24 3b 43 4e 24 3b 43 |$;"..";NL$;CN$;C|
00000b60 41 24 3b 22 1e 11 20 41 4e 4f 54 48 45 52 20 47 |A$;".. ANOTHER G|
00000b70 41 4d 45 20 3f 22 00 8b 1b 20 03 a1 41 24 3a 8b |AME ?"... ..A$:.|
00000b80 41 24 b2 22 22 a7 38 30 30 00 99 1b 2a 03 8b 41 |A$."".800...*..A|
00000b90 24 b2 22 4e 22 a7 80 00 a6 1b 34 03 8b 43 52 b1 |$."N".....4..CR.|
00000ba0 30 a7 38 30 00 c8 1b 3e 03 99 43 4e 24 3b 43 41 |0.80...>..CN$;CA|
00000bb0 24 3b 22 9a 82 20 20 20 20 42 41 4e 4b 52 55 50 |$;".. BANKRUP|
00000bc0 54 21 84 22 3a 80 00 00 00 |T!.":....|
00000bc9 
.