ZXTape! 0Created with Ramsoft MakeTZX2ATTUT a&7:7:7:1: "logo" 1,0; "tut1"50000P,2773 1,0; ("tut2"55000,2832 )1,0; -"RTS" .1,0; 2 "tutorial" attut A|&7:7:7:1: "logo" 1,0; "tut1"50000P,2773 1,0; ("tut2"55000,2832 )1,0; -"RTS" .1,0; 2 "tutorial" logo @gR <Bx<8Dx8BDDDD DD ~DDxD Dx BD<@D D@ BD <8 D< 8ÃÿýÁÃ@<B<@｝ｽ@BBDbB@88D888x8Dxxx<ｭýｽ@BBBR@@DDDDD DDD0DDｵａ@B~BJN>@x<(xB<~<<< <@< 8DD8D@8xxxxxxxxxxxxx|x||||||||||||||||||x||||||||||||||||||||x||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||DDDDDD||||||||||||||||D||xxDDDD|||||||||||x|xxxxx|xx|||xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxOOOOyyyyyyyyyyyyyyyyyyyyyyyOOOOO8888888888888888888888888888888888888888888888888888888888888888tut1 P& >!""6!" !""!!!~o&E#S"*"*! ><ҧ!"*! >>*!d><!"*!c>>!":>!}>!}>!}>!}!*J*b!!JDegrees(͗* !" !* !Ys""!.!!aKE".*͓*!͓w$.!!aKE"*!".*͓*!͓w$.!!aKE"*!ѧR"*!!"!.*͓*!͓w$*#"[ΧR~;;;;;;;; ; ; : : ::9999888776655443<32 2!1"1#0$/$/%.&-'-(,(+)+**?Û+)+(,(-'-&.%/$/$0#1"1!2 233445566778889999Y:: : : ; ; ;;;;;;;;;\ø;;;;;;;;;;::::9999888776655443v322110//.--,++*y)(('&%$$#"! 47Ó     QTðnq,     /Ë !"#$$%&'(()*I++,--.//0112233Lè445566778889999::::;;;;;;;;;;;tut2    >!"6!"!"!"!!!~o&E#S"*!"*! ><=!"*! >>e*!d><e!"*!c>>}!"!~o&!>:>!}>!}>!}>!}!*J*b!!JDegrees͗*!"!*!Ys"".!!aKE".*͓*͓w$.!!aKE"*!".*͓*͓w$.!!aKE"*!ѧR"*!".*͓*͓w$U&o!>*#"[RA;;;;;;;; ; ; : : ::9Dà99988877665544332 2!1"1#0$/$/%.&-'-(,(+)+**^+)+(,(-'-&.%/$/$0#1"1!2 233aý445566778889999:: : : ; ; ;;;;;;;;;{;;;;;;;;;;::::9~9998887766554439322110//.--,++*<Ø)(('&%$$#"! V     Yõsv14Ð     NQí !"#$$%&'(()* ++,--.//0112233k445566778889999n::::;;;;;;;;;;;aRTS V^z2*e\d ":k :>> *\#6# B> *"+:G K> ZX COMPILER V1.0  1982 THRELFALL and HODGSON "[!͌2Y<2!""">2*"*>!͸!>"͸*S\###"]\>2\R(-̮p:̝O<ʯ̃]̵+̨̊80!M Ͷ͡!Ͷ!:Ͷ*]\~:$S Iͯ*]\#~# }2J{!90){dͦKB#))yx0|g}o(yx{yOxGx¶D|ܶ|G|¶|/g}/o#ɯ=| }l&@R0?jj\jgW< U>?$U*6!7͵! rU>L$>$UB (. (e+(-( 0ڷ:ҷ y n$*[ w*[ 6 !*[ ~ (+(-(0)))_*[~-̶y> $>$$> $>$ U>?$U>$!x$ *w#"[[Rѯɯ>)(P (L+(- #gx !DMͻ2>!i`͸/(*z!EͶz!Y>+(z!ͻ!Rͻz>>!( ( E:00O *]\"]\>}|V#^"l\"I\͗b> $͖͌[͌[R8"[\RK>:(>*l\͸!>ö!6ö> +-:*\*\>ׯ>U>ׯ>2 U"\"\6h!|+s#r#^#V#*#͑B*R#>͖͑ø>*]\#~ ("]\ ( ( :($:> !Ͷ>2͢!ö>DM >2\2\::k\GD>2k\D:[v\c.zRR_PR0#"v\˼DM>*!x\͸>"!v\ø|(>-$Ͷ'ͭ0ͭ0dͭ0 ͭ0ͳͳdͳ ͳͳR>0R8<$˯Z!ö*e\d [\BR)*e\d #6!Kͻ!e\ͻ!) ͻ>!d͸> >!Ͷ!ûͦ>*͸!#"ͻͻ##>>[͸>!R͸>͑͸ͦͼ>#!Sͻͻ>"##͸[͌ͼͩ!sû,*6##[͌>!.Ͷ!k ö!ö| =!öͼg.>ͻ!Ͷ*l\#͖͑>͸<(=($>(((( R7?R7?R7?R7?_.K&Eͻ!"ö!.Ͷ8 ͩ͡!:Ͷ x>2 ~"'ʜ,Y;ʚ>ʇ-ԡR:(! Ͷͦ>"͸j!bͶ^>**]\#~$"("]\q#>͸>͸!ö!6ö>}|ͼͩ!Jö>{}, >>.&͸Ú;ʚ'x!ͶÚ!Ͷ*]\+"]\>}!$Ͷ> $!ͶÚA˯[[*]\#~08:8 A8˯[0˯ &o))K !Z[2 o 7n +n+([!4~ w+[[Ro(w:!Fwͦ >&=~| !ͻ!ö>"ø !~oͻ!&û C"( !ö˯A&o>͸>*!{\͸"> `i !UͶ>&!oø"o&>!͸"!2ö !|ͻ>!ø !5ö||.&¶^>>&h.͸!&û !ö %!%ͼ.K&EͻͶ!Ͷ.`&iû !"r(>!&j͸é>>-((0 A v!öͦ&>*ø>!øN#F #:K\:L\::\2\>M n(:\ 6:\.&8͸_|(ULGö*o>>&͸.}&û>}!"öͩo !w$Ͷ ͩo!#Ͷ>.&͸~>.&͸!.Ͷ8͡rͩoͩo!-#Ͷ*l\#͖͑>͸*| *"*[͌-̶ͻ ( ͩ>ܯ*"!ͻ~͖͑###>!͸>"!øͦ!Ͷ>"͸ ~*| ͑~# ͑"ͼͩ>>!iø!Ͷ>2â>@@\tutorial q$#s$ 0 Sxb=0:R=0:Z=0:HG=0:HH=0::JJ=0:II=0 XB=0:RI=0  500 (619,0;" " +620,0;" " -821,0;" ": 23:COL=(*4)+4:COL<4502 < d 7: DD=(*2) DD=1240 'EE=1:FF=T*90Z:GG=1  (EE=T*90Z:FF=1:GG=-1  DD=(*2)  DD=1275  &EE=1:FF=360h:GG=1  'EE=360h:FF=1:GG=-1   DD=(*2) " DD=1305 'EE=1:FF=T:GG=1 , 1EE=T:FF=1:GG=-1 6  3000 2,1;"In a moment I will draw either"::4,1;"1/4 turn, 1/2 turn, 3/4 turn"::6,1;"or 1 whole circle." g8,1;"I want you to study the sector":10 ,1;"and remember its shape. I will" c12 ,1;"then rub it out and start to":14,1;"redraw it. You must stop me" }16,1;"drawing when the new shape is":18,1;"exactly the same as the old";20,1;"one." 470::  3000 e1,1;"A right angle is 1/4 of a turn":3,1;"How many right angles can you" d5,1;"count in your classroom? I'll":7,1;"draw a shape made up of right" c9 ,1;"angles. Count how many right":11 ,1;"angles I draw. I'll then rub" c13 ,1;"it out and start again. You":15,1;"must stop me when this shape" ^17,1;"has the same number of right":19,1;"angles as the old one." 470::  3000 1,1;"We are going to work in 45":3,1;"degree angles. There are 45":5,1;"degrees in 1/2 a right angle." 7,1;"I'll draw a shape which is":9 ,1;"a multiple of 45 degrees. You":11 ,1;"study it carefully and when" 13 ,1;"you are ready I'll rub it out":15,1;"and start to redraw. You stop":17,1;"me drawing when the new shape" 119,1;"is the same as the old one." 470::  3000 Ǒ1,1;"This section will help you":3,1;"estimate angles. To make it":5,1;"easier I'll work in 10 degree" ȼ7,1;"angles. I'll draw a shape ":9 ,1;"which is a multiple of 10":11 ,1;"degrees. You study it":13 ,1;"carefully and then I'll redraw" ʒ15,1;"it. This time you stop me when":17,1;"the new shape is just the same":19,1;"size as the old one." 470::  3000 Ϗ2,1;"Altogether there are 360":4,1;"degrees, or 4 right angles in":6,1;"one complete turn. You will" ь8,1;"find it easier to":10 ,1;"estimate angles if you first":12 ,1;"work out how many right angles" -14,1;"there are in the shape." 470:: ֜10 :400:0;7;1;#1;" Now please press any key...";:0,0:255,0:0:.1}L,30: X1:7:1:  y7::0,10 :255,0:0,165:-255,0:0,-165:xb=1 &1,10 ;"ANGLE TURNER" <aa=0:bb=0:hh=0:jj=0:ii=0 ,5,4;"1 Quarter turns" +7,4;"2 Right angles" .9 ,4;"3 45 Degree turns" /11 ,4;"4 10 Degree turns" .13 ,4;"5 1 Degree turns" #15,4;"6 End"  "18,5;"Which (1-6)?" %HG=0:65002,hg *=""810* +.1}L,30 ,4="t"Ŧ="T"HG=1:65002,hg:810* /><"1"Ŧ>"6".25~,3:.25~,0:810* 1x$=: 4x$="1"910 9x$="2"911 >x$="3"2400` Cx$="4"2410j Ex$="5"2420t Hx$="6"9900& R 650 "410:XX=0:960  BB=1 431:XX=0  XX=12460  502 T=(*5) T=Z970 T=0970 Z=T  205  t 7 ~_188,150:64@,0:0,-30:-64@,0:0,30 COL 65000,ff/2 50000P Y7:kk=2*65001:hh=1kk/45-ɺ(kk/45-)kk=kk-1 kk<100dch=27 kk>99cch=26 P0;7;1;1;4,CH;kk;5,24;"Degrees" +col:127,97a,60<:7 ,3,0;"Please":"study":"this" "shape":"very":"closely." (10 ,0;"Perhaps":"you may" "want to":"make an" "exact":"copy of it" "on paper.":"When you are" ""ready, press any key to go on."  0:=""1259 .1}L,30: j:7:188,150:64@,0:0,-30:-64@,0:0,30 KK<10 CH=28 (&KK>9 KK<100dCH=27 2KK>99cCH=26 KK-5YSX$=:.1}L,30 HX$="Y"X$="y"960 M 200  RX$="N"X$="n"650 \2.25~,3:.25~,0:21004 `#444:HH=1:2460 j#454:II=1:2460 t462:JJ=1 Z=0 : 1HH=1T=45-*(*9 ):2510 2II=1T=10 *(*37%):2510 *T=(*361i):t<202500 T=ZT=02480 kk=t:502 Z=T 285 XX=1:1000 a0,0:255,0:0,175:-255,0:0,-175: &3HH=1T=(*9 )*45-:3140D 04II=1T=(*37%)*10 :3140D :T=(*361i) DT=0T=Z3110& NZ=T X 255 b C=C+1 l:7:20,0;"Press any key when the line" v%"has turned through ";T;" degrees." {HH=13200 }502:100d COL:I=EEFFGG 127,97a:X(I),Y(I) ""3270 '127,97a:X(I),Y(I)-2 ""3270 '127,97a:X(I)+1,Y(I) I:3283 $="H"Ŧ="h"100d:3180l ="M"Ŧ="m"650 3290 S=1500 ""3270 S DD=1I=360h-I IT+ME3420\ 40( 77:20,1;"Well done, close enough." 1RI=1:STP=10 :415:RI=0 2C=TRIES*2502:100d:1510  7:" Try another one..." 502:150 * 3100 \40(:X=X+1 f77:20,1;"Sorry, not close enough." z2C=TRIES*2502:150:1510 XIT3520 '7:" Have another go at it...." 502:150 :3170b 502:150 STP=10 :410 :3170b  'zxb=1:650:xb=0:8,2;"To restart:-";10 ,2;"press RUN & ENTER" rtoDX5