ZXTape! 2 $First Steps With The Mr Men (Side B) Mirrorsoft1983English Educational8.95 UKPNoneOriginal ReleaseTZXed by Andrew Barker0Mr Forgetful 1MEN3 t&61000H:0:0:0::#0;1,6;2;7;1;1;"LOADING- PLEASE WAIT" W23659k\,0:"":3:3:3:1:18,0;:"" F1T  P)~~???~~?~~~~~???~?~?~??~~~??>~??~??~~??~>?~???~???~~??~????~?~??~~~??????~~~~~~?????~???~~~~~?x??????~|{?|>ϟ????????x??p|>?><>~`?>?~/???~>|<??<| >~?????x?|~xx??>|~<????<ǀ?|?~x<`<B~  |>< B|BB<B<<<@<B<|@~<<~B<>f@8<88D( DBh8@88D88B8<8B8<88D88(f8B8Dxb8D8x8x88(BBB@BBDbBB@@B@@BBZ |D DDDB@B~BJN>|@@~@B~B @D <@D"<@ T@ BDTD @DD<@ BD < @D(@DB D B DDxF@TxDx@ BB@BBDFB@@@BB@ZBB @8 < 8 ><@ >T< <8 (< <BB8< B<  <<<<<~B<@~~B<~$B>88<88@@@WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW________________________________________________________________________________________________________________________________________________________________________________________________________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX_YYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYY[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[YYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYFORGET1 W\&WN# # <@E&&8۱\\\˘\ʘW\2dJ 1X![!@@P!!88H K SR PMirror Group Newspapers 1983 '**Spectrum version by STEVE MERCER !k=1k=0:3: !k=0k=1:3: WHAT DIRECTION? 200:199 I23658j\,0:n=-480:n=42*opt=0:90102# 1 n=-49500% n=67C10 n=04000 n<5n>8 !n=5n1=5410 !n=5n15430 !n=8n1=8440 !n=8n18470 !n=6n1=6510 !n=6n16530 !n=7n1=7480 !n=7n17500 "n1=n ,   MOVE LEFT  v=0y-1=0bc;1;x,y;"XYZ";x+1,y;"[\]";X+2,Y;"T^V":V=1:63804<,x:63825Q,x+1:63846f,x+2:k*.15~,-20: v=1y-1=0bc;1;x,y;"XYZ";x+1,y;"[\]";X+2,Y;"T_V":V=0:63804<,x:63825Q,x+1:63846f,x+2:k*.15~,-20: v=063807?,Y-1:63828T,Y-1:63849i,Y-1:63855o,95_:mc=638008:k*.005y# =,40(:v=1:Y=Y-1: v=163807?,Y-1:63828T,Y-1:63849i,Y-1:63855o,94^:mc=638008:k*.005y# =,40(:v=0:Y=Y-1:  ROTATE LEFT bc;1;x,y;"XYZ";x+1,y;"[\]";X+2,Y;"T_V":V=1:63804<,x:63825Q,x+1:63846f,x+2:k*.009ztj,40(:  MOVE RIGHT v=1y+3=30bc;1;x,y;"NOP";x+1,y;"QRS";X+2,Y;"TWV";:63904,x:63925,x+1:63946,x+2:k*.15~,-20:V=0: v=0y+3=30bc;1;x,y;"NOP";x+1,y;"QRS";X+2,Y;"TUV";:63904,x:63925,x+1:63946,x+2:k*.15~,-20:V=1: ̏V=163907,y:63928,y:63949,y:63958,85U:g=63900:k*.005y# =,40(:V=0:y=y+1: яV=063907,y:63928,y:63949,y:63958,87W:g=63900:k*.005y# =,40(:V=1:y=y+1: ROTATE RIGHT ءbc;1;x,y;"NOP";x+1,y;"QRS";X+2,Y;"TWV";:63904,x:63925,x+1:63946,x+2:k*.025{L,60<:V=1:  MOVE UP V=1X-1=3bc;1;x,y;"@LB";bc;x+1,y;"CME";X+2,Y;"FGH";:k*.15~,-20:V=0: V=0X-1=3bc;1;x,y;"@LB";bc;x+1,y;"IMJ";X+2,Y;"FKH";:k*.15~,-20:V=1: V=1bc;1;x-1,y;"@LB";bc;x,y;"IMJ";X+1,Y;"FKH";bc;x+2,y;" ":k*.005y# =,45-:V=0:x=x-1: V=0bc;1;x-1,y;"@LB";bc;x,y;"CME";X+1,Y;"FGH";bc;x+2,y;" ":k*.005y# =,45-:V=1:x=x-1:  ROTATE UP hbc;1;x,y;"@LB";bc;x+1,y;"CME";X+2,Y;"FGH";:k*.025{L,60<:V=0:  MOVE DOWN v=1x+2=14bc;1;x,y;"@AB";x+1,y;"IDJ";X+2,Y;"FKH";:k*.15~,-20:V=0: v=0x+2=14bc;1;x,y;"@AB";x+1,y;"CDE";X+2,Y;"FGH";:k*.15~,-20:V=1: V=1bc;1;x,y;" ";x+1,y;"@AB";x+2,y;"CDE";X+3,Y;"FGH";:k*.005y# =,35#:V=0:x=x+1:  V=0bc;1;x,y;" ";x+1,y;"@AB";x+2,y;"IDJ";X+3,Y;"FKH";:k*.005y# =,35#:V=1:x=x+1:  ROTATE DOWN dbc;1;x,y;"@AB";x+1,y;"IDJ";X+2,Y;"FKH";:k*.025{L,20:V=1: n1=n &   COLOUR SELECT  PRINT DISPLAY =0:BC:BC:23659k\,2::23659k\,0 236077\,249 %1:c=1265 \0,C;"lmno";1,C;"pqrs";2,C;"tuvw";3,C;"xyz{"; b15,C;"lmno";16,C;"pqrs";17,C;"tuvw";18,C;"xyz{";  c:0 " u$="" v$=((*7)+65A) 'v$<65AƯv$>71G2540 c=1̱u$ u$(c)=v$2540 c  c=7  u$=u$+v$  2540 SHUFFLE i=16 m=(*6)+1 x$=u$(m) u$(m)=u$(i) u$(i)=x$ i l$=u$ i=16 m=(*6)+1  x$=l$(m)  l$(m)=l$(i)  l$(i)=x$ !u$(i)=l$(i)3070 &i 0  OPEN DOOR /x>4x<12 k*.025{L,40(: $up=0:lp=0:wu=0 G(x=4)(y=2y=1)wu=1:XT=1:YT=2 I(X=12 )(y=2y=1)wu=1:XT=16:YT=2 G(x=4)(y=7y=6)wu=2:XT=1:YT=7 I(x=12 )(y=7y=6)wu=2:XT=16:YT=7 J(x=4)(y=12 y=11 )wu=3:XT=1:YT=12 L(x=12 )(y=12 y=11 )wu=3:XT=16:YT=12 J(x=4)(y=17y=16)wu=4:XT=1:YT=17 L(x=12 )(y=17y=16)wu=4:XT=16:YT=17 J(x=4)(y=22y=21)wu=5:XT=1:YT=22 L(x=12 )(y=22y=21)wu=5:XT=16:YT=22 J(x=4)(y=27y=26)wu=6:XT=1:YT=27 L(x=12 )(y=27y=26)wu=6:XT=16:YT=27 %wu=0k*.25~,-10 : <x=4(o$(wu)=" "o$(wu)="0")k*.025{L,40(: =x=12 (t$(wu)=" "t$(wu)="0")k*.025{L,40(: Fx=4p=0:4120:p0k*.025{L,40(: Gx=12 p=0:4130":p0k*.025{L,40(:  4140, c=16 o$(c)="0"p=c c  "c=16 $t$(c)="0"p=c %c & ,x=45000 6x=12 5070 @  OPEN TOP k*.1}L,502:0;6;1;0,YT-1;"`abc";1,YT-1;"d e";2,yt-1;"f g";3,yt-1;"hijk":v$=u$(wu):7000X:top=yt-1  o$(wu)="0"  lp=0 c=16 t$(c)="0"lp=c c lp=0 5u$(wu)=l$(lp)o$(wu)=" ":t$(lp)=" ":6000p: q=-480 q>4q<9 1;6;0;0,top;"lmno";1,top;"pqrs";2,top;"tuvw";3,top;"xyz{";15,bot;"lmno";16,bot;"pqrs";17,bot;"tuvw";18,bot;"xyz{":0:1:bc:t$(lp)="1":o$(wu)="1":wu=0:  5040  OPEN BOTTOM k*.1}L,502:0;6;1;15,YT-1;"`abc";16,YT-1;"d e";17,yt-1;"f g";18,yt-1;"hijk":v$=l$(wu):7000X:bot=yt-1  t$(wu)="0" up=p c=16 o$(c)="0"up=c c up=0 5l$(wu)=u$(up)t$(wu)=" ":o$(up)=" ":6000p: q=-480 q>4q<9 1;6;0;0,top;"lmno";1,top;"pqrs";2,top;"tuvw";3,top;"xyz{";15,bot;"lmno";16,bot;"pqrs";17,bot;"tuvw";18,bot;"xyz{":0:1:bc:t$(wu)="1":o$(up)="1":wu=0:  5110 nWIN p$w=w+1:236077\,246 u$bc=5bc=7hcl=4 z23675{\,80P:23676|\,248:hcl;19,hap;"";20,hap;"";21,hap;"":h=0502:k*.005y# =,h:h:hap=hap+5 |RW665001,10 -256*(10 /256):MC=65000 236077\,249 RW=665001,502-256*(502/256):MC=65000 W=6MC=65000 <w=6tun=162008:opt=0:6040 0w=6tun=06100:opt=0 (W=6MC=65000:90102#   9200# n=122 g:.2~L,g 7n=7n=14n=21x=15:x n  n=13:h,g:h,g:n tun=1: 8 9250"$ Bn=136$ L h,g:h,g Vn `tun=0: W XvV$=65A23675{\,168:23676|\,247:1;ART;0;XT,YT;"";XT+1,YT;"": bvV$=66B23675{\,168:23676|\,247:1;ART;0;XT,YT;"";XT+1,YT;"": lvV$=67C23675{\,168:23676|\,247:1;ART;0;XT,YT;"";XT+1,YT;"": vvV$=68D23675{\,168:23676|\,247:1;ART;0;XT,YT;"";XT+1,YT;"": vV$=69E23675{\,168:23676|\,247:1;ART;0;XT,YT;"";XT+1,YT;"": uV$=70F23675{\,80P:23676|\,248:1;ART;0;XT,YT;" ";XT+1,YT;"": uV$=71G23675{\,80P:23676|\,248:1;ART;0;XT,YT;" ";XT+1,YT;"": * 5080 LI6,6,6,6,6,6,6,8,8,8,8,8,8,8,7,7,7,7,7,7,7,8,8,8,8,8,8,6,6,6,6,6,6,6,8,8,8,8,8,8,7,7,7,7,7,7,7,8,8,8,8,8,8,6,6,6,6,6,6,6,8,8,8,8,8,8,7,7,7,7,7,7,7 N5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 Q.7500L:x=5:y=1:n1=8 Vh=1100d `n:207 a?n3=-480:n3>4n3<9 dem=0:199 bn3=-49500% c""7525e dh:7505Q en3=178300l : fn3=42*90102# hn3=1985004! in3=67C10 : t l^23658j\,0:236077\,60<:9 :k*.3,5:k*.4L,-10 q}1;19,3;"Article Colour Selection":c=1100d:c:19,3;"Article Colour Selection" v620,0;"Choose colour as indicated below" 21,4;1;2;" 2 ";0;bc;" ";1;3;" 3 ";0;bc;" ";1;4;" 4 ";0;bc;" ";1;5;" 5 ";0;bc;" ";1;6;" 6 ";0;bc;" ";1;7;" 7 ";0;bc;" ";:bc 0 col= qcol<480col>55720,0;1;"Only the keys below are possible":100d:8310v qcol=491col=48020,0;1;"Only the keys below are possible":100d:8310v [19,0;f$;20,13 ;1;" O.K.":100d:19,0;f$ art=col-480 236077\,249  !4^23658j\,0:236077\,60<:9 :k*.3,5:k*.4L,-10 !91;19,2;"Background Colour Selection":c=1100d:c:19,2;"Background Colour Selection" !>620,0;"Choose colour as indicated below" !H21,4;1;2;" 2 ";0;bc;" ";1;3;" 3 ";0;bc;" ";1;4;" 4 ";0;bc;" ";1;5;" 5 ";0;bc;" ";1;7;" 7 ";0;bc;" ";1;0;" 0 ":0:bc !R 0 !\col= !fqcol<480col>55720,0;1;"Only the keys below are possible":100d:8510>! !pqcol=491col=54620,0;1;"Only the keys below are possible":100d:8510>! !z[19,0;f$;20,13 ;1;" O.K.":100d:19,0;f$ !oc=col-480 ! hcl=6 ! 90102# #-I23659k\,0:1:3:3:18,0;:"" #.P0:1:1:1:23659k\,2::23659k\,0 #/2,0;7;" Mr.Forgetful's Wardrobe Game ";1;11 ,5;" Please stop the tape ":.4L,10 :.4L,-10 :300, #1Khcl=6:tun=0:oc=7:k=1:opt=0:art=7 #2:n=6:hap=1:n1=8:v=0:w=0 #3BC=OC #7o$="111111":t$="111111" #4,.4L,-3,.4L,-1,.4L,0 $".4L,0,.2~L,4,.3,2,.3,5,.2~L,4,.2~L,7,.2~L,4,.4L,0 $,.4L,0,.2~L,4,.3,2,.3,5,.2~L,4,.2~L,7,.2~L,4,.4L,0 $6.2~L,12 ,.2~L,12 ,.2~L,12 ,.2~L,11 ,.2~L,7,.2~L,7,.2~L,9 ,.2~L,9 ,.2~L,9 ,.4L,7 $@ .2~L,0,.2~L,0,.2~L,2,.2~L,4,.2~L,7,.2~L,5,.2~L,4,.2~L,0,.2~L,2,.4L,0 %]236077\,60<:6:6:0:23659k\,2::23659k\,0 %&8,1;"Are you SURE you want to leave";10 ,8;"this program now?";14,8;"Press ""Y"" for Yes.";17,0;"Press any other key to return to";19,10 ;"the program." %+ 0 %0="y"Ŧ="Y"9600% %: 90102# %G7:7:0:23659k\,2::23659k\,0 %2,0;"The other games on this tape are";4,11 ;"as follows";8,1;"Later on this side of the tape";1;10 ,3;"Mr.Forgeful's Letter Game" %14,1;"On the other side of the tape:";16,3;2;"Mr.Greedy's Ice Cream Hunt";18,3;4;"Mr.Silly's Hat Games" %721,9 ;1;2;" 'Bye for now. " %#n=11000:n:0 & &(SK=23653e\+256*23654f\ &RND=(*256) &."FORGET1"23552\-RND,SK-23500[+RND & 9005-# x}9bexuf2y!z윇 "''*$"! '"!'&x+})be&0 })t5x1x2:uu()$*"$& u:m11ls2}z췱&#733:62:23 uf0z1GǑ1GǑHz1GGǑG1GGǑGHz1GGGƑG1GGGƑG0z1GǑ 1GǑ yuu) "' ($ u xR }9e  }9e0x x]R ufX }:1evy }1e xvvځuu)*#&"ہu uf xRx<x<4x4yx uf xRx< x<4x4y΁uu'""'}<c<e=fff8}<cU<<11cU<<11=fffѸ}<cU<<11cU<<11=fff#}<b<bx<#}<b<bx<$}<b<bx<$}<b< b x< $}<b< b x< }<c7;b;e=fff}<c:;b;e=fff"}<ev }8de=fff"}<ev}8de=fffv uf }71e y uf}:1ey }<eD  }<eg  Åu'"*'z췱8<EB8<EBv, x;Άx8 ufψ}:1e8yЇ}68e}:;68;x68v8 xY}8c8e8<GǑ68GǑ8<GGƑ68GGƑx;x68vX 憀u'"!'*'!z8<EB8<E;Bx;x uf}71ey}:e}6;:;x:v8 xY}8c8e8<GǑ:GǑ8<GGƑ:GGƑx;x:vg uu+ux2z ;MM ;NNk };eufty{ u*')'&"*"()$* xW;x:z@ 8<_:z@ 8<_:z@ 8<_:$z@ <_:z@ <_:$z@ <_:¤z@ <_:$z@ <_:ǁq$zP <_:̤zP <_:$zP <_:ѤzP <_:$zP <_:֤zP <_:$zP <_:ۤzP <_:u u""*# u uf uf qz`aG7yyxKJKxJLLɑxHHIxJJIxMMNu*#" %r??(r@px^?$r??(r~|p `%r??(r@px~%r??c(r~|p `(r@pxnq$r??%r::ho'rpx~WWE} %ro7;'r}{w|x[x `zukpr$Bavw  myLdVegpooqo0cO111111T111111F` UCDEGAFVBLEAGFDCXCn9900& FORGET1 W\\WbF1 )IR8)#????8(8$D?|??><BBBBB<???s?>~<`|~<BfZBBBBbRJFB>>>>X>Y>Z> >>>>[>\>]> >>>>T>^>V> (:^m(:_" ѧR["*>> >> >N>O>P>> >> >Q>R>S>> >> >T>W>VN/NM!P 7v`><g~ggg~<<0~ggppfvv~??~??~~??~>?~???~???~~??~????~?~??~~~??????~~~~~~?????~???~~~~~?x??????~|{?|>ϟ????????x??p|>?><>~`?>?~/???~>|<??<| >~?????x?|~xx??>|~<????<ǀ?|?~x<`<B~ < |>< B|BB<B<<<@<B<|@~<<~B<>f@8<88DB DBh8@88D88B8<8B8<88D88(f8B8Dxb8D8x8x88(BBB@BBDbBB@@B@@BBZ |D DDDB@B~BJN>|@@~@B~B @D <@D@"<@ T@ BDTD @DD<@ BD < @D(@DB D B DDxF@TxDx@ BB@BBDFB@@@BB@ZBB @8 < 8 ~<@ >T< <8 (< <BB8< B<  <<<<<~B<@~~B<~$B>88<88@@@WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW________________________________________________________________________________________________________________________________________________________________________________________________________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX_YYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYY[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[YYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYFORGET1 X\,XT# # <@&&8g\\\W\w|VX\2dJ:X![! HP!! 88 K SR PMirror Group Newspapers 1983 %*Spectrum version by STEVE MERCER !k=1k=0:3: !k=0k=1:3: 200:199 I23658j\,0:n=-480:n=42*opt=0:90102# 1 n=-49500% n=67C10 n=04000 n<5n>8 !n=5n1=5410 !n=5n15430 !n=8n1=8440 !n=8n18470 !n=6n1=6510 !n=6n16530 !n=7n1=7480 !n=7n17500 "n1=n ,   MOVE LEFT  v=0y-1=0bc;1;x,y;"XYZ";x+1,y;"[\]";X+2,Y;"T^V":V=1:63804<,x:63825Q,x+1:63846f,x+2:k*.15~,-20: v=1y-1=0bc;1;x,y;"XYZ";x+1,y;"[\]";X+2,Y;"T_V":V=0:63804<,x:63825Q,x+1:63846f,x+2:k*.15~,-20: v=063807?,Y-1:63828T,Y-1:63849i,Y-1:63855o,95_:mc=638008:k*.005y# =,40(:v=1:Y=Y-1: v=163807?,Y-1:63828T,Y-1:63849i,Y-1:63855o,94^:mc=638008:k*.005y# =,40(:v=0:Y=Y-1:  ROTATE LEFT bc;1;x,y;"XYZ";x+1,y;"[\]";X+2,Y;"T_V":V=1:63804<,x:63825Q,x+1:63846f,x+2:k*.009ztj,40(:  MOVE RIGHT v=1y+3=30bc;1;x,y;"NOP";x+1,y;"QRS";X+2,Y;"TWV";:63904,x:63925,x+1:63946,x+2:k*.15~,-20:V=0: v=0y+3=30bc;1;x,y;"NOP";x+1,y;"QRS";X+2,Y;"TUV";:63904,x:63925,x+1:63946,x+2:k*.15~,-20:V=1: ̏V=163907,y:63928,y:63949,y:63958,85U:g=63900:k*.005y# =,40(:V=0:y=y+1: яV=063907,y:63928,y:63949,y:63958,87W:g=63900:k*.005y# =,40(:V=1:y=y+1: ROTATE RIGHT ءbc;1;x,y;"NOP";x+1,y;"QRS";X+2,Y;"TWV";:63904,x:63925,x+1:63946,x+2:k*.025{L,60<:V=1:  MOVE UP V=1X-1=3bc;1;x,y;"@LB";bc;x+1,y;"CME";X+2,Y;"FGH";:k*.15~,-20:V=0: V=0X-1=3bc;1;x,y;"@LB";bc;x+1,y;"IMJ";X+2,Y;"FKH";:k*.15~,-20:V=1: V=1bc;1;x-1,y;"@LB";bc;x,y;"IMJ";X+1,Y;"FKH";bc;x+2,y;" ":k*.005y# =,45-:V=0:x=x-1: V=0bc;1;x-1,y;"@LB";bc;x,y;"CME";X+1,Y;"FGH";bc;x+2,y;" ":k*.005y# =,45-:V=1:x=x-1:  ROTATE UP hbc;1;x,y;"@LB";bc;x+1,y;"CME";X+2,Y;"FGH";:k*.025{L,60<:V=0:  MOVE DOWN v=1x+2=14bc;1;x,y;"@AB";x+1,y;"IDJ";X+2,Y;"FKH";:k*.15~,-20:V=0: v=0x+2=14bc;1;x,y;"@AB";x+1,y;"CDE";X+2,Y;"FGH";:k*.15~,-20:V=1: V=1bc;1;x,y;" ";x+1,y;"@AB";x+2,y;"CDE";X+3,Y;"FGH";:k*.005y# =,35#:V=0:x=x+1:  V=0bc;1;x,y;" ";x+1,y;"@AB";x+2,y;"IDJ";X+3,Y;"FKH";:k*.005y# =,35#:V=1:x=x+1:  ROTATE DOWN dbc;1;x,y;"@AB";x+1,y;"IDJ";X+2,Y;"FKH";:k*.025{L,20:V=1: n1=n &   COLOUR SELECT  PRINT DISPLAY =0:BC:BC:23659k\,2::23659k\,0 236077\,249 %1:c=1265 \0,C;"lmno";1,C;"pqrs";2,C;"tuvw";3,C;"xyz{"; b15,C;"lmno";16,C;"pqrs";17,C;"tuvw";18,C;"xyz{";  c:0 236077\,60< " u$="" v$=((*26)+97a) (v$<97aův$>122z2540 c=1̱u$ u$(c)=v$2540 c  c=7  u$=u$+v$  2540 SHUFFLE i=16 m=(*6)+1 x$=u$(m) u$(m)=u$(i) u$(i)=x$ i l$=u$ i=16 m=(*6)+1  x$=l$(m)  l$(m)=l$(i)  l$(i)=x$ !u$(i)=l$(i)3070 &i 0  OPEN DOOR /x>4x<12 k*.025{L,40(: $up=0:lp=0:wu=0 G(x=4)(y=2y=1)wu=1:XT=1:YT=2 I(X=12 )(y=2y=1)wu=1:XT=16:YT=2 G(x=4)(y=7y=6)wu=2:XT=1:YT=7 I(x=12 )(y=7y=6)wu=2:XT=16:YT=7 J(x=4)(y=12 y=11 )wu=3:XT=1:YT=12 L(x=12 )(y=12 y=11 )wu=3:XT=16:YT=12 J(x=4)(y=17y=16)wu=4:XT=1:YT=17 L(x=12 )(y=17y=16)wu=4:XT=16:YT=17 J(x=4)(y=22y=21)wu=5:XT=1:YT=22 L(x=12 )(y=22y=21)wu=5:XT=16:YT=22 J(x=4)(y=27y=26)wu=6:XT=1:YT=27 L(x=12 )(y=27y=26)wu=6:XT=16:YT=27 %wu=0k*.25~,-10 : <x=4(o$(wu)=" "o$(wu)="0")k*.025{L,40(: =x=12 (t$(wu)=" "t$(wu)="0")k*.025{L,40(: Fx=4p=0:4120:p0k*.025{L,40(: Gx=12 p=0:4130":p0k*.025{L,40(:  4140, c=16 o$(c)="0"p=c c  "c=16 $t$(c)="0"p=c %c & ,x=45000 6x=12 5070 @  OPEN TOP k*.1}L,502:0;6;1;0,YT-1;"`abc";1,YT-1;"d e";2,yt-1;"f g";3,yt-1;"hijk":v$=u$(wu):7001Y:top=yt-1  o$(wu)="0"  lp=0 c=16 t$(c)="0"lp=c c lp=0 5u$(wu)=l$(lp)o$(wu)=" ":t$(lp)=" ":6000p: q=-480 q>4q<9 1;6;0;0,top;"lmno";1,top;"pqrs";2,top;"tuvw";3,top;"xyz{";15,bot;"lmno";16,bot;"pqrs";17,bot;"tuvw";18,bot;"xyz{":0:1:bc:t$(lp)="1":o$(wu)="1":wu=0:  5040  OPEN BOTTOM k*.1}L,502:0;6;1;15,YT-1;"`abc";16,YT-1;"d e";17,yt-1;"f g";18,yt-1;"hijk":v$=l$(wu):7001Y:bot=yt-1  t$(wu)="0" up=p c=16 o$(c)="0"up=c c up=0 5l$(wu)=u$(up)t$(wu)=" ":o$(up)=" ":6000p: q=-480 q>4q<9 1;6;0;0,top;"lmno";1,top;"pqrs";2,top;"tuvw";3,top;"xyz{";15,bot;"lmno";16,bot;"pqrs";17,bot;"tuvw";18,bot;"xyz{":0:1:bc:t$(wu)="1":o$(up)="1":wu=0:  5110 nWIN p$w=w+1:236077\,246 u$bc=5bc=7hcl=4 z}hcl;19,hap;"0123";20,hap;"4567";21,hap;"89:;":h=0502:k*.005y# =,h:h:hap=hap+5 |RW665001,10 -256*(10 /256):MC=65000 236077\,249 RW=665001,502-256*(502/256):MC=65000 W=6MC=65000 <w=6tun=162008:opt=0:6040 0w=6tun=06100:opt=0 (W=6MC=65000:90102#   9200# n=112  h,g:h,g n tun=1: 8 9250"$ Bn=125 L h,g:h,g Vn `tun=0: W Y~v$>64@Ưv$<89Y236077\,240:BIG=((v$-65A)*4)+32 :7100:236077\,249: ]v$>96`Ưv$<121y236077\,243:BIG=((v$-97a)*4)+32 :7100:236077\,249: b~v$>88XƯv$<91[236077\,246:BIG=((v$-89Y)*4)+32 :7100:236077\,249: lv$>120xƯv$<123{236077\,246:BIG=((v$-119w)*4)+32 :7100:236077\,249: b1;art;0;XT,YT;(BIG);(BIG+1);XT+1,YT;(BIG+2);(BIG+3) 0:1:bc: * 5080 LI6,6,6,6,6,6,6,8,8,8,8,8,8,8,7,7,7,7,7,7,7,8,8,8,8,8,8,6,6,6,6,6,6,6,8,8,8,8,8,8,7,7,7,7,7,7,7,8,8,8,8,8,8,6,6,6,6,6,6,6,8,8,8,8,8,8,7,7,7,7,7,7,7 N5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 Q.7500L:x=5:y=1:n1=8 Vh=1100d `n:207 a?n3=-480:n3>4n3<9 dem=0:199 bn3=-49500% c""7525e dh:7505Q en3=178300l : fn3=42*90102# gn3=208000@: hn3=1985004! in3=67C10 : t @I9 :236077\,60<:k*.3,5:k*.4L,-10 Em1;19,8;"Letter Selection":c=1100d:c:19,8;"Letter Selection" J420,1;"Enter your choice of 6 letters" Tc=16 ^$21,12 +c;1;"?"; c0:k$= h(k$<65Aůk$>122z)21,20;;1;"Letters only":75K:21,20;" ":8030^ j(k$>90ZƯk$<97a)21,20;;1;"Letters only":75K:21,20;" ":8030^ mk$=""8030^ r21,c+12 ;k$ | u$(c)=k$ c check=0 c=16 (u$(c)=u$(1)check=check+1 c check=620,1;" That's cheating. ";21,0;"They are all the same. Try again":c=1150:c:19,0;f$:8005E  75K \19,0;f$;20,13 ;1;" O.K.":3000 :19,0;f$  opt=1  1 236077\,249  l^23658j\,0:236077\,60<:9 :k*.3,5:k*.4L,-10 q}1;19,3;"Article Colour Selection":c=1100d:c:19,3;"Article Colour Selection" v620,0;"Choose colour as indicated below" 21,4;1;2;" 2 ";0;bc;" ";1;3;" 3 ";0;bc;" ";1;4;" 4 ";0;bc;" ";1;5;" 5 ";0;bc;" ";1;6;" 6 ";0;bc;" ";1;7;" 7 ";0;bc;" ";:bc 0 col= qcol<480col>55720,0;1;"Only the keys below are possible":100d:8310v qcol=491col=48020,0;1;"Only the keys below are possible":100d:8310v [19,0;f$;20,13 ;1;" O.K.":100d:19,0;f$ art=col-480 236077\,249 1  !4^23658j\,0:236077\,60<:9 :k*.3,5:k*.4L,-10 !91;19,2;"Background Colour Selection":c=1100d:c:19,2;"Background Colour Selection" !>620,0;"Choose colour as indicated below" !H21,4;1;2;" 2 ";0;bc;" ";1;3;" 3 ";0;bc;" ";1;4;" 4 ";0;bc;" ";1;5;" 5 ";0;bc;" ";1;7;" 7 ";0;bc;" ";1;0;" 0 ":0:bc !R 0 !\col= !fqcol<480col>55720,0;1;"Only the keys below are possible":100d:8510>! !pqcol=491col=54620,0;1;"Only the keys below are possible":100d:8510>! !z[19,0;f$;20,13 ;1;" O.K.":100d:19,0;f$ !oc=col-480 ! hcl=6 ! 1 ! 90102# #-I23659k\,0:1:3:3:18,0;:"" #.P0:1:1:1:23659k\,2::23659k\,0 #/2,0;7;" Mr.Forgetful's Letter Game ";1;11 ,5;" Please stop the tape ":.4L,10 :.4L,-10 :300, #1Khcl=6:tun=0:oc=7:k=1:opt=0:art=7 #2:n=6:hap=1:n1=8:v=0:w=0 #3BC=OC #7o$="111111":t$="111111" #va``````xx888008 008 8 88 8008 008 x  88 p8888 800p``````000 0 Xp0 p88p8p p8888800880008888````` `````nsxaaaaaaa888888000p000080p6><    00088 00p`````aaaas>|88pp8 p88p??8p8??88ps?>~<`|~<BfZBBBBbRJFB>>>>X>Y>Z> >>>>[>\>]> >>>>T>_>V> (:^m(:_" ѧR["*>> >> >N>O>P>> >> >Q>R>S>> >> >T>U>VN/NM!P 7v`><g~ggg~<<0~ggppfvv