ZXTape! 0Created with Ramsoft MakeTZX TRIG4    N0:0:0::236099\,502:0:0:0 q$="y"x -z$="  " K12 ,10 ;1;4;"PLEASE WAIT";0;0 "" .a=07:a,0;1;z$:a (H12 ,6;4;1;" LOADING PROGRAM ";:0 -*18,5;" " .13 ,0; / 0 2 "file" <*:15,0;"Leave tape running" F"" P*15,0;"Stop and rewind tape" R"clear (y/n) ?";q$ Tq$="y""address ? ";x ZJ17,0;"Type in file name in ";1;"UPPER CASE";0 n"Filename",a$ o015,0;"Recording " p517,0;" " x a$10 "logo"16384@,2304  '10 ,5;"Load main program" )12 ,5;"SAVE""file"" LINE 2" Z&  QnATRIG4logo @ ??80?߀????>?#|?~???|?|~?8???1???<???????<?0~|??~?~|?|~?>??#???8??????1???????~<?|??|~?|?|~?|?|~???9??>?? ?????8<0p??>?x?~file -&{-8g!-Kpcl=400:str=100d:cls=150:cll=165:nin=200 ha=07:b:"a"+a,b:a:24,36$,36$,24,0,0,0,0 20:0:7: F 500 d**** str **** n30:.3,10 xN1;21,31;8;9 ;"*":30:=""120x #21,31;8;" ": **** cls **** u=0:v=21 **** cll **** str Bf=vu-1:f,0;" ":f  **** nin **** 30:.3,30 z=0:z$="":fs=0 ,21,z;4;0;1;"N" 2 4a$=:a$=13 z=1fs=1250 a$=12 340T ka$=13 z0a=z$:.05|L,20:21,0;" ": &a$<46.ůa$>579230 "a$=47/230 ,$fs=1Ưa$=46.230 6z=31230 @a$=46.fs=1 JN4;0;21,z;a$:.05|L,20:z=z+1:380| Tz=0230 ^a$=12 z>021,z-1;1;4;0;"N":21,z;" ":.05|L,20:z$(z)=46.fs=0 h#z=z-1:z$=z$(z):230 | z$=z$+a$  230 **** pcl **** str 4f=vu-1:f,15;" ":f  5:36$,132:191,0:0,-47/:-191,0:0,47/:6:6,5;"I N T R O D U C T I O N";8,15;"T O";10 ,5;"T R I G O N O M E T R Y" +3;14,10 ;"LESSON FOUR" cls &4:1,15;" So far we have";2,15;"been looking at";3,15;"the coordinates";4,15;"of P for the unit";5,15;"vector OP as the";6,15;"angle xOP chan-";7,15;"ges." 0str 5 5000 :6;0;16,1;" Length of OP = ";17,1;" Angle xOP = ";18,1;" x coordinate = ";19,1;" y coordinate = " D`5:62>,107k:502*(502*/180),502*(502*/180) Nstr XW6:9 ,15;" In this case";10 ,15;"angle xOP is 50." bC6;2;16,20;"1";17,19;"50" lstr vQ7:12 ,15;" So x is 0.64 and";13 ,15;"y is 0.77." G6;2;18,18;"0.64";19,18;"0.77" u=0:v=15:pcl U5:1,15;"But suppose OP is";2,15;"not 1 unit long." str 6:4,15;" Can we find the";5,15;"coordinates of P";6,15;"using the tables";7,15;"we have for unit";8,15;"vectors?" cls  5200P  6000p ж5:0,15;"For example-";1,15;"Suppose OP was 2";2,15;"units long, angle";3,15;"xOP still being";4,15;"50." ڣ5:62>,107k:32 *(502*/180),32 *(502*/180):2:6;16,20;"2";17,19;"50" str 4:6,15;" The x and y";7,15;"coordinates will";8,15;"be twice those";9 ,15;"for P when OP is";10 ,15;"1 unit long." str v7:12 ,15;" So x will be 2";13 ,15;"times 0.64 which";14,15;"is 1.28."  -6;2;18,18;"1.28" u=12 :v=15:pcl  v7:12 ,15;" And y will be 2";13 ,15;"times 0.77 which";14,15;"is 1.54." *-6;2;19,18;"1.54" 4u=0:v=15:pcl >y6;2;16,18;"0.5";17,19;"50";18,18;"0.32";19,18;" " H5:1,15;" If OP was 0.5";2,15;"units long, angle";3,15;"xOP still 50,";4,15;"then x will be";5,15;"0.5 times 0.64,";6,15;"which is 0.32." R1:62>,107k:32 *(502*/180),32 *(502*/180):0:62>,107k:8*(502*/180),8*(502*/180) \str f4:8,15;" And y is 0.5";9 ,15;"times 0.77, which";10 ,15;"is 0.39.":6;2;19,18;"0.39" ppcl z06:1,15;"Therefore, we can";2,15;"use our tables of";3,15;"x and y for the";4,15;"unit vector to";5,15;"find the coord-";6,15;"inates of P where";7,15;"OP is not a unit";8,15;"vector." str 7:10 ,15;" All we do is";11 ,15;"multiply the x";12 ,15;"and y values for";13 ,15;"the relevant ang-";14,15;"le by the length";15,15;"of OP." pcl:4;3,15;" Now a short";4,15;"exercise of five";5,15;"questions where";6,15;"the angle xOP is";7,15;"less than 90." %base=0:q=5:5500| Z4:1,15;" Where angle xOP";2,15;"is greater than";3,15;"90 you should";4,15;"use the rules you";5,15;"learned last";6,15;"lesson to find";7,15;"the relevant x";8,15;"and y values from";9 ,15;"the tables." 5:11 ,15;" Then multiply";12 ,15;"these values by";13 ,15;"the length of OP." u=0:v=15:pcl 6:0,15;"For example.";1,15;" If angle xOP is";2,15;"232, and OP is";3,15;"2.5 units long,";4,15;"what are the";5,15;"coordinates of P?" str d5:7,15;" The x and y";8,15;"values of 232";9 ,15;"are -0.62 and";10 ,15;"-0.79. So for P,";11 ,15;"x is 2.5 times";12 ,15;"-0.62, which is";13 ,15;"-1.54, and y is";14,15;"2.5 times -0.79,";15,15;"which is -1.97." pcl:4:4,15;"Now an exercise";5,15;"of 10 questions";6,15;"for angles up to";7,15;"360." (base=270:q=10 :5500| 6:5,0;" Now it is time for you to do asimilar exercise from yourworkbook. Have a go at exercise4, making sure you check allanswers." $cls L 9000(# 0:7  U7:4,107k:112p,0:62>,502:0,114r >y=5791575:61=,y:2,0:y ?x=12 112p5:x,106j:0,2:x b3:9 ,0;"-1";9 ,14;"1";2,8;"1";14,8;"-1" \8,7;6;"O";2;0,7;"y";2;9 ,12 ;"x"  PU7:4,107k:112p,0:62>,502:0,114r d?y=59;15516:60<,y:4,0:y x@x=14110n16:x,105i:0,4:x  3:9 ,0;"-3"  3;9 ,13 ;"3" 2,6;3;"3" !3;14,5;"-3" T0,7;2;"y";9 ,11 ;"x":5;8,7;"O"  |[u=0:v=15:pcl:f=1619:6;2;f,17;" ":f  sc=0 ubase=01:5:62>,107k:8*(502*/180),8*(502*/180)  0  j=1q Fle=((*15)+1)/5:ang=(*(90Z+base))+1 *3;0,16;"Question ";j r1:5:62>,107k:(16*le)*(ang*/180),(16*le)*(ang*/180):0 D6;2;16,18;le;17,18;ang;"" 5:2,15;" What are the";3,15;"coordinates of P";4,15;"if angle xOP is";5,15;ang;" and OP is";6,15;le;" units long?" xb=((ang*/180)*100d)/100d:yb=((ang*/180)*100d)/100d:xc=(xb*le*100d)/100d:yc=(yb*le*100d)/100d F4:9 ,17;"x = "+("-"(ang>90Zang<270)) 0nin:ans=((a+.005y# =)*100d)/100d  5;9 ,22;ans &ang>70Fang<270ans=-ans  w=0 s(ans-xc)<.01z# =3:225,95_:2,-2:4,7:.3,0:5650  hw=1:225,95_:6,6:231,95_:-6,6:.3,0  10 H4:11 ,17;"y = "+("-"(ang>180ang<360h)) &0nin:ans=((a+.005y# =)*100d)/100d 0!5;11 ,22;ans 5'ang>180ang<360hans=-ans :s(ans-yc)<.01z# =3:225,79O:2,-2:4,7:.3,0:5710N Dhw=1:225,79O:6,6:231,79O:-6,6:.3,0 N&w=0sc=sc+1:5800 X,u=2:v=15:502:420 b6:2,15;" OP is ";le;" units";3,15;"long, and angle";4,15;"xOP is ";ang;", so x";5,15;"is ";le;" times";6,15;xb;", which is";7,15;xc;"," lx4:9 ,15;"and y is ";le;10 ,15;"times ";yb;",which";11 ,15;"is ";yc;"." ?6;2;18,17;xc;19,17;yc u=0:v=15:pcl r1:5:62>,107k:(16*le)*(ang*/180),(16*le)*(ang*/180):0 ?f=1619:6;2;f,17;" ":f j R3:5,15;"You scored ";sc;" out";6,15;"of ";q;"." base=270cls: u=0:v=15:pcl  o p6;0;16,1;" Length of OP = ";17,1;" Angle xOP = ";18,1;" x coordinate = ";19,1;" y coordinate = " z #' #(30,10 ;5;1;"LESSON FOUR" #295,1;6;"That completes Lesson Four." #<6;7,1;"If you would like to go over"'" Lesson Four again, ";10 ,13 ;2;6;"PRESS R":'" otherwise:-";12 ,13 ;6;1;"PRESS S" #F=""9030F# #P="R"Ŧ="r"5 #Z="S"Ŧ="s"9100# #d 9030F# #"u=0:v=21:180 #5,0;5;" When you are ready to begin thenext lesson, type NEW followedby-"'';7;1;9 ,10 ;"LOAD ~TRIG5~" #23636T\,255: & 5 &"file"9899&: '"" ctdllibuv7TRIG5 0&00  <str=100d:cls=150:cll=165:nin=200 ha=07:b:"a"+a,b:a:24,36$,36$,24,0,0,0,0 20:0:7: F 500 d**** str **** n30:.3,10 xN1;21,31;8;9 ;"*":30:=""120x #21,31;8;" ": **** cls **** u=0:v=21 **** cll **** str Bf=vu-1:f,0;" ":f  **** nin **** 30:.3,30 z=0:z$="":fs=0 ,21,z;4;0;1;"N" 2 4a$=:a$=13 z=1fs=1250 a$=12 340T ka$=13 z0a=z$:.05|L,20:21,0;" ": &a$<46.ůa$>579230 "a$=47/230 ,$fs=1Ưa$=46.230 6z=31230 @a$=46.fs=1 JN4;0;21,z;a$:.05|L,20:z=z+1:380| Tz=0230 ^a$=12 z>021,z-1;1;4;0;"N":21,z;" ":.05|L,20:z$(z)=46.fs=0 h#z=z-1:z$=z$(z):230 | z$=z$+a$  230 5:36$,132:191,0:0,-47/:-191,0:0,47/:6:6,5;"I N T R O D U C T I O N";8,15;"T O";10 ,5;"T R I G O N O M E T R Y" +3;14,10 ;"LESSON FIVE" cls &t6:6,0;" You will need an exercise book,pencil, ruler, protractor, setsquare and calculator." +cls 0p=1:q=15:ang=40(:le=8:ab=6.2Ffff:bc=5.1#333:ab2=.77ER:bc2=.64# =:div=9 :5000 Dp7:18,0;" Let's try drawing another 40triangle, but this time we willmake AC 5cm long." Xcls:le=5:ang=40(:p=4:q=10 :ab=3.85vfff:bc=3.2L:div=9 :ab2=.77ER:bc=.64# =:5000 bu=12 :cll lN7:14,0;" Now let's try a triangle with A20 and AC 8cm." cls:le=8:ang=20:p=5:q=17:ab=7.5p:bc=2.7,:div=18:ab2=.94p :bc=.34.z:5000 u=12 :cll \4:14,0;" Finally, a triangle ABC, whereangle A is 70 and AC is 5cm." cls:le=5:ang=70F:p=1:q=6:ab=1.7Y:bc=4.7fff:div=360h/70F:ab2=.34.z:bc=.94p :5000 cls 6:4,0;" So, for a right angled triangleABC with angle A given, if wedivide the lengths of the sidesAB and BC by the length of AC,weget the same numbers as the xand y values in our table forangle A." ږ5:13 ,0;" The ratios AB/AC and BC/AC arethe same no matter how big thetriangle is, as long as theangle A stays the same." cls ]4:5,0;" This is not really surprising,but it is useful, for, if we aregiven the length of the hypot-enuse of a right angled triangleand an angle, we can, using thetables for x and y, calculatethe lengths of the other twosides, just as we did the x andy coordinates of P for a non-unit vector in the last lesson." cls U7:0,0;" We give a special name to theseratios AB/AC and BC/AC."  str {5:3,0;" We call the ratio AB/AC theCOSINE of angle A(it correspondsto the x value in our table)."  str *|6:7,0;" The ratio BC/AC we call theSINE of angle A(this correspondsto the y value in the tables)." 4X11 ,0;" For short write cosA for COSINEof A, and sinA for SINE of angleA." >str Hi4:15,0;" And we call the x and y tablesthe cosine and sine tables forthe angle." R_19,0;" Let's get used to these termsby working through a shortexercise." \cls f 3000 4:6,1;"Now let's put these ideas towork to find the other two sidesof a right angled triangle,giventhe angle A and the length ofthe hypotenuse AC." cls /5:20,88X:215,0  3:11 ,2;"A" ^5:f=02*/10 ͧ/60<:20+8*f,88X+8*f:f 20,88X:90Z*(36$*/180),90Z*(36$*/180):0,-90Z*(36$*/180):-8,0:0,8:8,0 73:4,12 ;"C";11 ,12 ;"B" ʜ5:13 ,0;"For Example:":6:15,0;"In the right angled triangleABC, angle A is 36 and thehypotenuse is 6cm." =19,0;"Find the lengths of the sides ABand BC." u=13 :v=21:cll 5:13 ,0;" From the work you did in lessonfour,it is clear that AB = ACtimes cosA, so look up cos36in your table." d4:18,0;" Cos36 is 0.81, so AB = 6x0.81,which is 4.86. So AB is 4.86cmlong." cll d7:13 ,0;" Similarly, BC = AC times sinA,which is 6x0.59. So BC is 3.54cmlong." I3:18,0;" Now try an exercise of tenquestions." $cls . 7000X 8k6:4,0;"Now try exercise 5 in the book,making sure that you do allcorrections." Bcls:9000(#  +sc=0:j=110 :w=0 )3:1,0;"Question ";j qang=(*91[):anc=((ang*/180)*100d)/100d:ans=((ang*/180)*100d)/100d C6:3,0;"Find the cosine and sine of ";ang;"." ,5;5,0;"cos";ang;" = " nin:a>13080 )a=(100d*(a+.005y# =))/100d &6;5,9 ;a 0G(a-anc)<.01z# =5;5,14;"Correct!":3160X DQ.3,0:3;5,14;"Wrong! It is ";anc;".":w=1 X,5;8,0;"sin";ang;" = " lnin:a>13180l )a=(100d*(a+.005y# =))/100d 6;8,9 ;a G(a-ans)<.01z# =5;8,14;"Correct!":3260 Q.3,0:3;8,14;"Wrong! It is ";ans;".":w=1  w=0sc=sc+1 cls j :5:5,4;"You scored ";sc;" out of 10." cls   I6;13 ,0;" Draw a horizontal line about15cm long." /5:20,88X:215,0 str F6:15,0;" Label the left hand end of theline A."  3:11 ,2;"A" str ?6:17,0;" Mark an angle of ";ang;" at A." -5:f=02*/divͧ/60< 020+8*(f),88X+8*(f):f (str 7ang>65A7060 5:20,88X:150,0:f=02*/(360h/ang)ͧ/60<:20+8*f,88X+8*f:f е20,88X:(le*10 )*(ang*/180),(le*10 )*(ang*/180):0,-(le*10 )*(ang*/180):-5,0:0,5:5,0 ~6:11 ,2;"A":xx=((le*10 )*(ang*/180))/8:yy=((le*10 )*(ang*/180))/8 611 ,3+xx;"B";11 -yy,3+xx;"C"  O3:4,20;"A = ";ang;".";6,20;"AC = ";le;"cm."  5:13 ,0;" In this right angled triangleABC, the angle A is ";ang;" and the";15,0;"hypotenuse AC is ";le;"cm long. Whatare the lengths of the sides ABand BC?" 4u=13 :cll H:4:14,0;"AB = ACxcosA, therefore: " R$5:16,0;"AB = " \nin:a>9 7260\ p)a=(100d*(a+.005y# =))/100d 6;16,5;a M(a-lab)<(le/100d)5;16,12 ;"Correct!":7360 {.3,0:3;16,12 ;"No, AB = ";le;"x";anc;",";17,12 ;"so AB = ";lab;".":w=1 cll :4:14,0;"BC = ACxsinA, therefore: " $5:16,0;"BC = " nin:a>9 7390 )a=(100d*(a+.005y# =))/100d 6;16,5;a M(a-lbc)<(le/100d)5;16,12 ;"Correct!":7460$ {.3,0:3;16,12 ;"No, BC = ";le;"x";ans;",";17,12 ;"so BC = ";lbc;".":w=1 $w=0sc=sc+1 Lcls:j `:5:5,4;"You scored ";sc;" out of 10." tcls: #' #(30,10 ;5;1;"LESSON FIVE" #295,1;6;"That completes Lesson Five." #<6;7,1;"If you would like to go over"'" Lesson Five again, ";10 ,13 ;2;6;"PRESS R":'" otherwise:-";12 ,13 ;6;1;"PRESS S" #F=""9030F# #P="R"Ŧ="r"5 #Z="S"Ŧ="s"9100# #d 9030F# #"u=0:v=21:180 #5,0;5;" When you are ready to begin thenext lesson, type NEW followedby-"'';7;1;9 ,10 ;"LOAD ~TRIGT~" #23636T\,255: & 5 &"file"9899&: '"" tdllibuvvTRIGT #&"# :q(6) <str=100d:cls=150:cll=165:nin=200 ha=07:b:"a"+a,b:a:24,36$,36$,24,0,0,0,0 20:0:7: F 500 d**** str **** n30:.3,10 xN1;21,31;8;9 ;"*":30:=""120x #21,31;8;" ": **** cls **** u=0:v=21 **** cll **** str Bf=vu-1:f,0;" ":f  **** nin **** 30:.3,30 z=0:z$="":fs=0 ,21,z;4;0;1;"N" 2 4a$=:a$=13 z=1fs=1250 a$=12 340T ka$=13 z0a=z$:.05|L,20:21,0;" ": &a$<46.ůa$>579230 "a$=47/230 ,$fs=1Ưa$=46.230 6z=31230 @a$=46.fs=1 JN4;0;21,z;a$:.05|L,20:z=z+1:380| Tz=0230 ^a$=12 z>021,z-1;1;4;0;"N":21,z;" ":.05|L,20:z$(z)=46.fs=0 h#z=z-1:z$=z$(z):230 | z$=z$+a$  230 5:36$,132:191,0:0,-47/:-191,0:0,47/:6:6,5;"I N T R O D U C T I O N";8,15;"T O";10 ,5;"T R I G O N O M E T R Y" )3;14,11 ;"POST TEST" cls 06:5,0;" This post test contains sixquestions. Your answer to eachquestion is checked and at theend you will be given yourscore." :cls D)3:0,16;"Question 1" N7:4,107k:112p,0:62>,502:0,114r:y=5791575:61=,y:2,0:y Xx=12 112p5:x,106j:0,2:x:3:9 ,0;"-1";9 ,14;"1";2,8;"1";14,8;"-1" b\8,7;6;"O";2;0,7;"y";2;8,15;"x" lang=(*81Q)+5:5:62>,107k:502*(2**ang/360h),502*(2**ang/360h) v5:16,0;" The diagram shows a unit vectorOP inclined at ";ang;" to Ox. What";18,0;"are the coordinates of P to 2decimal places?" vxx=(((ang*/180)+.005y# =)*100d)/100d:yy=(((ang*/180)+.005y# =)*100d)/100d #4:5,20;"x = " nin:a>1660 )a=((a+.005y# =)*100d)/100d 3:5,24;a '(a-xx)>.01z# =q(1)=1 #4:8,20;"y = " nin:a>1710 )a=((a+.005y# =)*100d)/100d 3:8,24;a '(a-yy)>.01z# =q(1)=1 cls (3:0,7;"Question 2" 6:0,122z:250,0:f=428+36$*66:f,121y:0,2:f:28,175:0,-106j:f=72H1725:27,f:2,0:f  Pf=2828+36$*6546:f,120x:0,4:f {3:0,2;"1";13 ,1;"-1";7,2;"0";7,4;" 90 180 270 360"  m2:x=0360h2:28+x*216/360h,(x*/180)*502+122z:x 415,0;6;"The diagram shows the graph of:";17,3;4;"1) x against angle xOP.";18,3;"2) y against angle xOP." >55:20,0;"Which number (1 or 2)?" H a$=:a$="1"a$="2"860\ R 840H \.2~L,30 a 20,25;2;a$ fa$="2"q(2)=1 k 20 pcls (3:0,0;"Question 3" ang=(*91[) y6:5,0;" Using table B in your workbook,find the x and y values for Pwhen angle xOP is ";ang;"." #7:10 ,5;"x = " vxx=(((ang*/180)+.005y# =)*100d)/100d:yy=(((ang*/180)+.005y# =)*100d)/100d nin:a>1950 )a=((a+.005y# =)*100d)/100d 10 ,9 ;4;a '(a-xx)>.01z# =q(3)=1 #7:13 ,5;"y = " nin:a>11000 )a=((a+.005y# =)*100d)/100d 13 ,9 ;4;a '(a-yy)>.01z# =q(3)=1 cls L(3;0,0;"Question 4" V,ang=(*91[):le=(*8)+2 `5:5,0;" The vector OP is ";le;" units long,";6,0;"and angle xOP is ";ang;". What are";7,0;"the coordinates of P?" j#7:10 ,5;"x = " t|xx=(((ang*/180)+.005y# =)*100d*le)/100d:yy=(((ang*/180)+.005y# =)*100d*le)/100d ~nin:a>9 1150~ )a=((a+.005y# =)*100d)/100d 10 ,9 ;4;a ,(a-xx)>(le/100d)q(4)=1 "7:13 ,5;"y =" nin:a>9 1200 )a=((a+.005y# =)*100d)/100d 13 ,9 ;4;a ,(a-yy)>(le/100d)q(4)=1 cls (3;0,0;"Question 5" ang=(*91[) C4:5,0;"Find the cosine and sine of ";ang;"." +5:8,5;"cos";ang;" ="  vxx=(((ang*/180)+.005y# =)*100d)/100d:yy=(((ang*/180)+.005y# =)*100d)/100d nin:a>11300 )a=((a+.005y# =)*100d)/100d (8,14;3;a 2'(a-xx)>.01z# =q(5)=1 <,5:11 ,5;"sin";ang;" =" Fnin:a>11350F P)a=((a+.005y# =)*100d)/100d Z11 ,14;3;a d'(a-yy)>.01z# =q(5)=1 ncls x)3:0,20;"Question 6" zang=(*557)+15:anc=((ang*/180)*100d)/100d:ans=((ang*/180)*100d)/100d 1le=(*6)+4:lbc=le*ans:lab=le*anc %le>7ang>65A1410 5:20,88X:150,0:f=02*/(360h/ang)ͧ/60<:20+8*f,88X+8*f:f 20,88X:(le*10 )*(ang*/180),(le*10 )*(ang*/180):0,-(le*10 )*(ang*/180):-5,0:0,5:5,0 ~6:11 ,2;"A":xx=((le*10 )*(ang*/180))/8:yy=((le*10 )*(ang*/180))/8 611 ,3+xx;"B";11 -yy,3+xx;"C" O3:4,20;"A = ";ang;".";6,20;"AC = ";le;"cm." 4:13 ,0;" The figure shows a right angledtriangle ABC, where AC is ";le;"cm";15,0;"long, and angle A is ";ang;".";16,0;"Calculate the lengths of thesides AB and BC." u=13 :cll #5:14,0;"AB =" nin:a>9 1510 )a=(100d*(a+.005y# =))/100d 6;14,5;a %(a-lab)<(le/100d)1560 q(6)=1 #5:17,0;"BC =" "nin:a>9 1570" ,)a=(100d*(a+.005y# =))/100d 66;17,5;a @%(a-lbc)<(le/100d)1620T Jq(6)=1 Tcls ^<sc=0:f=16:q(f)=0sc=sc+1 cf h94:5,5;"You scored ";sc;" out of 6." msc=61700 rh7:9 ,0;"You got the following question"+("s"sc5);10 ,0;"wrong:" |Rtab=(33!-(3*(6-sc)))/2:12 ,tab;:x=16 q(x)=1" ";x;" "; x p6:15,0;"You should have another look atthe lessons which you do notfully understand." cls:9000(# #' #(10,11 ;5;1;"POST TEST" #2;5,1;6;"That completes the Post Test." #<6;7,1;"If you would like to go over"'" the Post Test again, ";10 ,13 ;2;6;"PRESS R":'" otherwise:-";12 ,13 ;6;1;"PRESS S" #F=""9030F# #P="R"Ŧ="r"5 #Z="S"Ŧ="s"9100# #d 9030F# #?4:.2~L,20:16,10 ;"Bye For Now!" #23636T\,255: & 5 &"file"9899& '"" tdllibuvNupXnI!