Ob COPYRIGHT (C) 1982 - WEST COAST CONSULTANTS - TRACY - CALIFORNIAb TCWI%,CLSCR$,DCA$,RCFLAG,TCRO%,SEPSEQ$,TCCO%,FINSEQ$,TCIV$,IVSEQ$,OFFSEQ$,TCERA$,TCCLNULL%,TCCP%,TCSTR$,V$(),V%() c PXd : X(PX),Y(PX),BAR(2),C(),B() : PIFI$c : LL() :  /c( :cd  cn C2Y : C2S$"RETURNING to the Main Menu" : B :  : C2S$cx "CURVEII",c V$()"grid lines" : V$()"tic marks" : V$()"box frame"d V%() ",,,@,J,T,^,hUd  : C2S$"Have you entered your function" : C2Y : B :  : C2S$d C2S$"y=f(x)" : B : C2X);C2S$ : C2S$"at line 7000" : B : C2X);C2S$;d A$ : A$(A$" ",)d A$"y" A$"Y" e : : C2S$((,".") : B : C2X);C2S$ : e C2S$"After defining your function" : B : C2X);C2S$ : C2S$"at line 7000" : B : C2X);C2S$ : : 4!e Qf  : C2S$"Have you entered functions" : C2Y : B :  : C2S$ : C2S$"y=f(t) & x=g(t)" : B : C2X);C2S$ : C2S$"at lines 8000 & 8001" : B : C2X);C2S$;mf A$ : A$(A$" ",)f A$"y" A$"Y" 6g : C2S$"After defining your functions" : B : C2X);C2S$ : C2S$"at lines 8000 & 8001" : B : C2X);C2S$ : : 4! : C2S$((,".") : B : C2X);C2S$=g g C2Y : C2S$"Number of Points" :  : B :  : C2S$;g M : MPX nh : : );"No of points GREATER than x,y array size" : "***Current size is ";PX : " REDUCE the number of pts or INCREASE" : " the array size variable (px) in line 1" : I X : : h"  :  :  :  :  :  : % : dh,  :  :  :  : QQ("") :  :  : % : dsi6 : " Value is outside "; CC$;" limits..." : " Minimum = ";AV;" Maximum = ";BV : Q  : : i@  : QQ(" ") :  :  : QQ(" ") :  :  : % : diJ  :  : f :  : % : d.jT  :  :  :  : % : dAj^  : dj  : : : : " Color of the polar curve ";Q4$j  :  : 6k  :  : C2Y : C2S$"The polar equation r=f(s) will be" : B :  : C2S$ : C2S$"plotted within a circular region" : B : C2X);C2S$k : C2S$"( angle in radians )" : B : C2X);C2S$ : : C2S$"RMAX " : B : C2X);C2S$; : X1 : X0X1 : Y1X1 : Y0Y1 : N$"polar angle" : )l  : C2Y : C2S$"Have you entered your function" : B :  : C2S$l C2S$"r=f(s)" : B : C2X);C2S$ : C2S$"at line 8003" : B : C2X);C2S$;l A$ : A$(A$" ",)l A$ "y" A$"Y" `m : C2S$"After defining your function" : B : C2X);C2S$ : C2S$"at line 8003" : B : C2X);C2S$ : : 4! : C2S$(',".") : B : C2X);C2S$gm m : : " Color of polar axis ";QO$ : A# : QS #z : QZY1  : XOFF : F7 : XGX0 : XHX1 : YGY0 : YHY1 : #Ln QS #z : QZX1 : YOFF : F7 : # :  : MM : BA ף@ BA  MMbn BA  MMn ND : F8 : XBX0 : XEX1 : XIX1 : # : F8 : YBY0 : YEY1 : YIY1 : # : [o  : C2S$"MAPPING OPTIONS" : C2Y : B :  : C2S$ : : C2S$"X-AXIS" : TCWI% );C2S$; : C2S$"Y-AXIS" : TCWI%);C2S$ : o I%  : C2S$ : TCWI%);C2S$ : I%o& "1 - LINEAR LINEAR", "2 - LINEAR LOGARITHMIC"'p0 "3 - LOGARITHMIC LINEAR", "4 - LOGARITHMIC LOGARITHMIC"Up: : : C2S$" " : B : C2X);C2S$;bpD V$()wpN V%()(V$())pX V%() V%() Dpl V%() V%() F0pv V%() V%() F1bq  : C2Y : C2S$"Grid lines Tic marks Box frame" : B :  : C2S$ : : C2S$"or Neither " : B : C2X);C2S$;oq V$()q V$()"g" V$()"G" IQ : q V$()"t" V$()"T" IQ : q V$()"b" V$()"B" IQ : r V$()"n" V$()"N" r {r : : C2S$"Color of " : B : C2X);C2S$;V$(IQ); : Q1$ :  :  : r CC$"plotter"r FPr s Q  : : : C2S$"Enter distance from left edge of plotter area" : B : C2X);C2S$Ms C2S$"to left side of user's area (in.)" : B : C2X)C2S$;s A : A A AV : BV : 6 : s  FP : ?t Q  : : : C2S$"Enter distance from left edge of plotter area" : B : C2X);C2S$ : C2S$"to right side of user's area (in.)" : B : C2X);C2S$;vt B : B B AV : BV : 6 : t  AB >t* C2Y : C2S$"* Impossible limits *" : V : B :  : C2S$ : Q  : t4 t :  u> FP : suH Q  : : : C2S$"Enter distance from lower edge of plotter area" : B : C2X);C2S$uR C2S$"to lower side of user's area (in.)" : B : C2X);C2S$;u\ C : C C33# AV : BV33# : 6 : H vf FP : vp Q  : : : C2S$"Enter distance from lower edge of plotter area" : B : C2X);C2S$ : C2S$"to lower side of user's area (in.)" : B : C2X);C2S$;vz Dv D D33# AV : BV33# : 6 : pw CD bw C2Y : C2S$"* Impossible Limits *" : V : B :  : C2S$ : Q  : uw t : >w : C2S$"Want to change any dimensions " : B : : C2X);C2S$;w A$w A$"y" A$"Y"  x V%() (# :  : x 2x V%() V%() Mx V%() D : x  : : : "...Plot a symbol at each point ";x YN%x YN$x YN$"y" YN$"Y" :  y$ C2Y : C2S$"Enter plot symbol number" : B :  : C2S$ : : Hy. C2S$"1 = PLUS 4 = CIRCLE" : (TCWI%) );C2S$y8 C2S$"2 = X 5 = TRIANGLE" : (TCWI%) );C2S$yB C2S$"3 = SQUARE 6 = HOURGLASS" : (TCWI%) );C2S$zL C2S$"( use neg. values to plot symbols only )" : : B : C2X);C2S$;,zV A$ : F4(A$)Mz` (F4) (F4) Vuzj " Symbol size ";SE : SE(SE)zt SE SEz~ F4 z z : "...Plot keyboard characters ";z YN%z YN$M{ YN$"y" YN$"Y" YN% : : " Enter symbol or character :" , AZ$ : : " Size";MM : x{ : " Do you want dashed lines ";{ A${ A$"y" A$"Y" : " Enter DASH Pattern (0-8)";F3{ {  | : : " Vertical or Horizontal bars ";|  A$5| A$"v" A$"V" F5 : 2[| A$"h" A$"H" F5 : 2f|( |2  : : : C2S$"Type length of each bar in user's units" : B : C2X);C2S$|< CC$"of user"}F C2S$"type 'END' to signal end of data" : B : C2X);C2S$!}P IB}Z : : " Bar(";I;")=";L}d A$m}n A$"end" A$"END" }x BAR(I)(A$)} F5 (BAR(I)Y1 BAR(I)Y0) AVY0 : BVY1 : : 6 : Z~ F5 (BAR(I)X1 BAR(I)X0) AVX0 : BVX1 : : 6 : Z'~ II : Z3~ NNI~ : : " Color of bar outlines ";Q2$ : " Do you want bars shaded ";~ A$~ A$"n" A$"N"  " Enter spacing of shade elements in user's units ";E : " Color of bars ";Q3$* FB : QO$Q2$ : F5 FBs A# : & : A$"y" A$"Y" QO$Q3$ : A# : F5FB : & F5 :   : C2Y : C2S$(,"_") : B : C2XC2X :  : C2S$ FP |& Q  : C2S$"| |" : B : C2X);C2S$ : Q> FP ,,@,TE" , C2S$"***********>| |" : B : C2X);C2S$ǀ6 C2S$"|__________________|" : B : C2X);C2S$ : @ C2S$"*****************************>|" : B : C2X);C2S$HJ C2S$"|__________________|" : B : C2X);C2S$ : T C2S$"| |" : B : C2X);C2S$^ C2S$"|__________________|" : B : C2X);C2S$h C2S$" ^ " : B : C2X);C2S$:m Q  : C2S$" * " : B : C2X);C2S$ : QAr y| C2S$"| ^ |" : B : C2X);C2S$ Q  : C2S$"| * |" : B : C2X);C2S$ : Q C2S$"|______________*___|" : B : C2X);C2S$E Q  : C2S$" * " : B : C2X);C2S$ : QL   : C2Y : C2S$"Define your minimum and maximum x and y limits in user's units" : B :  : C2S$ : TCWI%); : " xmin";X0 : (V%() V%()) X0  :  : TCWI%); : " xmax";X1 : X1 X0 V : " * ERROR IN X LIMITS * " : Q  : : t :  : TCWI%); : " ymin";Y0 : (V%() V%()) Y0  : n : TCWI%); : " ymax";Y1 : Y1Y0 V : " * ERROR IN Y LIMITS * " : Q  : : t :  : TCWI%); : " Want to change any limits "; A$҅ A$"y" A$"Y"  (# :  : " BAD LIMITS FOR LOG PLOT" : Q  : : f  : : C2S$"ALPHANUMERIC CHARACTERS" : B : C2X);C2S$ : C2S$"Do you want manual positioning of the pen " : B : C2X);C2S$;Æ A$& A$"n" A$"N" F9 : 0 J9 : A : B : C : D33# : X0 : X1 : Y0 : Y1 : (# : : C2S$"Please position pen now" : B :  : V : C2S$; : t : l: CC$"user"D  : C2Y : C2S$"ALPHANUMERIC CHARACTERS" : B :  : C2S$I N " Enter x-position of text >>> ";XRX : XX0 XX1 AVX0 : BVX1 : 6 : Db " Enter y-position of text >>> ";Y : YY0 YY1 AVY0 : BVY1 : 6 : : bӈl : " Character size ";݈v A$숀 MM(A$) MM MM v  2 " Style: Standard or Bold ";< A$n A$"s" A$"S" A$"b" A$"B" :  A$"s" A$"S" F9 :  F9lj : " Orientation : (0,1,2,3) ";щ A$ F2(A$) F2 F2   " Enter text >>> ";AZ$/  MM(MM): %A _  "...More text lines ";i* A$> (A$"y" A$"Y") J9 DÊH (A$"y" A$"Y") J9 X : Y : lΊR %Պ\ {f  : : C2S$"Type points to plot (in user's units)" : B : C2X);C2S$ : CC$"of user" : C2S$"type 'END' to signal end of data" : B : C2X);C2S$p Iŋz : " x(";I;") = "; : X$ : X$"end" X$"END" 勄 " y(";I;") = "; : Y$0 X(I)(X$) : X(I)X1 X(I)X0 AVX0 : BVX1 : 6 : : z{ Y(I)(Y$) : Y(I)Y1 Y(I)Y0 AVY0 : BVY1 : 6 : :  II : znj : : " Color of data curve ";Q4$ : MI :  : " Color of function curve "; : Q4$ : \ :  IM IM : 5 IM IM : < d Q  : B(Q) : C(Q) : Q V$()"n" V$()"b" V$()"N" V$()"B"    : ,  C2S$ "Enter number of axis for which you" : B : C2Y :  : C2S$ : C2X);"want "V$(IQ);* IM$X IM(IM$) :  : IM IM l$ IMIM(IM). V$()"g" V$()"G" : :  ,8 : C2S$"Tic lengths are values between 0 & 1 and" : B : C2X);C2S$ : C2S$"negative for tic marks facing down" : B : C2X);C2S$jB C2S$"or to the left of the axis" : B : C2X);C2S$L C2S$"Tic lengths " : B : C2X);C2S$;` R$ (R$) ` ͏ B(IM)(R$) (F1 IM) (F0 IM)  7 C2S$"Interval between " : B : C2X);C2S$;V$(IQ);F B(IM) IM  : , : " Position axis at x= "; : B(IM) : B(IM) IM  : , : " Position axis at y= "; : B(IM) : B(IM) V$()"g" V$()"G" B(IM)Y : : : C2S$"type 'E' to end this phase" : B : C2X);C2S$ C2S$"Hit RETURN to describe another axis" : B : C2X)C2S$; A$Ǒ A$"e" A$"E"  ґ   : V$()"s"2 C2Y : C2S$"Do you want scale numbers " : B :  : C2S$;< A$g( A$"Y" A$"y" : V$()"ns" : ْ2  : h : : : C2S$"Enter number of axis for which you want scale numbers" : B : C2X);C2S$;< IM$F IM(IM$)P IM IM : 2 #Z IM IMgd : " Start value ";C(IM) : " End value ";C(IM)n C(IM)C(IM) : );"Impossible values : please reenter" : d x (IM F1) (IM F0)   : " Interval between scale nos. "; C(IM)C C(IM)C(IM)C(IM)  u " # of decimal places in scale nos. "; A$ C(IM)(A$) C(IM)  Ԕ : " Character size ";C(IM) (F0 IM) (F1 IM)  C " Type '1' for scale nos. at every grid line or tic mark";M A$i (A$) C(IM) : " Type 'E' to end this phase" : " Hit RETURN to label another axis";ɕ A$ A$"e" A$"E" : " Color of labels ";Q5$ : " 2 Q, TCWI%);" 4" : TCWI%);"______________"6 Q  : TCWI%);"| |" : @ TCWI%);"1 | | 3"J Q  : TCWI%);"| |" : "T TCWI%);"______________" : TCWI%);" 2")^ th : : C2XTCWI% : Q  : C2X);"|" : : C2X);"1 |"r Q  : C2X);"|" : —| C2X);"|__________" : C2X);" 2"ɗ ՗ QX$"" E#? V$()"b" V$()"B" V$()"n" V$()"N" B()X0 : B()X1 : B( )Y0 : B()Y1T V%() X i QO$Q4$ : A#} YN% 0 F0F1  C2Y : C2S$"TRANSFORMING TO LOGARITHMIC COORDINATES" :  : B :  : C2S$ J M/ F0 X(J)X0(X1X0)Q9(X(J)X0)DW` F1 Y(J)Y0(Y1Y0)Q9(Y(J)Y0)DEi Jx J M XX(J) : YY(J) XX0 XX1 YY0 YY1 %ř& J0 YN% : D : # : V%() : X sD F0 F1  : C2S$"PROCESSING LOGARITHMIC COORDINATES" : B : : C2X);C2S$ : Q  : : zN X V$()"n" V$()"N"  b QO$Q1$ : N% : A#ߚl V$()"b" V$()"B" #v I    B(I) B(I)  : F7B(I) : QSB(I) : QZB(I)O XOFFF7B(I)h YOFF(F7)B(I)| XGX0 : XHX1 YGY0 : YHY1 # I V$()"ns" ϛ I   C(I) H F8 I F8# I QO$Q5$ : A#T YBF8C(I) : XB(F8)C(I) : YEF8C(I)z XE(F8)C(I) : YIF8C(I)* XI(F8)C(I) : MM(C(I)) : NDC(I) : F6C(I)֜4 XOFFB() : YOFFB( )> #H IR YN% : #\  : X()X0 : XZ(X1X0)(M)lp C2Y : C2S$"CALCULATING EQUATION VALUES" : B :  : C2S${ J M C2Y : C2S$(J)" Cartesian Points" : B :  : C2S$ XX(J) : X : Y(J)Y : X(J)X(J)XZ : X(M)X1 J   CLSCR$C Q TCCLNULL% : "" : QJ a RTCRO%TCCP%C2Yy CLTCCO%TCCP%C2X DCA$; RCFLAG  TCSTR$"y" TCSTR$"Y"  R;SEPSEQ$;CL;FINSEQ$; : 8 (R);SEPSEQ$;(CL);FINSEQ$; : 88 TCSTR$"y" TCSTR$"Y" .]$ CL;SEPSEQ$;R;FINSEQ$; : 8. (CL);SEPSEQ$;(R);FINSEQ$;8 B C2X(TCWI%(C2S$))L ϟV TCIV$"n" TCIV$"N" jݟ` IVSEQ$j t TCIV$"n" TCIV$"N" ~ OFFSEQ$ =X Y (X(X) )Db  : " Color of parametric curve ";Q4$ : N$"(t) Parameter"֠  : " Min value of the ";N$;: H1::" Max value of the ";N$;: H2  LL$" Parametric " : V%() LL$" Polar "[  : C2Y : C2S$"CALCULATING EQUATION VALUES" : B :  : C2S$j" J M, TJ(H2H1)MH16 V%() ST : C@ X(T)(T)ϡA Y(T)(T)B V%() C Rd(S)D YR(S) : XR(S)+ X(J)X : Y(J)Yq C2Y : C2S$(J)" "LL$" points " : B :  : C2S$z J 4! >! );"ENTER the following Commands"H! R! );"1. SAVE ";(");"C2MAIN";(");" "\! 0f! );"2. LOAD ";(");"CURVEII";(");",R "7! (# N : SXN(BA)(X1X0) : SYN(DC)(Y1Y0) : F2() : F2() : F2() : F2() : Q9(())( )[_)# AA(AN) : BB(BN) : CC(CN) : DD(DN)N*# NV : NV()33S : NV()G : NV()֣` : NV()E : NV()@n+# ZZ$(X$)(X$,(X$))ɤ,# C$()"UA" : C$()"DA" : SANA : SBNBSA : SCNC : SDNDSC : G1 G1 : -# G1 G1 : RX : RY : '/# S$( ) : C2PLTDAT$";:I21 100"S$"H"S$ :  'Q0# F1 DE(Q9((Y1Y0)))~1# F0 DW(Q9((X1X0))) ܥ3# C2PLTDAT$"OUA"(AA)","(CC)S$ :  ' : RX : RY : QQ NV(AACC) : : A# QO$QM$ B# ((QO$,))  # : XC# : : : );"LOAD ";QO$;" PEN - HIT RETURN TO CONTINUE"bD# F$wE# QM$QO$ : : ~# # QO$QX$ 榎# ((QO$,)) ((QO$,)) C2PLTDAT$"P"(QO$,)C2ENDCHR$ :  '# QX$QO$ : m# BB()SD : BB()SB : QT(F7)F0F7F1 : YF7Y0(F7)YOFF : F3 C2PLTDAT$"L"ZZ$((F3))S$ :  'ǧ# BB()X0 : BB()Y0 : BB()X1 : BB()Y1 : BB()SY : BB()SX : DI(F7)DWF7DE秘# DP : X(F7)X0F7XOFF%# "$ : DP : QFQS : QHQZ : QSQS(BB(F7)BB(F7))L# QT QJ : QI : C2SAVEJDIn# QT C2SAVEI(QJDI)# BB(F7)RY(F7)F7RX : QT ## YF7YGYOFF(F7) : X(F7)XGXOFFF7 : "$ : QI : C2SAVEI(F7(YHYG)QZ(F7)(XHXG)QZ)L# XF7QS : Y(F7)QS : '$ : DP : X(F7)XF7QS# Y(F7)QSF7Y : '$ : DP : QT  #ĩ# QKQ9((QI)QI)(BB(F7)BB(F7))DI : QI QK謁# YF7QK : X(F7)QK : '$ : ## BB( F7)RX(F7)F7RYW# QZBB(F7)BB( F7)BB(F7) QZ(BB(F7)BB( F7))BB(F7)Ϫ# X(F7)QZ : YF7QZ : C2PLTDAT$"L0"C2ENDCHR$ :  ' : '$ : F3 C2PLTDAT$"L"ZZ$((F3))S$ :  '# QIQI : QT QIC2SAVEI # : #"# QIC2SAVEI # : #L# QI : QJQJ : QJC2SAVEJ ## QT BB( F7)BB(F7) YF7Y1YOFF(F7) : X(F7)X1XOFFF7 : "$ꫬ# QSQF : QZQH : $ : C2PLTDAT$"L0"C2ENDCHR$ :  ' : F3 : ;# NL((NL(NL))) : NLNL((NL)) : E((E(E))) : EE((E))# Q NL : $ : C2PLTDAT$"UA"(AA)","(CC)S$ :  '# C2PLTDAT$"DA"(AA)","(DD)","(BB)","(DD)","(BB)","(CC)","(AA)","(CC)S$ :  'T# $ : QQ NV((BBAADDCC)) : QQ : AAAAE : BBBBE : CCCCE : DDDDE : Q# AAAANLE : BBBBNLE : CCCCNLE : DDDDNLE : NL : E : ߭# M7 MM : CYY0 : F8 CSC : CCM7N : Y0Y0M7SY# CXX0 : F8 CAA : AA M7N : X0X0 M7SX}# G1 : (# : BB()Y0 : BB()X1 : BB()Y1 : BB()XE : BB()YE : BB()XB : MM MM֮# BB()X0 : BB()YB : BB()XI : BB( )YI : XABB(F8) : XB$(BB(F8)) : XDXA-# QT(F8)F0F8F1 : XCBB(F8)BB(F8) : QT XCBB(F8)BB(F8) : ## DI(F8)DWF8DE : BB()(Q9(BB(F8)BB(F8))) : QJ : QI : C2SAVEJ(Q9(BB(F8)BB(F8))) : C2SAVEI ů# ## QK : C2SAVEK(XCBB(F8)) : ND BB(F8) ND-# QB$XB$ : $ : XB$QB$X# QT QXDQ9(QI)XCDI : ## Q(XB$)(((XB$)@)M7SX)(F8)# Q1BB(F8)F8(( (XB$))M7SX) : AZ$XB$2# X(F8)QF8(Q1(XOFFCX)) : Y(F8)(Q1(YOFFCY))F8Q : BB(F8)(F8)XBF8YBQKBB(F8) : QT #W# F6 QI QJBB() ## F6 QJBB() % : #ѱ# (QI QJBB()) (QJBB() BB(F8)XB(F8)YBF8 F6) %# QI QJBB() AZ$(BB(F8)) : %E# BB(F8)QI : BB(F8) BB(F8)XA : XABB(F8)c# XB$(BB(F8)) : ## % : XB$(BB(F8)) : QKQK : QKC2SAVEK ## QT #ֲ# QIQI : QIC2SAVEI ## XD(F8)XF8Y : XB$" " : QI : QJQJ : QJC2SAVEJ #'# QTB# F8 ACA : X0CX]# F8 CCS : Y0CYs# G1 : (# : # CQCC : CCCC(F9) : F3 C2PLTDAT$"L"ZZ$((F3))S$ :  '# WF4 : F4(F4) : M1 M1# SESE(SE) : M2 M2MK# # : F1 QJM1 M2 : Y(QJ)Y0 Y(QJ)Y0 : #~# F1 Y(QJ)Y0(Y1Y0)Q9(Y(QJ)Y0)DE # F1 QJ# QM1 : F0 QJM1 M2 : X(QJ)X0(X1X0)Q9(X(QJ)X0)DW : QJ# QM1 # # XX(M1) : YY(M1)\# YY1 YY0 XX1 XX0 QM1 : $ : QQQJ :  $ : QQ :  $# QQM1 :  $ : QQ : M ## Y(Q)Y1 Y(Q)Y0 X(Q)X1 X(Q)X0 $ :  $# X((XX0)SXAA) : XQ((X(Q)X0)SXAA)Y# Y((YY0)SYCC) : YQ((Y(Q)Y0)SYCC) : BZ$"DA" : W BZ$"UA"$ DP : M F4 C2PLTDAT$BZ$(X)","(Y)S$ :  ' :  $$ F4 QQ C2PLTDAT$"M"ZZ$((SE))ZZ$((F4))S$ :  ' : QQ : QQ dSE : QQ : M  $L$ C2PLTDAT$BZ$(XQ)","(YQ)S$ :  '$ F4 C2PLTDAT$"M"ZZ$((SE))ZZ$((F4))S$ :  ' : QQ : QQ dSE : QQӷ$ RXRXXQX : RYRYYQY :  $$ QJQ M2 : Y(QJ)Y1 Y(QJ)Y0 X(QJ)X1 X(QJ)X0 $1$ QJ : QM2 : v$ XX(QJ)X(Q) : YY(QJ)Y(Q) : DP : QM1 '$ : QQ $ DP : QQJ : $ DP : XX(QQ) : YY(QQ) : "$ : DP : $ XX(Q) : YY(Q) : QQ : QM2 # $ $ : CCCQ CCCC(F9) : F4W : #A $ F9 CCCQ : F9 : #$ F9 : $ : C2PLTDAT$"L0"S$ :  ' : F3 : F4 : M1 : M2 : "$ B$C$(DP) : NX((XX0)SXRX) : NY((YY0)SYRY) : F5 QHX : XY : YY1QHX0 : NY((YY0)SYRY) : XX0 XX0 : B$C$()s#$ RX(XX0)SX : RY(YY0)SY : RX(RX)((RX)) : RX GA RX$$ RY(RY)((RY)) : RY GA RY,%$ C2PLTDAT$B$((RXAA)((RXAA)))","((RYCC)((RYCC)))S$ :  ' : QO NV(NXNY) : QO3&$ '$ BZ$"UR" : TX(XSX)((XSX)) : TY(YSY)((YSY)) : DP BZ$"DR"($ C2PLTDAT$BZ$(TX)","(TY)S$ :  ' : RXRXTX : RYRYTY : QO (NV(F3))((XSX)(YSY)) : QO)$ A$ DP : C2PLTDAT$"U"S$ :  ' : $ ERND : QP(QB$) : EQ(QP) : QP(QP) : ND(ND)(ND)ND : %$ QPEH QP(kn $$ QPQPx- : QB$ZZ$((QP)) : QB$(QB$,(QB$))"0"(QB$,) : $$ QB$(QP)S$ QQ  : (QB$,QQ,)"E" E$(QB$,QQ,) : $p$ (QB$,QQ,)"" $z$ QQ$ QB$(QB$,QQ)ؽ$ QPnw QPEL NDND((E$,)) : A$"#" : ND ND*$ Q  : (QB$,Q,)"." (QB$,Q,)"" QB$(QB$,NDQ) : $3$ Qd$ QP(QB$) : QP(QP) NDQQQ $$ ((QB$,)) QPQP NDž$ QB$ZZ$((QP)) : E$"" QPP A$"*"$ ND ND : (QB$) (QB$)EL ND : N$ QQ  : (QB$,QQ,)"." QB$(QB$"0000000000",QQND) : %$ (QB$,QQ,)"" QB$(QB$".0000000000",QQND) : %% QQ% A$"#" A$QB$ : QB$(".00000000",((E$,)))(QB$,) : (A$) QB$QB$(A$,(A$))4% A$"" A$"*" A$"" : E$"" : %L% QB$QB$E$ : E$""~% QP(QB$)(EQ) : A$"*" A$"" : $% EQ QB$"-"QB$% NDER : % EL ELnw % EH EH(kn % EH(EH) : EL(EL) % EH(kn EH(kn& % ELv+f ELv+f9 % EH EHT% ELnw ELnws% QP QPEL ND ~% $% DP : C2PLTDAT$"D"S$ :  ' : N% $ : C2PLTDAT$"UA"(AA)","(CC)S$ :  ' : Q NV(RXRY) : : RX : RY : .€% RR N% : RR : %T% C2PLTDAT$"P0"C2ENDCHR$ :  'ˆ% M1 : M2 : F0 : F1 : F2 : F3 : F4 : F5 : F6 : F7 : F8 : F9 : RX : RY‰% RR C2PLTDAT$"H"S$ :  ' : QQ NV(AACC) : QQ4Ê% DE : DW : RR : C2PLTDAT$"@"S$ :  ' : r% DZ$"S"ZZ$((F2(F2)))ZZ$((MM))"," : J9 %% DP : GA : "$ : GA : (AZ$,)" " AZ$(AZ$,(AZ$))% QL(MM) : ED(AZ$) (MM)5% DZ$DZ$AZ$(_) : Q QL : C2PLTDAT$DZ$C2ENDCHR$ :  ' : %V% QQ NV(MM)(AZ$) : u% ES(ED) : F9 %% F2(F2) C2PLTDAT$"UR"(ES)",0"S$ :  '% F2(F2) C2PLTDAT$"UR""0,"(ES)S$ :  '% F2(F2) C2PLTDAT$"UR"(ES)",0"S$ :  'W% F2(F2) C2PLTDAT$"UR""0,"(ES)S$ :  '^% e% % F2(F2) RXRXED : % F2(F2) RYRYED : % F2(F2) RXRXED : % F2(F2) RYRYED : % Ƭ& X()X0 : X()X() : QLNN : Q QL n& X(Q)X(Q)((F5)(X1X0)F5(Y1Y0))NN : X(Q)X(Q) : X(Q)X(Q)& : X(QL)X(QL)((F5)(X1X0)F5(Y1Y0))NN : X(QL)X(QL)& Q QL  : Y(Q)Y0 : *& QK  : QQ : QQK QL  : Y(Q)BAR(QQ) : QQQQ : : : N%o& % : QK QL : XX(QK) : YY(QK) : "$ : : $ : & NV : QKN(BA) : QQSY : N% : F5 QKN(DC) : QQSX : C2PLTDAT$"DR""0,"(QK)C2ENDCHR$ :  '& ESE : E(QQE) : DZ$"DR"`& ERQKNN : QLNN : (ER)NNQK QL(NN((ER)NNQK))& QD NN : BAR(((BAR(QD)(F5X0(F5)Y0))QQ)E) : QB& QS(ER) : (QD(QL)(QD(QL))) QS((ER(QL)))S& BAR C2PLTDAT$"UR"((F5)QS)","(F5QS)C2ENDCHR$ :  ' : && C2PLTDAT$DZ$(F5E)","((F5)E)C2ENDCHR$ :  ' : C2PLTDAT$DZ$((F5)QS)","(F5QS)C2ENDCHR$ :  ' : Q 333NV(EQS) : QY& QBQB : QBBAR C2PLTDAT$"UR"(F5QBE)","((F5)QBE)C2ENDCHR$ :  ' : && C2PLTDAT$DZ$(F5E)","((F5)E)C2ENDCHR$ :  ' : C2PLTDAT$DZ$(QS(F5))","(F5QS)C2ENDCHR$ :  ' : QBQB : Q 333NV(EQS) : Q& QBBAR C2PLTDAT$"UR"(F5QBE)","((F5)QBE)C2ENDCHR$ :  ' : C2PLTDAT$"UR"((F5)QS)","(F5QS)C2ENDCHR$ :  ' : && && QD& RX(F5)QK : RY : EES : N% : NV : ' C2FRSTSW% 'B ' C2PLTPRT% : C2STSPRT% : C2RDYFLG% : C2ENDCHR$( )S ' C2FRSTSW%d' C2PLTDAT$k' RSTSW% 'B ' C2