ZXTape! 0Created with Ramsoft MakeTZXB __caZ::Z,W,D,A,F,B,J,C,V,K,G,E,U,O,P,Q,K9,J$,F$,Z$,H1,H2:H$(F,G):K$(F,U-W):F:"23658",C  N=WB:A$  M=ZJ+W  X:A$+M,X M:N :,,C+W;"BRIDGEMASTER":O+K,P+G+G:O+O-G,Z:K+B,E;" J.Keyne 1983";C,F;"The computer is now ready"," to play deals ";H1;" to ";H2,F;"Select any of these deals",F;"by pressing the number",F;"then the ENTER key" /A$:HD=A$+C-O:A$>WHD=HD*"10"+A$(D)+C-O HD=U-D"1500" HDH2V-W "5000"+HD*"100" /N=WF:H$(N):N:N=WF:K$(N):N:L$,D$,V$,B$ KW=Z:KL=Z::Z::V+W;"DEAL ";HD::C;"LIST OF OPTIONS":O+C,"143":P-F,Z::F$;"P PLAY THIS DEAL"::F$;"A FOR AUTOPLAYSEE";V;"THE COMPUTER PLAY";V;"THE DEAL FOR YOU"::F$;"H DISPLAY ALL FOUR";V;"HANDS",,,F$;"D CHANGE A";V;"DIFFERENT DEAL" T:" YOU MAY PRESS THE CAPS/SHIFT"," KEY AT ANY TIME TO "," THIS LIST OF OPTIONS" R=Z  ="P"U ="H""3000"  ="D"A  ="A"U-W E R=W  y:V-W;"DEALER ";D$,V-D;V$::V+D;Z$:4075:H=F:P-G:,B;Z$;" WEST NORTH EAST",,,:S=A:I=J:"9680":"2300" ^:R=D+R:W,G+A;"DEAL ";HD:E+D;"BIDDING";F,E;"S W N E",,,:I=G:S=W:"9680":R=R-D &V+D,K;" TO RETURN";G;"THE LIST OF";G;"OPTIONS PRESS";G;"CAPS/SHIFT KEY";:P+V,O+K:O+O+D,Z:Z,-G-G:-O-O-D,Z:Z,G+G:I=J:S=V:"3100":P+F,P+O-B:Z,-P-O+B 'H=J:P-E:H=C:P-E ($W,W;"TRICKS WON O";D,C;"LOST O" ) T=ZV+W -M=WF .8H=M+L$(T+W):H=H-(H/F)*F+W:"4070"+H:X,Y:Z:Y,X; /N=WD 0A$=K$(H,D*T+N) 1R=WH=WH=AO 2 "?";C;:K9 8 "2200" 9N :Z:H=WH=AO+V ;N=WG <S$H$(H,N)N =N=NG >A$H$(H,N)N ?H$(H,N)="P":H=H+F:P-E CM D L$(T+D)="1"L$(T+D)="3""70" EKW=KW+W:"71" F KL=KL+W G.W,W;"TRICKS WON ";KW;:KW=B+BKW=ZC;"O" H D,C;"LOST ";KL;:KL=ZC;"O" I "2300" JN=WF K"4070"+N:X,Y:Y,X;" ":N LN=WA:E+N,E;J$:N MT NV+D j"4070"+H:H>FH=H-F kX,Y lL=Z mN=WG p A$=H$(H,N) qA$="S"A$="C"P-F rA$="D"A$="H"P-A s A$="P"P t A$"T"P-B v "1";:P wA$;:P xZ:P-D yD z"" ";Y+L,X;(A$+79O);" "; {L=L+W |N ~" "  %:W,F;"SCORING",W;"DEMONSTRATION" !N=WK+F:N,K+D;"";U+F;"":N sW,Z,E;"",A,E+W;"";V-W,E+W;"";E+A,E;"";D,E+A;"WE THEY"  "200","168":Z,-"160":K9-U YW,B,W;"YOUR OPPONENTS";W;"BID 2 CLUBS";W;"AND MAKE 3";V,U+W;"4O";C,U+W;"2O":K9-U W,B,W,J,W;"YOU BID 4 SPADES";J+W,V-W;"4 ";V,E+A;"12O":"160","75":"79",Z:K9-U 3J,C+W;"5 CLUBS ";J+W,V-W;"2";B+D,U;"3OO":K9-U "BB,W;"YOUR OPPONENTS";J,W;"BID 2 NT ";V+D,U+W;"7O":K9-U ,OJ,W;"BID 3 DIAMONDS";J+W,V-W;"3";V+A,U+W;"6O":"160","51":"79",Z:K9-U 6r,B,W,J,W;"YOU BID 6 HEARTS";J+W,V-W;"6";G-W,E+A;"18O";C,E+A;"75O";C-W,E+A;"5OO":"160",U+C:"79",Z:K9-U @9"160",U+J:"79",Z:E+W,E+D;"155O";E+W,U;"49O":K9-U lA Z A$="H"A$="D""2225" A$="S"A$="C""2230" A$="d"A$="D" A$="T""2260" A$="t"A$="T"  "2250" D S$=A$ A$=(A$+"79") A$;  "1"  7W;G+D,E;"PRESS ANY KEY";E;"EXCEPT SHIFT";E;"TO " K9-U  :W,W;"DEAL ";HD:"4081" H=WF X,Y P-K H I=V+A:S=B+D:"3100" "2300" V+D TZ:C;W;S,I;"N";I-W;"W E";I;"S":I*C-C-D,177-S*C:U,Z:Z,-U:-U,Z:Z,U: 0,1,W+W,D+W,D+D,D+A,A+A,F+F,B+J,C+C,K+W,G+W,V+K,U+U+D,124|,P+P+J,9000(#," "," PRESS ","SOUTH",V+W,U-D "s",Z,K,O,P,Q,84T,K,Z "h",Z,P-K,Q,Q,P,O,K,Z "d",Z,K,O,P,Q,P,O,K "c",Z,K,O,K,P,Q,84T,K !"T",Z,P-F,P+C,P+C,P+C,P+C,P-F,Z W,V+W B,C+W  V-W,V+W B,V+F V+W,J A,F A,G D,B+D,J+J,W,V+C,B+D,J+J,V+D 8"SQ9763HJ3D64CKJ52","SA5HAK742DK83CA94","SJ84HQT86DAT7CQ86","SKT2H95DQJ952CT73","S6D6D4C2S3C5H3HJCJCKS7S9SQ","SAD3DKD8S5C4C9HAHKCAH2H4H7","S4D7DTDASJH8C6H6HTC8HQCQS8","S2DQD2D5SKDJD9H5H9C3C7CTST","34241222444113","NORTH"," GAME ALL","Y - - 1H NO X1NtNO 3NtNO XNO NOZ" "SKT3HJT95DK93CQ92","S962HK7DAQJ4CAK73","S7HAQ842DT865CJT6","SAQJ854H63D72C854","HJH5C2SKCQS3D3STD9DKH9HTC9","HKH7CAS2CKS6DQS9DJDAD4C3C7","HAHQCJS7C6H2D5H4D6D8DTH8CT","H3H6C4SQC5SAD2SJD7C8S4S5S8","31143424244222","NORTH"," E/W GAME","Y - - 1D NO X1S NO 2NtNO X3S NO 4S NO XNO NOZ" "S865HADKT32CK8653","SJ42HQ764DQ854CJ7","ST973HJ85DAJ7CAQ4","SAKQHKT932D96CT92","S5HAS6C3S8C5D2CKDKD3C6DTC8","S2H4S4H6HQC7SJCJD4DQH7D5D8","S3H5S7H8HJCAS9C4D7DACQDJST","SAH2SKHKH3C2SQC9D6D9CTH9HT","32322412331422",Z$," E/W GAME","X1H NO 2H NO XNO NOZ" d"SQT652HT75D93CK92","S9873HAQ64DA85CT5","SJ4HKJ82DK74CJ763","SAKH93DQJT62CAQ84","S5D3S6D9H5C2H7HTCKSQSTS2C9","S3D5S7DAD8H4H6HQC5S8S9CTHA","SJDKS4D4D7H2C3HKC6C7H8HJCJ","SADQSKD2DJDTD6H3CQC4C8H9CA","32124222133332","EAST"," LOVE ALL","Y - - - NO X1D NO 1H NO X2NtNO 3NtNO XNO NOZ" "S94H854D752CKQJ93","SA85HKJ93DAQT83C4","SQ9763H7DKJ94C862","SKJ2HAQT62D6CAT75","CKD2D5C3D7C9S4S9CJH4DQH5H8","C4DAD3H3D8H9SAS5HJHKDTS8DQ","C2D4D9C6DJC8S3S6S7H7DKS9SQ","CAD6H2C5HTC7S2SKCTH6HAHQSJ","32424244244223","NORTH"," GAME ALL","Y - - 1D NO X1H NO 3H NO X6H NO NO NOZ" ,"SA94HJ963DQT852C7","SQT853H5DA83CQT54","SKJ72HQT8DK96C963","S6HAK742DJ4CAKJ62","D5H3H6C7H9D2D8HJS4D7S9DQSA","DAH5C4C5CTCQS3S5D3S8D8STSQ","D6H8HTC3HQC6C9S2S7D9SJDKSK","D4HAH2CAH4CKCJHKH7C2C6DJS6","34242422222213",Z$," LOVE ALL","X1H NO 1S NO X2C NO 3C NO X5C NO NO NOZ" #"SQT5HKT74D82CJ953","SK64HJ82DAJ763CKT","S82HAQ963DK95CQ84","SAJ973H5DQT4CA762","H4H7S5STD8D2HTSQC3C5C9HKCJ","H2H8SKS4D3D6HJD7CTS6CKDADJ","HAH6S2S8D5DKHQD9CQC4C8H9H3","H5S3S7SADQDTS9D4CASJC2C6C7","31242212322444","NORTH"," LOVE ALL","Y - - 1D 1H X1S 2H NO NO X3D NO 3S NO X4S NO NO NOZ" "SJ863HK74DT2CJT94","SK9HQT852DK74C862","SAT5H963DQJ86CA75","SQ742HAJDA953CKQ3","CJC4H4H7HKCTS3S6D2DTC9S8SJ","C2C6H2HQH5C8SKS9DKH8HTD4D7","CAC7H3H6H9C5SASTD6D8S5DJDQ","C3CKHAHJD3CQS2SQD5S4S7DAD9","31224321244421",Z$," GAME ALL","X1NtNO 2NtNO X3NtNO NO NOZ" X"ST42H9652D65CJT93","SAK6HQ74DAJ83CA84","SJ973HK8DQT92C752","SQ85HAJT3DK74CKQ6","CJH2S2H5H6C9H9D5D6S4STC3CT","CAH4SAH7HQC4D3D8DJDASKS6C8","C2H8S3HKC5C7S7D2DQD9S9SJDT","C6HJS5HAH3CKHTDKD4D7S8SQCQ","34242422214422","NORTH"," LOVE ALL","Y - - 1D NO X3NtNO 4NtNO X6NtNO NO NOZ" "SJ853HT5DKT64CQ92","SKT74HA82D953CA74","SHKJ763DAJ52C8653","SAQ962HQ94DQ7CKJT","D4DKDTS3S5H5HTS8SJD6C2C9CQ","D3D5D9S4S7H2HASKSTH8C4C7CA","DAD2D8H3H6HKH7DJC3HJC5C6C8","D7DQS2SAS6H4H9S9SQHQCJCKCT","31322414422224","WEST"," LOVE ALL","Y - NO NO NO X1S NO 3S NO X4S NO NO NOZ"  "SQ865HQJ6DJ42CJ93","ST97H73DAK97CKQ54","SK43HK9852DQT6CT7","SAJ2HAT4D853CA862","HQHJH6C3C9SQD2S5S6CJS8D4DJ","H3H7C4CKCQSTDAS7S9C5D7DKD9","H9H2H5C7CTS3D6S4SKH8HKDTDQ","H4HTHAC2C6S2D3SJSACAC8D5D8","33324434222241",Z$," GAME ALL","X1C NO 1D NO X1NtNO 3NtNO XNO NOZ" "SK3HKT983D96CK632","S84HJ5DKQJ83CA987","SJ9765HQ42DAT5C54","SAQT2HA76D742CQJT","H8H9HKD9D6HTS3C2C3C6H3SKCK","HJH5S4DKDQDJS8C7C8CAD3D8C9","HQH4H2D5DTDAS5C4C5S6S7S9SJ","H6H7HAD2D4D7SACQCJCTS2STSQ","31324412224443",Z$," E/W GAME","X1NtNO 2NtNO X3NtNO NO NOZ" "SKT53H8764D9CJ432","SA742HKJTDKQJ7CT8","S986H2DAT854CKQ95","SQJHAQ953D632CA76","D9H4C2H6H7H8C3S3C4CJS5SKST","DKD7C8HKHJHTDQDJCTS2S4SAS7","DAD4CKH2D5C5D8DTCQC9S6S8S9","D2D3CAH3H5H9D6C6C7HASQSJHQ","31324444412242","EAST"," GAME ALL","Y - - - NO X1H NO 1S NO X2H NO 4H NO XNO NOZ" # A$="Q1" #( ""K9 #-,"32766"="254"ſ"32766"="253""9015" #."65278"="254"V #1R$= #2 R$=""K9+B #AR$="1"A$="T" #FR$=A$A$="Q1" #P0.3,W:K9 %M=W % M=MM+D % A$=B$(M) %A$="Z""9860" %A$"X"A$"Y""9820" & M=M+W:I; &A$="Y"RZ"9700" & A$=B$(M) & " ?";C;C; & K9:A$; &4 A$=B$(M+W) &>K9 &H "2190" &RM=M+D:A$=B$(M) &f "2190" &pM &zJ$(S);:"9700" &