ZXTape! 0Created with Ramsoft MakeTZXSIMULATOR $0 I"":0:0:7::"":S$(11 ,3):9650% -"TAKE-OFF ? (Y/N) ";x$:x$="Y"9550N% "OK...STARTING ALTITUDE ? ";AL:AL=AL*P:"WIND DIRECTION ? ";WD:WD=WD*RAD:"WIND SPEED ? ";WS:WS=WS/2E3:"DEFINE LOCATION ? (Y/N)";X$:X$"Y"D*P 0"BEACON ?";x$:Q=T7:x$=M$(Q)28  Q:25 BB=Q-T:B=B+7*(B=O):9510&%:"RADIAL ? ";RD:RD=RD*RAD ?"HEADING ? ";HD:HD=HD*RAD:"DME ? ";DM:S=DM*RD:W=DM*RD (JS=S+SF*HD+WS*WD:W=W+SF*WD:DM=(S*S+W*W):RD=(S/DM):W360hHD=HD-Y* 7HD8C=O:102f o\SF=KN/25E3a:19,D;Y;G$:A1=O:AL=AL+RC*3/Y:FS=KN/2E4 N:2580 523391_[:9500%:TH2095/+TH*5 "23560\<65A216 3SI=23560\-64@:SI>OSI<22S(SI) 23560\,0 C40( AL<5B=Y:EX 'B>YŽS>.4LŽW>.4L40( -B=T(HD<4.19zHD>4.54G)40( ,B=Y(HD<1.05fffHD>1.43333)40( 85004! FL<30FL=FL+5  2015 FL>OFL=FL-5 S$(8)=FL:  4TH=YTH=O: 6PR<42*PR=PR+D:TH=T: 9TH=TTH=O: ;PR>-20PR=PR-D:TH=Y: < >LAC=C+Y:2117E ?CRL=RL+P*(RL<60<) @ 2116D ALAC=C-Y:2117E CCRL=RL-P*(RL>-60<) D9530:%: EHD=HD+C/65A H C=TAT<-D JAT=AT-T:2127O M"(KN<1E3LA)AT>10 N AT=AT+T O'8,26;T;AT+T;" ":MLA Q9530:%: (GRC17,P-T;T;"UP ":GR=O: PGR(CM=400)17,9 ;T;"DOWN":23076$Z,7:GR=T:  M2545 UM=T:23560\,O:9660%:q=O7:13 +q,21;T;" ":q ݹ1;20,25;"tla";18,22;"fkk";16,21;"uwb";16,25;"edn";18,27;"sab";13 ,25;"pth";15,23;"dbr" Q1=198:Q2=40( q=06:Q1,Q2 xB-T=Qp1=q1:p2=q2:p1=p1+W/1.2:p2=p2+S/1.2:P1<256P2<78NP2>-TP1>160T;p1,p2:P3=T 8M$(Q+T),J,I:Q1=Q1-I/1.2:Q2=Q2-J/1.2:q: P3=TP3=O:T;O;P1,P2 OM=O:q=O7:13 +Q,21;3;O;" ":q:9535?% iAL=AL/P:AL1=(AL/1E3)+T*(AL=-T):S$(9 )=AL1:AL1=(AL-AL1*1E3):S$(P)=AL1:AL=AL*P S$(3)=(KN/P) S$(Y)=(DEG*RD) S$(6)=(DEG*HD) S$(7)=RL S$(11 )=DM S$(T)=(PR+110n) NS$(D)=((RC/100d)+T*(RC=-T)):S$(5)=((P*RC-S$(D)*1E3)) HRC=-TS$(5)=S$(5,Y3)+"0":T;P,13 ;"D":O: "P,13 ;"C" # !4EG=-T:P,15;"HGT":S$(D)=" ":S$(5)=" ":LA=T:E1=E !9'S(Y)=9E3(#:S(3)=2070 !pBn=P*P:s=-N:e=22E3U:w=13E32:a=502:AL=AL/F-*A !z.C=(HD*DEG-250+180*(B=Y))*5 !zZ=O:x=204:k=35#:j=D*P:M=J*P:Q=o7:13 +Q,21;" ":Q:GR23076$Z,184 ![F=KN/35#+A:E=E-F:W=W-F:s=s-c/P:n=s+200:AL>8AL=AL+D*AT:8645! !7AL=O:P,13 ;"C":S$(D)=" ":S$(5)=" " !KN<100dKN=O !YR=M*N/W-c+x:L=M*s/w-c+x:v=M*n/e-c+x:i=M*s/e-c+x:U=-M*AL/W-Y*AT+K:T1=-M*AL/E-Y*AL+K !(R-X)>JR=R*J+X !(V-X)>JV=V*J+X !LX+JL=X+J !(I-X)>JI=I*J+X !(T1-K)>KT1=T1*K+K !(U-K)>KU=U*K+K !(U35#W2E38723" ")ALC8AL=AL*P:2580 :AL=AL/P:8734" " 2583 "!S$(Y)=" ":S$(11 )=" " "23391_[ " G=T90102# "!TH2095/+TH*5 "%AL<208750." "&/KN<(1.5E3;-FL*P)95200%:8747+" ")23054Z,7:ST=O ".#23560\<65A8790V" "89SI=23560\-64@:SI>0SI<22S(SI) "B23560\,O "V#wPKNB=T:EX " B=D:EX #(+G=-G:23015Y,7+177*(G=T) #2AL>P #:!KN>100dKN=KN-100d: #<KN=O: %#r=RD+:a1=HD-r:T;x3,y1:T;T,O %23200Z,0 %Dx3=182-12 *a1:y1=122z+12 *a1:X3,Y1:T,O: %&+S=S+A(B):W=W+B(B):B=B+T:B=8B=T %'6,11 ;M$(B): %0CAL<502 %1/st=st+t:23054Z,184:st<20 %2 B=D+T:EX %5"OUT OF RNWY..","NOSE DIVE..","","NICE WORK CAP'N!","OUT OF CONTROL..","IMPACT BEFORE RNWY","CRASH R OF RNWY","IMPACT L OF RNWY","UNDERCARRIAGE?","LANDING TOO STEEP","OUT OF FUEL.." %:M %;!T;180,AH:T;46.,AY %?$AH=28+I-AT-RL/2:AY=RL %D23483[ %FAH<9 AH=9 %I180,AH:46.,AY: %NI9651%:W=-.8L:S=O:FL=P:C=T:KN=T/P:I=D:GR=T:AT=O:RL=AT %O17,P-T;T;"DOWN" %PPR=O:T;14,T;" " %QWS=O:WD=O:B=T:S(3) %R"HD=250*RAD:SF=1E-10_[ %XD*P %bE>9E3(#B=D+Y:EX %gN<20B=7:EX %lGRB=9 :EX %vAT<-3B=P:EX %Z=T:A=120x:8640! %+G=124900:M1=Y:21,D;T;"F": % B=P+T:EX %EP=10 :G$(12 ):EX=9680%:C=0:O=C:RT=C:P3=C %LA=O:FL=O:TH=O:M=O:ST=O:X3=O:Y1=O:RC=O:PR=O:RL=O:AT=O:D=4:E=1:Y=E+E:J=Y*D:I=J:M1=D:GR=E:DEG=180/:RAD=1/DEG:G=124900:A$="":23658j\,D+D:B=(*6)+E %GT=E:SF=.05|L:KN=2500 :S=*P:W=-*P:HD=RAD*(*360h) %Z9600%:A(7):B(7):M$(7,3):Q=T7:M$(Q),A(Q),B(Q):Q %S(21):Q=T21:S(Q)=2070:Q:S(3)=9510&%:S(D)=2120H:S(7)=2500 :S(P)=2010:S(P+T)=2E3:S(P+Y)=2113A:S(13 )=2520 :S(15)=21059 %HS(16)=21004:S(18)=2110>:S(21)=2125M %Q=OD+D:13 +Q,P+P;" ":Q:158,D:D,-D:84T,O:D,D:Q=OD+D-T:13 +Q,P+P+T;Y+T;" ":Q:P+P+T,O;" " %$30,7:28,0 %"EDN",4.9,8.4fff,"UWB",-.1}L,-50.2H,"SAB",27.6\,44.381,"TLA",-63.1|fff,.8L,"PTH",480,30.8vfff,"FKK",-22.43333,-32.3333,"DBR",5.1#333,-1.9s333 %$9535?%:S(3):2500 %#8,26;T;"1 ":RT % RT=O:D+Y %д95255%:Q=TB:X$:Q:P,15;"ALT";21,O;T;X$:"ANOTHER GO ?";x$:x$="Y"RT=T:C=O:T;X3,Y1:T;T,O:23105AZ,D+D-T:23054Z,7:23076$Z,7 %X$="Y"P3=Y:9651% %(21,0;T;"ROGER AND OUT": & 90 86.98.-2 9402530 20 0 44 1.8p  %com8<Ʋ㉝^deNyj!Ri!Ree.Ӳa{5gAbt|"%xz(s}Fwp %0)pBw3=^ ~G |J֡l,r&XA &}̅\͆fff0333#333&fff͆1L̅vfff333333EDNUWBSABTLAPTHFKKDBRl&%H A 94>MFDEG~qIXN4umc [:!\6!O $w#  !\w!G !"H @!H H H HZHH H H H> 2\ *K\!3[!\~##w~##w##~#ԯ2\||E!Z"6\!P"\! "\0[< !Z6#!<"6\ɤar21 @O< 8D8r" 8 @8 !" <8qBx<" | H `88BDB" `pBBb!@Hb  BB < 8H 0`~B@" 8|@R!@pR  BB <@qd@BBN" @B@J!@HJ  B~ C @8@p 8BDB" @8BBF! DF B @B ?@8p  p `Bx<" `|