++JJJJ S / XA=`' c+L\ƩA c+L A % ) +ȹ$ `  ƍàƠ 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ .J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  L' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  `     Ӝu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( p  Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠z# u`  ҠɠĠǠŠϠ D򠠠` (f8`󺠠` 堠<`  / X<>Ba=e?C ,,`+ `  X /`+&@A '=JlLJNK L Ơ lתժժÁժժժժՂԠՂЪԪՀԨՂԠ<ժߪߪժժժժ| f0pCy3f0`ժժժժߪպժÁժժժժ`~sG~p`ՀբՀԪԠժժߪߪժժժժ F f000C f00CժժժժբՀЊЀպժժժժ0CFAa0@1 ԠԪժժCဘߪժժժժ f0c000C F0CժժժժԠՂЪԪРՀժժժժ0Cf@a<3 ԨтԠԪߪժժCÙÙ̿ժժժժ|c0pa~3Cy`Cժժժժ5600:F114490(%D$(Z$,I2,2):4490@%D$(Z$,T2,2):4490S%K2L:H34800f%V(L,N)04790y%V(L,X)04780%G(L)0:4800%K$(B$,6X,1):6850:G(L)G(K):4800%K$(B$,6N,1):6850:G(L)G(K)%K2M1:V(M1,N)04824&V(M1,X)0468$jT10:N147244$lI1N1:T1T1V(K,I)2:]$tT2T11V(K,N)22:K2K:5500:IT11$~II2:D$(Z$,I,2):7000:G(K)G34744$4748$IT24734$IT114764$G(K)G34764$D$(Z$,I2,2):7000:G(K)G34760$H34760%K2M1:V(M1,N)046600#$V(M1,X)0G40:4666W#,K$(B$,6X,1):6850:G4G(K):4666x#4K$(B$,6N,1):6850:G4G(K)#:G4G3G3G4#<G(L)G34575#=4330#\V(K,N)04560#]V(K,N)14468#^H3R15100#`G3G2:H44770$fG(L)G2400:T2T12V(K,X)1"IT11I"II2:D$(Z$,I,2):7000:G(K)G34602Z"IT114330d"4760s"IT24594"G(K)G34764"4330" H34642"V(L,N)04632"V(L,X)04330"G(L)0:4642"K2L:K$(B$,6N,1):6850:G(L)G(K)#"!tT10:I1N:T1T1V(K,I)::K2K:5500>!D$(Z$,2T11,2)Y!4850:G(K)G2G2G(K)!HYH:6600:F$;" PLAYS: ";D$:45:4000!V(K,X)04330!G3G2!H44620!G(L)G24330!T10:X14584!I1X1:T1T1V(K,I)2:"K2K:55(L))04330 4208* K2K:6850:4230` K2K:5500:T1300:T21:I1272R2:D$(Z$,I,2)~ (D$,2,1)(S$,2,1)4356 7000:G(K)T14356 T1G(K):T2I :D$(Z$,T2,2):4850:G(K)G2G2G(K) HYH:6600:F$;" PLAYS: ";D$:45:4000(4230K2K:6850:4230!J0;JJ1:V(M1,J)04266OV(M1,X)04290cV(M2,J)04268wV(M2,X)04290JX4290K$(B$,6J,1):K2K:6850:T2G(K)K2M1:6850:G(K)T24290K2M2:6850:G(K)T24310J44263 V(K,XHYH:4850:G2G(K):6600:F$;" PLAYS: ";D$:45:4000IV(K,X)04262]KK1LK14250g4262V(M1,X)V(M2,X)04262K2K:K$(B$,6X,1):6850:G3G(K):K2L:6850:G3G(K)4258K2K:5500:T10:I1X:T1T1V(K,I)::D$(Z$,2T11,2):RK2K:5500:6600:4142&TH14700CUR15000: OPENING LEADXV6300:T144202sh((S$,1,1))7R4244jV(K,X(L))04244kX(L)X4208lKK1LK14208n4330pK2K:5500:T10:I1X(L):T1T1V(K,I):D$(Z$,2T11,2)613000::6600:4142?8F10:I1T9(K)21:D$(Z$,I,2)F11P>:F114166B(7);:HYH:1:" ILLEGAL PLAY ":I13000::6600:4142FH1R1O$D$G45:4850:G(K)G24000HG2G(K):4000PK34180QK12(K12)04180(K2K:5500:6600V.HYH:CV(37):1:F$;:" PLAYS: ";D$:(D$)2Ĺ37,CV1:4180|/22:AC$D$:3900:7900:EF141420FL0:H4FL11H141524(D$,2,1)(B$,6N,1)41525V(K,N)041526(7);:HYH:1:" ILLEGAL PLAY ":I;W8;31)"THEY: ";T4:K3K:(14))3072BK12(K12)04080jL516:K3:11);"NORTH":4900:4115KK12:K14R14115K4KK12L56:K12L5236600:L55);F$:4900K1:L516:11);"SOUTH":4900:KK3&K141761M2M12:M24M2M12*H141343G20BR137200RFL0İ7800(16):1:(9);:" ":1RR1:" TRICK: ";R;:23:"HAND: ";HN" ";SS$;23)"WE: "D$(Z$,1)"NT "'f 11ROW:37CELL1p D$:t<EF0:LC(AC$):AW1LC:XC((AC$,AW,1)):(XC96XC123)3904|>:@(7);"UPPER CASE INPUT ONLY!":EF1:HH1:H54840HY16KK1:K4K1LK2:L1LK2M1K1:M15M1T40:4000J 9:8:(9);:" SOUTH WEST NORTH EAST ";:(14):ROW0:_H X(E$)2(R91)sJ CELLX4(X4)K CELL0CELL4L CELL1ROWROW1N (E$)2K1ROWROW1\ (E$,2)"00"D$"PASS"` (E$,2)"DB"D$"DBL "d (E$,1)"X"ߪժժժժ |g 00C{f?Cժժժժ5(S$,2,1)"X"6410)5V(L,X)06410C5J14:V(L,J)06388V5V(K,J)06388`56390f5y5V(L,4)064105F(L,J)105 T21:J14:F(L,J)T264505 T2F(L,J):F1J52:X(L)F1:5d5500:T30:N165326xI1N1:T3T3V(K2,I)J14:Y(I,J)2V(I,J)3T10L4:T11X(I)5:V(I,5)5:Y(I,5)7:F(I,5)42V46222h46700:T10ı|4K2L:5500:T204J14:T31T2:F(L,J)0:IT3T3V(L,J)14D$(Z$,2I1,2):7000:N2N29:N20N204F(L,J)F(L,J)N2::T2T2V(L,J):NTRMP1)3$B(I,J)T1B(I,0)J:T1B(I,J)B3.J:NTRMP0B(I,0)5M38I:I0a3NII1:I459003PT11:T23:J14:F(I,J)T1V(I,J)462643QJ3V(I,J)4Y(I,J)262643tT1F(I,J):T2J3xJ3~X(I)T2:XX(I)T23PNTS(I)1662224T11:2"2I1I3PNTS(5)PNTS(5)T1B2I2I4PNTS(6)PNTS(6)T1J2:j2I12:NTRMP0:T11:J142B(I,J)V(I,J)Y(I,J)V(I2,J)Y(I2,J)F(I,J)F(I2,J)2 J3B(I,J)B(I,J)22JWV(I,J)V(I2,J):JW6JW9NTRMP13Y(I,J)Y(I2,J)4)1):T20T213 1T2106090?1T2T29:Y(I,T1)Y(I,T1)T2Y1V(I,T1)V(I,T1)1::1I14:J14:T13V(I,J):VV(I,J)V(I,J):T10T101PNTS(I)PNTS(I)Y(I,J)T1:AW2V(I,J)4:AW0AW01F(I,J)V(I,J)Y(I,J)AW2Y(I,J)0F(I,J)F(I,J)(I)145940@0*AW$(T$,XL1):JW$(T$,XL):T$AW$JW$:OPN2:I4U04:OPN1OPN3:a069508:0pI14:PNTS(I)0:PNTS(I4)0:T9(I)130rJ15:V(I,J)0:VV(I,J)0:Y(I,J)0:J:I0I14:J113:T2F(I,J)13(F(I,J)13)1T15(((F(I,J).9)1350:IT11:G(K)G3F10:;/G2G(L)D$(Z$,T2,2):F11:E/II2k/D$(Z$,I,2):7000:G(K)G25644z/IT25624/ IT115652/D$(Z$,T2,2):F11:/D$(Z$,I2,2):F11:/ OPN0ı/PNTS(1)14ı/I24:XL(I1)26 0 PNTS(L)G24468.4704=.K2K:K$(O$,1):6850:G(K)G24468G. 4490[.|T50:K215550y.~I1K21:T5T52T9(I):.Z$(T$,T51,2T9(K2)):.K2K:5500:T10:N15608.I1N1:T1T1V(K,I)2:.T2T11V(K,N)22/K$(B$,6N,1):682-JW$(Z$,2AW1,1):HF0G-JW$"J"JW$"Q"JW$"K"JW$"A"HF1M--AW0:J1XX(L)1:AWAWV(K,J):J:XX(L)1AW0--AW0:J1XX(K)1:AWAWV(K,J):J:XX(K)1AW0--(O$,1)"9"5110-(O$,1)"9"(O$,1)"T"4704 .G0701,JW$(Z$,2AW1,1):JW$JW$(Z$,2AW3,1)V,JW$"AK"JW$"KQ"JW$"QJ"5020|,(S$,2,1)"N"(JW$,1)"A"5020,V(K,XX(K))45084,D$(Z$,2AW7,2):5022,D$(Z$,2AW2V(K,XX(L))1,2):5022-D$(Z$,2AW2V(K,XX(L))1,2):502(Z$,2AW1,2)N+4850:G2G(K):6600:HYH:F$;" PLAYS: ";D$:O$D$:45:4000|+BID(L,XX(L))0V(K,XX(L))0XX(L)55060+5094:5090:V(K,XX(L))25046+HF15020+5080+V(K,XX(L))35070+HF15080+5020,5098:5090:HF052)V(K,3):L5);"C: ";(D$,T11,V(K,4))-*N>*QL5);"C:":M*K2K:5500e*(S$,2,1)"N"5040*BID(L,XX(L))0V(K,XX(L))0XX(L)55060*5094:5090:HF05020*HF1V(K,XX(L))35020*V(K,XX(L))3(JW$,1)"A"5020*5080+D$(D$,1,V(K,1)):4920")3L5);"S:"5)8V(K,2)04925a):L5);"H: ";(D$,V(K,1)1,V(K,2)):4930p)=L5);"H:")BV(K,3)04935)DT1V(K,1)V(K,2):L5);"D: ";(D$,T11,V(K,3)):4937)GL5);"D:":V(K,4)04945)IV(K,4)04945'*MT1V(K,1)V(K,85(T214885%(T$(T$,1,T21)A(T9(K)T9(K)1:H14897P(NT34897d(NXNT3:4897v(NT3:G(K)0:(!7000:($D$"":T1(282R)(K1)1:Z$(T$,T1,2(14R)1)()I1272R2:D$D$(Z$,I,1):(.V(K,1)04915)0L5);"S: ";41'H0:KT11:4000E'T3N:I14:(D$,2,1)(B$,6I,1)4865]'V(K,I)V(K,I)1:NI}':T2(1118R)2(H1):I1'II2'D$(T$,I,2)4872'IT24867'IT24882' I14878' T$(T$,3):4885(T$(T$,1,I1)(T$,I2):484814&G40:4830:&K$(B$,6X,1):6850:G4G(K):4830[&K$(B$,6N,1):6850:G4G(K)l&G4G3G3G4&G(L)G34468&H34714&5600:F114490&4714&T30:K14:G(K)T3T3G(K):T1K&:T12(T12)1W8W81:4848'T4T OPENING LEAD: ";O$;:(14):IE$Z$(TT$,53,26):K3:9480:14)"NORTH"oE$D$"":I113:D$D$(Z$,2I1,1)E$I:Z$D$:9470E$Z$(TT$,26):K4:9480:10:21)" EAST":TA25E$D$"":I113:D$D$(Z$,2I1,1)E$I:Z$D$:9470 F$Z$(TT$,27,26T2F12D"CD"T2PNTS(1)PNTS(3):I3((S$,1))13:IT2F12jD$I14:J14:V(I,J)0:J:I:TA18D$(16):1:(9);:" ":1D$(9);:" HAND: ";HN;" ";SS$E$"$"6H" C!!C!F11:PSS(K1)1:0C!AW68640@C!T2338629XC!X(K)B(JW,0)8629^C!nC!T2378629C!X(K)B(JW,0)8629C!C!F10:(E$,(E$)5,6)"DB0000"ıC!T2PNTS(1)PNTS(3):(K1K3)T2PNTS(2)PNTS(4)D"I3((S$,1))13:I268629EB!((E$,T13,2)"4S"(E$,T13,2)"4H")X(L)B(JW,0)8629yB!B(JW,0)2T229BID$(L)(S$,2)F11:PSS(K1)1B!B!AW58630B!AW$(E$,T13,2):T2298629B!(AW$"4S"AW$"4H"AW$"5C")T2338629B!Z$"5S"Z$"6S"C!Z$"5H"Z(K1)1:%AR!AW((Z$,1)):AW386107AV!AW3T222ıSA!T224F11:PSS(K1)1:pA!(Z$"3X"T225)T232ıA!B(JW,0)3T226BID$(L)(S$,2)8629A!B(JW,0)2T224BID$(L)(S$,2)8629A!A!AW48620A!T232ıB!(E$,T13,2)"3X"T2)JW2@D!T2PNTS(K)PNTS(L)?@F!(Z$,1)"X"T2T2PNTS(JW4)a@G!AW3V(L,X(K)):AW0T2T2AWy@H!(E$,2)"00"8530@I!T225((Z$,1))48530@J!(T225B(JW,0)3B(JW,0)5)(T228B(JW,0)2)8530@K!(T225(Z$,1)"X"X(L)5)8530AL!F11:PSS)"3X"FRC(K)0:%?;!FRC(K)285148?!AW$"4S"AW$"4H"AW$"5D"AW$"5C"FRC(K)0:8514??!Z$"3X"Z$"4S"Z$"4H"Z$"5D"Z$"5C"FRC(K)0?@!FRC(K)0FRC(L)0:@B!JW1:(K2K4$(N$,I,1)(B$,6X(K),1):Z$S$8360Q> Z$(N$,I1,1)(B$,6X(K),1):D$Z$:Y> :}>4!F10:T1(E$):(Z$,1)"3"8502>5!T18ı>6!Z$"7X"Z$"7"F11:PSS(K1)1:>7!FRC(K)6F11:PSS(K1)1:>8!FRC(K)5FRC(K)6:?:!FRC(K)1(BID$(L),2@I17:Z$(N$,I,1)(B$,6X(K),1):Z$S$8050==hD$Z$:E=r:y=I17:Z$(N$,I,1)(B$,6X(L),1):Z$S$8160=D$Z$:=:= I17:Z$(N$,I,1)(B$,6X(L),1):Z$S$8260=: D$(N$,I1,1)(B$,6X(L),1):Z$D$:=D :'>l I17:Z50S<(16)::"INSERT ANOTHER DISK AND":"PRESS 'RESET'.":" ";D$:(4);"PR#6"G%TA)"H: ";:V(K,2)0ĺ:9474bG%(Z$,V(K,2)):Z$(Z$,V(K,2)1)G%TA)"D: ";:V(K,3)0ĺ:9476G%(Z$,V(K,3)):V(K,4)0Z$(Z$,(V(K,3)1))G%TA)"C: ";:V(K,4)0ĺ:9478G%Z$G%G%J2262H %(Z$,J,):K2:9480:10:4:" WEST":TA9FF$D$"":I113:D$D$(Z$,2I1,1)YF$I:Z$D$:9470F$Z$(TT$,26):K1:9480:16:14)"SOUTH":TA18F$D$"":I113:D$D$(Z$,2I1,1)F$I:Z$D$:9470F$F$Z$(Z$,13):TA)"S: ";:V(K,1)0ĺ:9472G$((3V(K,X(L))):225004ejWJ14:JLV(K,J)122380SekWPNTS(K)PNTS(K)(2V(K,J))YelWenW(X(L)3Y(K,X(L))0)PNTS(K)PNTS(K)1ezWPNTS(K)10AWX(K):X(K)5:8000:X(K)AW:e|WPNTS(K)13İ8000:e~WPNTS(K)16V(K,X(L))3İ8200: fWF0:J14:PSS(K1)1:.dRW(E$,2)"00"X(K)5:8000:AdTWZ$"4X":BLK1XdVWPNTS(K)9Z$"6X"pdXWPNTS(K)11Z$"7X"vdZWdbWPNTS(K)6PSS(K1)1:ddWPNTS(K)17İ8300:FRC(L)2:dfW(BID$(L),1)"D"(BID$(L),1)"C"22420ehWV(K,X(L))3PNTS(K)PNTS(K)TS(K)14Z$"7X"c>WZ$S$ı5c@WS$"4X"Z$"DBL":HcBWX(K)5:8000:cDWF0:AW0:J12:V(K,J)4JWV(K,J):JWAWFJ:AWJWcFW:F0X(K)F:8000:cHWPNTS(K)4PSS(K1)1:cJWPNTS(K)8X(K)5cLW8000:cNWBID$(L)"3X"22370 dPWPNTS(K)7(WV(K,J)6JWJ5b*W:FRC(L)1:AW0X(K)AW:8000:Ob,WJW0X(K)JW:8000:bb.WX(K)5:8000:b0WF0:J14:V(K,J)3F1b2W:F122340b4WPNTS(K)4PSS(K1)1:b6WPNTS(K)8Z$"3X"b8WPNTS(K)9Z$"4X":BLK1b:WPNTS(K)10Z$"6X"cVV(K,4)V(K,3)FJW]@VX(K)F:8000:X(K)AW^BVK14)FJ-\0V(V(K,I)6Y(K,I)2PNTS(K)20)FJ^\1V:J34:(V(K,J)4Y(K,J)3PNTS(K)26)FJ\2V(V(K,J)5Y(K,J)3PNTS(K)24)FJ\3V(V(K,J)6Y(K,J)2PNTS(K)22)FJ\4V:F022070\5VJWX(L):X(L)X(K):8200:X(L)JW:FRC(L)2:FRC(K)2:&]6VF0:5:FRC(K)2:22057G['V(AW24AW28F4)Z$"3X":X(K)5:FRC(K)2:22057R[(V22060m[)VV(K,5)5:Z$S$İ8000s[*V[,VPNTS(K)2122070:***TESTFORBIDDINGTWOOFASUIT*** [.VF0:J12:(V(K,J)4Y(K,J)3PNTS(K)24)FJ\/V(V(K,I)5Y(K,I)3PNTS(K)22K,I)::F122060 ZVAWPNTS(K)WZ VF0:I14:(V(K,I)2Y(K,I)0)(I3V(K,I)4)F1mZ!VV(K,I)2AWAW1~Z"V:F122060Z#VF0:I14:Y(K,I)(4V(K,I))0FF1Z$VZ%V(AW15AW19F2)Z$"1X":X(K)5:22057[&V(AW21AW25F4)Z$"2X":X(K)JW1:(E$,4)"0000"JW2-YVK1JW422600@YVK1JW222090iYV(BID$(K1))0BID$(K1)"00"22042tYV22090YVPNTS(K)13PSS(K1)1:YVF0:I14:V(K,I)222046YVV(K,I)2F1:22046YVJW26(K1)AW1:(T$,JW,1)"9"F1ZVAWAW2V(BLK121190XR8500%XRF1121100RXRS$Z$:E$E$Z$:BID$(K)BID$(K)Z$:19900XR6600:D$Z$:(Z$,1)"X"D$(D$,1)"NT"XR3400:21000XUK1K11:PSS(K1)0:LK2:L0LK2XUK3BLK1İ2500:BLK1ıXV(E$)422040YVJW0:(E$,2)"00"*WvR(BID$(L),2)"00"(E$,2)"00"21130TWR((E$,2)"00"(E$,2)"DB")21130kWR8700:F1221130WRE$E$"DB":BID$(K)BID$(K)"DB":21160WRE$E$"00":BID$(K)BID$(K)"00"WR3400:K1421000WR(E$,6)"000000"3000WR21000 XRK3)X(1)6IVtQ1VQ(Z$,2)"NT"Z$(Z$,1)"X"nVQE$E$Z$:BID$(1)BID$(1)Z$:S$Z$:19900:Z$"2C"20900VQBID$(3)"1X"FRC(3)3:BID(1,4)0VQ3400VRKK1:K420810V R22000:6600:DF1DF0:21125V RPSS(K1)021180VlRK3K1521130D$(Z$,I,2)*(D$,2,1)(S$,2,1)4356B7000:G(K)T14356ST1G(K):T2I~:D$(Z$,T2,2):4850:G(K)G2G2G(K)6600:F$;" PLAYS: ";D$:4000tT10:I1N:T1T1V(K,I)::K2K:5500D$(Z$,2T11,2)4850:G(K)G2G2G(K)V(M2,J)04268#V(M2,X)042901JX4290WK$(B$,6J,1):K2K:6850:T2G(K)uK2M1:6850:G(K)T24290K2M2:6850:G(K)T24310J44263V(K,X(L))043304208K2K:6850:4230 K2K:5500:T1300:T21:I1272R2:LK142504262/V(M1,X)V(M2,X)04262nK2K:K$(B$,6X,1):6850:G3G(K):K2L:6850:G3G(K)4258K2K:5500:T10:I1X:T1T1V(K,I)::D$(Z$,2T11,2):4230K2K:6850:4230J0JJ1:V(M1,J)04266V(M1,X)04290300:T144202)h((S$,1,1))7R4244?jV(K,X(L))04244QkX(L)X4208elKK1LK14208on4330pK2K:5500:T10:I1X(L):T1T1V(K,I):D$(Z$,2T11,2)4850:G2G(K):6600:F$;" PLAYS: ";D$:4000V(K,X)04262 KK19(K)21:D$(Z$,I,2)F11,>:F114166NB(7);" ILLEGAL PLAY! ":4142aFH1R1O$D$yG4850:G(K)G24000HG2G(K):4000PK34180QK12(K12)04180RK2K:5500:6600:4142TH14700UR15000: OPENING LEADV6K14176(K2K:5500:6600X.CV(37):F$;:" PLAYS: ";D$:(D$)2Ĺ37,CV1::4180z/AC$D$:3900:7900:EF141420FL0:H4FL11H141524(D$,2,1)(B$,6N,1)41525V(K,N)041526(7);" ILLEGAL PLAY! ":41428F10:I1T" ";SS$;23)"WE: ";W8;31)"THEY: ";T4:K3K::IK12(K12)04080qL516:K3:11);"NORTH":4900:4115KK12:K14R14115K4KK12L56:K12L5236600:L55);F$:4900K1:L516:11);"SOUTH":4900:KK3:&20nXX(K)5:8000:.nXBID(K,X(L))122730JnXX(L)5B(JW,0)522726|nX((BID$(K))2V(K,X(K))4PNTS(K)18)22726nX8000:Z$(N$,I1,1)(B$,6X(K),1):D$Z$:nXV(K,X(L))322730nXBID(L,X(L))1İ8100:nXJW122750oXV(K,B(2,0)):8000:mzXX(K)1:8000:PmX(BID$(K),2)"00"(BID$(L),2)"00"PSS(K1)1:gmXJW1:K2K4JW2mXFRC(K)0PNTS(K)6PSS(K1)1:mXB(JW,0)5S$"3X"22720mXV(K,X(K))5V(L,X(L))522710mX(B(JW,0)5(E$)14)22720nXS$"3X"227620+lVXPNTS(K)13V(K,X(K))5PSS(K1)1:Bl\X(FRC(K)3)22700Ml]X22630slfXFRC(K)0:V(K,1)4V(K,2)422632~lgX22640lhXS$"2D"İ8000:ljXZ$"2D":lpXV(K,2)V(K,1)X(K)2:8000:ltXV(K,1)V(K,2)X(K)1:8000:mvXY(K,2)Y(K,1)X(K)2F122540*kWPNTS(K)13İ8000:FRC(L)1:JkWZ$"2X":PNTS(K)15Z$"3X"ckWZ$S$X(L)5:8000ikWk XPNTS(K)18İ8300:FRC(K)2:FRC(L)2:kX8000:kHX(BID$(L),1)"0"PNTS(K)1622620kJXFRC(L)122700lRX(BID$(L),1)"0"PNTS(K)1622WV(K,X(L))4X(K)X(L):8200:+jW8000:FjWPNTS(K)6PSS(K1)1:njW(S$,1)"1"PNTS(K)10PSS(K1)1:jWPNTS(K)922510jW8000:(Z$,1)"2"ıjW"1X"S$Z$"1X"jWjWF0:J14:JX(K)JX(L)22514jW(V(K,J)3Y(K,J)0)F1 kW:AW:%iWF0:J14:BID(L,J)122464KiW(V(K,J)2V(K,J)5Y(K,J)0)F1|iW(V(K,J)1Y(K,J)4)(V(K,J)2Y(K,J)3)F1iW:F122480iWPNTS(K)1522470iWZ$"2X":FRC(L)1:Z$S$X(K)5:8000:iWiWZ$"3X":Z$S$X(K)5:8000:iWjW(V(K,1)4Y(K,1)4)X(K)2:FRC(L)1:8000:^hW(V(K,2)4Y(K,2)4)X(K)1:FRC(L)1:8000:hWX(K)1:Y(K,2)Y(K,1)X(K)2hWFRC(L)1:8000:hWAWX(K):X(K)3:(BID$(L),2,1)"D"X(K)4hWPNTS(K)PNTS(L)22((S$,1))2FRC(L)1iW8000:X(K)H":AWV(K,2)$gWV(K,1)AWZ$"1S";gWZ$S$PSS(K1)1:QgWPNTS(K)1222460zgWX(K)3V(K,X(K))4FRC(L)1:8000:gW(V(K,1)4Y(K,1)4)(V(K,2)4Y(K,2)4)22450gW(BID$(K1),1)"S"(BID$(K1),1)"H"22450gWY(K,1)4ĭY(K,2)422450-hV(K,J)2F17fW:(F1PNTS(K)11V(K,X(L))3)22404CfW8000:`fW(S$,1)"4"PSS(K1)1:{fW8100:Z$"4"(D$,1):fWPNTS(K)922440fW(S$,1)"1"PSS(K1)1:fWV(K,X(L))3İ8100:fWZ$"1X":AWV(K,4):AW3Z$"1D" gWV(K,2)AWZ$"1I)0:PNTS(I4)0:T9(I)13F-rJ15:V(I,J)0:VV(I,J)0:Y(I,J)0:J:Is-I14:J113:T2F(I,J)13(F(I,J)13)-T15(((F(I,J).9)13)1):T20T213-T2106090-T2T29:Y(I,T1)Y(I,T1)T2-V(I,T1)V(I,T1)1::.I14:J14:T13VT25624, IT1156523,D$(Z$,T2,2):F11:M,D$(Z$,I2,2):F11:Z, OPN0ım,PNTS(1)14ı,I24:XL(I1)26, PNTS(I)145940,*AW$(T$,XL1):JW$(T$,XL):T$AW$JW$:OPN2:I4,4:OPN1OPN3:,69508:-pI14:PNTS(T9(I):$+Z$(T$,T51,2T9(K2)):B+K2K:5500:T10:N15608`+I1N1:T1T1V(K,I)2:w+T2T11V(K,N)22+K$(B$,6N,1):6850:IT11:G(K)G3F10:+G2G(L)D$(Z$,T2,2):F11:+II2+D$(Z$,I,2):7000:G(K)G25644,IJ:XX(L)1AW0*I*AW0:J1XX(K)1:AWAWV(K,J):J:XX(K)1AW0O*e*(O$,1)"9"5110*(O$,1)"9"(O$,1)"T"4704*G(L)G24468*4704*K2K:K$(O$,1):6850:G(K)G24468* 4490*|T50:K215550+~I1K21:T5T52)"A"5020!)V(K,XX(K))45084=)D$(Z$,2AW7,2):5022f)D$(Z$,2AW2V(K,XX(L))1,2):5022)D$(Z$,2AW2V(K,XX(L))1,2):5022)JW$(Z$,2AW1,1):HF0)JW$"J"JW$"Q"JW$"K"JW$"A"HF1)*AW0:J1XX(L)1:AWAWV(K,J):(L)55060-(5094:5090:V(K,XX(L))25046<(HF15020F(5080](V(K,XX(L))35070l(HF15080v(5020(5098:5090:HF05070(JW$(Z$,2AW1,1):JW$JW$(Z$,2AW3,1)(JW$"AK"JW$"KQ"JW$"QJ"5020 )(S$,2,1)"N"(JW$,1BID(L,XX(L))0V(K,XX(L))0XX(L)55060F'5094:5090:HF05020b'HF1V(K,XX(L))35020'V(K,XX(L))3(JW$,1)"A"5020'5080'D$(Z$,2AW1,2)'4850:G2G(K):6600:F$;" PLAYS: ";D$:O$D$:4000 (BID(L,XX(L))0V(K,XX(L))0XXL5);"H:"&BV(K,3)04935T&DT1V(K,1)V(K,2):L5);"D: ";(D$,T11,V(K,3)):4937r&GL5);"D:":V(K,4)04945&IV(K,4)04945&MT1V(K,1)V(K,2)V(K,3):L5);"C: ";(D$,T11,V(K,4))&N&QL5);"C:":&K2K:5500&(S$,2,1)"N"5040+'NT3:G(K)0:%!7000:O%$D$"":T1(282R)(K1)1:Z$(T$,T1,2(14R)1)s%)I1272R2:D$D$(Z$,I,1):%.V(K,1)04915%0L5);"S: ";(D$,1,V(K,1)):4920%3L5);"S:"%8V(K,2)04925%:L5);"H: ";(D$,V(K,1)1,V(K,2)):4930&=1118R)2(H1):I1$II26$D$(T$,I,2)4872E$IT24867T$IT24882b$ I14878w$ T$(T$,3):4885$T$(T$,1,I1)(T$,I2):4885$T214885$T$(T$,1,T21)$T9(K)T9(K)1:H14897$NT34897$NXNT3:4897%3G4#G(L)G34468&#H34714;#5600:F114490E#4714k#T30:K14:G(K)T3T3G(K):T1K#:T12(T12)1W8W81:4848#T4T41#H0:KT11:4000#T3N:I14:(D$,2,1)(B$,6I,1)4865#V(K,I)V(K,I)1:NI$:T2("V(L,X)04780""G(L)0:4800K"K$(B$,6X,1):6850:G(L)G(K):4800n"K$(B$,6N,1):6850:G(L)G(K)"K2M1:V(M1,N)04824"V(M1,X)04814"G40:4830"K$(B$,6X,1):6850:G4G(K):4830"K$(B$,6N,1):6850:G4G(K)#G4G3GD$(Z$,I,2):7000:G(K)G34744*!47489!IT24734J!IT114764\!G(K)G34764!D$(Z$,I2,2):7000:G(K)G34760!H34760!5600:F114490!D$(Z$,I2,2):4490!D$(Z$,T2,2):4490!K2L:H34800!V(L,N)047901):6850:G4G(K)! :G4G3G3G43 <G(L)G34575= =4330P \V(K,N)04560c ]V(K,N)14468u ^H3R15100 `G3G2:H44770 fG(L)G24468 jT10:N14724 lI1N1:T1T1V(K,I)2: tT2T11V(K,N)22:K2K:5500:IT11 !~II2:IT24594G(K)G34764'43305 H34642HV(L,N)04632[V(L,X)04330lG(L)0:4642K2L:K$(B$,6N,1):6850:G(L)G(K)"K2M1:V(M1,N)04660$V(M1,X)0G40:4666,K$(B$,6X,1):6850:G4G(K):4666 4K$(B$,6N,6600:F$;" PLAYS: ";D$:40000V(K,X)04330:G3G2HH44620ZG(L)G24330mT10:X14584I1X1:T1T1V(K,I)2:K2K:5500:T2T12V(K,X)1IT11II2:D$(Z$,I,2):7000:G(K)G34602IT1143304760 X(L)5)8530"=L!F11:PSS(K1)1:?=R!AW((Z$,1)):AW38610Q=V!AW3T222ım=!T224F11:PSS(K1)1:=!(Z$"3X"T225)T232ı=!B(JW,0)3T226BID$(L)(S$,2)8629=!B(JW,0)2T224BID$(L)(S$,2)8629=!=!AW48620>!T232ı(L)0: !AW$"4S"AW$"4H"AW$"5D"AW$"5C"FRC(K)0:8514;?!Z$"3X"Z$"4S"Z$"4H"Z$"5D"Z$"5C"FRC(K)0<@!FRC(K)0FRC4:l I17:Z$(N$,I,1)(B$,6X(K),1):Z$S$8360^: Z$(N$,I1,1)(B$,6X(K),1):D$Z$:f: ::4!F10:T1(E$):(Z$,1)"3"8502:5!T18ı:6!Z$"7X"Z$"7"F11:PSS(K1)1::7!FRC(K)6F11:PSS(K1)1::8!FRC(K)5FRC(K)6:;:!FRC(K) 94144>9@I17:Z$(N$,I,1)(B$,6X(K),1):Z$S$8050J9hD$Z$:R9r:9I17:Z$(N$,I,1)(B$,6X(L),1):Z$S$81609D$Z$:9:9 I17:Z$(N$,I,1)(B$,6X(L),1):Z$S$82609: D$(N$,I1,1)(B$,6X(L),1):Z$D$::D : HAND (#";HN;")?";:Q$:Q$"Y"İ9500:7001850{8::"INSERT ANOTHER DISK AND":"PRESS 'RESET'.":" ";D$:(4);"PR#6"8x24::"PRESS 'RETURN'";AW$::8(D$,2)"QU"73018(D$,2)"CL"W8W8(14R):72009(D$,2)"CO"T4T4(14R):7200CONTRACT (";S$;").":7300]7k:"YOU MADE YOUR CONTRACT (";S$;")":"PLUS ";T3;" OVERTRICKS."s77800:9900:7800|7:27:D$"Y"::"DISPLAY ALL HANDS? ";:D$:D$"Y"ė:9400:730877312724::"PRESS 'RETURN'";D$:)8Q$"N":::"REPLAY:"YOUR OPPONENTS MADE":"THEIR CONTRACT (";S$;").":73006H:"YOUR OPPONENTS MADE THEIR":"CONTRACT (";S$;")":"PLUS ";T3;" OVERTRICKS.":73006RT3W86T1:T3072706TT3072756b:"YOU WERE SET ";(T3);" TRICKS.":73007f:"YOU MADE YOUR ,1)""G(K)0:#5D$""G(K)0:H5(D$,1,1)"A"N2((D$,1,1))1Y5G(K)N1N2:h5 7800::55!T1((S$,1,1)):K12(K12)172505"T3T46T154T30723656T3072405?:"YOUR OPPONENTS WERE":"SET ";(T3);" TRICKS.":730096DV(M2,J)06840%4V(M2,X)0680074X(L)J:T14:M45500:I0:F114Rl4II1:(Z$,2I,1)K$6900{4IF168704G(K)0:4D$(Z$,2I1,2):7000:4XN10:(D$,2,1)(S$,2,1)N1134I2913:(D$,1,1)(A$,I2,1)N2I25:(D$,13K4F$" EAST"3!3,J0D36JJ1:K$(B$,6J,1):JX6800[38K2L:6850:T1G(K)y3hK2M1:6850:G(K)T168003jK2M2:68503G(K)T168203J467103T10:3V(K,J)068003X568403V(M1,J)068363V(M1,X)068004064102F(L,J)1072 T21:J14:F(L,J)T26450J2 T2F(L,J):F1JZ22:X(L)F1:s2d5500:T30:N165322xI1N1:T3T3V(K2,I):2T314RT3T312D$(Z$,2T31,2):7000:2K1F$"SOUTH"2K2F$" WEST"2K3F$"NORTH"5500:T2081J14:T31T2:F(L,J)0:IT3T3V(L,J)1f1D$(Z$,2I1,2):7000:N2N29:N20N201F(L,J)F(L,J)N2::T2T2V(L,J):1(S$,2,1)"X"64101V(L,X)064101J14:V(L,J)063881V(K,J)063881639012V(L,4)J14:F(I,J)T1V(I,J)46264?0QJ3V(I,J)4Y(I,J)26264R0tT1F(I,J):T2JY0xJn0~X(I)T2:XX(I)T20PNTS(I)1662220T11:J14:Y(I,J)2V(I,J)3T100:T11X(I)5:V(I,5)5:Y(I,5)7:F(I,5)420622206700:T10ı 1K2L:,J)V(I,J)Y(I,J)V(I2,J)Y(I2,J)F(I,J)F(I2,J)L/ J3B(I,J)B(I,J)2v/JWV(I,J)V(I2,J):JW6JW9NTRMP1/Y(I,J)Y(I2,J)4NTRMP1/$B(I,J)T1B(I,0)J:T1B(I,J)/.J:NTRMP0B(I,0)5/8I:I0/NII1:I459000PT11:T23:(I,J):VV(I,J)V(I,J):T10T10V.PNTS(I)PNTS(I)Y(I,J)T1:AW2V(I,J)4:AW0AW0r.F(I,J)V(I,J)Y(I,J)AW.Y(I,J)0F(I,J)F(I,J)2.I1I3PNTS(5)PNTS(5)T1.I2I4PNTS(6)PNTS(6)T1.:.I12:NTRMP0:T11:J143/B(IE$E$"00":3400:BID$(1)BID$(1)"00":K1421000Jh)AWTR((S$,1,1))6:AW010610kJj)PT30:(S$,2,1)"C"(S$,2,1)"D"PT20Jl)SC(11,1)1PT100:SC(12,J)1PT200Jn)I1AW:SC(4,J)SC(4,J)PT:IJr)SC(3JW,J)100ıJz)SC(12,J)110640J|)SC(12,J)1: K)SC(4,J)N"PT30:SC(11,1)1PT600I0)AW((S$,1,1))1TI2)I1AW:SC(10,J)SC(10,J)PT:IwI6)SC(11,1)1SC(4,J)SC(4,J)50I:)((S$,1,1))610580I@)PT500:SC(12,J)1PT750ID)((S$,1,1))7PT1000:SC(12,J)1PT1500IJ)SC(4,J)SC(4,J)PTJT)SC(3 H'AW1TR-H(SC(4,J)SC(4,J)(PT100):AW3H (RH)J1:K2:K12K14J2:K1H)PT30:(S$,2,1)"D"(S$,2,1)"C"PT20H)(S$,2,1)"N"PT40H )SC(11,1)1PTPT2H")JWSC(12,1)SC(12,2)H,)SC(10,J)PT:((S$,1,1))110550I.)(S$,2,1)"12:J12:SC(I,J)0::G'#G'?Gt'TR((S$,1))610500^G'J1:K2:K11K13J2:K1{G'PT50:SC(12,K)1PT100G'TR((S$,1))TR6G'SC(11,1)110200G'SC(4,J)SC(4,J)TRPTG'G'PTPT2:SC(4,J)SC(4,J)PTG'TR1ıG'TRTR1511:11);:SC(I,1)0ĺSC(I,1);BF&22);:SC(I,2)0ĺSC(I,2)rF':I4ĺ" =========================":yF'IF'SC(12,1)29998F'::"THE WINNER: ";:S$"WE!":SC(0,2)SC(0,1)S$"THEY..."F 'SC(0,1)SC(0,2)S$"A TIE..."G 'S$:I1E&SC(0,1)0:SC(0,2)0-E&(K11K13)TRW8gE&I12:SC(5,I)SC(5,I)SC(4,I):I:SC(4,1)0:SC(4,2)0rE&10000E&I15:J12:SC(0,J)SC(0,J)SC(I,J)::E&(14)::"SCOREPAD":E&:11)" WE THEY"E&" ";SC(0,1);29);SC(0,2):#F&I,4)V(K,4)1D%J:+D%T$TT$:K10::40KD$%23:15::" DEALING ":J1^D&%S14:K113yD0%JJ2:D$(T$,J,2):U0D2%(D$,2,1)"S"U39D4%(D$,2,1)"H"U26D6%(D$,2,1)"D"U13D8%Q$(D$,1):602:K:SD:%D&D&(K12K14)TRT4V(K,3)0ĺ:9476BC%(Z$,V(K,3)):V(K,4)0Z$(Z$,(V(K,3)1))dC%TA)"C: ";:V(K,4)0ĺ:9478lC%Z$rC%C%J2262C %(Z$,J,1)"S"V(K,1)V(K,1)1C %(Z$,J,1)"H"V(K,2)V(K,2)1C%(Z$,J,1)"D"V(K,3)V(K,3)1 D%(Z$,J,1)"C"V(K9480:14)"SOUTH":TA18>B$D$"":I113:D$D$(Z$,2I1,1)QB$I:Z$D$:9470WB$B$Z$(Z$,13):TA)"S: ";:V(K,1)0ĺ:9472B$(Z$,V(K,1)):Z$(Z$,V(K,1)1)B%TA)"H: ";:V(K,2)0ĺ:9474B%(Z$,V(K,2)):Z$(Z$,V(K,2)1)C%TA)"D: ";:Z$,2I1,1)A$I:Z$D$:9470JA$Z$(TT$,27,26):K2:9480:" WEST":TA5pA$D$"":I113:D$D$(Z$,2I1,1)A$I:Z$D$:9470A$Z$(TT$,26):K4:9480:24)" EAST":TA28A$D$"":I113:D$D$(Z$,2I1,1)A$I:Z$D$:9470B$Z$(TT$,26):K1:"@"I3((S$,1))13:IT2F12(@"]@"T2PNTS(1)PNTS(3):I3((S$,1))13:IT2F12@$I14:J14:V(I,J)0:J:I:TA18@$:"HAND: ";HN;" ";SS$;" OPENING LEAD: ";O$::@$Z$(TT$,53,26):K3:9480:14)"NORTH" A$D$"":I113:D$D$(5S"Z$"6S" ?!Z$"5H"Z$"6H"&?!;?!F11:PSS(K1)1:J?!AW68640Z?!T2338629r?!X(K)B(JW,0)8629x?!?!T2378629?!X(K)B(JW,0)8629?!?!F10:(E$,(E$)5,6)"DB0000"ı@!T2PNTS(1)PNTS(3):(K1K3)T2PNTS(2)PNTS(4)">!(E$,T13,2)"3X"T2268629_>!((E$,T13,2)"4S"(E$,T13,2)"4H")X(L)B(JW,0)8629>!B(JW,0)2T229BID$(L)(S$,2)F11:PSS(K1)1>!>!AW58630>!AW$(E$,T13,2):T2298629>!(AW$"4S"AW$"4H"AW$"5C")T2338629 ?!Z$"K)F:8000:']HWPNTS(K)4PSS(K1)1:=]JWPNTS(K)8X(K)5I]LW8000:b]NWBID$(L)"3X"22370}]PWPNTS(K)7PSS(K1)1:]RW(E$,2)"00"X(K)5:8000:]TWZ$"4X":BLK1]VWPNTS(K)9Z$"6X"]XWPNTS(K)11Z$"7X"]ZW^bWPNTS(K)6PSS(K1)10\4WPNTS(K)4PSS(K1)1:3\6WPNTS(K)8Z$"3X"Q\8WPNTS(K)9Z$"4X":BLK1i\:WPNTS(K)10Z$"6X"\WZ$S$ı\@WS$"4X"Z$"DBL":\BWX(K)5:8000:\DWF0:AW0:J12:V(K,J)4JWV(K,J):JWAWFJ:AWJW ]FW:F0X(08 ["WZ$"2X":Z$S$PSS(K1)1&[#W?[$WV(K,X(L))2İ8100:n[&WAW0:JW0:J14:(V(K,J)5Y(K,J)2)AWJ[(WV(K,J)6JWJ[*W:FRC(L)1:AW0X(K)AW:8000:[,WJW0X(K)JW:8000:[.WX(K)5:8000:[0WF0:J14:V(K,J)3F1\2W:F12234ZVPNTS(K)1422180BZVZ$"3"(B$,6X(K),1):Z$S$PSS(K1)1HZVtZVZ$"6"(B$,6X(K),1):Z$S$PSS(K1)1zZVZW(BID$(L),1)"2"22350ZWK14(E$,2)"00"22350ZWK15(E$,3,2)"00"22350ZWBID$(L)"2X"22320[ WPNTS(K)62232X"YlVPNTS(K)10Z$"3X":YnVPNTS(K)14Z$"4X":BLK1RYpVPNTS(K)16Z$"6X"jYrVPNTS(K)18Z$"5X"YtVPNTS(K)20Z$"7X":S$"7X"PSS(K1)1YvVYVPNTS(K)722170YV(E$,2)"00"PSS(K1)1:YVFRC(L)5:V(K,X(K))48000:ZVPSS(K1)1:FRC(K)2'XTV(BID$(L),2)"1X"22300]XXV(V(K,1)4V(K,2)4)(S$"2C")PNTS(K)922110}XZVZ$"2C":FRC(L)3:FRC(K)1:X^VF0:J14:V(K,J)3FF1X`VV(K,J)4FF1:V(K,J)5FF1XbV:F222160XhVPNTS(K)8PSS(K1)1:YjVPNTS(K)7Z$"W:VF3:V(K,3)V(K,4)F46WVV(K,4)V(K,3)FJWgW@VX(K)F:8000:X(K)AWsWBVK14ıWDVDF0:AWK1:AW0AW4WFV(Z$,1)(BID$(AW),1)DF1WHVWJV(BID$(L))0BID$(L)"00"22042WLV(BID$(L),1)"2"22100 XNVK13K,J)6Y(K,J)2PNTS(K)22)FJ0V4V:F022070hV5VJWX(L):X(L)X(K):8200:X(L)JW:FRC(L)2:FRC(K)2:V6VF0:J14:V(K,J)FFV(K,J):JWJ:AWX(K)V7V:F522074V8VJW1ĭV(K,1)V(K,4)X(K)4:8000:X(K)AW:22082V9VX(K)JW:8000:X(K)AW:22082ESTFORBIDDINGTWOOFASUIT*** NU.VF0:J12:(V(K,J)4Y(K,J)3PNTS(K)24)FJvU/V(V(K,I)5Y(K,I)3PNTS(K)22)FJU0V(V(K,I)6Y(K,I)2PNTS(K)20)FJU1V:J34:(V(K,J)4Y(K,J)3PNTS(K)26)FJU2V(V(K,J)5Y(K,J)3PNTS(K)24)FJV3V(V(Y(K,I)(4V(K,I))0FF1T$VLT%V(AW15AW19F2)Z$"1X":X(K)5:22057T&V(AW21AW25F4)Z$"2X":X(K)5:FRC(K)2:22057T'V(AW24AW28F4)Z$"3X":X(K)5:FRC(K)2:22057T(V22060T)VV(K,5)5:Z$S$İ8000T*VU,VPNTS(K)2122070:***T SVF0:I14:V(K,I)2220469SVV(K,I)2F1:22046bSVJW26(K1)AW1:(T$,JW,1)"9"F1SVAWAW2V(K,I)::F122060SVAWPNTS(K)S VF0:I14:(V(K,I)2Y(K,I)0)(I3V(K,I)4)F1S!VV(K,I)2AWAW1S"V:F122060T#VF0:I14:0)RUK1K11:PSS(K1)0:LK2:L0LK2GRUK3BLK1İ2500:BLK1ıZRV(E$)422040RVJW0:(E$,2)"00"JW1:(E$,4)"0000"JW2RVK1JW422600RVK1JW222090RV(BID$(K1))0BID$(K1)"00"22042RV22090SVPNTS(K)13PSS(K1)1::21160+QRE$E$"00":BID$(K)BID$(K)"00"AQR3400:K1421000\QR(E$,6)"000000"3000gQR21000|QRK3BLK121190QR8500QRF1121100QRS$Z$:E$E$Z$:BID$(K)BID$(K)Z$:19900QR6600:D$Z$:(Z$,1)"X"D$(D$,1)"NT"RR3400:2100,4)0PQ3400$PRKK1:K420810GP R22000:6600:DF1DF0:21125\P RPSS(K1)021180pPlRK3K1521130PvR(BID$(L),2)"00"(E$,2)"00"21130PR((E$,2)"00"(E$,2)"DB")21130PR8700:F1221130QRE$E$"DB":BID$(K)BID$(K)"DB"D! ";(7):I13000:::7:" ":7:20811ROhQPSS(K1)0:K1420896{OrQI15:(Z$,2,1)(B$,I,1)X(1)6IOtQOQ(Z$,2)"NT"Z$(Z$,1)"X"OQE$E$Z$:BID$(1)BID$(1)Z$:S$Z$:19900:Z$"2C"20900PQBID$(3)"1X"FRC(3)3:BID(111)120826NYQ20838WNZQPSS(K1)0:E$E$"DB":BID$(1)BID$(1)"DB":3400:K1421000bN[Q21162N^QAC$(Z$,1):(AC$)1(AC$)720838N`QAC$(Z$,2,1):AC$"H"AC$"S"AC$"C"AC$"D"AC$"X"20836NbQ20838NdQZ$S$208408OfQ7::" ILLEGAL BII1,1)(B$,6X(K),1):D$Z$:4hXV(K,X(L))322730OhXBID(L,X(L))1İ8100:_hXJW122750xhXV(K,B(2,0))222734hX(BID(L,B(JW,0))BID(K,B(JW,0)))0X(K)B(2,0):22740hXV(K,B(JW,0))3X(K)B(2,0)hXPNTS(2)PNTS(4)2522740 iXV(K,X(K))XB(JW,0)5S$"3X"22720>gXV(K,X(K))5V(L,X(L))522710_gX(B(JW,0)5(E$)14)22720sgXS$"3X"22720gXX(K)5:8000:gXBID(K,X(L))122730gXX(L)5B(JW,0)522726gX((BID$(K))2V(K,X(K))4PNTS(K)18)22726hX8000:Z$(N$,000:fjXZ$"2D":5fpXV(K,2)V(K,1)X(K)2:8000:WftXV(K,1)V(K,2)X(K)1:8000:yfvXY(K,2)Y(K,1)X(K)2:8000:fzXX(K)1:8000:fX(BID$(K),2)"00"(BID$(L),2)"00"PSS(K1)1:fXJW1:K2K4JW2fXFRC(K)0PNTS(K)6PSS(K1)1:g2:eX8000:8eHX(BID$(L),1)"0"PNTS(K)1622620LeJXFRC(K)122700teRX(BID$(L),1)"0"PNTS(K)1622620eVXPNTS(K)13V(K,X(K))5PSS(K1)1:e\X(FRC(K)3)22700e]X22630efXFRC(K)0:V(K,1)4V(K,2)422632egX22640fhXS$"2D"İ8(Z$,1)"2"ı"dW"1X"S$Z$"1X"(dWLdWF0:J14:JX(K)JX(L)22514idW(V(K,J)3Y(K,J)0)F1zdW:F122540dWPNTS(K)13İ8000:FRC(L)1:dWZ$"2X":PNTS(K)15Z$"3X"dWZ$S$X(L)5:8000dWe XPNTS(K)18İ8300:FRC(K)2:FRC(L)cWPNTS(K)1522470?cWZ$"2X":FRC(L)1:Z$S$X(K)5:8000:EcWgcWZ$"3X":Z$S$X(K)5:8000:mcWcWV(K,X(L))4X(K)X(L):8200:cW8000:cWPNTS(K)6PSS(K1)1:cW(S$,1)"1"PNTS(K)10PSS(K1)1:cWPNTS(K)922510 dW8000:000:3bWAWX(K):X(K)3:(BID$(L),2,1)"D"X(K)4abWPNTS(K)PNTS(L)22((S$,1))2FRC(L)1ubW8000:X(K)AW:bWF0:J14:BID(L,J)122464bW(V(K,J)2V(K,J)5Y(K,J)0)F1bW(V(K,J)1Y(K,J)4)(V(K,J)2Y(K,J)3)F1bW:F122480)4)(V(K,2)4Y(K,2)4)22450OaW(BID$(K1),1)"S"(BID$(K1),1)"H"22450maWY(K,1)4ĭY(K,2)422450aW(V(K,1)4Y(K,1)4)X(K)2:FRC(L)1:8000:aW(V(K,2)4Y(K,2)4)X(K)1:FRC(L)1:8000:aWX(K)1:Y(K,2)Y(K,1)X(K)2bWFRC(L)1:80`W(S$,1)"1"PSS(K1)1:7`WV(K,X(L))3İ8100:[`WZ$"1X":AWV(K,4):AW3Z$"1D"}`WV(K,2)AWZ$"1H":AWV(K,2)`WV(K,1)AWZ$"1S"`WZ$S$PSS(K1)1:`WPNTS(K)1222460`WX(K)3V(K,X(K))4FRC(L)1:8000:aW(V(K,1)4Y(K,1(K)10AWX(K):X(K)5:8000:X(K)AW:=_|WPNTS(K)13İ8000:a_~WPNTS(K)16V(K,X(L))3İ8200:~_WF0:J14:V(K,J)2F1_W:(F1PNTS(K)11V(K,X(L))3)22404_W8000:_W(S$,1)"4"PSS(K1)1:_W8100:Z$"4"(D$,1):`WPNTS(K)92244:#^dWPNTS(K)17İ8300:FRC(L)2:P^fW(BID$(L),1)"D"(BID$(L),1)"C"22420^hWV(K,X(L))3PNTS(K)PNTS(K)(3V(K,X(L))):22500^jWJ14:JLV(K,J)122380^kWPNTS(K)PNTS(K)(2V(K,J))^lW^nW(X(L)3Y(K,X(L))0)PNTS(K)PNTS(K)1%_zWPNTS)0X(K)B(1,0)pX8000:z#??????    ԠӠ ҸӠŠҠj͠ҒɔŵcĠϠ ͠͠͠Ԡ!7":12:16:"BY ARTHUR WALSH":19:5:"(GRAPHICS VERSION REQUIRES 64K)"a (4)"RUN BRIDGE5"g (n 2FP,p+1010,224:1011,3:1012,69:50P767,0:(4)"BLOAD RAMCARD":768}X(767):X1ĺ(4)"RUN START BGRAPHICS" 104,12:3072,0 8:12:"ARTWORX PRESENTS":10:15:"BRIDGE 5.0":12:11:"(ALL TEXT VERSION)"G 14:13:"COPYRIGHT 198  L L i 3 i L ``ȝ& L L ` L L `_3L8 &3LK ` [5L ` { ͰJJ轔'L 6 LF LZ `L{3K34;(ͷ /<Ï<:A(*A44*A~($G+( ~/_~(=G+~(6+<=(+~>.66?*AO DE͖4?C@Ƚ?C @i@@8/e@@Ah@CACL    ] DLf έDEDDcL έDEDL έDEDL έDEDDLf ` fiL EA LH LH LH L V3L ιV }jjLo  ΩLo V VL ` ԠՂЪԪРՀժժժ0Cy~Aa~xc ߪԨтԠŊԪתժժÙߪ㘀́ժժժժߪժժժժըԠՊԪԪՀժժժ0CLCa 3 ߪԨтԠՊԪԊтժժժC̙؍ת̱ժժժժߪժժժժ| f000~ g0~cCԨՊԠՊԪтժժժ0Cl0Ca0 3 0ߪըՂԠՊԪժժժCÙ찆ߪժժժժժߪժժժժ  f00COg00CԨՂԠŊԠժժժ`~xg0~qGsxaG?ߪՂԠՂЪԪ ժժժfÙ찆ߪժ          +`%J) %+je *`PPPP`M&,'p ,&pP!pA* +i+M($$! $%%#,)p% VLp"% $`"H *+)hi#"H !*0+i+i'H#' h'`"%$$%H hi#`$% &,'*+M(,'PM&*!0 +iL` &`,`,`L}&``+,` %`,T%@0,U`* L" LB$!$$"% %L"&` LX` e$$ ",.0/0(!#L"  1 <`$,*P*A[8 & & &m+)m, e$*+M($(!189Յ67 ,R,W  B,P` ((*)  %+*HN OI*P,h*,H,#0ɛ# ɍ $h`ɐ 6+# L L L !%# VL5 5`) L> L5   몾ꮾ̀몪ÁÁ€   W xV  V WV :V V ɿ`xV V WV :V V ɿ`D"S$S$" (DBL)":SC(11,1)1Tl :"HAND #: ";HN:"THE CONTRACT IS: ";S$:KK1:6600pq (F$,1)" "F$(F$,4)v "THE DECLARER IS: ";F$::K2K12:K24K2K12x SS$S$"-E":K11SS$S$"-S"z K12SS$S$"-W"| K13SS$S$"-N"  R0:W80:2:KK1:(E$,I,1)(S$,2,1)3125Q K1(K(R91))4((K(R91))4):K10K14g& K1W8K1T43130v5 IT130708 :" EVERYONE PASSES.":7800:50: I15:(S$,2,1)(B$,6I,1)XI> b X5S$(S$,1)"NT"f SC(11,1)0:(E$,I2,1)"))422419F Y(K,B(AW,0))0V(K,B(AW,0))4X(K)B(AW,0)CJ 2241m I2(E$)7:T16:(E$,I2,1)"D"3018 (E$,I24,4)"0000"T112 T18 X(K12T1)2(R91):W8X4(X4):W80W84 T4W82:T41T4W82 K0:T1K122:I0" II SUM2D$"H"  SUM3D$"S"8 SUM4D$"X":AA1O D$(A)D$:Z$D$:l( AW2:K1K3AW1:2610* X(2)B(2,0)X(4)B(2,0)2241, 26202 X(1)B(1,0)X(3)B(1,0)2241< B(AW,4)1B(AW,0)5X(K)B(AW,0):X(L)X(K):2241 @ V(K,B(AW,0D$(L),2)"5X"2520' BLK0:FRC(K)6:@ (E$,AW,1)"7"2510_ (E$,AW,1)"4"Q$"A":A5~ (E$,AW,1)"5"Q$"K":A6 (E$,AW,1)"6"Q$"Q":A7 SUM0:J253772 (T$,J2,1)Q$SUMSUM1 J2 SUM0D$"C" SUM1D$"D"2OPN1K1:L520$16368,0`(16):"YOUR HAND (SOUTH):":4900:E$"":S$"1A":KR91k20000 24:1:(9);:" PRESS 'RETURN'";:AW$:(14);: X(K)1:Y(K,2)22447X(K)1:Y(K,2)Y(K,1)X(K)2 AW(E$)3 (BID$(L),2)"4X"(BI 700#ZQ$"T"F(S,K)9U:=]Q$"J"F(S,K)10U:WbQ$"Q"F(S,K)11U:qgQ$"K"F(S,K)12U:lQ$"A"F(S,K)13U:vD(D$):F(S,K)DU1:23:15:" SORTING ":6000:OPN3OPN1:202OPN2İ6000R1:H0:TT$T$:OPN(2196I):C(I)(K1)13(J1)1iC$"10"C$"T"EjC$"11"C$"J"YkC$"12"C$"Q"mlC$"13"C$"K"mC$"14"C$"A"oK4S$"S"pK3S$"H"rK2S$"D"wK1S$"C"|T$T$C$S$:K51:I14:J113:F(I,J)C(K):KK1:::AW$"S"R90 AW$"W"R912AW$"N"R92DAW$"E"R93zR9R94(R94)1:K10:KR9:23:15::" DEALING "255,0:1013,76:1014,27:1015,9:2304X2448:2544:2614:2653:2797T$""hI5101:J(2250I)1:C$(J):K1000000)100:X(JW):HNJW:AWAW176:16368,0B AW1AW450t 13::SP$:SP$:SP$:SP$:SP$:SP$:SP$:SP$ OPN0:AW190,180,170,7314 FP 200 OPN1:200 15:" ENTER HAND #: ";X:AW(X):HNX" OPENING BIDDER? ";AW$1:VT:HT:"---";:767,0:(1):0 2(16):40U 15:" 1> ENTER HAND NUMBER"| " 2> SOUTH GETS OPENING HAND" " 3> PLAY" " 4> QUIT" :" YOUR SELECTION? ";(7); AW(16384):X(5):AW127158 1560 JW(X"5")9)((RG$"4")10)((RG$"3")11)((RG$"2")12)w /767,1:(1):RG(RG3)1:RH$"S"RH$"C"RG$(WB$,RG,3):49 0RG$(WR$,RG,3)! 1VT:HT:RG$:RH((RH$"H")1)((RH$"D")2)((RH$"C")3):RH(RH3)1:RH$(WS$,RH,3):VTVT1:VT:HT:RH$:VTVTRIDGE 5.0":6:10);"(C) 1987 BY ARTWORX"T ,9:7);"WRITTEN BY ARTHUR M. WALSH": -EE$D$:RH$(EE$,1):RH0:RG$(EE$,1):RG05 .RG((RG$"K")1)((RG$"Q")2)((RG$"J")3)((RG$"T")4)((RG$"9")5)((RG$"8")6)((RG$"7")7)((RG$"6")8)((RG$),PSS(30); WR$"-A--B--C--D-EF--G--H--I--J--K--L--M--N-"m WB$"-O--P--Q--R-TW--X--Y--Z--S--U--V--[--]-" WS$"456#$%123789" SP$" " A$"23456789TJQKA":B$"XCDHS":N$"1234567":TT$"":50) (3:15);"Bh  REVISED 10/19/87 VER 1.4Q COPYRIGHT 1987 BY ARTHUR M. WALSH (2304)169ĺ(4)"BLOAD BFA":(4)"BLOAD BFB":(4)"BLOAD NUMCARDSM":(4)"BLOAD HONORSM" C(52),V(4,5),Y(4,5),F(4,13),SC(12,2),B(2,4),BID(4,5),VV(4,5),XX(4),PNTS(8                                  ! 00>3>3333300>333>3633>03333 00003333 ?[[[[333333333>33>003063333>333 mmmm~3 3333>0? ? 8( ?3??33?33??33??333????????;3?333??33 00003?3;;3??3??3333337?;33?333??3??3333n?3?;3?0??? 33333?33333 3333??333 33333 ?? ??8p` ?66$66666 ??0? '<:9 *.  88888*>* ??  >>`p833333  ?38???0>0?8<63?00??0?33??0 ?33??3>0> p88p>>>>8?3   ER CASE INPUT ONLY!":EF1:/HH1:H54840BKK1:K4K1WLK2:L1LK2mM1K1:M15M11M2M12:M24M2M12H14134G20R137200FL0İ7800::SP$:SP$:1RR1:" TRICK: ";R;:23:"HAND: ";HN0ĭCELL1ROWROW1,N (E$)2K1ROWROW1H\ (E$,2)"00"D$"PASS"d` (E$,2)"DB"D$"DBL "d (E$,1)"X"D$(Z$,1)"NT "f 11ROW:37CELLp D$:<EF0:LC(AC$):AW1LC:XC((AC$,AW,1)):(XC96XC123)3904>:@(7);"UPPER IS: ";F$::K2K12:K24K2K12Ex SS$S$"-E":K11SS$S$"-S"[z K12SS$S$"-W"q| K13SS$S$"-N" R0:W80:T40:4000 9:8::" SOUTH WEST NORTH EAST "::ROW1:H X(E$)2(R91)J CELLX4(X4)K CELL0CELL4L 305 IT1307098 :" EVERYONE PASSES.":7800:50_: I15:(S$,2,1)(B$,6I,1)XIe> ~b X5S$(S$,1)"NT"f SC(11,1)0:(E$,I2,1)"D"S$S$" (DBL)":SC(11,1)1l :"HAND #: ";HN:"THE CONTRACT IS: ";S$:KK1:6600#v "THE DECLAR"D"3018' (E$,I24,4)"0000"T1120 T18b X(K12T1)2(R91):W8X4(X4):W80W84| T4W82:T41T4W82 K0:T1K122:I0 II2:KK1:(E$,I,1)(S$,2,1)3125 K1(K(R91))4((K(R91))4):K10K14& K1W8K1T4311:2610)* X(2)B(2,0)X(4)B(2,0)22413, 2620U2 X(1)B(1,0)X(3)B(1,0)2241< B(AW,4)1B(AW,0)5X(K)B(AW,0):X(L)X(K):2241@ V(K,B(AW,0))42241F Y(K,B(AW,0))0V(K,B(AW,0))4X(K)B(AW,0)J 2241 I2(E$)7:T16:(E$,I2,1)(E$,AW,1)"5"Q$"K":A68 (E$,AW,1)"6"Q$"Q":A7N SUM0:J253772k (T$,J2,1)Q$SUMSUM1s J2 SUM0D$"C" SUM1D$"D" SUM2D$"H" SUM3D$"S" SUM4D$"X":AA1 D$(A)D$:Z$D$:( AW2:K1K3AWR1:H0:TT$T$:OPN2OPN1.K1:L517:e:"YOUR HAND (SOUTH):":4900:E$"":S$"1A":KR91p20000 AW(E$)3 (BID$(L),2)"4X"(BID$(L),2)"5X"2520 BLK0:FRC(K)6: (E$,AW,1)"7"2510 (E$,AW,1)"4"Q$"A":A5 3:F(I,J)C(K):KK1:: 7009ZQ$"T"F(S,K)9U:S]Q$"J"F(S,K)10U:mbQ$"Q"F(S,K)11U:gQ$"K"F(S,K)12U:lQ$"A"F(S,K)13U:vD(D$):F(S,K)DU1:23:15:" SORTING ":6000:OPN3OPN1:202OPN2İ6000(2250I)1:C$(J):K(2196I):C(I)(K1)13(J1)G iC$"10"C$"T"[ jC$"11"C$"J"o kC$"12"C$"Q" lC$"13"C$"K" mC$"14"C$"A" oK4S$"S" pK3S$"H" rK2S$"D" wK1S$"C" |T$T$C$S$:K51:I14:J11OPENING BIDDER? ";AW$:AW$"S"R905 AW$"W"R91G AW$"N"R92Y AW$"E"R93 R9R94(R94)1:K10:KR9:23:15::" DEALING " 255,0:1013,76:1014,27:1015,9:2304 X 2448:2544:2614:2653:2797 T$""3 hI5101:J8 156E JW(X1000000)100:X(JW):HNJW:AWAW176:16368,0W AW1AW450 13::SP$:SP$:SP$:SP$:SP$:SP$:SP$:SP$ OPN0:AW190,180,170,7314 FP 200 OPN1:200 15:" ENTER HAND #: ";X:AW(X):HNX# " BY ARTWORX"5 ,9:7);"WRITTEN BY ARTHUR M. WALSH"; .E 2:40j 15:" 1> ENTER HAND NUMBER" " 2> SOUTH GETS OPENING HAND" " 3> PLAY" " 4> QUIT" :" YOUR SELECTION? ";(7); AW(16384):X(5):AW12715"BLOAD HONORSM"g C(52),V(4,5),Y(4,5),F(4,13),SC(12,2),B(2,4),BID(4,5),VV(4,5),XX(4),PNTS(8),PSS(30) SP$" " A$"23456789TJQKA":B$"XCDHS":N$"1234567":TT$"":50 (3:15);"BRIDGE 5.0":6:10);"(C) 1987aaPOKE214,255: POKE 42350,0: POKE 1010,224: POKE 1011,3: POKE 1012,69 ~ REVISED 10/19/87 V-1.4 COPYRIGHT 1987 BY ARTHUR M. WALSH  (2304)169ĺ(4)"BLOAD BFA":(4)"BLOAD BFB":(4)"BLOAD NUMCARDSM":(4)                                                         "&,,O,O ,L%`4,0% (4);"RUN B5.0 9/1/87 GR"+ (2 2FPO4R :12:11:"LOADING BRIDGE 5.O":230,32:16297,0:16302,0:(4)"BLOAD ART"d (4)"BRUN M" (4)"BLOAD BIGM, A$1CFF" (4)"BLOAD ACARDS,A$19FF" (4)"BLOAD CTABLE" (4)"BLOAD R8" 767,0 4096 (104)64Ĺ104,64:1638  222734AoX(BID(L,B(JW,0))BID(K,B(JW,0)))0X(K)B(2,0):22740aoXV(K,B(JW,0))3X(K)B(2,0)oXPNTS(2)PNTS(4)2522740oXV(K,X(K))5PSS(K1)1:oX8000:(BID$(L))2BID(K,X(K))1FRC(L)1oXpXV(K,B(1,0))2BID(L,B(1,0))BID(K,B(1,0)5PSS(K1)1:=iX8000:(BID$(L))2BID(K,X(K))1FRC(L)1CiXiXV(K,B(1,0))2BID(L,B(1,0))BID(K,B(1,0))0X(K)B(1,0)iX8000:i