SC12:BO0953280,BO:53281,SC:(147):X(TI)l"**** BRIDGE 3.1 ****"(: C(52),P(52),V(4,5),Y(4,5),F(4,13),T9(4),X(4),G(4)2 T$(104),E$(56),A$(13),Z$(26),D$(13)<A$"23456789TJQKA":N$"1234567" FB$"XCDHS"J P" DO YOU WISH TO PLAY CONTRACT":"BRIDGE OR DUPLICATE BRIDGE ";Q$ ZR9R94(R94)1:K10:KR9:I152:P(I)I::V514 dQ$"C"120 n(147):"SHUFFLING":220 xA3.14159:B2.71828:C1.41421:T1.5 X(TI):A9((1)((X1000))1)D "SHUFFLING"Y X9A9:J5211 I2I21:X91(X9):E(E(1X9B)C)I2:EE1(EA):EE(E).018 E.5ET1(ET1)T1 R(EJ1):C(J)P(R):P(R)P(J):J:C(1)13R91:240 C(1)27R92:240 C(1)40R93:240- R94:240< J5211f R(((1))J1):C(J)P(R):P(R)P(J): I14:T9(I)13:MI1313:J113:F(I,J)C(JM):: "SHUFFLING":"DEALING" I14 T10 J213:F(I,J1)F(I,J)300H "T2F(I,J):F(I,J)F(I,J1):F(I,J1)T2:T11Y ,J:T11270t 6:T$"":L14:I113 @JF(L,I)13(F(L,I)13):M((F(L,I).1)13):J0J13 JZ$(A$,J,1)(B$,M2,1):T$T$Z$:: T"DEALING":R1:H0> Y"SORTING":2460:K1:L54:""y ^"YOUR HAND (SOUTH):"::2220:E$"":S$"1A":KR91 h:K0480 m" YOU ARE THE DEALER, WHAT DO YOU BID?": rK1:K1K11:"SOUTH"; |Z$:Z$""440 (Z$,1)"P"390C(K1)1:E$E$"00":K14480$560F(Z$,2,1)"N"Z$(Z$,1)"X"\(Z$,1)"D"430oC(K11)0420C(K12)1420" YOU CANNOT DOUBLE YOUR OWN PARTNER'S BID !":440C(K1)0:E$E$"DB":K14490560Z$S$450" ILLEGAL BID, TRY AGAIN.":3800C(K1)0:K14470[I15:(Z$,2,1)(B$,I,1)X(1)6I:nE$E$Z$:S$Z$KK1:K4370600:C(K1)05702760:K3550T1(E$):T15550Z$(E$,T11,2):Z$"00"520Z$"DB"550530(E$,T13,2)"00"550-3370:F12550UF$;": DOUBLE":E$E$"DB":K14480^!560z&F$;": PASS":E$E$"00"0K144802(E$,2K15,6)"000000"9404480:3170:F11490DS$D$:E$E$S$:(S$,2,1)"X"D$(S$,1,1)"NT"N2760:F$;": ";D$:480;XK1K11:C(K1)0:LK2:L0LK2IbK14780WgK12660hlP(K)23740yqP(K)12650vC(K1)1:3110:3050:C(K12)1620P(K)5680P(L)23650C(K11)0630(E$,2K15,1)"D"630 650P(K)97401V(K,X(K))5700S(B$,6X(K),1)(S$,2,1)650cX(L)5650xV(K,X(L))3770V(K,X(L))2630Y(K,X(L))0730770S$"1X"630D$"1X":P(K)14650P(K)18LK:640V(K,X(L))4650V(K,X(K))56501Y(K,X(K))4650:640F3080:V P(K)5790lP(K)P(L)25870V(K,X(K))4810P(K)16810 C(K12)1630"P(K)10700$K18930&870*C(K12)08304P(K)146306V(K,X(K))56308650/>(E$,2(K11)2,1)"X"900=HK17870TM(S$,1,1)"2"870iRV(K,X(K))5870yWP(K)9650\(B$,6X(K),1)(S$,2,1)650a710fX(L)0650kM1Y(K,X(K))V(K,X(K))Y(L,X(K))V(L,X(K))pM2Y(K,X(L))V(K,X(L))Y(L,X(L))V(L,X(L))"zM1M26507|V(K,X(L))2650J~X(K)X(L):770ZP(K)6630{(E$,2(K11)3,2)"3X"630F10:I14:V(K,I)4F11:F11650K14930P(K)126403140:I2(E$)7:T16:(E$,I2,1)"D"950"(E$,I24,4)"0000"T112:950+T18]X(K12T1)2(R91):W8X4(X4):W80W84wT4W82:T41T4W82K0:T1K122:I0II2:KK1:(E$,I,1)(S$,2,1)1010K1(K(R91))4((K(R91))4):K10K14K1W8K1T41030 IT1980-" EVERYONE PASSES, REDEAL."@Y1750::90fI15:(S$,2,1)(B$,6I,1)XIlX5S$(S$,1,1)"NT"$(E$,I2,1)"D"S$S$" (DBL)"."":"THE CONTRACT IS: ";S$:KK1:2760 8"THE DECLARER IS: ";F$:::K2K12:K24K2K12WBR0:W80:T40:"REVIEW OF THE BIDDING:"::"SOUTH WEST NORTH EAST":GT1R977:T1);:I1:T2R91:T3(E$)LII2:IT31160VD$(E$,I,2)" ":T2T21:T24:T21`(E$,I1,1)"X"D$(E$,I,1)"NT "j(E$,I,2)"DB"D$"DBL "&t(E$,I,2)"00"D$"PASS";~D$;" ";:1100`::" READY TO PLAY";:D$:""tHH1:H52050KK1:K4K1LK2:L1LK2M1K1:M15M11M2M12:M24M2M12H11290G20R132930RR1:"ROUND:";R:S"";S$;" WE:";W8;" THEY:";T4:K3K:lK12(K12)01240L55:K3:" NORTH:":2220:1270KK12:K14R11270K4KK12L57:K12L5172760:L54);F$;":":2220K1:L57:K141280L5171L54);"SOUTH:":2220:KK3? K11370TK2K:2360:2760xF$;" PLAYS";:D$:(D$)21350H11330(D$,2,1)(B$,6N,1)1330#V(K,N)01330("RENEGE, TRY AGAIN.":13002F10:I1T9(K)21:D$(Z$,I,2)F11<:F111360>F" ERROR IN LEAD, TRY AGAIN.":1300VP2080:G(K)G21170hUG2G(K):1170wZK31390_K12(K12)01390dK2K:2360:2760:1300nH11830s2620xT141420}KK1LK11450((S$,1,1))7R1450V(K,X(L))01450)X(L)X1430=KK1LK11430G1590K2K:2360:T10:I1X(L):T1T1V(K,I)::D$(Z$,2T11,2)2080:G2G(K):2760:F$;" PLAYS: ";D$:1170V(K,X)01520KK1LK114601520V(M1,X)V(M2,X)015204K2K:K$(B$,6X,1):2840:G3G(K):K2L:2840FG3G(K)1510pK2K:2360:T10:I1X:T1T1V(K,I):D$(Z$,2T11,2):1440K2K:2840:1440J0JJ1:V(M1,J)01540V(M1,X)01570V(M2,J)01550 V(M2,X)01570 JX1570MK$(B$,6J,1):K2K:2840:T2G(K):K2M1:2840:G(K)T21570kK2M2:2840:G(K)T21580y"J41530$V(K,X(L))01590&1430,K2K:2840:14406K2K:2360:T1300:T21:I1272R2:D$(Z$,I,2) @(D$,2,1)(S$,2,1)1620 E2880:G(K)T11620+ JT1G(K):T2IV T:D$(Z$,T2,2):2080:G(K)G2G2G(K)x ^2760:F$;" PLAYS: ";D$:1170 hT10:I1N:T1T1V(K,I)::K2K:2360:D$(Z$,2T11,2) r2080:G(K)G2G2G(K) |2760:F$;" PLAYS: ";D$:1170!V(K,X)01590!G3G2!H41750.!G(L)G21590A!T10:X11710_!I1X1:T1T1V(K,I)2:!K2K:2360:T2T12V(K,X)1!IT11!II2:D$(Z$,I,2):2880:G(K)G31740!IT111590!1920!IT21730!G(K)G31930!1590 "H31780"V(L,N)01770/"V(L,X)01590@"G(L)0:1780h"K2L:K$(B$,6N,1):2840:G(L)G(K)"K2M1:V(M1,N)01800"V(M1,X)0G40:1810"K$(B$,6X,1):2840:G4G(K):1810"K$(B$,6N,1):2840:G4G(K)"G4G3G3G4#G(L)G31690#!1590$#&V(K,N)016707#(V(K,N)11640K#*G3G2:H41940]#0G(L)G21640p#:T10:N11860#?I1N1:T1T1V(K,I)2:#DT2T11V(K,N)22:K2K:2360:IT11#NII2:D$(Z$,I,2):2880:G(K)G31880#S1890#XIT21870 $bIT111930$gG(K)G31930E$lD$(Z$,I2,2):2880:G(K)G31920_$vH32380:F111650x$D$(Z$,I2,2):1650$D$(Z$,T2,2):1650$H31980$K2L:V(L,N)01970$V(L,X)01960$G(L)0:1980%K$(B$,6X,1):2840:G(L)G(K):1980&%K$(B$,6N,1):2840:G(L)G(K)@%K2M1:V(M1,N)02010T%V(M1,X)02000c%G40:2020%K$(B$,6X,1):2840:G4G(K):2020%K$(B$,6N,1):2840:G4G(K)%G4G3G3G4%G(L)G31640%H31850%2380:F111650%1850#&T30:K14:G(K)T3T3G(K):T1KG& :T12(T12)1W8W81:2070S&T4T41h&H0:KT11:1170& T3N:I14:(D$,2,1)(B$,6I,1)2100&*V(K,I)V(K,I)1:NI&4:T2(1118R)2(H1):I1&>II2&HD$(T$,I,2)2130&MIT22110 'RIT22160'WI121503'\T$(T$,3,104):2170Z'fT$(T$,1,I1)(T$,I2,104):2170i'pT212170}'uT$(T$,1,T21)'zT9(K)T9(K)1:H1NT32200'NX2190'NT3:G(K)0:'NT3'2880' (D$"":T1(282R)(K1)1:Z$(T$,T1,2(14R)1)0(I1272R2:D$D$(Z$,I,1):C(V(K,1)02260i(L5);" ";(D$,1,V(K,1))::2270y(L5);"":(V(K,2)02290(L5);"Ӑ ";(D$,V(K,1)1,V(K,2))::2300(L5);"Ӑ":(V(K,3)02320) T1V(K,1)V(K,2):L5);"ڐ ";(D$,T11,V(K,3))::2330=) L5);"ڐ"::V(K,4)02350P) V(K,4)02350)$ T1V(K,1)V(K,2)V(K,3):L5);" ";(D$,T11,V(K,4))::). L5);""::)8 T50:K212370)= I1K21:T5T52T9(I):)B Z$(T$,T51,2T9(K2)): *L K2K:2360:T10:N12390**Q I1N1:T1T1V(K,I)2:A*V T2T11V(K,N)22q*` K$(B$,6N,1):2840:IT11:G(K)G3F10:{*j II2*t D$(Z$,I,2):2880:G(K)G22430*y 2440*~ IT22410* IT112450* D$(Z$,T2,2):F11:* D$(Z$,I2,2):F11:-+ I14:P(I)0:J15:V(I,J)0:Y(I,J)0::@+ I14:J113+ T2F(I,J)13(F(I,J)13):T15(((F(I,J).9)13)1):T20T213+ T2102500+ T2T29:Y(I,T1)Y(I,T1)T2+ V(I,T1)V(I,T1)1::+ I14:J14:T13V(I,J):T10T10G, P(I)P(I)Y(I,J)T1:F(I,J)V(I,J)(2(V(I,J)4)Y(I,J)):V(I,J)4F(I,J)0S, ::I0d, II1:I4, T11:J14:F(I,J)T12560, T1F(I,J):T2J, J, F(I,1)T212580, X(I)5:2590, X(I)T2, P(I)162610, J14:Y(I,J)22610-" V(I,J)32610;-( :X(I)5:V(I,5)5:Y(I,5)7:F(I,5)42E-2 2540W-< 2780:T10k-A K2L:2360:T20-F J14:T31T2:F(L,J)0:IT3T3V(L,J)1:D$(Z$,2I1,2):2880-K N2N29:N20N20-P F(L,J)F(L,J)N2::T2T2V(L,J):.Z (S$,2,1)"X"2700._ V(L,X)027002.d J14:V(L,J)02670E.g V(K,J)02670O.j 2690U.n h.x V(L,4)02700v. F(L,J)10. T21:J14:F(L,J)T22710. T2F(L,J):F1J. :X(L)F1:. 2360:T30:N12740. I1N1:T3T3V(K2,I):/ T314RT3T31$/ D$(Z$,2T31,2):2880:8/ K1F$"SOUTH"L/ K2F$" WEST"`/ K3F$"NORTH"t/ K4F$" EAST"z/ / / J0/ JJ1:K$(B$,6J,1):JX2800/ K2L:2840:T1G(K):K2M1:2840:G(K)T12800/ K2M2:2840:G(K)T128100 J427900 T10:&0 V(K,J)0280040 X52830H0 V(M1,J)02820\0 V(M1,X)02800p0 V(M2,J)028300 V(M2,X)028000 X(L)J:T14:0 2360:I0:F114R0" II1:(Z$,2I,1)K$28700, IF1285001 G(K)0:16 D$(Z$,2I,2):2880:&1@ N10:(D$,2,1)(S$,2,1)N113O1J I2913:(D$,1,1)(A$,I2,1)N2I2U1T z1^ (D$,1,1)"A"N2((D$,1,1))11h G(K)N1N2:1r :" THE CONTRACT WAS ";S$;".":T1((S$,1)):K12(K12)129701u T3T46T1:T3029501x T30296062| :" YOUR OPPONENTS WERE SET";(T3);"TRICK(S).":3020k2 :" YOUR OPPONENTS MADE THEIR CONTRACT.":30202 :" YOUR OPPONENTS MADE THEIR CONTRACT":" PLUS";T3;"OVERTRICK(S)."2 30202 T3W86T1:T3029902 T3030003 :" YOU WERE SET";(T3);"TRICK(S).":3020B3 :" YOU MADE YOUR CONTRACT.":3020d3 :" YOU MADE YOUR CONTRACT"3 " PLUS";T3;"OVERTRICK(S)."3 (Q$,1)"D"30403 :" CONTINUE ";:D$:(D$)0903 (D$,1,1)"N"3 904 :" THE HAND YOU JUST":"PLAYED WAS #";:A9:F4 I17:Z$(N$,I,1)(B$,6X(K),1):Z$S$3070R4 D$Z$:Z4 :4 I17:Z$(N$,I,1)(B$,6X(L),1):Z$S$31004 D$Z$:4 :4& I17:Z$(N$,I,1)(B$,6X(L),1):Z$S$313040 D$(N$,I1,1)(B$,6X(L),1):5: :15D I17:Z$(N$,I,1)(B$,1,1):Z$S$3160=5N D$Z$:E5X :l5b T2P(K)P(L):K2(K2)0T2T225l F10:(S$,1,1)"2"5q (Z$,1,1)"3"32005v (Z$,1,1)"4"32105x (Z$,1,1)"5"32405z (Z$,1,1)"6"32705| (Z$,1,1)"7"32806 T22332906 3300(6 T2263290M6 T1(E$):(E$,T13,2)"3X"3290e6 (Z$,2,1)"X"3290o6 33006 T22932906 T2306 T1(E$)6 (E$,T13,2)"4S"32906 (E$,T13,2)"4H"32906 33006 T23332906 33007 T2373290%7 S$(E$,2(K11)3,2)3290+7 >7 F11:C(K1)1:K7 T230s7 I215:(Z$,2,1)(B$,I2,1)33307 T1((Z$,1,1)):II27 :I133507 I333607 T1532907 7 T1332907 7 T1432907% 8* F10:(E$,T15,6)"DB0000":8/ T2P(1)P(3):I3((S$,1))13:IT2F12@84