ZXTape! 0Created with Ramsoft MakeTZXFLOW 6 6(8 20:0::"":0,0;"":"" LOGO @3m6lmm6mmm6lmm6mmm mammammm mammammm6lmm6mmm6lmm6mm` ma lal` ma lalmm`6mmmmmm`6mmmm` ma lal` ma lalm amlaml` ma lalmmammlm amlamlm `mlalmmamml` alalm `mlal` ma lal` alalm amlaml` ma lalm6l`mmlm amlaml ` lalm6l`mml` alaml ` lalm mamlal` alamlm `mlamlm mamlalm6l`lmlm `mlaml` ma lalm6l`lml~@B<@@BB@BBDbB|@BB@BBBR@@@BB@B~BJN@@BZ@BBDFB@~<$~B<tFL V2R]SׄV2 <k$(10 ,10 ) Ai$(10 ,10 ) Fd$(1,11 ) KO$(5,12 ) Pb$(12 ,7) UW$(1,6) Z45,9 ;6;1;"STOP THE TAPE" d 9900& n5:1:5: x#0,13 ;4;"MENU" >4,3;1;"1.";0;" Logical sequence" <8,3;1;"2.";0;" Correct symbol" ?12 ,3;1;"3.";0;" Name that symbol" D16,3;1;"4.";0;" Follow that flowchart" 421,4;6;" Press key 1 to 4. " M$= ""168 M$=""160  &M$<491M$>524160 (M$)*1000 G$(6)="M * 1.61"  num=10 t=15  fl=0 q=(*10 )+1  x=7  y=162  7000X  fl=0 g$(10 ,17) 4950V+(q*502) _0,100d:255,0:0,65A:-255,0:0,-65A  5,0;1;h$  *14,9 ;7;"PLEASE WAIT"  H16,0;3;7;" I am generating a random order."  5600  5700D  5800  4;" Note down the following instructions, rearrange them logically and then construct a flowchart. "  n=0 m=110  b$(m,6)>le1055 `n+6,5;3;7;n+1;".";5;1;" ";g$(b$(m,6))  n=n+1 m  17,0;7;" Please note where pathways are ambiguous a step has been added.However it still needs keying in" !?21,0;6;" Press any key to continue. " """1058" #=""1059# $ & 4160@ .)q=44,1;g$(2) 0Fq=54,1;g$(2);8,1;g$(4) 2)q=64,1;g$(2) ?21,0;4;"Keys M - another step Z - print" w=1le  ans=((*le)+1) 50,0;" " 2m=117 <)0,(m-1);6;g$(ans,m) Fm K""1355K L=""1356L P&=90ZŦ=122z1500 x 1200  i$(w)=ans k$(q,w)"3"j=1 w=11530 -k$(q,w-1)="3"k$(q,w)"3"j=14 (w*2,j;1;7;g$(ans) w m=1le-2 ^i$(m)i$(m+1)m*2,0;1;1;" " !i$(m)i$(m+1)fl=1 m i$(le)lefl=1 Sfl=00,0;0;7;" Well done - you are correct. " Sfl=10,0;2;7;" I am sorry but you are wrong. " `fl=121,0;7;"Clues";3;7;" to wrong stages are shown." :""1850: ;=""1851; D lt v 110n  t=15  q=((*10 )+1)  x=7  y=178  7000X  fl=0 g$(10 ,17) 4950V+(q*502) _0,100d:255,0:0,65A:-255,0:0,-65A 5,0;1;h$  200  m=1le !0,0;4;G$(m) W21,0;6;"KEY";0;5;" ";1;"1.";0;" " :21,13 ;0;1;"2.";0;" "  :21,20;0;1;"3.";0;" " :21,27;0;1;"4.";0;" " S$= 'S$<491S$>5242070  =""2070 *""2090* 4y=y-16 6Bm=10 21,0;" " 9m=12110> :.k$(q,m-1)="3"k$(q,m)"3"x=107k >(S$*502)+8050r ?m=12114B @8q=10 k$(q,m-1)="3"k$(q,m)="3"8800`" B"q>5q<10 8800`" D!q=8q=9 8850" F&le=mm*2+1,9 ;"" H'm*2,(x/8+1);g$(m) L x=7 Mi$(1, m)=S$ m  4202j m=1le #i$(1,m)k$(q,m)fl=1 `i$(1,m)k$(q,m)m*2,0;1;1;" " m \fl=10,0;2;7;1;" Wrong answers are highlighted. " \fl=00,0;0;7;1;" Well done - you are correct. " ?21,0;6;" Press any key to continue. " L=""2380L M""2381M ` t T 110n symbols num=12 g$(12 ,32 ) x=100d:y=70F *G$(1)=" Processing data - Process" /G$(2)=" Processing data - Input/Output" +G$(3)=" Processing data - Decision" ,G$(4)=" Processing data - Start/End" ,G$(5)=" Processing data - Connector" /G$(6)=" Stored data - Written document" )G$(7)=" Stored data - Punch card" ,G$(8)=" Stored data - Magnetic tape" ,G$(9 )=" Stored data - Magnetic disc" *G$(10 )=" Stored data - Paper tape" .G$(11 )=" Stored data - Visual display" 0G$(12 )=" Stored data - Computers memory" RI=0 )5,9 ;7;"PLEASE WAIT" G8,0;2;7;"I am generating a random order. " 5600 5700D 5800 t=15  _20,0;4;" Key M - next step Z - select answer " q=((*12 )+1) !miss=0 &(8050r+(q*502)) 0n=1num 5U5,0;2;7;"MISSES";7,2;0;6;miss :m=131 D70,(m-1);6;g$((b$(n,6)),m) Nm S""3155S T=""3156T Uh$= X'h$=90ZŦ=122z3200 am=031 b0,m;" " cm ln {miss=miss+1 | 31200 _q=(b$(n,6))20,0;0;7;" You are correct - well done. ",,, $q=(b$(n,6))RI=RI+1 !q=(b$(n,6))3300 H20,0;2;7;"Wrong - the correct answer is:- " 421,0;6;0;1;g$(q) ?19,15;7;0;"SCORE ";RI;" OUT OF ";t >0,0;7;" Press any key to continue. " ""3311 =""3312 t  110n  *0,9 ;4;"INSTRUCTIONS" p5,0;" You will be given a flowchart with INPUTS and OUTPUTS one of which will be missing." P10 ,0;" The object is to work out the missing INPUT/OUTPUT." ?21,0;6;" Press any key to continue. " ""4050 =""4060 t=15  ou=1  q=(*10 )+1 loo=(*4)+1 q=5loo=2  x=7  y=162  7000X  fl=0  g$(10 ,17) "4950V+(q*502) $_0,100d:255,0:0,65A:-255,0:0,-65A &5,0;1;h$ '@15,0;6;"TYPE OF QUESTION:";5;" ";t$ 6 200 @ Bm=1le Dm=14170J F.k$(q,m-1)="3"k$(q,m)"3"x=107k H8q=10 k$(q,m-1)="3"k$(q,m)="3"8800`" J$(((k$(q,m))*502)+8050r) L"q>5q<10 8800`" M!q=8q=9 8850" O x=7 Ty=y-16 ^&le=mm*2+1,9 ;"" hm j+q=711 ,9 ;1;"" kq=68840" mq=10 8900" rq=48700! sq=58750." 6q<8q>9 le*2+1,9 ;"" M$="1"M$="2"  62008 4q=40,0;4;"LOOPS ";loo q=47500L & n=1 0m=1le :M=14450b D/k$(q,(m-1))="3"k$(q,m)"3"n=14 bM*2,n;g$(m) l n=1 m Nq=50,20;4;"OUTPUT ";O$(1,810 ) bq=80,21;4;"OUTPUT ";(((O$(1,8))*161))/100d Sq=9 0,21;4;"OUTPUT ";(O$(1,8))+273 +2,20;7;"Your answer " \M=16 f""4710f p=""4720p zW$(1,M)= %W$(1,M)=13 4770 55,m+24;3;7;w$(1,m) M 621,0;" " d$(1)=c$ Oc$=""21,0;2;7;"My output=Nothing.Are you right?" dc$""21,0;2;7;"My output=";d$(1,5);".";" Are you right?" ""4850 =""4851 ^="y"Ŧ="Y"21,0;1;0;3;"Well done - Any key to continue." ""4870 =""4871 $t ~ 110n G$(1)="Start" "G$(2)="Input radius R" #G$(3)="Calculate R*R*" G$(4)="Print area" G$(5)="End"  le=5 <h$=" To calculate the area of a circle"  inp=1  ou=1 t$="Simple process"  G$(1)="Start" G$(2)="Input feet(F)" G$(3)="Feet->inches(G)" G$(4)="Input inches(I)" G$(5)="M=(G+I)/39.3701" G$(6)="Print metres(M)" G$(7)="End"  le=7 8h$=" Convert feet and inches to metres"  ou=1 t$="Simple process"  inp=2  G$(1)="Start" G$(2)="Input Temp.(T)"  G$(3)="Calc. (T*9/5)+32" G$(4)="Print 'F" G$(5)="End" %h$=" Convert Celsius to Fahrenheit"  le=5  inp=1  ou=1 t$="Simple process"   G$(1)="Start" G$(2)="Counter =1 (C)"  G$(3)="Sum = 0 (S)" !G$(4)="Print C" "G$(5)="S = C+S" #G$(6)="Increment C" $G$(7)="Print S" %G$(8)="End" & inp=0 ' ou=1 ( le=8 2>h$=" Count and sum at the same time starting from 1" 7t$="Simple loop" < PG$(1)="Start" QG$(2)="Total (T) = 0" RG$(3)="Count (C) = 1" SG$(4)="Input N" TG$(5)="Print C" UG$(6)="T = N+T" VG$(7)="Average A=T/C" WG$(8)="Print A" XG$(9 )="Increment C" YG$(10 )="End" ZCh$=" Count the number of inputs and calculate their average" _ inp=2 b ou=1 d le=10 it$="Simple loop" n G$(1)="Start" G$(2)="Input mark(M)" G$(3)="Input Max.(X)" G$(4)="P=M/X * 100" G$(5)="Is P <45?" G$(6)="Print FAIL" G$(7)="Print PASS" G$(8)="End"  le=8  ou=1  inp=2 >h$=" Pass or Fail your examination Pass mark - 45%" t$="Decision"  G$(1)="Start" G$(2)="Input number(N)" G$(3)="Print N" G$(4)="Is N0?" G$(5)="Print N*N" G$(6)="End"  le=6  ou=2  inp=1 Eh$=" Input and print any number but square only positive numbers" t$="Decision"  G$(1)="Start" "G$(2)="Input miles(M)" G$(3)="Is M<0" G$(4)="End"  G$(5)="K = M * 1.61" G$(6)="Print K"  le=6  ou=2  inp=2 $h$=" Convert miles to kilometres" t$="Rogue Value"  G$(1)="Start" G$(2)="Input Temp.(T)" G$(3)="Is T< -273?" G$(4)="End" G$(5)="K = T + 273" G$(6)="Print K" " le=6 $ ou=2 ' inp=2 ,@h$=" Convert degrees Absolute (Kelvin) to Celsius" 6t$="Rogue Value" @ JG$(1)="Start" KG$(2)="First card (F)" LG$(3)="Next card (N)" MG$(4)="F = F+N" NG$(5)="Is F<16?" OG$(6)="Is F>21?" PG$(7)="Print BUST" QG$(8)="Print STICK" RG$(9 )="End" T le=9 V ou=1 Y inp=3 ^<h$=" Twist or bust at pontoon (Black Jack)" h t$="Limits" r m=1num #b$(m,5)=((*1000)) b$(m,6)=m m  D fg=0 N 5800 Xfg=0 b 5700D m=1num-1 5b$(m,5)90ZŰO$(1,8)<06225Q tCq=6ưO$(1,8)>O$(2,8)6225Q ~QUES=(((*inp)+1))  O$(1,7)="INPUT "  O$(2,7)="INPUT "  O$(3,7)="INPUT "  O$(4,7)="OUTPUT "  O$(5,7)="OUTPUT " M=1inp  ?0,(M-1)*9 ;4;"INPUT ";O$(M,8) M ?21,0;6;"Key in missing OUTPUT then ENTER" <(q*10 )+7190 Z e+(m*2)-2,19;"YES" f*m*2-1,26;1;"" !m*2+1,21;"" m*2,9 ;"NO" "m*2+1,9 ;"" " Xk$(1)="42124" Yk$(2)="4212124" Zk$(3)="42124" [k$(4)="41121124" \ k$(5)="4112211214" ]k$(6)="422132244" ^k$(7)="422324" _k$(8)="423412" `k$(9 )="423412" a k$(10 )="422133224" b  )c$=((O$(1,8))^2*) % *Rc$=((((O$(1,8))*12 )+(O$(2,8)))/39.3701z~) / 44c$=(((O$(1,8))*1.8ffff)+32 ) 9 >c$="1":st=1 ?m=1loo @ st=(c$)+st Ac$=(c$+1) Bm Cc$=(st-1) F H?c$=((O$(1,8)+(O$(2,8)))/2) M R c$="PASS" TD(O$(1,8)/O$(2,8))<.45ffffc$="FAIL" W \c$="" ^FO$(1,8)>0c$=((O$(1,8))^2) a fc$="" hIO$(2,8)>0c$=((O$(2,8)*1.61Nz)) k pc$="" rL O$(2,8)>-274c$=((O$(2,8)+273)) u z c$="STICK" |WO$(3,8)+O$(1,8)+O$(2,8)>21c$="BUST"  L s=1 Vn=1loo-1 [&0,10 ;4;"OUTPUT " `6 0,13 +(n*4);4;n;",";s;","; j s=s+1 os=s+n tn y*0,13 +(n*4);4;n ~ @ start sub Jx,y;"" T r end sub |x,y;""   process sub )m$="3"x=60<:m$="3"y=110n x,y:146,0:0,-12 :-76L,0:0,-4:0,4:-70F,0:0,12  )m$="3"x=70F:m$="3"y=110n ۇx,y:147,0:-5,-12 :-72H,0:0,-4:0,4:-75K,0:5,12  )m$="3"x=60<:m$="3"y=110n M$3x,y:142,0:4,-6:-4,-6:-72H,0:0,-4:0,4:-70F,0:-4,6:4,6 M$=3x,y:502,502:502,-502:30,0:-30,0:-502,-502:0,-30:0,30:-502,502  :)m$="3"x=60<:m$="3"y=110n ?x,y:140,0:0,-12 ,-2:-70F,0:0,-4:0,4:-70F,0:0,12 ,-2 D l*m$="3"x=120x:m$="3"y=110n qx,y,15 v )m$="3"x=100d:m$="3"y=40( xx,y:30,10 ,-30:20,20,30:0,60<:-502,0:0,-89Y  )m$="3"x=90Z:m$="3"y=110n `x,y:80P,0:0,-24:-86V,0:0,18:6,6  !*m$="3"x=120x:m$="3"y=100d !.x,y,15:x,y-15:25,0 !  !4)m$="3"x=110n:m$="3"y=60< !9x,y:20,0,2:0,502:-20,0,2:0,-502:0,502:20,0,2 !> !f(m$="3"x=80P:m$="3"y=60< !kx,y:10 ,0:30,10 ,-30:20,20,30:20,0:0,40(:x,y:0,40(:30,10 ,-30:20,20,30:30,0 !p !*m$="3"x=150:m$="3"y=110n !x,y:-60<,0:-25,-25,1:25,-25,1:60<,0:0,502,1 ! !)m$="3"x=160:m$="3"y=60< !`x,y:-80P,0:0,45-,1:80P,0:0,-45-,-1 ! !q=4 branches " 1 "K78N,524:140,0:0,568:-67C,0 " 0 " ". 1 "BK78N,20:156,0:0,88X:-83S,0 "G 0 "L "`m=18820t" "jBk$(q,m-1)="3"k$(q,m)"3"m*2+1,22;"" "tk$(q,m)="3"m*2,19;1;"-YES";m*2+1,22;"";m*2+2,9 ;"NO";m*2+3,9 ;1;"" "xq=68830~" "yBk$(q,m)="3"q<8m*2+3,9 ;1;"" "~ ";181,70F:0,-18:-103g,0 " " 1 "im=677M,65A:0,-20:-77M,0:0,103g:76L,0 " 0 " " 1 "W10 ,19;"YES":208,92\:0,32 :-579,0 ":177,491:0,-13 :-99c,0 # 0 # #("A",31,39',68D,71G,64@,64@,39',31,"B",255,239,2,226,34",34",226,255,"C",255,156,34",62>,34",34",34",255,"D",255,251,136,248,160,144,136,255,"E",248,228,130,130,130,130,132,248,"F",31,32 ,64@,64@,64@,64@,32 ,31,"G",255,15,8,14,8,8,15,255,"H",255,190,34",34",34",34",162,255,"I",255,224,144,136,136,144,224,255,"J",248,4,2,2,2,2,4,248 #2]"K",255,128,128,128,128,128,128,255,"L",255,1,1,1,1,1,1,255,"M",63?,64@,128,128,128,128,64@,63?,"N",252,2,1,1,1,1,2,252,"O",1,6,24,96`,96`,24,6,1,"P",128,96`,24,6,6,24,96`,128,"Q",1,2,4,8,16,32 ,64@,255,"R",255,2,4,8,16,32 ,64@,128 #<"S",4,4,4,4,4,0,0,0,"T",0,0,0,255,0,0,0,0,"U",0,255,0,0,0,0,0,0 &X=121 &A$ &A=07 & B:A$+A,B &A &X & i 42124 4212124 42124 41121124 4112211214422132244 422324 423412 423412 422133224 i 1 1 5 3 5 4 3 6 6  PASS A INPUT 40 INPUT 40 INPUT 90 OUTPUT OUTPUT Y 19 1221 9 40 6 52 7 120 5 252 1 334 4 364 3 612 10906 8 933 11964 2 fail &&bu qy"nx$MXt WH Lˤ0Ā4ұh՗ (DMхЀ%Ёɬ4%Ё5ม`@4`%́@AɥЁ%0AɥЁAML ÁȁȁᅵѥÁɬԕP ͥ AMO