ZXTape! 0Created with Ramsoft MakeTZXbodyswop tt [v)58823:q$(502):p$(96`)   MACMILLAN 1984  |0:0:0:0:5:7::8,11 ;0;"Loading";10 ,11 ;"bodyswop"  502 -236066\,0:236077\,60<: /236066\,24:236077\,247: 27:"" 4q$="(earn to &ead odys|}op":p$(32 )="83883888888238388888888888888888":p$(65A)="88888878855858888878688888888588" 7e1;7;2;0,0;" ";32 ;" ";32 ;" ";32 ;" ";32 ;65136p,1:65137q,2:pk=23627K\+256*23628L\+62>:pk2=(pk/256):pk1=pk-256*pk2 =s65194,200:65139s,0:65138r,254:65142v,pk1:65143w,pk2:65140t B0:7:0 F30:6,7;"9:;<";20;"!""";7;"=>?@A";19;"#$% &";7;"BCDE";19;"'()*+";7;"FGHI";20;",-./";7;"JKLM";20;"0123" P34;11 ,5;""," " Zs0:20:''" Developed by Fisher-Marriott"''" for Macmillan Education"'" and Sinclair Research" d2;19,0;7;1;" ";31;" ";;20,0;"  Macmillan Education 1984 ";31;" " f#0;1;1;6;2;0,0;" Loading ";0;"******";1;" Please wait ";1,0;0;31;" " H3,0:7:"":1;2;3,0;" "  7:"" A t&{} MPUp0P0 @?* ?PxժUVU*U*UU*W\XX\ڶ>X[oo??????LGp33˟<?jUj@@Q*\<\BBB> o:qo&@:p >g>2~ oo2~P0&)))p >2:OG?(: ,>2s>2:2:2r:s= -y2$ (} o:p( (|g7} o|0g:<2:r2:s ,=2sâ=2sâBBf|@Bf<BBf>~@f<BBf>Bf@@@@<f<@@d<D bB 8:@@@@KLH@@@BB0 |!! sƄf$d$3!3! #&,+4$xx@EFDf$` @@@@\fBeM | |0a(!آdc@ @|&O0# Sl3,s,7qpЌ,[}a  65͵ ޾x022 UUIII2333TP|O@  0p`ҿ̳̳̳Sm7*633*6*6+7*? @p=%55^<LJǏ  `j8^ 31AA<@!@@@AqAAp?qÇ ??>><?~?p?qÇAAJ~}yw{Y??<<`>￟<p>8p (jx`HPAqpx>(x?J_yw{{{0??? x0@ WG#`pEF%& @@@AAA!!  @@@@!!;``X~0 ah! @@@@ !   !|1U,T"EFEF#![^_``~ ch! 0 $eh!\/Jex UUU ^UU| a٩<#CAA@ = @`! 0Qݪj? ᯹|0В?~ @BGG# fnn, !1 @֐\\\$eh! l@@  8@@ @ H$ d?>=zzz}~?///??///??>={{{}~?ߏ??ߏ??>=xxx}~???? XPx   jTz=jy|*QEX\p8UP0`p0001 #@@80pc Pxժ 0Ȝ U<&8Uu]\TXPܬԨPx|0pаFPUM=VMr{m{ P  P P P 3qMMY?YL8Wq !v>?u' 8s3333333333p~~>>>~~~|||5jU|||<>>>ժЪ8Gp[oo?X|?????LGp33˟<x"EFEF#![^_`` 0 $eh!\/Jex a٩< ᯹|0В?~?hy;>ؼss·<0`@΀`0@ @fnn,s  t^ns@֐ 0LO|&o:? exЌ,\|`sΆ<x1???ߌ[^_``$eh\/Jex 0p`w:ssc||xҒfnn,  t^ns@֐ 0LO|&o:? exЌ,\|`sΆ<xMXWqMV> P P P 36gM6V5V\GWq !Wv>$$Em)9  >>> BB>x< xt̸xtx@@@@tx@@@@ ఘ@@@@x̸txx@@@0tHx000x̄$<00`x̄x t̄̄x̀t̄x̄8@@@@@t̄̄@@@@ @@@@@@@ڒ̄x̄̄t̄x@@@@xBBf 0p p(![~#"[o<&)))K6\ >2[: [2 [: [2[> 2[~#"[2[:[= 2:[= :[G: [O: [ 2 [*[2[: [G: [2 [*[2[: [G: [2[: [O͌:[<2[ :[<2[ :[@ :\G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!xO F![F(// P P P 88 MSS \Wq !v>DDDDDDDDDD\p`@@@@BBBBBf>Bf<\fBVmIIIII**BBBBBBf<BBf|@@@@:fBpC |TB LEARN TO READ 10   FISHER-MARRIOTT  "  Sinclair-Macmillan 1984   500 \4:x1,y1:67C,0:0,-20:-67C,0:0,20: 4:x=x2x2+8:x,y:*40(,*6:40(,0:x+80P,y:-*40(,*6:12 ,-*2:x: 0:0:x=x2x2+63:4:x,y:*10 ,*6:20,0:-*10 ,*6:12 ,-*2:x:x2,y+2:0:502,8,-1: 1:x=x2x2-6-3:4:x,y:-*10 ,*6:-20,0:*10 ,*6:-12 ,-*2:x:x2,y+2:0:-546,4,1:0: ul$=("body"p=1)+("head"p=2)+("tail"p=3)+("leg"p=4)+("ear"p=5)+("eye"p=6): hxx=6*y+(y=1y=2y=0)-(y=4)-2*(y=5):q$=" "+(" "y<2) 51;1;18,xx;q$;19,xx;q$: 275:x=80P-(24r=5)-32 *(ch=2):y=72H+24*(ch=2)+12 *(go=9 ):0:7:wid=1:w$=("\he fat "r=5)+n$(3*r+13*(r+1))+" says,":618j: >""15 pk=23560\: x=4+ad/8:0;15,x;"";16,x;7;" ";17,x;" ";18,x;cl;"": f7:7-cl;1+(3ch=3),x;"";""ch=3;"" y=ff13 +4*(ch=2):7-cl;y,x;"";x+19+8*(ch=3);7-cl;"":y:7-cl;y,x;"";""ch=3;"": 0;7;y,x;a$(sl+1);y+1,x;0;b$(sl+1);y+2,x;0;c$(sl+1);y+3,x;0;d$(sl+1);y+4,x;0;e$(sl+1);y+5,x;0;f$(sl+1): pp=5*p:q$=" "+(" "p<3)+u$(pp-4+(p>1)pp)+" "+(" "p>1)+u$(26+pp+(p>1)30+pp)+(" "p>2)+" ": yx=ad/8:i=1521:i,x;" ":i:i=01:#0;i,x;" ":i: 0;7;y,x;a$(sl);y+1,x;0;b$(sl);y+2,x;0;c$(sl);y+3,x;0;d$(sl);y+4,x;0;e$(sl);y+5,x;0;f$(sl): p>1i$(6*g+1)="1"burp:22:x=24+ad:y=144:w$="!ou need":618j:x=16+ad:y=160:w$="a body first":618j:34" p>4i$(6*g+2)="1"burp:22:x=24+ad:y=144:w$="!our boggle":618j:x=16+ad:y=160:w$="needs a head":618j " #236066\,200:236077\,246-3*r:sl=10 -(2r=2)+(2r=3)+(6r=4):g$(12 *sl):1000+100d*r:g$(6*sl):g$(6*sl+1)=g$(6*sl):ch=1p<340( %P30*ch+970+100d*r+5*p+rd:t:i=1t:a,b,g$(ab):i (a$=g$(1sl)+g$(6*sl+17*sl):b$=g$(sl+12*sl)+g$(7*sl+18*sl):c$=g$(2*sl+13*sl)+g$(8*sl+19 *sl):d$=g$(3*sl+14*sl)+g$(9 *sl+110 *sl):e$=g$(4*sl+15*sl)+g$(10 *sl+111 *sl):f$=g$(5*sl+16*sl)+g$(11 *sl+112 *sl) - .Ny=3+yd/812 +yd/8:y,x/8-4;x/8+4:y:x1=x-1+24*0:y=110n+32 *0-yd:x1,y:i=02*ͧ/10 :x2=x-1+24*i:y1=110n+32 *i-yd:x2-x1,y1-y:x1=x2:y=y1:i:x1=x:y1=111o:y2=143:dif=221:90Z: 0]y=159-yd:x,y,16:y1=159:y2=y1+15:dif=318>:x1=x:90Z: 2x-d*3,77M-yd:d*-8,-12 ,d*-2:.01z# =,10 :.1}L,20:d*14,12 ,d*2:.1}L,15: 4i$(ps)>"4"x-d*18,129-yd:d*-12 ,12 ,-d:.1}L,8:d*-8,0:d*7,-2:d*13 ,-12 ,d:.1}L,5: 5x-d*22,119w-yd-20*(i$(ps)<"3"):d*-6,0:d*-12 ,-14,-d:.1}L,5:d*-5,-2:d*7,0:d*13 ,13 ,d:.1}L,3:d*4,0: 6x-d*17+(d=1),160-yd:d*-20,9 ,d*2:.1}L,8:0,-2:.1}L,9 :d*14,-8,d*-1.5@:.2~L,30:d*6,-4,d:.2~L,10 : 81-err:x1=x-8*d:x1,162-yd,3:x1-2*g+(g=0),162-yd,1:.2~L,40(:0:cl: 7k=2729:9 ;20-sc,k;" ":k: ?200:sc=sc+1:9 ;21-sc,29-(sc>9 );sc;6;2;"":.2~L,10 +sc:z:sc=20y=201-1:8;8;1;1;y,30;" ":.01z# =,30-y:y:.5,30 A F,280:236077\,246-3*r Hg23560\,0:sb=1000+100d*r+5*p:ink=0:p<3:p>275K IFink:sb:23560\=0ink=ink+1ink=6:73I J$ٺ(*2)+4:sb:80P K420:25:23560\=075K P 0: Z3x2=x1-24+8*(p=2):y=y1-ydy2-yd [[(x2,y)x2,y:2*(x1-x2),0:x2,dif-y-yd-yd:2*(x1-x2),0:93] \x2=x2+1:91[ ].01z# =,10 *p:y: di$="111111012345" fi=16:r=(*6)+7:i$(7)=i$(r)+i$(7r-1)+i$(r+1):i:i$(11 )="0"102f h.p=(*6)+1:i$(p)="0"104h j>i$(p)="0":r=i$(p+6):ct=ct+1:r(ct)=r:p(ct)=p n 0236066\,200:236077\,249: "( boggle needs","\he computer","will give you","the parts to","build a boggle.","","","^on't choose","parts you don't","need, or you","may lose them." P"!ou can build","a boggle by","yourself, or","two people can","have one each." {200:#0;0,5;0;7;"wess a key to choose";1,5;"WESS A KEY TO CHOOSE": F#0;0,0;0;" ";31;" ";31;" ": 200:xx=(9 *(ch<3))+(ad/8*(ch=3)+1):#0;0,xx;0;7;" wess a key ";1,xx;" WESS A KEY ": Y200:#0;0,5;0;7;"spe";1,5;"SPE": ' +69 :236066\,0:236077\,60<: gg=0:ad=0:err=0:a(12 ):b(12 ):cl2=0:tune=900:cl=1 Uclear=9190#:u$="679: ;7<9 =<> ?7 7<@ 7:7VYZ [W\Y ]\^ _W W\` WZW" 5prog=0:p$="78788777777677457487777675779787" 8m$="bodyheadtailleg ear eye ":n$="#eg`ip_en^eb[ampig" h=299+:BURP=9400$ #ps=0:ch=1:800  jy1=y:200 lV23308 [,1:23309 [,1:23310[,8:23312[,255 nl=1̱w$:y=y1:q$=w$(l) q%q$"9"q$="w"680:656  700 l  qy3=164-y1:x,y3:0,10 :4,-10 :4,10 :0,-10 :x=x+11 : oy3=174-y1:x,y3:2,-10 :3,8:3,-8:2,10 :x=x+12 : Ly3=174-y1:x,y3:4,-10 :4,10 :x=x+10 : y3=174-y1:x+4,y3:-4,-10 :x+4,y3:4,-10 :x+1,y3-6:6,0:x=x+12 : my3=174-y1:x,y3:4,-5:0,-5:0,5:4,5:x=x+10 : q$="v":700 (x=x-3:y=y1:q$="v":640: @y=y1:720:y=y+8:q$="(":720:x=x+8: q$=" "x=x+8 q$"0"q$"9"23308 [,2:23309 [,2:y=y-2*(ch=3):720::x=x+15:23308 [,1:23309 [,1 q$="w"672 :q$=","x=x-2:y=y+5:720:x=x+8 :q$="."y=y+5:x=x-1:720:x=x+8 Bq$="'"x=x-2:y=y-4:q$=",":720:x=x+8 .q$=""""x=x-2:720:x=x+8 q$=")"665 q$="#"664 q$="*"666 q$="("667 q$="!"668  7720:y=y+8:q$=(q$-32 ):720 !x=x+1+p$(q$-58:): B23306 [,x:23307 [,y:23311[,q$:zz=65000:  $0:0:0:0 "y#0;0;0,0;" ";31;" "'31;" ":0:cl<77:cl=7:clear:cl #1:2;0,0;" ";32 ;1,0;" ";32 ;2,0;" ";32 ;3,0;" ";32 ;21,0;" ";32 ;20,0;" ";32 $236066\,200:236077\,228:2:2;7;1,1;"kl7<@ =7 7<9";2,1;"mnW\` ] W\Y":x=168:y=8:w$="_odyswop":618j *!y=20:x2=4:8 ,0r=(*6):r=2r=4812, .rd=1:p=(*6)+1:ch2=ch:ch=(*2)+1:x=0:y=12 :35#:20+5*(>.5ch=2) /x2=248:y=20:9 :ch=(*2)+1:r=2+2*(>.5):x=24:y=12 :35#:20+5*(>.5ch=2):ch=ch2 10:7:200: 2_236066\,200:236077\,228:r$="+,-. d7 67op KLMN hW Vqr " 30:j=13:st=7*(j-1)+1:5+3*j,12 ;r$(stst+6);6+3*j,12 ;r$(st+21st+27) 6j 8j=13:1;7-2*(j=ch)+2*prog;5+3*j,11 ;19;6+3*j,11 ;19:j:prog=1 < 270 >ch2=ch BUx1=86V:23560\,0:j=ch3:ch=1:y1=137-24*j LA6:1:100d:1:6:0:0 Z23560\>00:1;7;2+3*ch2,11 ;19;3+3*ch2,11 ;19:ch=j:j=5 \j `!23560\=0834B f275:j=13:1;7-2*(j=ch);5+3*j,11 ;19;6+3*j,11 ;19:j h,cl=(*6)+1:cl=cl2872h jch2880p khp=3:236066\,200:236077\,228:8,11 ;19;9 ,11 ;19;14,11 ;" ;7!"" ";15,11 ;" [WAB ";17,11 ;" 7 ;7!""";18,11 ;" [WAB" lNx1=86V:23560\,0:j=34:y1=137-24*j mK6:1:100d:1:6:0:0:16 npk>01;5;5+3*j,11 ;19;6+3*j,11 ;19:hp=j=3:j=4:pk=7800  oj:hp=3875k pL1:502:cl2=cl:cl:clear:0:h:1000+1000*ch zclear:800  V901+(*14):x$,y$:p=1̱x$:.13~R*y$(p),x$(p)-480:p: "050579:97","222222113" %"50555055579:975","441114111111212" '"7777;>;799997642","1112121211121212" !"<<<>>>@AC<>;<","1141141122226" "4420279;77","1211211224" ">@><;;","312244" "2277767;999","11111111112" "<<9742>><;7","21111111111" "7777@><;","12121212" "79;97;9>>","111122222" "797;>>@>@C>","11112211114" "77;77;<<962","11111111121" "A<959274","21122223" "9>99;99>99;","11111111112" G"7777;>;7999976427777;>;779924677","11121212111212121112121212111142" @"  *+,-. 23456  :;<=  CDE  KLM " 9y+3,x+2;" ";y+4,x+2;" ": 8y+1,x+3;" ";y+2,x+4;" ": 82,12 ,13 ," ",22,23,"!"""  1,568,579,"#$" 1,25,25,"%"  92,35#,37%,"' ",45-,47/," "  92,35#,37%,"NOP",45-,47/,"QRS" ;2,16,18," ",24,28,"4& " @2,16,18,"TUV",21,30," 23 YZ[ " Q3,11 ,13 ," ",21,23," ",33!,35#," (" 82,11 ,13 ," \]",22,23,"^_"  1,557,568,"/0" !1,557,579,"`ab" $1,25,25,")" %1,25,25,"c" L@"  +,-.  34567  ;<=>  CDEF  KLMN " Q7y+3,x+3;" ";y+4,x+3;" ": V7y+1,x+4;" ";y+2,x+4;" ": [f4,15,16,"!""",25,26,"#$",35#,36$,"%&",45-,46.,"'(" `72,480,491,"/0",58:,59;,"12" e1,18,18,")" j1,27,27,"*" o92,36$,38&,"?GH",46.,480,"@AF" p92,36$,38&,"STU",46.,480,"VWX" t:2,16,18,", ",26,29,"89: " uh4,6,9 ,"YZ[\",16,19,"]^_`",26,29,"abcd",37%,37%,"n" y|5,15,16," ",25,26," O",35#,36$," P",45-,46.," Q",557,568," R" z|5,15,16," ",25,26,"eO",35#,36$,"fP",45-,46.,"gQ",557,568,"hR" ~52,480,480,"I",58:,58:,"j" 52,480,480,"i",58:,58:,"j" 1,17,17,"m" 1,18,18,"k" 1,28,28,"B" 1,28,28,"l" 4" +, 234 6 :;<=> CDEF KLMN " 9y+3,x+3;" ";y+4,x+3;" ": Sy+1,x+1;" ";y+2,x+1;" ";y+3,x+1;" ": 62,22,22,"!",30,30,"""" 72,43+,44,,"%&",35#,36$,"#$"  1,11 ,12 ,"'(" 1,19,19,")" ;2,27,30,";GHI",35#,38&," / 0" 92,28,30,"OPQ",36$,38&,"RST" Q3,10 ,12 ," ",18,20," ",26,28," ?@" Q3,10 ,12 ,"UVW",18,20,"XYZ",26,28,"[\]" 52,22,22," ",30,30,"1" 72,21,22,"^_",29,30,"`a" 1,44,,44,,"5" 72,37%,38&,"bc",45-,46.,"de" 1,11 ,11 ,"7"  1,11 ,12 ,"fg" 1,19,19,"8" 1,19,19,"h" L"  345 ;<=>  CDE  KLM " 5y+4,x+3;" ";y+5,x+3;" ": 8y+2,x+3;" ";y+3,x+3;" ": #b4,29,29,"!",39',39',"""",557,557,"#",67C,67C,"$" ( 1,69E,70F,"()" -!1,29,31,"%&'" 21,40(,40(,"*" 772,557,568,"-.",67C,68D,"/0" 872,557,568,"?@",67C,68D,"AB" <@2,27,31,"+ ",39',46.,";, " =?2,27,31,"NOP",39',46.,"QRS" Aa4,29,29,"6",39',39'," ",557,557,"8",67C,67C,"9" Ba4,29,29,"T",39',39'," ",557,557,"I",67C,67C,"J" F1,69E,69E,"7" G 1,69E,70F,"12" K 1,30,31,"U " L62,29,30,"FG",40(,40(,"V" P1,40(,40(,"H" Q1,40(,40(,":" xe" ""#$  *+, ./  234567  :;<=>  BCDEFG JKLMN " }Ty+2,x+1;" ";y+3,x+1;" ";y+4,x+3;" ": Ky,x+1;" ";y+1,x+1;" ";y+2,x+2;" ": 92,25,27,"OP ",39',41),"QR " F2,65A,80P," UVWEFG ",82R,84T,"XYZ" 1,6,6,")" 1,24,24,"0" 4,33!,480," [\567 ",535,579," ]",65A,80P," BC- 8G ",81Q,96`," JKHIN " x3,33!,480," 2bcd67 ",491,64@," :efg> ",65A,80P," BhijFG " w3,1,16," ",17,32 ,"  ./ ",33!,480," 2 567 " 4,1,16," klm ",17,32 ," nop ./ ",33!,480," qrs567 ",491,64@," tuv=> " 5,17,32 ," *+, ",33!,480," 234 ",65A,80P," BCDE9 ",491,64@," :;<1 ",81Q,96`," JKLM " 5,17,32 ," *+, ",33!,480," 234 w ",65A,80P," BCDEy ",491,64@," :;<{x ",81Q,96`," JKLMz " S2,65A,80P," BC^_FG ",81Q,96`," JK` N " .1,81Q,96`," %&LMN " .1,1,16," ""#a " -1,1,16," '($ " .1,17,32 ," *+A ./ " .1,17,32 ," *+! ./ " @"  /0123456789:;<=>?@ BCDEFG  JKL NO " Xy+2,x+2;" ";y+3,x+1;" ";y+4,x+3;" ": Qy+1,x+6;" ";y+2,x+6;" ";y+3,x+6;" ": !1,23,24,"!""" 62,491,502,"#$",59;,59;," "  1,19,20,"%&" 1,29,29,"'" V3,23,28,"1* +",33!,38&," ",45-,47/,",-." W3,24,28,"RSTUV",34",38&,"WXYZ[",44,,480,"\]^_`" Q3,18,20," ",28,30,"( ",38&,40(,") " Q3,18,20,"abc",28,30,"def",38&,40(,"ghi"  1,23,24," A"  62,14,14,"j",23,24," k" 72,480,491,"HI",58:,60<,"N " 72,44,,45-,"lm",546,557,"no" 52,20,20,"P",30,30,"Q"  1,19,20,"pq" 1,29,29,"M" >1,29,29,"r",39',39',31,"s" rd=0:i$="111111012345" څi=16:r=(*6)+7:i$(7)=i$(r)+i$(7r-1)+i$(r+1):i:i$(11 )="0"2010 /p=(*6)+1:i$(p)="0"2015 i$(p)="0":r=i$(p+6) !x=5:ff=2:18 +x=10 :y=2:35#:20  15 0:275:x=80P-(24r=5):y=72H:0:7:wid=1:w$=("\he fat "r=5)+n$(3*r+13*(r+1))+" says,":618j sx=546:y=96`:w$="""\his is my "+m$(4*(p-1)+14*p-(p>3))+".""":618j B236077\,246-3*r:y=2:x=10 :70F -275:15:pk=72500 0:r2=(>.5)+1:r$=" "+(" "p<3):r2;r2;1;11 ,18;r$;12 ,18;r$;13 ,18;r$ w236066\,200:236077\,228:cl;cl;18,1;u$(30);19,1;u$(31)  1:qq=23:y=05:xx=6*y+(y=1y=2y=0)-(y=4)-2*(y=5):x=1819:0;x,xx;7;" "+(" "y<2):x %87:z=01:pp=16*(y=0)+8*(y=1):qq-pp-z,32 +z:25+8*(pp>0)+2*z,0:0,-17-2*z:-(25+8*(pp>0)+2*z),0:0,16+2*z:z:qq=qq+40(:.2~L+.3*(y=5),0:y '-15:pk=7280:2500 *byes=0:0:0:270:23560\,0:f=0:st=0:ct=0 ,8k=0:23560\,0:y=st5:11 -p>2236077\,246-3*r:y1=y:y=2:x=10 :z=15:20:z=z+23560\:25:z:y=y1 .1+75K*(p<3) /<k=23560\:k=7275:y=5:f=1 0k0st=y:y=5 412 :y:f2500 9#k=0st=0:2092, <6275:yes=(st+1=p):yestune:2120H >\burp:ct=ct+1:ct<3st=st+1-6*(st=5):270:2092, Cp2:9 :y=p-1:11 :z=19 :.1}L,10 :12 :.1}L,-10 :z H9 ;1;cl;20,xx-1;q$+" ";19,xx-1;q$+" ";18,xx-1;q$+" ";17,xx-1;q$+" " R275:236077\,246-3*r:9 :z=07:z;1;13 ,18;q$;12 ,18;q$;11 ,18;q$:z:x=10 :y=2:20:280:1:0:275:clear f#i$(6)"000000"2015  sc=0:q$="632154256314":i$="":go=0:i=05:r=>.5:i$=i+r+i$+i+(1-r):>.5i$=i$(2*(i+1)+1)+i$(2*(i+1)):q$=q$(i+3*(r+1))+q$(i+3*(r+1)-1) 6i:r=2*(*10 ):i$=i$(r+1)+i$(r) i$=q$(10 )+i$ uhp7*(cl<4):i=16:p=i:10 :x=176:y=24*i-12 :w$=l$:618j:i 5x=120:20,x;cl;9 ;"*":x Lp=i$(go+1):r=i$(11 +2*go):rd=i$(12 +2*go) Wr=0p=5i$=i$(10 +2*go)+i$(13 +2*go):3020 ff=2:x=1:18:i=0rd:x2=40(-24*rd+40(*i::y=98b:7:i:y=3:x=7-5*rd:35#:rd20:x=11 25:236077\,228:8;9 ;12 ,3;"ab;""3177i li:pk=73500 nDrdy=38:7;y,2;20:y:y=3 qsc2=2-(err>0)-(err>4)-((ad/i>502)err=0):275:x=7:y=3:8:8:236077\,246-3*r:20+5*(sc2<1):x=1:ff=12 :19:0 rsc2=0x=568:y=112p:w$="oor "+n$(3*r+13*(r+1))+".":14,6;"";15,6;"":618j:280:1:0:k$=¾23560\:3300 v"60<:go=9 3350 {14:rr=(*5):x=32 +4*(rr=0)-4*(rr=2):y=120x:w$=""""+("\hat's "rr>0)+("nice"rr=4)+("good"rr=3)+("\hank you"rr=0)+("right"rr=1)+("better"rr=2)+".""":618j:ch=1:x=7:rr=rd:rd=0:y=3:p=3:35#:15:280:236077\,246-3*r:23560\,0 ?25:20:k$=¾23560\:k$=03200 ?ch=2:275:go=go+1:k$73020 3500 M7-7*(cl>3):cl:w$=sc:x=64@:y=88X:618j H14:x=40(:y=128:w$=""""+("\op score"sc=20)+(")ell done"(sc=19sc=18))+("*ery good"(sc=17sc=16))+("( good try"sc>10 sc<16)+("\ry again"sc<11 )+".""" Ry618j:i=1(sc>10 )+(sc>15)+(sc=20):tune:1:30:i:280:1:0 275: '0:clear:ch=3:g=0 ff=5:x=2:18:236066\,200:236077\,228:5,4;"7dd ";6,4;"Whh _";7,4;"=7 ?7<@ <678 67op2";8,4;"] _W\` \V\X VqrR" 10 ,4;"7dd y";11 ,4;"Whh }";12 ,4;"=7 d8<8 =;7 <7";13 ,4;"] hX\X ][W \W" =74300 ="0"4020 "1"4004 ]cl3=cl:cl=7:clear:250:0:0:x=8:y=8:w$:618j ^yd=32 :rr=(*2)+1:i$="111622":p=16:0:ps=p:10 :x=32 :y=24+20*p:w$=("a"p<4)+("six"p=4)+("two"p>4)+" "+l$+("s"p>3):618j:x=184:rr:i=1̰i$(p):d=1-2*(i/2=(i/2)):44,+2*p:i$(p)=(i$(p)-1):i:p @ad=16:275:280:1:0:275 i=021:7:0:i,0;15;" ":i:i=110 :x=8:y=16*i-8:w$:618j:i:280:1:0:275 i=021:7:0:i,0;15;" ":i:i=15:x=8:y=16*i+32 :w$:618j:i:280:1:0:275:cl=cl3 Lclear:7:i=01:7:p=2+16*i:9 ,p;"";10 ,p;" ";11 ,p;" ";12 ,p;" ";13 ,p;"":0:x=8+p*8:y=86V:w$=(i+1)+" boggle"+("s"i=1):618j:i:270:23560\,0 ?i=01:0:x=17+128*i:f=0 7*f:x,101e:94^,0:0,-36$:-94^,0:0,36$:1+80P*(f=0):f=1-f:pk=(23560\>0):fpk4023 #i=i+pk:i:pk=04022 "16:pk=74300 ccl:cl::c2=i-2:yd=7:9 :i$="111622"+("111622"c2):ad1=64@*(c2=0) 5cl:7*(cl<4):st=1+c2:gg=(*st) Ccl:7*(cl<4):fg=0:g=ggc2:ad=ad1+128*g st>0gg=0:st=st-1:x=44,+ad:y=24+yd:w$="_uild":618j:x=58:+ad:y=y+6:w$="a":618j:x=39'+ad:y=y+6:w$="boggle":618j:x=46.+ad:y=y+12 :w$="here":618j =i$(6*g+1)="1"ƥ>.6p=1:4065 Wi$(6*g+1)="0"i$(6*g+2)="1"ƥ>.6p=2:4065 $ss=(*6)+1:p=0 ?i=ss6:i$(i+6*g)>"0"ƥ>.65&fffp=i:i=6 1i:ss>1p=0ss=1:4063 2p=p+(((*6)+1)p=0):21 17:pp=(*4):i=16+*8:pp=pp+1pp=7:pp;0;1;1;16,x;x+8;17,x;x+8:1:5:i m236077\,228:1;7;0;16,x;q$(8);17,x;q$(815) x=x-3:19,x;"@7dd ";""g=0;"y"g=1;" =7 78";20,x;"`Whh ";"_"g=0;"}"g=1;" ] WX";21,x+3;"<"+(""p>4);q$(28);#0;0,x+3;"\";""p>4;q$(9 15)  23560\,0:f=0 Di=190Z:16:pk+g=491i=90Z:f=1 #pk=7i=90Z:f=2 )i:f=1x=64@+ad:4490 f=24300 U22:i$(6*g+16*(g+1))="000000"fg=1:g=1 g:fg4050 z7:x=ad/8:r=(*2)+1:y=021:y,x;r-r*(y>14);y<15;x+15;" ":y Py=01:#0;y,x;7;r-r*(y>14);x+15;" ":y {0:0:x=36$+ad:y=140:w$="( happy":618j:x=44,+ad:y=158:w$="boggle":618j 1:r:ad+568,147:16,0,2:-16,0,-3:0:23560\,0:280:236077\,237:x=ad/8+7:4127+g 2,x-1;"nopq";13 ,x;"]^";14,x-1;" _`";2,x-1;"z{|}";13 ,x;"ab";14,x;"cd";;2,x-1;"nopq";13 ,x;"ef";14,x;"gh";2,x-1;"vwxy";13 ,x;"ij";14,x;"lm"  2,x-1;"nopq";13 ,x;"ef";14,x;"gh ";2,x-1;"rstu";13 ,x;"ab";14,x;"cd";2,x-1;"nopq";13 ,x;"]^";14,x;"_`";2,x-1;"vwxy";13 ,x;"XY";14,x-1;" [\" !"23560\=04127 0:275: 8err=0:ps=p+6*g:30:err4495 i$(ps)>"0"4493 burp:i$(ps)=(p>2):10 :22:x=8+ad:y=144:w$="!ou didn't need":618j:x=40(+ad:y=160:w$="a"+("n"p>4)+" "+l$:618j v=i$(ps)-g:d=1-2*(v/2=(v/2)):x=64@+ad:err:44,+2*p+((21-2*p)(err=1p<3)):erri$(ps)=(i$(ps)-1) errp>20:22:x=12 +ad:y=144:w$="!ou have lost":618j:x=36$+ad:y=160:w$=("the"p=3)+("a"+("n"p>4)p>3)+" "+l$:618j "1+100d*err:0: ,i=07:("u"+i),("k"+i):i: #Ycl:Y=011 :Y,0;" ";32 ;21-y,0;" ";32 :Y: $Pj=14:.1}L,10 :.1}L,-10 :j:err=err+1: &a=1:*"m";1;"bodycode"58824,67128:*"m";1;"bodycode":"code saved and verified"'"Wait for main program" &_*"m";a;"bodyswop"9904&:*"m";a;"bodyswop":"Main program saved and verified":1: &)58823:*"m";1;"bodycode": '/a=1:"m";a;"bodyswop":"m";a;"bodycode" gr? ? lunlea#U<679: ;7<9 =<> ?7 7<@ 7:7VYZ [W\Y ]\^ _W W\` WZWroP 78788777777677457487777675779787Mbodyheadtailleg ear eye N#eg`ip_en^eb[ampigh+ur$ # W_odyswop nQPrpht%abF KLM  KLM c` +, 2h4 6 :;<=> CDEF KLMN +, 234 6 :;<=> CDEF KLMN A B +, +, C 2h4 6 234 6 D :;<=> :;<=> E CDEF CDEF