ZXTape! 2JChess - The TurkOCP J. Hutchley1983ROM+CotL-DS from orig. tapeThe Turk EG2BASIC LOADER  J.HUTCHBY 1982 !["=\!][{\!c>!\7V~@|@@~>>DHpHDB@@@@@~BfZBBBBbRJFB%:!7>%:!7V>%:!ŷVAAAAAAAAAAAAAAAAAAAAAAAAAAAAA :0:0:5:5:1:50650 G23675{\,42*:23676|\,93]:1:7:3 $0,8;"" $1,8;"" $2,8;"" $3,8;"" $4,8;"" 0:5:1 e6,0;"OXFORD COMPUTER PUBLISHING LTD.";8,1;"P.O. BOX 99, OXFORD, ENGLAND." 23658j\,0 (wa=1400:a:12 ,6;"Welcome to ";:a=1150:a:" THE TURK":a=1150:a 2j14,10 ;"Version: 1.3";16,3;" JAMES HUTCHBY - July '82":a=1600X:a <1::5 F#0,0;:""16384@ P0,0;:"" Z!0,0;:24041] d0,0;:"" n #(R:"STOP THIS TAPE,"'"REMOVE IT (BUT DON'T REWIND)"'"AND INSERT A BLANK CASSETTE" #2"The Turk"4 #<$"REWIND NEW TAPE FOR VERIFICATION" #F"" #K"VERIFIED OK" #Pw"ALLOW THIS TAPE TO PLAY ON FOR 15 SECONDS,"'"REMOVE IT (BUT DON'T REWIND),"'"INSERT ORIGINAL TAPE"'"AND PRESS PLAY" #Z"" 0     (; Ā0 H$" @@@@ $H0` $7 P8(E""" H E<" @$H @x0 ` '@PH!" @0 ' @$H0` @a H  P!B@ @ $ b )$DD@F@  P@ @> @$  I$B9  @  $BBA @$ I$J<080@p HI  @r$B@@@@ $8  I$J$@L8@` H@$ @$"@@@@ $ @?H@@G'? G I I << v@ I @$CDDEDy@$ $HB DI? @~@ ~@ I !!B@I <#v @$) $#B) @$JB)#?"+ "??I I !!B@I $vI!$II $qQ @$ $A@ @$)HJG@ ~~#@?# 8?I I $ vO<:I `$ ,#bH @$ $"$B@$IDD$J  @$"$I&J@$"""$$p8 !@$p8@% 8 >!Bp DB"|Dp@D$I ?H@HP@$JJ  @$DDDDI  !@$  $ @<'?!BN@`ID @D $ H@@$9H$J @$@8 @@$CĒI@$ <!BE$ H@ RD@?A@D@'?A @$$DI$H @$DDDD$$p @<@$p@|$ DH@@dD @D AB@@'H@$"""$HI9@*|?::G:::2:ƇO! :O*2,2-$2,ND_q`:Hw$|o|@g<<<*6\:Bz!N$$$$$N:B¢!$*6\:Bʷ@!BP????w#q+$:B!##w$![:B !>2>2~2:<<2:<<2![w![w![w![w!$%6>2>2*N|gVsZ%:=2Ҍ:<2 څ!$w#w###w!"@:2>22!F">7!F">!"B:2>2I>2(!~!:Y ~!xȾF5#U+5###wtt tt~>ʌȯ2QSS~!S7 S5!S7 S5 ~̺ ##~̺S5[7*  ~̺ ##~̺S7:QK* ~W ~**ɂ#~#~AAɂ* ~O[* ~O>\ɯ2Q[OG* :Qʉ~ʆʉɁ~¢nµ*56#"5õµnµ*76#"7~oW ~ɺ~k!"O!9"M* ~>>2QOG?>2O* ~>#>2QOG?*M6 * V ~ʧW:Q ~OȂk:Q[O~xʻ2R>2R ~ʄ[Oʘʻ[MÄ~_:Q:Ox总n ~[Or~o[MSM_W ~ʺ{!R*Mw#"MK>B n&KS "Sɯ2*5 BU*7!B]{RHDG>JG2̈́* ~2̈́:ƀ2[:1>2:ƀ2̈́1>2!9~̷š#Ì–::ږʻ~2"#Ì[_#^ʌ:+ð#VZ:+ðzzҌ+ð:+ð:i*6#˞::&*5w#"5*7w#"7*5 BU*7!B]zfK ^E¢ÕD²Õʄ•K D²ÕK E¢*56*76*56*76#6*56#6*76k!OG* ~,$|Õ!6#" 6! !K ~MO! ~D* w#w" #MO! ~* w#w" * 6++~#w!!6 ʌͻrw_~24 ʌͺڇW~24fzʭ:o:ҝoM! ~#w#6W*SBzCSF<2( ?6-$ MB7,!  $!"v"x"n"p"z"|"j"r"t!"l!VW6: *>bV`> 2i~     ~ʧzWçzWçK!) ~!kwˮ#~ <<++:i={+rî*>V`> 2i~{ {{{{ ~iJbzWJzWJK!) ~z!jwˮ+~“ <ݝ<##:i=#**!V[z"z!`[|"|~G+~##+z WzW#&j#))!VW6:*>bV`> 2i~     ~vWozWWzWWK!/ ~!kw2~w" >2Q͏ҡO*t "t!mҳw*p[S"p* ~wV" ~VVѷ :IZ|O*r "r*n[S"nS:I*K>By ~* *ZH|6O*t "t!mHw*p[S"p* ~oʏ!RO N- [zR"zÏ[|R"|#~¢ <ì¬<++:i=++"f*>V`> 2i~r rrrr ~zWzWK!/ ~q!jw2~w" >2Q͏JO*r "r!l\w*n[S"n* ~w" ~ҷ:IʑZå|ҝO*t "t*p[S"p:IK>By ~* Z|O*r "r!lw*n[S"n* ~o8!RO N- ,[zR"z8[|R"|+~K <UU<##:i=#*"v…K>B}_ʛ:R›*>} ~›*z "z2*z"z*[>R}Z^`*+~*z "zӷ~*z "z#*"vK>B}5:R5*>~ ~5*| "|>2*|"|*[>R}ڛ^ڛ* +~*| "|ÖԷ–~–*| "|#*>} ~:R:*vB*z"z*xB*|"|:j&o))))))[v"vDM:k&o))))))[x"xT]  DPB |ʁ^D?>Oz/OBN*z"zÁe>Oz/OBt*|"|:l*vʪ&o [rR"r))))))[v[n[z[r /"z:m*x&o [tR"t))))))[x[p[|[t /"|!:[|[zR*[z[|RDM!:#!:>Qƀw#<kͥ:2sͥ[:2kS:ˆ*OG :_~懻7##~懻7ȯ*OG ~ʱ!!7*OG ~!~"G_!Q^#Vxp*v"vxD*>| >D _-M*[>R}^D*zB"z*~Rv[>R}Zl*z"z**x"xx¬*>| >ڬ _-M*[>R}ʬ*|B"|*~ʺv[>R}*|"|*!"*~26"A>* ">2kOG* ~P"[>Rn&["AC  F*"Üʜ:怆"Ap s**K>B n&"Ü* "yOy»:ʻ*8"*:w!6 N#F* *zn "z*|n "|*K>B} _*K>B}  Ox!DWy)D3G__zG>ٯ!H M#  /l*SBCS!"S* ~ʒʘ͘kÛsOG* ~´çK 怆[OG* ~K 怆* ~W  ~#~ڂ++~Ȃ   $1@Qd@ !"""![N~gg½~ʕ6gFB} ~@g~_gøgg~@gFBU ~z[gbgøggø FB} ڐYҐg~gFB} G~x;GڐOҐE)ڐ1Ґ_~V[  ~懺{#p*|~}‚!~#™~ʬ##~#¯~¯>!]~#~##~#~>2&!x=2N!F "a>>+s5:(&@!),6H!/[x\Ns#Fr#B:(‹&2Ͳ}ʭ&<ͲͲ~0+~ t iOx0y0&2}ʭ&<}X{5:(O.ڿ,ö܄ܕh:(!)!/[x\s#r&o)))K6\ w$>2!WݾG#~+GHH#~Iʞ##~#ʞݷHj#~+jG…~#~+>>Gݾʏm#+Š<G!~ʲ##~G#ãx|ݐû!###+++$~#~y*B"@2R:I*L:DW_##"J*>x N*> "#N*> ":5*"W">2&a:'2Y*> N:Iaˮ#Ø:2Oˮ~ʓʓ“"A*ғ>#***>T] ">* "* "*W ů2&>2=:I`k*W"7*WOG ~"9"0G:"9"0:Y*W"*> N~ʲʲG:²"7B~ O G:Yʲ2=y~ͦï‰ͬï—ͦͬïª:=ʲïf*7#>2R2=*W"7~@:Y:>>2Q*7*@6*>t "> O"U O"9 :QC"S"a*S6*U:Qw> *9"0*S:Qw*U6O :Q~W33"aT**7[>R}'Ҍ:ʆ 'ä:Qڤ:ʞ :' :±*7 ~"90*9#++~~_:_:"9>2= : "N~2P6>0*N:Pw*9"90*9*7 ~ ~"9>0*7~2Q "9~u*9#"9g*9++"9g*7:Qw~!ȯ2:>ʄ>*7w0:ʗ*7~[@=wsïků2<*7OG ~"9ů0:<*9"9!>0[*7OG ~"90++"9!>0*@ w*:H"K"*9~2;*7~6*9w:=iaQ:Iʭ*9" |W*9K>By 6*@KBBʭ:;ʧO! ~D*7K>BU*9B]*@r#s#1* :DOq#p##"@:ID*E~#fo:D|`G}iOBD|;*Eq#p*J[@w+w+w{D*>t ">*J++1Aã| *9N:;w*7q:=D>2uƀw<#k:#2"s[*:%2!k*S:¬*OG : _~懻##~懻:&>27:'<2':&!'4*OG ~!"!$:&"!'4>27*OG ~!!E:&"!'4    :D*E^#V++~+ng:DʕR||7*x\"G!# JAMES HUTCHBY 1982*G)))))))) ) "G,!Z:DO [BS@9*9##9:D t!:DO ~OO*B 6~[@ȾO@#^+@+*@O~q#"@[@og"bk##~ʸ##N#F*B҇C#ͽͽÈxO~q+[@og"bk##~##N#F`iKBC#ͽͽ!FG6w![6###!6[!!ef6!6!~ր#!6_#6Ʉ*E^#V++r+s"E{*N#F*^q#Vp#s#r*E++"E *L *L:DOO *~#~#~ :D5=2D:<2*B8 "B*L "L* "*>t ">*+++"*++"{5*E:D>L>w#w:G2I:D*B~ʄ*s#r* p#p#p#p3:Yʏ*L:D__p:Y*Eʹ:D>ʳ>w#wÉ6#6{҉ò!I6*B~‰ÄͰ\>2s51A!"!"B!F">!"E! "!j"k6'!$"L%62D:2=*>| 4+:H+~\O6*> ~\6*@N*> ~6*@#N*> @w’K>B]*>x :O s*@####~ :ʯ wK>B]*>z :O s : 6 *>} :O 6*@~#+ # ~ ~6@w@w*^#Vʉr+sS@*w#w#w:D{*wH:{b*L~{{>-#~*>T] ">7!D4:<2*B "B*L "L* "*###"*##"*E##"Ex5=  A>8kOGV ~ZZ ~$YY~KPP\\K\*~O*> "7~GO:x#N*> "9*7K9B}ҺD! yB_!ͯR^x{D_y=G*7~0*##e@p????߿߿ݿ_Ϸwg߿߿888|$,|8|8t88|TT|88|T|88||8|8||U#aL+\I.`4>U#aL+T7@L@.U#aL+`?5SI5*U#aL+`4)4=.T"S#-\I.]9#T"S6?aL.UK#-U!aL",T5@L@.U#-T"\I.]9#U!+T"\I6AIA8U.A7.6S6*T",T.S#-\I>QG>IT.S#-aL *WM T.S%/WM%`W",T$S#-WM.`W#U#aL+`4",T"U#aL",T"`?!+U#aL.L7",7L.AT"S#-\I!?6-6aL+T"S#@76@aL+T"S!+aL.\I6?T"aL.UK%/SI%T.S#-WM"aL6?S#\I.WM"?6.6aL"S6?\G!G?+QG#RH#SI#TJ#UK#VL#WM#XN#Q#R#V"W#X#\G#\I#aN#MM{V3z7{$⤃ {H"3A_GA_GƁAABD_#Z;Y7FiA<zx nw2+)0.3) 4 *!5!+"6",#7#-$8$.%9%/&:&0">5$8\ 4\+3T",%9+@J~~~~+7~#"~>,d}N$}>G|,Dx6w7-LaL9xLD̃Q=QGRHtRIUAUKlWMXDXN]\][]S^J|^68^Ѐ^S<^H|^=Tba0+ԃ+3̃>5>IX~@I|}@I}ЀЀ>I#7Q=19!9{@@!#[!$awsUA#7aL+\I.`45_a  L7@7+@"+@4? 4?U.A@IA@A@ULA-SIJR>5*Q=4=@^=@"[Q=)JL@WL@-/ab"N`^NWbaWLAa`LW`aWNab*V@)`N`@^`@UQ[/0T@VK]K@0XAbaUW x04_ JAMES HUTCHBY 1982BBBBB<[     d`Mdq THE TURK Version 1.3 -WRITTEN JULY'82  JAMES HUTCHBYc/o 5 Warren road,Worthing, W.Sussex,BN14 9QH +torb4timeout=clocka:timeout @z=12:z:""8;1;"_";:1210 +torb4timeout=clocka:timeout 1b$=:b$=""8;1;"_";:1215 b$=13 1265 b$=12 1245 a=a+1:a>b1265  a$=a$+b$ 8;b$;"_";:1210 a=01210 a=a-1:a$=a$(a) 18;" ";8;8;"_";:1210 8;" ";: "s=board+m:f=board+(m+1)  2155k 1a=(m+2):a=0a=12115C a142050 *a=f+10 :s>128a=f-10 7b=a-board-21:y=(b/9.99 =):x=b-10 *y #orienty=7-y:x=7-x  2290 6600:2115C a12 2075 b=f-(f-s):a=f+(f-s)  a=0a=a+(f-s) s=a:f=b:2155k  2115C  2125M  a=f:x=fx:y=fy %n=01 * 6075:k=1flash:k /#6055:k=1flash:k:n 9 6075:k=1flash:k > 2120H C 2125M M mvcopy,m R:mvcopy+1,(m+1):mvcopy+4,(m+2) \tomove,(m+board)>128 a a=domov2: k:a=s-board-21:sy=(a/9.99 =):sx=a-10 *sy p'orientsy=7-sy:sx=7-sx u:a=f-board-21:fy=(a/9.99 =):fx=a-10 *fy z'orientfy=7-fy:fx=7-fx x=sx:y=sy:a=s  2290  x=fx:y=fy n=01 %a=s:6075:k=1flash:k %a=f:6075:k=1flash:k n %a=s:6075:k=1flash:k a=f:6600 n=01  6055:k=1flash:k #6075:k=1flash:k:n  6055 `evalfn,201 e a=movesq jevalfn,33!: ta=1̱a$ y0a$(a)"a"a$(a)"z"a$(a)=(a$(a)-"a"+"A") ~a: 7b=a$(a)-"A"+21+10 *("8"-a$(a+1)) b=b:b>255b=0  bf=1 tomove,side:2400` a>12670n dmem612 ,23;"CHECK":nextmove-1,2*((nextmove-1)/2)+1 1a=side*(þorient)+(side)*orient:torb,blitz+a 4a=tclock+2+6*a:blitza,a+100d a=rsetck U14,20;"Enter your";15,20;"move please":.2~L,0 416,23;" ";16,23; b=5:6205= timeout2680x 2420t a$="BACK"2690 a$="Q"a$="QUIT"2730 a$="HELP"2735 a$<42485 -a=1:2435 :nextmove,b:mvcopy,b $a=3:a$=42540 ,a$(3)<"A"a$(3)>"H"a=4 22435 :nextmove+1,b:mvcopy+1,b a=legalq $nextmove+2,(mvcopy+4) a026102 $18,19;" " nextmove+3,0 (board+(nextmove+1))-8*((board+(nextmove+1))/8)ž(nextmove+2)=14nextmove+3,64@ a=bd to cp y$=w$:z$=x$ m=nextmove:2005 ?2955 :a=m:6300:16,23;b$(9 ); #C14,20;" ";15,20;" " (12 ,23;" " -timeout=0:a=0: 2a22625A 7$18,19;"ILLEGAL MOVE" < 2485 A[14,20;"Promote to?";15,20;"N,B,R or Q ";16,29;"="; F,b=1:6205=:timeout2680x K$b$=a$:8;:b$""8; P+b$="n"b$="N""N":a=2:2660d U+b$="b"b$="B""B":a=3:2660d Z+b$="r"b$="R""R":a=4:2660d _"Q":a=5 d,nextmove+2,128*side+64@+a i 2560 n;nextmove-1,4*((nextmove-1)/4)+a stimeout=0: x a=130 }1nextmove+3,a:nextmove=nextmove+4: human=32485 'nextmove250a=lmbuff b$="":b=a:6440( 'b$=b$+"-":b=(a+1):6440( a$=b$:b=5:a=5 16,23;a$;"_ "; 818,19;" ";16,29; 6210B 2495 ;11 ,23;" ";12 ,23;" " tomove,side:2400` a>12670n dmem617,23;"CHECK":nextmove-1,2*((nextmove-1)/2)+1 ,torb,blitz+side*(þorient)+(side)*orient a12855' nextmove,lmbuff $nextmove+1,(lmbuff+1) $nextmove+2,(lmbuff+4) "3055 :2910^ '%a=6:human=2a=3 , n=fdover 1$b=bestmv+abestmv+213 6%b=0žb>2502885E ;n,b:n=n+1 @n,(b+1):n=n+1 Eb Jbookq2972 L$timeout=tree:timeout2680x M/bestmv=0žbestmv>2492835 Onextmove,bestmv T$nextmove+1,(bestmv+1) Y$nextmove+2,(bestmv+2) ^nextmove+3,0 c a=(board+(nextmove+1)) hPa-8*(a/8)ž(nextmove+2)=14nextmove+3,64@ mm=nextmove:2005 ra=nextmove:6300 wR11 ,23;b$(9 );:human=216,23;b$(5) | 2955 17,23;" " timeout=0:a=0: nextmove=nextmove+4 nextmove.5:bestmv,84T+a:bestmv+1,64@+a:bestmv+2,1:a=clocka:2895O 1nextmove,255:bookq=(exbook):a=clocka bookq2895O 2892L G23692\,255:"Which side do you wish to play?"'"(W or B) "; ""3005 Xb=1:torb,4:6205=::a$=""(a$"w"a$"W"a$"b"a$"B")3000 .a$="w"a$="W"human=0:orient,0 .a$="b"a$="B"human=1:orient,1  423692\,255:"Enter game level (1-6)? "; ""3035 Hb=1:torb,4:6205=::a$=""a$<"1"a$>"6"3030 '':maxply,a$-1  a=clbsmv *a=fdoverfdover+15:a,0:a: !bookq=1::3055 &'3030 :3000 :blitz=0 +a=intbrd:67051 0h#1;1;0,0;"Type:QUIT-return to menu,BACK-goback one move,HELP-suggests move"; :w$="":x$="":y$="":z$="" ? a=bd to cp DDnextmove=history+3:history,0:history+1,0 Iside=0 SS(side=0human=0)(side=1human=1)2455 :3165] X 2805 ]a3405M b side=side g 3155S qbookq=1::3055 v:maxply,1:razor,7:3000 :blitz=2 { 3115+ bookq=0::3055 '3030 :3000 :blitz=0 67051 h#1;1;0,0;"Type:QUIT-return to menu,BACK-goback one move,HELP-suggests move"; w$="":x$="":y$="":z$="" a=bd to cp 8nextmove=history+3:history,1:a=bd to hs )a=(board+124|):history+1,a side=a/2ɺ(a/2) 3155S ,a=((nextmove-history-3)/3.99\() a=06950& a=256a=0 history+2,a &a=1027:historya=1146z "moves"history,a 6950& :#1;1;"Start the tape.";:20,0; "moves"history .a=(history+2):a=0a=256 $nextmove=history+3+4*a me ""board"board+21,119w 6950& *:1;#1;"Start the tape.";:20,0; /"board"board+21 9me M^a=214,19;" Stalemate ";15,19;" ":3460 R 6805 T%14,19;" "; W)a=314,22;" mated " \+a=12914,22;"resigns" a+a=13014,22;"timeout" f?13 ,23;"White ":side13 ,23;"Black" k)human=0human=13450z pG15,19;" Black wins ":side15,19;" White" u 3460 zk(human=0side=1)(human=1side=0)15,19;" You win ":3460 _>.515,19;"The Turk wins";16,19;" ":3460 G15,19;" Victory for ";16,19;" the Turk! " h#1;1;0,0;" Press any key to return to menu."; ""3465 =""3470 me +a=history+3:anextmove6950& ::2;7;" THE TURK:LIST MOVES TO PRINTER "'' F" Enter an optional heading (for instance the date)to the listing"'' torb,4 b=30:6205=:'' '''a$'' "Enter name of white player" #b=14:6205=:'':c$=a$ "Enter name of black player" b=14:6205=:'' $4;"White";18;"Black" D4;c$;18;a$'':#1;1;1,0;q$; 1a=history+3:b=(history+1)/2 n=1+b:b=b3590 6460<:a=a-4 Qa$18a$=a$(4)+".... "+a$(518):3600 ;a$=a$(4)+".... "+a$(5):3600 anextmove''':me  6460< a$ n=n+1:a=a+4 ""''':me  3590 y&nextmovehistory+36950& ~"a=intbrd:historya=hs to bd :5400:5000 (#1;1;1,0;q$; w$="":x$="" ;1,21;"THE TURK";2,21;"*REPLAY*" :m=history+3:nn=1+(history+1)/2  cur=4 mnextmove3460 ,cur,22-nn;nn;".";cur,23; a=m ,(a+3)=128"DRAW":3460 /(a+3)=129"RESIGNS":3460 /(a+3)=130"TIMEOUT":3460 %6300:b$(b$)="e"3825 'b$9 b$(9 ):3800 b$ 9cur=cur+1:cur>15cur=15:bb=scroll M="f"a=board+(m+1):6600:2125M:5405:3815 ="s"3803  2005 ""Ʀ"s"Ʀ"f"me $nn=nn+1/2:m=m+4  3750 Ub$(6):cur+1,19+4*(b$14);b$(7):2005  3460 A&nextmovehistory+36950& F K(#1;1;1,0;q$; U1a=history+3:b=(history+1)/2 Zn=1+b:cur=1 _b=b3955s d6460<:a=a-4 iQa$18a$=a$(4)+".... "+a$(518):3965} n;a$=a$(4)+".... "+a$(5):3965} sanextmove3460 x 6460< }a$ K#1;1;0,0;" ";q$; n=n+1:a=a+4  ""me +cur=cur+1:cur<233955s H#1;1;1,0;"Scroll? "; a$=:a$=""3990 a$=" "a$="n"a$="N"me $cur=1:23692\,255  3955s human=2:4070 human=3 -bookq=1::3055 :orient,0 human=23030 &blitz=0:a=intbrd:67051 whuman=3#1;1;0,0;"Type: QUIT - return to menu, HELP - suggests a move. "; 7human=2#1;1;1,0;q$; (w$="":x$="":nextmove=history+3 *history,0:history+1,0  side=0 human=22805 human=32455 a3405M "'side=side:human=34115 '=""4110 ,!a=129:nextmove+3,a 1'nextmove=nextmove+4:3405M b15,168:129,0:0,-129:-129,0:0,129  a=annot  U/''''':i=1:a=board+21:p=0 Z'orienti=-1:a=board+98b _#7;:b=10 :5330 d.n=015:b=1:5330:n ib=26:5330: n=y=18:5;orient*y+(9 -y)*þorient; s6n=01:7;:b=17:5330 xx=07 }b=a-8*(a/8) bp;" ";:5275 Fb=b*32 +pcdata-32 +224*(p=(a>128))+16*n $c=(b/255.99p):udg+1,c c=b-256*c:udg,c (a<128);""; p=p:a=a+i:x b=33!:5330 a=a-8*i:n p=p:a=a+10 *i:y "7;:b=9 :5330 .n=015:b=0:5330:n b=25:5330:  8; (orient"H G F E D C B A":5325 "A B C D E F G H" '''':  b=border+b $c=(b/255.99p):udg+1,c c=b-256*c:udg,c "";   a=disply " | 2;7;" THE TURK: BOARD SET-UP ROUTINE "''5;1;" Select option for the initial configuration of the board" J'" 1) Empty board"'" 2) Full armies"'" 3) Previous position" ""5515 93,29;:b=1:torb,4:6205= a$<"1"a$>"3"5500| a$="3"5600 a$="1"a=clrbrd a$="2"a=intbrd r9 ,0;"Are,or were initially,the white pieces at the base (relative to you) of the board? (Y or N) "; jb=1:torb,4:6205=:a$=""(a$"y"a$"Y"a$"n"a$"N")8;8;:5550 /orient,0:a$="n"a$="N"orient,1 ''"Enter move number "; %b=4:torb,4:6205= a=1̱a$  a$(a)<"0"a$(a)>"9"a$(a)="0" a:a=0:a$""a=a$ aa=2*a-2 4a=a-256*(a/255.99p):board+124|,a 55:5:1::5400:5000 3a=113 :p$(a,1)=" "5620 4a$=p$(a,1):a$="K"p$(a,2)="N"a$="N" #a+3,20;a$;"= ";p$(a) a 20,0;" Use the arrow keys (unshifted) to move the flashing cursor. ";:#1;1;0,0;" Press C to clear a square, and ENTER to complete a position. "; x=0:y=0 !f=0:g=0:h=0 !E1,19;" Select type ";2,19;" of piece " &%6005u:a$=:a$=""5670& ( 2420t +a$<"5"a$>"8"5705I 0+a$="5"x=x-1:x<0x=7 5+a$="6"y=y+1:y>7y=0 :+a$="7"y=y-1:y<0y=7 ?+a$="8"x=x+1:x>7x=0 D 5670& Ia=board+21+x+10 *y N(orienta=board+98b-x-10 *y Sa$="P"f=1:5820 Xa$="N"f=2:5820 ]a$="B"f=3:5820 ba$="R"f=4:5820 ga$="Q"f=5:5820 la$="K"f=6:5820 q+a$="C"a,0:6055:5670& va$13 5805 {E1,19;"Is this right";2,19;" (Y or N)? " b=125:b ""5765 7a$=:a$=""(a$"y"a$"Y"a$"n"a$"N")5770 a$="n"a$="N"5660 /aa=idiot:5400:aa=05786 l1,19;"Illegal posn.";2,19;"No white king":aa=22,22;"black"  5910 E1,19;"Whose move is";2,19;"next? W or B" ""5788 7a$=:a$=""(a$"w"a$"W"a$"b"a$"B")5790 rboard+124|,2*((board+124|)/2):a$="b"a$="B"board+124|,(board+124|)+1 K((a$="w"a$="W")ƾ(idiotf+1))((a$="b"a$="B")ƾidiotf)5798  o1,19;"Illegal-white";2,19;"king in check":a$="w"a$="W"1,27;"black"  5910 a$"E"5670& f=7:a,1  5825 a,f E1,19;"Select colour";2,19;" of piece " ""6005u:5830 %a$=:a$=""6005u:5835 &a$="w"a$="W"g=9 :5855 7a$="b"a$="B"a,a+128:g=10 :5855  5660 f76120 )a$="w"a$="W"b=a+10 :c=16 )a$="b"a$="B"b=a-10 :c=24 b=0b,c a$="m":5890 E1,19;"Has it moved?";2,19;" (U or M) " ""6005u:5880 %a$=:a$=""6005u:5885 a$"u"a$"U"a,a+64@ 'a$="m"a$="M"h=12 :5905  3h=13 :a$"u"a$"U"6075:5660  6075 ""6005u:5910 %a$=:a$=""6005u:5915  rf=0:g=0:h=0:1,19;" Select type ";2,19;" of piece ":5675+ u'f3+f,23;1;p$(f) z'g3+g,23;1;p$(g) 'h3+h,23;1;p$(h) n1+2*y,2+2*x;1;8;8;8;"";:z=12:z:3 'f3+f,23;1;p$(f) 'g3+g,23;1;p$(g) 'h3+h,23;1;p$(h) n1+2*y,2+2*x;1;8;8;8;"";:z=12:z:3  Kcoords,2+2*x:coords+1,1+2*y:piece,0  bb=printp  Fcoords,2+2*x:coords+1,1+2*y:piece,a  bb=printp  5b=x:c=y:a$="m":orientb=7-x:c=7-y f16135 6(g=9 c=6)(g=10 c=1)a$="u"  5890 f26145 b(g=9 c=7(b=1b=6))(g=10 c=0(b=1b=6))a$="u"  5890 f36155  b(g=9 c=7(b=2b=5))(g=10 c=0(b=2b=5))a$="u"  5890  f46165 f(g=9 c=7(b=0b=7))(g=10 c=0(b=0b=7))5875  5890 f56175 J(g=9 c=7b=3)(g=10 c=0b=3)a$="u"  5890 N(g=9 c=7b=4)(g=10 c=0b=4)5875 $ 5890 =a$="":a=0:"_"; B 1210 #(a+2)12 6320  b$=" O-O " a>(a+1)b$="O-O-O "  6390 b$="" b=a:6440( .(a+3)64@b$=b$+"x":6340  b$=b$+"-" b=(a+1):6440( b$=b$+" ":b=(a+2) %b=14b$=b$+"ep ":6390 !b=0b=16390 b=b-8*(b/8) b=2b$=b$+"=Kt " b=3b$=b$+"=B " b=4b$=b$+"=R " b=5b$=b$+"=Q " 0b=(a+3)-4*((a+3)/4) #b=1b$=b$+"ch":6425 b=3b$=b$+"mate": b26425  %a$>4b$=b$+13 +" " b$=b$+"stalemate"  )b$=b$+" "(14-b$): (c=((b-21)/9.99 =) -/b$=b$+(b-21-10 *c+"A")+("8"-c) 2 < a$=n+"." An<100da$=a$+" " Bn<10 a$=a$+" " F$(a+3)<1286490Z K&(a+3)=128a$=a$+"DRAW" P)(a+3)=129a$=a$+"RESIGNS" R)(a+3)=130a$=a$+"TIMEOUT" U Z 6300 _ a$=a$+b$ db$(b$)="e" i a=a+4 n$(a+3)<1286530 s&(a+3)=128a$=a$+"DRAW" x)(a+3)=129a$=a$+"RESIGNS" z)(a+3)=130a$=a$+"TIMEOUT" }  6300  a$=a$+b$  b=a-8*(a/8) b a$=(b-1+"") a>1286645 w$=""w$=a$:6640 b=1̱w$  w$(b)>a$b w$=w$(b-1)+a$+w$(b)  6665  x$=""x$=a$:6665  b=1̱x$  x$(b)>a$b x$=x$(b-1)+a$+x$(b)  )b=(tpdata/255.99p):udg+1,b b=tpdata-256*b:udg,b hpw;20,2;w$(̱w$*(w$8));w$(8*(w$>8));21,2;w$(9 ) jpb;20,10 ;x$(̱x$*(x$8));x$(8*(x$>8));21,10 ;x$(9 )  "L20,2;" ";21,2;" "; ' 6665  155:5:1::5400:5000 61;1,21;"THE TURK";2,21;"*LEVEL-";1+maxply;"*":human=31;2,21;"*-INPUT-*" 7/blitz2,21;1;"*-BLITZ-*" 8(a=tclocktclock+11 :a,0:a ;$4:a=044 @!a+3,21;"" E!a+4,21;"" J!a+5,21;"" O!a+6,21;"" Ta:4:0 YJorient4,23;"WHITE";8,23;"BLACK":6755c ^54,23;"BLACK";8,23;"WHITE" c95,22;"0:00:00";9 ,22;"0:00:00" meblitztclock+4,5:tclock+10 ,5:5,25;"5";9 ,25;"5" r5:5:1: %aa=(board+120x+side)-21 %y=(aa/9.99 =):x=aa-10 *y #orienty=7-y:x=7-x *x=2+2*x:y=1+2*y :coords,x:coords+1,y:piece,128*side+7  aa=printp  W5:5:1::7;2;" - THE TURK: MENU - "'''' " 1. New game" " 2. Continue old game" " 3. Blitz chess" #" 4. Demo:-the Turk plays itself" " 5. Input sequence of moves"  " 6. Replay moves in the game" $" 7. Edit board or setup new posn" " 8. List moves to screen" " 9. List moves to printer" "10. Line print the board" "11. Save moves to tape" "12. Save board to tape" "13. Load moves from tape"  "14. Load board from tape" &H2,0;"Select one of the following ";2,28; +5razor,15:torb,4:b=3:6205= 0/a=1̱a$:a$(a)<"0"a$(a)>"9"a$(a)="0" 5a:a=0:a$""a=a$ :"a<1a>146950& ?a=13105! Da=23205 Ia=33185q Na=44055 Sa=54065 Xa=63705y ]a=75500|:me ba=83905A ga=9 3505 l$a=10 5205U:6855 qa=11 3280 va=12 3355 {a=13 3320 a=143370* :3055 razor+1,15 .razor+2,9 :razor+3,9 .razor+4,7:razor+5,7  chorbs,0:orient,0 a=rsetup:a=intbrd w$="":x$="":y$="":z$="" 0sw=7:sb=6:pw=2:pb=0 n5:5:1::"Are you using a black and white television or a colour one ?"'"Answer b or c." a$=:a$""7172 a$=:a$=""7173 a$="b"a$="B"pw=4 7colors,64@+8*sw:colors+1,8*sb  &colors+2,pw:colors+3,pb >epwncnt,0:pwncnt+19,0:mask,2:mask+1,0:mask+2,252  6855 #(_"INSERT NEW TAPE,NOTE START":a$7110:"REWIND TO VERIFY":"":"OK"'"PROCESS COMPLETED" 0valf1lbsmonnojisplntbr@ovessetcegal/lockdtocWdtoh?ptobcstobKredio_rintomovlrbrsetucdat pdatordeistoror(rienBaxplestm$doveZoarFomovemYvcopmbufcloc)diot oordoloriecazohorbwncnUasooxboo ` PAWN KNIGHT BISHOP ROOK QUEEN KING EP PAWN WHITE BLACK MOVED UNMOVEDd{\Q Press any key to return to menu.etweelas extmovumaooklitidimeoumsfxyx c4tu ghCesagcrol}enY ZXW BA     Demo F%FF!["=\!][{\!c>!\7V~@|@@~>>DHpHDB@@@@@~BfZBBBBbRJFB,0:2,-2:0,-39':-1,-1:-64@,0:-1,1:0,39' x+15,y-104h:1;0,1:x+15,y-104h:3,3:60<,0:3,-3:1;0,1 mc=03:a=y-108l-6*c:b=x+18+cx+72H+c6:b,a:3,0:b:c ma=1300,:a:1;"an ordinary colour or black and white television set,"; a=1150:a q2:X=80P:y=175:x,y:96`,0:0,-64@:-96`,0:0,64@ x+9 ,y-7:61=,0:2,-2:0,-46.:-2,-2:-61=,0:-2,2:0,46.:2,2  x+8,y-65A:2,-2:5,0:2,2:x+79O,y-65A:2,-2:5,0:2,2:a=y-38&y-59;-3:x+76L,a:16,0:a zx+78N,y-8:0,-9 :x+78N,y-20:0,-9 :x+84T,y-8:0,-21 Ua=y-9 y-30-4:b=aa+1:x+89Y,b:3,0:b:a ;b=y-28y-27:x+83S,b:2,0:b  ;b=y-27y-26:x+77M,b:2,0:b %;b=y-11 y-10 :x+77M,b:2,0:b *<b=y-34"y-32 :x+82R,b:10 ,0:b /qx+77M,y-32 :1,0:1,-1:-1,-1:-1,0:-1,1 4g0:x+22,y-89Y:0,6:-30,0:0,502:7,0 >a=1300,:a:1;21,0;"and a cassette recorder to store";#1;0,0;"and retrieve your programs." Ca=1150:a Hq2:x=17:y=168:x,y:30,0:0,-524:-30,0:0,524 M`x+2,y-21:26,0:0,-16:-26,0:0,16 Rkx+3,y-44,:24,0:a=x+3x+304:a,y-44,:0,-7:a W0:x=80P:y=175:x+31,y-89Y:0,14:-35#,0:x-12 ,y-75K:-9 ,0:0,38&:-11 ,0 \x+34",y-89Y:0,16:-38&,0:x-12 ,y-73I:-6,0:0,38&:-14,0 f~a=1500:a:a$=" ":18,0;a$;a$;a$;a$;#1;0,0;a$;a$ p1;18,0;"You can also add extra memory togive a total of 48K, ";:a=1225:a:1;"and connectthe wonderful little ZX printer."; ua=1150:a zx+95_,y-95_:0,-20:41),0:0,20:-5,0:0,-10 :-31,0:0,10 :-5,0 cx+102f,y-103g:27,0:0,14:-27,0:0,-14 x+97a,y-94^:0,10 :-28,0:0,-6:-1,1:0,6:30,0:0,-11 *1;15,21;"ZX printer" a=1300,:a:2;21,0;1;"Coming mid'83";:a=1150:a:1;":an RS232 interface"; a=1150:a 0:1;1,25;"Other";2,23;"Computers";5,25;"RS232";6,25;"Board" _197,117u:45-,0:0,21:-45-,0:0,-21  N215,139:0,11 :223,139:0,11 215,168:0,3:223,168:0,3:219,175:-3,-3:219,175:3,-3 0:219,116t:0,-16:-71G,0:0,-10 :220,116t:0,-17:-71G,0:0,-10 a=1300,:a:#1;1;0,0;",and the ZX Microdrive (up to 8 can be connected to a Spectrum)." a=1150:a )y=68D:x=458:27 jk=20:x,y:0,6:2,2:k-2,0:2,-2:0,-6 ʚx,y-18:0,16:2,2:k-2,0:2,-2:0,-16:-1,-1:-k,0:-1,1 Kx+4,y-20:2,-2:10 ,0:2,2 Nx+23,y-8:4,0:x+23,y-9 :4,0 x H0,y-8:3,0:0,y-9 :3,0 L81Q,y-8:12 ,0:81Q,y-9 :12 ,0 n130,87W:0,5:17,0:131,87W:0,4:16,0  *1;11 ,0;"Microdrives" a=1400:a: `a=52170:a=1150:a:a=52210:a=1100d:a:a=52250 $a=1150:a:5300 4,5,6,8,7,10 ,12 ,15,14,13 ,11 ,5,2,1,3,4,5,4,7,8,9 ,7,4,2 0:0:7: (a=51910:a=1120x:a (a=51870:a=1200:a U0,0;"CORNERSHOP CHOCS. LTD.";1,1;"Monthly takings 1982" M5:36$,150:0,-129:192,0:7 xa=70-1:18-2*a,0;"`";502*a:a:20,5;"J F M A M J J A S O N D" 4,6;"  = turnover":2:3000 :n=011 :a:b=08*a:40(+16*n,b+24:7,0:b:n n=1200:n 6,6;"  = profit":n=011 :a:2:b=08*a:1;4;40(+16*n,b+24:1;4;7,0:b:n k=1400:k: P64210,23672x\:64211,23673y\:4:4:0::p=d:23675{\,168:23676|\,255 Zf1=0:a=shufle dsi=13:y=112 11 :x=0246:a=0:ret=5230n:1010 nx:y:f1=1 xa=1250:a hy=112 11 :x=0246:a=p:p=p+1:ret=5260:1010 x:y a=1300,:a:i $n=1450:n:5400 shufle=64160:d=64212:s$=17+7+16:m$=16+7+17+4+21+1+""+21+0:n$=16+7+17+4+21+1+""+21+0 Lv$(13 ,2):"A","2","3","4","5","6","7","8","9","10","J","Q","K" *5305:a=113 :v$(a):a Ó"","",""," !","","","",""," !","","",""," !","",""," !",""," !",""," !","","","! !","","","","! !","","","! !",""," !","","! !","" "","! !","","! !","","! !","","","! !"," !","! !","","! !","","","! !"," !","! !"," !","! !","","! !","","! !"," !","! !","","! !","! !"," !","! !","","! !"," !","! !" :" !""#$","%&'()","*+,-.","/0123","45678","9:;<=",">?@AB" Tc$(11 ,7,5):a=111 :b=17:c$(a,b):b:a  5200P -23675{\,480:23676|\,250  "0:0:6: ,g1:3,3;"";20,3;"" 67a=419:a,3;"";a,28;"":a JZ7;0,0;" ""to boldly go where no man has gone before""" Twn=1151:7,6;2;" ";11 ,15;"";12 ,15;"" ^\2:1:125},78N:k=62>:-k,-k:130,78N:k,-k:0 ha=63817I:n r#k=1502:k:6000p |#n=6388864044,4 !n,128:n+1,96` Bn+2,(*13 )-6:n+3,(*13 )-6 n 9a$="      " n=1150:n ret=5613:6800 n=1150:n ^0:12 ,1;:c$="A demonstration of some of the":ret=5617:5700D U13 ,1;:c$="features and abilities of the":ret=5618:5700D U14,1;:c$="Sinclair ZX Spectrum computer.":ret=5620:5700D On=1150:n:17,4;0;"(by courtesy of WHSMITH)" $a=1400:a:2000 D3n=1̱c$:c$(n);:.06|u\,12 :n:ret p6000p:n(14):n(1)=119w:n(6)=131:n(8)=135:n(9 )=139:n(11 )=143:n(13 )=147:n(14)=151 z3s=0:k=0:1:7:7: :a=52090z:a=52130:a=1200:a: V6020:38&,102f,2054,2118F,2054+224,4134& y=16:b ,a=15776=:n=032 32 \b=2054+224n=0-7*32 +20482048-7*32 hx=b+n+16384@b+n+16384@+3*512512:x,a:x+256,a:a=a+1:x:n y ]b=167557-568:a=bb-32 -8:0,a:255,0:a:b +p=9 :q=165535-568 Xp,q+4:0,-39':-1,-1:0,-1:-1,-1 -1,0:-1,-1:-2,0:-1,1:-1,0:-1,1:0,3:1,1:0,-4:1,1:0,3:1,-1:0,-1 p-2,q-14:5,0:p-4,q-15:9 ,0:p-4,q-16:-1,0:0,-3:1,-1 op+5,q-16:1,0:1,-1:0,-1:1,-1:0,-4 -1,-1:0,-1:-1,-1:-1,-1:-1,-1:-1,0:-1,-1:-5,0 -1,1:-1,0:-1,1:-1,0:-1,1:0,1:-1,1:0,4 p,q+4:4,4:2,0:1,-1:0,-1:1,-1:0,-4:-1,0 9-13 ,-13 :1,0:13 ,13 $|p-9 ,q-20:0,3:1,1:0,1:1,1:0,1:1,0 .q 862008:30,172,22,158,34",155,30,116t,22,102f,34",99c,30,60<,22,46.,34",43+ Ba=19 :x,y:x,y Lo0,-12 :5,5:0,1:-1,1:-2,0:-1,-1:a Vn=1150:n [a=51830v h6600:of=0:x=68D68D+9 *1919:a,d:ret=6310:6500d x ^of=568:x=63?63?+12 *1515:a,d:ret=6330:6500d x _of=112p:x=63?63?+12 *1515:a,d:ret=6350:6500d x $n=1350^:n:8900" dy=n(a+6)-of fd>1x,y-4:0,-2:1,-1:4,0:2,2:0,4:-4,0:-3,-3:6520x ix,y-4:0,-2:x+1,y-3:0,-4:x+2,y-2:0,-5:x+3,y-1:0,-6 nx+4,y-1:0,-6:x+5,y-1:0,-6:x+6,y-1:0,-5:x+7,y-1:0,-4 xn=2*(of>568):a=-5x-4+n,y:15-2*n,0:x-4+n,y+8:15-2*n,0 >a=0x-4+n,y-4:15-2*n,0 ad=.75@x+8,y-6:x+8,y-7:x+9 ,y-6:x+9 ,y-7 Vn=4-(of568)-(d.5):d<.5x+7,y+19:5*n,-n g(d<1k)(d<1d.5)x+7,y+24:5*n,-n:k=(d=.5):6580  k=0 )x+7,y+24:0,-24 ld/4,a:s=s+d:s4s=0:x+16-4*(of568),167-of:0,-32 ret 0,1,2,1,3,.5,2,.5,0,1,0,1,2,1,3,.5,2,.5,0,1,3,1,5,1,7,2,3,1,5,1,7,2 y7,.75@,8,.25~,7,.5,5,.5,3,.5,2,.5,0,1 y7,.75@,8,.25~,7,.5,5,.5,3,.5,2,.5,0,1 20,1,-5,1,0,2 20,1,-5,1,0,2 Xs=150:l=19:a=s255:2:a,0:255-a,255-a:a ea=s+l255:2:6;1;a,0:6;1;255-a,255-a:a Ca=s+l+l255:4:a,0:255-a,255-a:a ia=s+l+l+l255:4:5;1;a,0:5;1;255-a,255-a:a Ga=s+l+l+l+l255:7:a,0:255-a,255-a:a  7:0:0:ret Iret "84T,64@,"1.D2-D4,",34",546,"D7-D5",83S,63?,"2.C2-C4,",35#,45-,"E7-E6",97a,76L,"3.G1-F3,",27,46.,"G8-F6",92\,73I,"4.B1-C3,",26,35#,"F8-E7" "(93],579,"5.C1-G5,",38&,480,"H7-H6",579,68D,"6.G5-H4,",25,27," O-O",28,26,"",85U,75K,"7.E2-E3,",32 ,42*,"B7-B6",68D,46.,"8.H4xF6,",35#,46.,"E7xF6",63?,546,"9.C4xD5,",45-,546,"E6xD5" "g5:5:1::8900":cu=3.5`:a=51007?:a=50794j:a=50937 "r15,168:129,0:0,-129:-129,0:0,129:a=51801Y "ik=1100d:k:x=119:a,b,a$:a=a+51500,:b=b+51500,:a$=""8935" ">cu=cu+.5:(cu-(cu+.1}L))<.1}Lcu,19; "a$; "ret=8937":8950" ""a$" O-O"k=138&:k "Ax:13 ,19;"10.....";15,21;"Your move?" "$k=1300,:k:8970 # "t=8:c=a:n=12:a,0:k=50937:k=1t:k:a,c:k=50937:k=1t:k:n:a,0:k=50937:k=1t:k "d=b:n=12:b,c:k=50937:k=1t:k:b,d:k=50937:k=1t:k:n:b,c:k=50937:k=1t:k #ret # 40:7:0::a=1502:a #a=58750~ #8a=51950:a=51990:a=1200:a ## 3000  #(a=52250 #25a,33!:a+1,128:a+2,64@ #<>a+3,205:a+4,66B:a+5,229 #F$a$=" First some ideas for games" #Pn=1̱a$ #Za+5+n,a$(n) #dn #n5a+5+n,13 :a+5+n+1,201 #xn=aa+100d:n:n: %50000P:"" %&/"(M)ake new copy,(V)erify copy or(R)un ? ";a$ %0a$="r"a$="R" %:Pa$="m"a$="M":"Demo"9600%:"Data"50600,15000::9510&% %D)a$="v"a$="V":"":"":"Verified OK" %N 9510&% %50000P:"": .Data ::>**|?:":#G:)ɷ:%:$ɰ2(:)ƇO!1 :(O**2,2-$2,ND_q`:)Hw$|o|@g<<<*6\>z!N$$$$$N>¢!$*6\>ʷ@!BP????w#q+$>!##w$!A> !>2+>2*~2):*<<2*:+<<2+A!w![@p????߿߿ݿ_Ϸwg߿߿ ##~̺S7:QK* ~W ~*x0z * V ~ʧW:Q ~!3@B* The Turk * ~x!PB Frere Gustav by G.Mahler !PB perhaps a business application !PB or, more seriously, !@PB The Spectrum is designed and !PBbuilt entirely in Great Britain !@PB What do I need to get started? !@BThe Spectrum is able to generate !@@B music using the BEEP command !@B What can I do with a Spectrum? !L@BLets see !@B First some ideas for games !PB or, more seriously, !@PB The Spectrum is designed and !PBbuilt entirely in Great Britain DxDx  DT8Dx8DDxD>`y/wɀ.l$$8r4`~~ ^ڄNZ~B4b4zh>4hfhzhhI4Z$v$&*h&``D.8?~~~~?~~~~~~~~~~@@@@@@@@~~@O!4*)))))))))"|?40!_Nwy#&- 1* 0,2# "% $3(!'  4+/).DDwDHPPP@9 APPPPTSJ$AP(JD)!B$EBAD$!aCA $$┈‡$J @Q) B$$$$D啅>A<#Np@@@@@ ?w@@@@ !  BHT $ $  8|U******j `BOBB> ><$*@!IB@@A@@@$H ?H$<$<$<$<$  $BHEHEH@9 ?TU$<|H!@;|BBB8PVTTTTTT>@ɀA@ ! $P$PU*=B@x <TTTLl~~~AAaTTTTTU*~~lL >~B> *U!!BA==B!!!BB<<BBCB}!!!}7BT |B!!!~!_!!|100026~~TU*****'@p ~~~62***?@=<@@@@ D@ BB$"U(HȨ$BB$ @@ ȨȨ @$B$B@ ȨȨ $ BBZBBB$H$H @ȨȨ@ B$$B @ȨȨ @B$$B@ ȨȨDBU"H(8TT88|T88||8D|88TT88|T88||8D|8*]\"_\C*]\~}t[3*a\Þ*x\#"x%