-LA DQC xDATEDIT IQCÎERRORMSGINCQ9LA PQS")ALAHEADERIQCKLAHELP IQCZ03LAINPUT IQCBLAOUTPUTIQC"NUMFUNC INCPRINTUSGIQC d v=sLA.DOCb  !"#_ $%&'()*+,-./0123r S456789:;<=>?@ABCQo2DEFGHIJKLMNOPO>QRSTUVWXYZ[\]6 MHE<;^_`a:754I}ËS}}@!@3HК[=bg3 VG(N(kųW #<A[Ʈ$2 AVFy%PL%$ M.#hRl@WxC/iߚN4wø6jsi*([)Bv _cEN gt~e+S`49?\+ N9(_ݷ#ϔ9F`{c9ONF_L1hTO%*A|1us]7)b*+ xb(gJ!hRllP&`fb49?\֯ q49?\oĸ+\Կ٫ gh\ْ*$T }^~75'y.ZKw+[ <@knmT_.<> ˗/~|>.;[ᄲ!`Lx5sI 5>wp͓>ג)Fc.ɾkY9^qdǺj wN aL;OON}~~:__vɘDATEDIT.INCV o !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUtv<-U}wvR;d+mS k3}^)ѠLڒ_%CǤpj'{O!ݤ t"Bpw⟳)2ub6HxKp]B" ԥ\Wжpj| t1$C<\W5L] !uE Zé9'dl 6uE m h t1 +Rp1bQ'dl,Y2ēunC(p~SLUEK:- vg!bǙS޷Ϟo^o=}L߽NL߽[d'Kj o`|odi)S%6*霜 dЖ|)wfJ2t69VڦZa*R!ڦB1وiSJjbġ{Zijg(% 1JڦmLG(%CLghdi)S)%CLE1=\M3% 1Jڦ]%),J5<<"%bmR2T[#JT;CǤ_!]\i@tN'),J5<<"%bm:'Qx+%CLgh2f ov-LEJ2IJGbF2@!5<#vdlmS0Sx;=ݽHIXhP)HH2IJGbDM!'KڦsrT$C,k y4(Fhp3SIX&6x/`*R!hP)gdlB Fl`*R! MLM"$0)_.MB7  MN #zdwi)j y4(Fhy݀R2ķ5<<"%gM!ň^27I9@tNc"%bQSȣA1/%C#5Xݠ;m3dMmvTT$C)Ѡї!P`6i)SaOΒɋd{ S 񮦐GbD_JBj(A7B2Gn"bAB R2rΧmخ$^mgc~qO'deΧmخ7I{$癢_ܓ E)byΧmخI&9mvnFI3E1'R2 X;ajڻ0I&9?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefZ[ëYJ&5^R nV.7/v{}(δҷ5лyo <פ$/1`D|Jk\9g3t)űQ vHκ|v{kzbt6Bn ˼7ߝ(дX9f/vB5k _{.yoGP4Y[(T(дi vp  SÄhc%] nCvҤھ~| %^g%eCZby[ގwFܦNrfmc(NC̀bLh :m6a$115rqVۆNB}a~3~X025Oxfm^: ºx9z| cدP;km-ԤrF2J.?l?|[ҋ݇?BM,ؽ]Dҋ݇P>K/vo1K/v~ ];P߉(n 1K/v.(o6ZyyI-Ԥw"<9!f(e~4Ck]cV؟?zn'P4왔rF2h%ϻ>$_oJF y8:fOJu&ItnK@۟j27PH/~h #'ҋ `s4Lr$)J[̱\0IB.$\1L `ss$)J[I!ݐ$Ùнai* 7,M7,MŒS\i 596QXqJ7fMf 3H2Q-ddTq M>K/voPBza D\Bc:àmd-d0T sEΉc*ta0U(v SBza0]dYzc-ԤӁ*3,}| vWxNFV(rN&&Yפ$*,8%q-ԤFrؽai*,)n"^^*fפ$+\Lo!L;P^M KhPaD@2\;>ݏ^缷~9q9ߝ>κ|v{ھX}֯}9/yoZWso֯}96s[ֶXK SDfJ2jG#:7 Am&sy-aAVpHZbwåaz55 3NIp\Bd%< Lb /@[d%Z 9/5^b~ :f`d%F/4rƭBz1C%?ԁPc$"0sl0o(8%xB!I3swް4P|>a?$+H7, cnjN;/:sl0_96QXqJ7P_gMf $PH7$pfnmHLm&$ZXt0Od$PkGyv]]:l i煶PŒS$$855I&g9Ru:uСZTmK"&ɭNjSB,[Ru:uСZT\] 1Inu:U0U?ׁP|ŒS$>aIh 9{@Xh u(&m#'voX߲&0ra.$ ׬FNи57r$)piym#' e% 3NI01ra.$h uW9^=&2b@6 msy- n@Vbn"#h u5ra@[-)Z F`:p}yڼ6o@[3Z3 i#;yv&1`;':СȌ[o?h=vF$ jm}:նV/PH&Cv^h 5)?4J,m&\0I껬"jkkqfYE-dDaa) @}XBMfMf wYE-Ԥ0Cm@[I!ݐ$ÙkVbh 5ް4Pg%PBza0A;+/@h 5)v ꐕHI-$Lb]Vbh 5åa-+콠פ$YE-dn9$wYE->nwYb H4,  2$d%~h 5&e% h 59m@[Inj@[s2oYE-dbz?BMBz1CBM\0I9jrGdx\$8{gD1LP% ɰP% ɰPu$h &d% h td%n8nu S.u-':j%Mu-ԶX1L՛RBm2Qө:f\-)n"m ǭa~.u-':9Y-)n"m b&{,mB]+dx\$8{,mB}]t0Od$m> 9v_.j&&YϤgj%.٬cavwOn?m{/(55Id%^PkkxM-αuT{/(55:x&=S+))m{/(55Id%^PkkxK-αT{/(55:jLzhi@N %ZE-?uO(7, f`5:jLzhi@N %Zy-$ iBVf#SÄC3NIpRBmIϴ-mivB֬&­9#~wPթ0a$&[ԁPg3EKpzqB֋˘14cj;O(њ&p[n(mϤgڋ ;DW;Wy F0o/'֗ILiU#읈:jLzhi@NJ5 L4h"=zB֯u/!)8fJ:jLz>i/Z&P?=h= ԁPg3E-L-mt{b{(ԁP% L4@VbemK2V.CNԁP|=[8;Q&-U.CN +<$j_hpmbjpqމjSm:j61!ǕPWI qXH/~h@[$O8mY waIIUXqJ@[E wv S-UK8@[ qؽaim~ wa l$B]%ù"D1LPWm"+@[OKh +@[?h=`N;/Pk u,dW(?4cnSB.$. cn &&Waa)  pP|F.as>o.mBcI d%X6-ԩŤ-?R:]+yeqJ*).ojm~ߍbԕpZɌdT NSR]B}F1i NxJr$)JpOIuySk nPR:]+)?4QR%8m$ZXPk u#,i`A-!_w>n&-vN;/ݷ̔d-ՒdX[wݗŦLzVo&5?@ABCDEFGHIJKLMNOPQRS-/jo/x,x_H_"?@ABCDEFGHIJKLMNOPQRSTUVWX[>,(1ג(07r;~_TFP٩L[ŀOŀJZ0(b@ˎ&>?SI ӿWӯRMŀf3`y Hv4Ā9e#{==9e̍â2L9޼VaP+ht1 mfN*cHѮq\ 2zIH17\ SA.7] HSJ<ŎfƝqΜŢ2QqX]㤹8ֿ2}"gKJMf攩:t9)f`Oe \zg&gGXi(u2|ŀP_aG U{M*1 mfN*cHnpmj7eiNs(L* ܜWyj 3X9Bo63L1xf#fX~m2an 0f.r a.o63L1xL8$xsa~QZԙFZ$~GsMwC}M*7WM H ;Tb@̜2URޭpmj+h8dbVaܿ4V `;.)S%u "xGfޮGΰ9.`ɀ CYb<87] HSJYdH25Ќ%l *p}ŀ9e#](3NZ#,؛AZjAvQɍt1 }'i;WѤjb@zxŽ&63L1xw۞~f̍C&f \Z3o+_0ږ|ŀ9e#] BiG))g, +0dkp6a #P`ro63L1xKmr #Ԡ9S͍#peMwC}M*{\51 g'hRi3sTIGzw==CPbnl۪L8oX~yYaG3g6lKv}.)S%u 20\Jc<4fv;BLO`2z-N t1 mfN*cHXAo# _C%ʂA8;IۡŽ&U{xŽ&63L1xwKc۳17mU&,<ެx=,ϫg6lKv=0\o63L1xKiOv]$ ;A8e G pA4V|ŀ9e#]63kv .3+5p 6lK09.)S%u b>R3X9RRXHe.)S%u B?Yv=0NZI'\2둄Z #ɀb@̜2UR.l`Ҝ07ʤ2 h2 Bs Bi|ŀP_aG 㪉xŽ&63L1xwϸǶg5ghƐ F} , C3L-N fu.)S%u 2 lݯ;IۡŽ&g&v4Ā9e#{l{V# 2Pȿ`5rav;, +i3sTIGpAh-,lY#Ќp4Ɛ \hYi3sTIG RRXD ar¢L%ӳBfIs6b@̜2UR.Dt1 }'i;WѤ㪉y|ŀ9e#]a#ɀ0= Ͱ$)8ZJcEee$>|ŀ9ei3sTIf攩:v=^H|faؗ40P\V#0spA蝙_?~Mf攩:=-ZdcI #lU~2IK-Lj$PWs.$m ;Ty\51 {'hRi3sTIGz==qGJ;wjmXݮnk YeN.)S%u 6 0p r &GXEG [.ҲIw4n.)S%u bsr* f~`LFepA G$0Sart1 }'i;WѤjb@zxq ar*T>R[0ޑPfpA0RqkAIi3sTIGpAn;39;J G$L\LOβʄL7] HIv4jb@Lvj3᪉ͷc5] HgNjO_o3r?-Xm_gxY7] HdFD릋/$m }3bxo__KTRNeߚ.|.T҂Ea]_v4ĀJZ0T~]?*tn.ϯ6c@zwOѤf攩:n{l{V#9e6İh-Ɓ n|sf.rMf攩:ty&f \hFk [B#paF*L2'ft1 mfN*cH6mθq.suH 6#o+hRy\51 OѤf攩:F {WR `Eae"pAxݾm_o'=G3e.)S%u #LV`zV#I9TG🿡kM5ט-ܿlϫx.)S%u =57%lYf09X'a#3Go# g7] HSJSJj Y 4cԂ <ެExMgC}W WM H0l?b@=RNeߚ.hRkͷc΅s͜2:ɿmb@aXon攩~Im+ͷc۟[ŀfd~(UI Hw4Āq攩:nUhFh)$Ԃ lY%ԻP+qF`Xq4.3L1xJ>7 0RFKs;aO7ߖ_,5^CuDo# klϫꈅ}ŀq攩: ҪL0s09 +-^o*L2 2U!)S%u l0ѓFlɑeʌ!ơ4V`GXnY|ŀq攩.3L1xwD]f; 0sJK-,XdXiQOE9)S%u \읖k‘e3zIe('qy?@ABCDEFGHIJKLMNOPQRSTUV۟ˏNW4J%6(voUFxӏ埮?XcG]j<k"j,jZ$CcL$. 7 Zj;IapHX_$l,!r== Ga݌]6~LvL?=/8F6h1)NOvXId.p_. ?/}-v0 | g,/Il,N% :_`Z$'N9cϵjX޶ӥk4Oe[(ёxSIŸZNR1l,q}-v`#h@ZN;c]uޫ@Il,QcWsǤTr18Dⲱwc-cR*9 I%ecW=ڑ!~ H6XCM{zºIl,7-i[M[/u@ m~xz߇vXIdRɡ'L]6~2_`J=a¿>3u1)z„x:~NO9csǤTr1!c_)d,Vv:wLJ%OӹcR**L[(ёxP*XZ5jx,o1)wXջ"aJ}6~q;&1aJ=a¯I&`81)z„?t:8w6=1)XcG]j<u3:",e;"e6u3:lG =ǘH\6nL3~nFGҰapHX_$l,!r== Ga݌]6~LvL , /uq. ?lu3:",e;"eX7#i,R#r\'r¿֪QcyN_HGIG[(ёxP*Xu3:lG =36_;.H2 X;ra݌aKَqXcG]j<(.T”"j,0cqect[8cW0J¯z#ac'C~lH+u3:vXoZ01)?Ԉ , -;َ1?ꏛ 1ɦO*a >zT6l,d@&1f8䌅) P6~H) XR ǡ& g) Gn8Eq&w >W8% EXՋ\ =ǘH\6nL3~"*` I%ecW=ڑ!~ H6XCM{zºIl,7-i2cփ5{`'9F"* vXId.5Hy^ec'w /rOr¿֪QcyN׃5{LS[(ёxԩ$c__Be1l,q"*`#h@^XcG]j<*X/¯ CcL$. 7 /{ gXH*) ю\[E!O"oSpHec'iNkǤ]X2clc] 1ɦ/ec' 'N9c_kըᱼmUOS d[(ёxԩ$c_t[8cU` ec `@XWP_X SI(*𔍅%¯ U`#h@ 3eoQWġJ(gcネ (ǕE9TʢnHbnIJ`!1&mጅ_U{`8BRIXՕE9VpS6~գ  ?dCzT6l,d@&1f8䌅mጅ?Wpֆp۶K-JO. ">,1:>ѣIecU qmZ80=/ڪʢ*ѣIecU qmZ80=]6ER[U}\Y ѣIec,D<䌅ޣI WpCd,N% Ge,D+r/ mۣI?D;',1:>xS6&ǘn X|+r/a݌aKَq >3uL3\F m;(c#L VN#r1btmcI)FnHbnIJ`XRх?ǘH\6nL3~U S1a!l,j,)` I%ecW=ڑ!~ H6XCM{zºIl,7-i՟^jpbtvDQ40ĴOz$v,)B%L]6~R S7cI)F*aGeO lc@X1XsUa8Gm۱ 0]6ER[U ߣIecU qmǒR.TGŸHj?btmGeŸ >nێ%]/. "XRхlwXs%LapֆcI)FnH?@X=*0btDXsJ2{&13%]!l,y,)ºI1m{T6gܐh{<=wXRх?1:>OX| ft$Oё4 a)9.rKJ10+36d,N% }XRхu3:bu3:",e;"%@X/0bt-~P| g,<ƒR. P6<_`=xXRх| g,Z5jx,oXRa#L()ipHO?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]JqVNaė/E2\fz hf>43j7L),Λ?F^{AbA%h4Q, r.nHn 7 6Oů.nH ;_'W47fq>RVZ1$?ߌIug7$bI1< o4sӡxI1Da ȅVӮVӮi ?Ʈ Vc~L]ߝ< r3th r Rw5j~XM]ߵtт|U yw'S[zAnbr ##F]ݐPnnD\zAnlŋĤ\wyvCPˬxVC!ظj3:VB1QZq}ny:?cRL&˳b\fų†b:ckPnnD\zAn{Fѵb=# ]H$(76)&]ݐbI1<75ωOug7$b/{AnI1Lwo4sӡx/~~ ];M-|wpw0[zAnIPF.&6X]H2$(kwU#yAnl_ŏWB1.YaC!lIPF6FPnnD\zAnzFѵ@]L rmuydTG5 &yzrF<]7T%y`t(^K?T/}7OPiB  Poߗq B!l\5nE j]H2sW h^׮?J(F7 X ". OlŋxPHmvnh˸4;- Olŏ۟b\fų†B!llg$Ac%[h;=^hz(>cZ1|(6ڍ'ӫn P=jpFA&Ŕ]EU@n.@1ҌL{o4WW A&N#T\w#@^b o4Ӫj@H5{AbAV\w#.&pyT 7PHE-7f H]scӫe r3TтkUlb\fų"X3rݍPnnD\zAn)c`Ko4 R"elAUu7&p xNl4= r?Tтv}wWlb\fų†b:+x^X FkAĥ7~ HmB*RhW}ׯ+մkA~- PˬxVC!Xկψ1VB1QZqBJ\т- PHE-Ȼk颅ݼ- PˬxVC6VB1ePnnD\zA1- PHEm7v0Dzo0_ˮy7[zA+Y!lDvm9VB1QZqBJ\т- PHE-Ȼv[8@<7q B#X FkAĥ7~ )q2F Fm>~}F/7< = R2F ~w]=ռL@7A("ePFzQzA~B*RhAj[zA~B*Rh۱'UBuFV Ÿ̊g 1pmU3b|+(b-F6H[zA!~4S JAnz(>=ÇhA("e- 7PH1m'- 7PHE-;[zAn)c4NVӮyWiׂ4}jws_Wc~LVc~LwծNj&F B!)c lBJ\h;x VӮnhI_Ȼyw'S r3Tт7f )q2FD~7U=#-9 ;h_ F'NbFNOɝ0n3 r;ayw1hjbc&o4͎^RFܞ4g//Q1yAn1Z_mB*RxU#hA("eW[zAn+Y!1Dbtp  r;TтjKo4m%2+6u6s7PnnD\zAn1Z7q b:W IPX FkAĥ7v H[zAn+Y!Cq0J(PnnD\zAn1Z[zAn+Y!BXb%[hA(E- r3mUIPF6FX5g$A I1F@RL rۿX`Fܯs7&p xNl4= R"elf Hmf Hmvnh˸t  R2F Ζho*Y!u6$(kwU#J(F7 X ". B!%.Rhho)c`Ko47m$(#\Lm>eIPF6FF|3mUxF|;a $N{Az(>=Çh$N7hjb(. rۿX`FWU@qIh%:BU]5LhǚhBJ\т- I1F@RL rdTGHɝ0޿FT\w#bU=#x[o4%:}}yM0Go4A("e7 R2F ӗ'մkawF?@AB{NUMFUNC.INC - Turbo Numeric Functions} FUNCTION Power(X : real; Y : integer) : real; begin Power := Exp( Ln( X ) * Y ); end; (* Power *) FUNCTION MakeMoney(X : real) : real; var Cents, OldFrac : real; begin OldFrac := Frac(X); Cents := Round(OldFrac * 100.0) / 100.0; MakeMoney := X - OldFrac + Cents; end; (* MakeMoney *)v(PRINTUSG.INCV o !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUݗnu+zgJ#G^%JzK9m>:XږZ_ {lDQhhF'ǖ$JDCQ}&&'묃9NI2a:|1UcxQZ'cnjۋ:ʐ51UcEiu0ǛୃyxV*{m S$EэxalDTO&AH,ST!qG֡Xo/9)a5p^%)oثDhثėSiu0(XQ 7sgzKƩf-yͰn,E(8l^[|FAcYZ9T:uȐا S]cp*Ѥu(`ا IGB%~éf]&CHyRTO*ܧLY O 8:e0|ƳRk.'SIJ`I:M zK9NaljJIJf],ST!W$cJX`5p^%xQDjJ0Qeiy'LI $r:a*:w4i pEb̷N"+0EW$+\⩴9ytgt_DЦ '|6YmKQ:ސxG<] uj+fu0$#X`:X ܰW#:,FZsNҖlk(W$<nثD3*Ch|jJ,t8ۯCFK̸h.yR+X ܰWTrx:ku0^xjJDgז+|Ӳ*m e*?/j!l\5nE j]H2sW h^׮?J(F7 X ". OlŋxPHm