@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr %KEYSPFNLSCCHAV76F@ } %%MAKE CX85 HANDLER V:1.7 1988$$RICK DETLEFSEN MORE THAN GAMESAUSTIN ACE AUSTIN TX.}(999@1<@,;@@,;@,;@5,2467@,. %67@@,. 467@,.<Q6-@}6-@'6-/6.1A@@9G(}Q AF-@1.68<,-E68<@,}-\68<@,-` @@K:PT #A!-@@'"268<,-6"A6 }8<,-E"P68<,-T Z>-@@'( Ӡ4)@> A d^ #A!-@@'" }268<,-6"A68<,-E"P68<,-T ^ A nFF12,28,132,69,21,51,136,55,22,53,139,56,23,48,142,57,31,14,146, }45xFF20,35,252,78,17,24,256,52,18,29,259,53,19,27,262,54,30,12,306,439916,52,372,68,25,31,376,49,26,30,379,50,27,26,38 }2,51,,24,43,492,89,28,50,498,48,29,34,502,46DATA 1:VAL FROM CX85 X2:VAL FOR 764 KEY(X,0)3:SCRN LOC } KEY(X,1)4:KBD CHAR KEY(X,2)AR@'Af9@@ K-@ e(}ҠҠֺ( (    ( |E| |7||8||9| |-| (  }  (    ( |N| |4||5||6| | | $(   |+| .(   |E| 8}( |D| |1||2||3| |N| B(   |T| L(   |E| V( |Y| | 0 ||.| |R| `( }   jk( CX85 7(٠ˠΠI@@[Afk01A}t0(0(%      ~G%( G(|INSERT KEYPAD INTO PORT |G%(}G(| TO MODIFY HANDLER |-&(-6.$)()(} TO SAVEG%(G(|PRESS KEYPAD KEY TO DISPLAY|G%(| OR KEYBOARD }KEY TO CHANGE |G( (7@<@',&&($}CCREAD KEYPAD, DISPLAY TRANS CODE, READ START IF IN CHANGE MODEI AAR@1Af@=6-}I6-)F:B2y,"@" A)SAVEuF:B2y,"@*@@<@@9NAf}X+r(USE PORT FOR KEYPADuH"!*F:Ad,AU668<,-F:Ad,HAdAUA}6-%@"@%/-@@A( TO END ?"@P6---@@?( TO SAVE*} T:,"@A 4i16-R:,%++Q:@,"@,$@,<6-8<,R6-P:8<,'@@,i6-8<,&+}$@@,>8<,"A H"Ad)@"-RQ"AU!Af7(}K6-@#@Q-\M"AU%(+ENTER7Af@C6-AM A!`f++(>:%++!@1}* A%,$A(,,p867B:,%@,.>:,)B:,"@(86.7@,z-@@!(* -(>:8<,},*38<,8<, A (# SAVE2#'Af'AdAU<#-@@'( WRITE HANDLERA}(^^^^^^^^^^^^^Z(7@<@',s(7@<@',(7@<@',F#N@@3'- }@@>(ԠԮˬN( ΠP#*!(źD1:AUTORUN.SYS*(Z#j@@'@!}@29ARF@X@@j@@9d#D-@B:,!7<,4 :6.7@<"}&@,D An# #{-@@3(ҠҠL(7@<@,^-@@!s(7#}@<@&,{(#J@@2"@)4A6.STD CX-85 HANDLERJ(#MAR@'@$}@96B:,!@'M6.7@<@',#a-B:,@6@=67%@<%@,.7<,A a67@%}<@,.LOADING:#ˠҠǠś#d@ A5@@G-@@d(&}ŠӭŨٯԩ#+ ()@+"AUA#!!@*A!A`#(( Ǯ'}7@<@,M@6@r@3@( #5@(} A5@@#z*@AU)*@AU<*@AO*@AWg*@)}A%B:,z*@AW$, B-@B:,,6-@:7<,,$^M6-+%++!6@* @2,$@d,%+*}+!@1* @,$6@2,,Z*@^ T$ŠҠ^$6 #B!-@A9%"2*@6+} h$M-@1.8<,;*@M*@8<,r$ *@|$6 #B!-@,}@%"2*@6 $C@6.'@@9@@9C A '$$DATA FOR HANDLER V-}BI 174 BYTES'ZZ255,255,64,31,231,31,169,232,141,231,2,169,31,141,232,2,173,36,2,141,192,31,173,37,2'YY141,193,31,160,96.},162,31,169,7,32,92,228,96,173,133,2,208,64,169,0,133,77,173,0,211'TT74,74,74,74,141,194,31,173,8,210,41,8,73,8,10,13,194,/}31,160,0,217,197,31,240,9'aa200,200,190,197,31,240,51,208,242,170,200,185,197,31,205,195,31,240,20,141,195,31,141,252,2'0}^^169,48,141,196,31,208,26,169,192,141,195,31,208,19,174,196,31,202,208,10,141,252,2,169,6'11141,196,31,208,3,142,196,31,1}76,98,228,0,0,0'226,2,227,2,64,31 D1:CX85.BAS 1#0: B 1L!#͑### B 1#c$0SY: CX85 HANDLER MAKER BY RICK DETLEFSEN ------------------ I wrote this program as a wayto3} make available any keycode tothe CX-85 keypad, for use in anysituation where such a handler canbe installed. This makes 4}it a littleeasier make that special need oncetype of handler, and those specialones used a lot. A text line is printe5}d wheneverthe file is loaded so you'll knowit's purpose. The program is easy to use, justfollow the instructions. 6} The only thing I may do in thefuture is to make the handler coderelocatable(I didn't write it, justmodified it. I think7} someone atAtari in the early days wrote it).It's load address is now 8000 to 8164,which may be a bit high for some applic8}ations.Included in this pkg. is a programfor installing a macro handler withExpress terminal software. I don'tknow if 9}it will work with Amodem, butI'm testing it.If you have any comments, problems,leave me mail on PROBOARD 467-6004. 0+)w0AhihiHHȱȱ`8Hh` -0E…¦ -0`L-0` >0;}"Ff ee&8L_0 >0_Wń児0 &&86.ń児8<}儅充FfFf8L_0 V1`HHJJJJhh` `iDiE`Hh` :1IHiD=}iE B 1HI B 1` M1LT1 :1HI B 1`L11L1 :1HIB 1` :1 @1JKB>} 1JJJJ` :1 B 1` :1BJK @1 1`Ƣƣ8`HhL&2 ?}`aP`aɠ߆O`G'L,X#MJJJJ)@}I | FL HL8i f`ӢfȌ WL8 A}B}9* $%>?, YL\`H0 ҥh@hld2L84~HЭ h`LU4Q4Q4)C} Lt4Q4i@`L4Q4)_ŮL4Q4`L48Q4 `L4 04Xm4Ym4(4 k0ee`L4VUD}T 4]2\2\2]2I`L544 4c2b2(c2b2 M2`L+5]VUT 4c2b28(UVc2b2 ME}2`L^5 V2V2Ly5V2 4V2Lc5`L5 0z5z5i^2{5i_2}5|5 4]2\2V2z5{555V2L6\2]2F}HH^2_2 R4hh\2]2^2_2V2L5`L6666EII IL&68666G}II IL!6`Lr6 0l6l6m68(񮅬 0V2n6 4V2n6m6l6 ~5`L6L6H}6 o6IL6 4`L7 06666 &266 1L:7K:77 1I} 4 6 4II ILX76I IL7Ѝ6IL76IL7 (5 54L9II| I<L7J}66M6L78< 5466Ln8I'Ig IL>866M6L>8I 5466Ln86ILnK}866M6Ln86 1666L86IL866[2Z26mZ26m[266ML}6L8]668~ 16 54Lx966M6Lx96ILx96ILx966i66[2ZM}26mZ26m[26Ȍ6ILm9 (5]6 16ILK7 1`L9} 1L99 o6L9(N}9 ~5L:(| Enter your macro definition and |9 ~5LW:(| press O}. If you wish to end a |:. ~5L:(| without an , press instead |:g ~5L:(| of . If you wP}ish to leave a |: ~5L;(| a definition blank, press at |: ~5L;;(| the beginning of the line. PreQ}ss |; ~5Lt;(| to remove a character. | ;K ~5L;(R} ; ~5`L; 0;L;Key:;; ~5;;; ~5L<Definition:;i; ~5;iTV U2S}h 6a2_2`2^2h2L<V2h2]<]󠳮ظ= o6L3>ˮW}۷ݠ> o6Le>%This program will allow you to define>? ~5L>%seventeen new macros for EXPRESS 3.0.X}>u ~5L>"The macro definitions can be up to> ~5L?&eight characters in length and consist> ~5L.?of any Y}valid characters.? ~5Lc?$If you have a XL or XE computer the, ?> ~5L?$ key will display the word HELP.Z} ?s ~5L? This will act as an extra macro. ? ~5L?%To use your macros, append EXPRESS to? ~5L4@$the fil[}e Ϯ, which is created@ ~5Lh@#by this program. Use the /A option@D ~5L@#when you to \}Ϯ.@x ~5 6`L@ 1L@ D1:MACRO.OBJ@$ 2L@ D1:MACRO.OBJ@酥! 2LA D1:MAC]}RO.OBJA  11I 1ILSA2q 13U 1LA [5LwAıϮʡAY o6 6 1`^}LAxe2d24X = < @} 1xe2d2Xl `A$hB7t$cAA'AIp)POFNA1A2A3CSCLINEPAGELINETEXTOFAUCMLMCPTLPPFLPAGPLINLEOCURLLTPHLEREROKFLDEL `}ATLPP@  a} b} !"#$%&'d%%n%% c}éx%%堠%%젠%% d}%%s;A,;@P,;@,;@,;@,;@ e},;A ,;B ,9A,;A ,6-Baa67@<@p,.Fh hh`hhhhؠՠ f})٪` @ eڅ֩|\67@q<A5,.A&eׅנлEٕ*| g}67A6<A6,.>:AU,II67A7<A,..p BܝDEIH VЦ`KA @ h}'A9@@K@@9//('}Shareware..(&é i}..(&ɠ..(&Πɠ󮠠..(&P. j}O. Box 16127 Clarkston, Mi 48016c(,(! This program will print a textP(file to your printer in ATARI'sc(charac k}ter set.O-@@4(File to print?D1:8OB:, @A"N@ A 5@@ l}9 D@N A, A6^-@@D()ormal or ouble width characters?NH m}^0N*0DA @C6-@u%+4N,C6-@`$+"@u,%A $+"@v,Ja-@@9(Line w n}idth (1-)?39=I6-P:A:,,a @)!AT(6-P:',6-("@A^i-@@A( o}Columns per page (1-)?EQ6-P:A:,,i @)!APh"@ArQ-@@ p}>(#Column separation character?|BI4Q6. |W-@@G(,Total lines per page (1-100)? q}90KW6-P:A:,,!! @)!AAT-@@:(Page numbering (Y or N)?N>T0Y r}*0NA16-+4Y,16-$+",%+&@,$+,y-@@=(#Press to print. s}[(Press Š to pause.y(Press to abort. F:B2y,@A0C@ A 5@ t}@9 C A` A F@ A 8@@P:< F A A u} 3@!@-6-3(}O6-@6-)6-%@,(H(堣 v}L(O([ A@@ '6-B:,;6-$+!,%$+,G"S6-@[6. 6.7@<,c w}Af@(+Af467,.B6-%@K68,-S6-%c $A*68%@,- 6- x}* A`FF:A,A636.>> LINE TOO LONG! <<<6-B:,F A & 68%@,- 6-@0Y6- y}(3(堣7(A A U(@OAY 5X--@++A&,'@P,&@8( z}@< NAdAUX A: ( A`D F:Ad,"AUA NB A"@:,$6-@ {}'(8( 箮B AS.(.(#Press any key to restart printing.X F:Ad,"AUAb A |}l>67@,. !67$,. 067@,.>6-%@vK 6-8,%6-8%@,&@56-&%@K67@ }}<,.7<, (+!@*%,A`d6-8%,)6-8%%@,&@;6-%&%@L67%@,.d67 ~}%@<,.7<,(((+!@*%@$,A6-8%@$,96-8%@$%@,&@S6-$@ }%&%@l67$@%@,.67$@%@<,.7<,) A) $+,%$+!,AY( }@,6. Page # F67@<@,.=:,O6-B:,Y A6 $#6. End Print ,6-B:,6 } A"AA&(@>:@,&(A3@(( 3(Y }(5()Do you wish to print another copy?N9G0N*0YO(Y A0) 4Y(}) A }Y(5()Do you wish to print another file?N9G0N*0YO(Y AP 4Y%? +@ }1@@9<(Bye...? r6-$@"6-P:'AV,26-&$AV=(@\(@>:,>: },>:,o6-?:C:,#@@K:0)@;@>$* A4R%6 }-F:A,%F:A,$AV46-F:A,7(F(Һ R6->/"A0#(Unknown device./6-@H }1"A8%(Device not ready.16-@R3"A9'(Device malfunction.36-@\+"AD( Disk err }or.+6-@f5"A`)(Drive number unknown.56-@p."Ae"(Bad file name..6-@z/"A }p#(File not found./6-@+-@A + %@  /"Ap#(File not found. }/6-@+-@A + %@  D:DEMAPRNT.BAShhhؠՠɀ)٪` }@ eڅ֩ע&eׅנлEٕ* й͑8˥8ͥi˥ J Shareware ---------DemaPrnt 1.1 (C)1987 by DemaSoft(tm)Written by Chad PortugalPrints you}r text files in ATASCII toyour EPSON or GEMINI printers. I originally wrote this program toprint out my basic progra}ms (way backwhen...), but have found many otheruses for it. It is great for big textfiles or spreadsheet listings due tot}he 120 characters per line capability.I've loaded it with a lot of littlefeatures I hope you will enjoy. Here isa run down} of the necessary inputs:File to print:-------------- This may include any character upto 50 characters. You must in}clude theinitial device name.Normal or Double width characters:---------------------------------- This option allows} you to use twocharacter formats. Normal will allowyou to fit up to 120 characters on oneline. Double will only allow 60c}haracters on a line.Line width:----------- This option puts a limit on thenumber of characters allowed per columnli}ne based on the normal/double widthselection. See also "Column separationcharacter" below.Columns per page:-------------}---- The program allows for multiplecolumns (like a newspaper). Based onthe selected column width, it will fitthe num}ber of columns allowed by themaximum number of characters via thenormal/double width selection.Column separation characte}r:---------------------------- This is the character that willseparate the columns from one another.The vertical bar }is the default, butany character (including a space) ispossible. Remember that when you chooseyour column width, you must }alsocompensate for this character (subtract1).Total lines per page:--------------------- The maximum you can fit on}to onepage is 100 lines. The 90 line defaultmakes prints cut nicely over theperferation.Page numbering:---------------} Answer Y or N to automaticallynumber each page by "stealing" a fewlines from the bottom. Remember, thisis not column }numbering.Begin printing:--------------- Make sure of course your printeris turned on and that your paper isexactly} at the top of form. Ok, now the fun part! START willbegin the printing. While printing youuse the space bar to pause }and ESC toabort. Once printed you may reprint thesame file, another file, or exit theprogram. Easy huh?Stuff:-----}- I wrote this program a long timeago (ala BASIC), but most of theimportant stuff is written in machinelanguage. } It works by reading one page at atime, prints it, then continues on tothe next page. The defaults (just hit RETURN) a}reperfectly set up for printing ZMAGSmade for the 40 column ATASCII mode. Itwill really save you paper!Shareware:------}---- Hey, whatever you think it isworth to you I'd appreciate (don'tinsult me). Something around the $5-$10range. I'm} also always open to anysuggestions, improvements, or ideas.Just drop me a note: DemaSoft c/o Chad Portugal } P.O. Box 16127 Clarkston, Mi 48016 Compuserve 72637,2775@B7tJ6-@6.(JPIdIPTILELINEAHELBVARVARROVARCOLKEYMCMAMCMIRSTBREAKEFKMLIATICSCREELINMSTARTMADMADDSCREEN}MLEFTMCOLMVARFLAINDINDLASSKMDIRFDDSCROMINFBADFMOTFNTRAMSTARLADCCINCOLRCOLRBOROPTIO}n(@((@  ( @$ @$?(@AUq} UU@"ZZB6;,> }!"#$%g(&@'@()* +,B-./0}A123A4AH56@ ! A4 AC! A 夛 ! $(07<,4}7@<@,-6-%@0$26-%@ @0<F ( $P=AR@'-@}@=(7@<@8,Z+-@@+(7@<@8,d$nx-@&@}'!"@:7,,*"@:7%@,,$''$!!6-%@%@:7%@,,  6- $V-@}@+(7@<@8,=-@@S(7@<@8,V$8B:, +&%@},867B:,%@<&%@,. 6.!6-!AR6-?:C:,<<<:A%,@&&6-?:C:,<}:@0,>:@1,7<,0)4 A* A*67%@}<%@,.  Ap$6.7@<@4,$ A 4  46.7%@<%@%@:7%@,,,.}B:, @4.67B:,%@<@4,. AA ""/7@<@4,A (7B:,,4 67B:},,.( A91(@ POSITION ,:? ;96-%!&@Ap&267,. 267,.7%@:}7%@,,%@,0!67B:,,.!6-B:,%@:$$B:,%%@!AEA D#67,.>:,#67%@,.>:},N67%@,.>:B:,,X167%@,.'6-%@%B:,1 A b!!67%@<%@,.7,l v A} %%(@ POKE 752,0:RETURN)6-@6-&@)$6-@6-@$""}夠囲.+7@<@@,47@<@@,.$ A`'6-@6-@@'6-}-@@@"7<,0 6-"6-@A  -@@@6@"7<,0 6-"6-}  1"@#*"@@%6-@916-@TT(@ POSITION &@,:? >:@4,}7<,>:@4,;  6-%*(AP46-@:7@@,, A2>D<(@ POSITION 39,23:POKE 93,} :? CHR$(30);D6-%H 6-%R6.7@<@@,$\' Apfp+6-%@!@+}6-&@z9A'A9A%%2@P@@=-=(}(N1((Enter the print argument for row= E-@4%@N(,^}-%@E((column= or press ESC to ignore. Y-@%@^(^-%@E((=> } Y-@%@^(D-%@D('}26-@:, A2$@2(>:@0,-@%@%%2U6-%@}6-@)6-@63 AU(*/7@<@4,A 4(>:A%,46-?:C:,<:A%,$6 6-@}:7F:@,%@,,* A26@.&&6-?:C:,<:@1,>:@}0,L6-?:C:,,V@`&&6-?:C:,<A(< 6. $HR 6-6.\ A$f,#7@,10*7}@,/9)6.,$p A2` A!@z @p6-6- A1p@} A"p6-A:, A1p@ A"p6-A:, 6-&!!!* AA#M}-@@A(&Line increment invalid, replaced by 10M6-@ A#=-@@=("Input file do}es not appear to be a>-@@>(#BASIC LISTed file, input terminated$+@+@@}  6.=:,6.=:, A( @6-B:,$ !6-@6. ! @0. A# 8 A}# B #7<%@,4? # A$0L 0 A# &7<%@,4POKE 0 A'V 4 A$*7<%@,4 POSI}TION 4 A&` :7<,4>:@4,&6.>:@4,0 @0: A#Pj (7<,4:6-%@( A#Pt 6-%@} A#P~ A#  /6-%@%7<,4>:@4,/ A&0 %7<,4#)7<,4:% A$  - A$p}-7<%@,4CHR$A$  4 A$  . 6. A#  6-@.!A% ##7<,4;)7<,4:}A% 967<,.7<,!6-%@/6-%@9 A$  @A$  $$B:,%@%!APA$ }  A "A%p 67,.  ''67,.7%@:7%@,,%@, !67B:,,.!6-B:,%@ #67,.>:},#67%@,.>:, F$67%@<%@,.>:B:,,567%@,.F6-B:,%@ @ @-@@(6}-B:,4!@&@6-@&( (7@<,2 &6-$@@%%@&67<,.< A$ F 6-%@}A# P 7<,4>:@4,A$ Z 6-$@@%%@d 67<,.7<,n O6-%@!@9+6-%@}76-C!@#O6-x A&0 96-%@  A# '6-A:7,,/6.,9 @0 !A# } 6-A:7,, @p 99+ )!@#,)+ )!@9,A'` .-@@.(Row ,Colum}n  A$  7-@@7(Bad row/column at row=, 8-@@8(column=. Input termin}ated 6-@@$ '6-%@ A# '6-A:7,, # 6., @0#!A#  6-A:7,, },"@* @"6.=:,, A$  ;"@6- A40167A `,.>:,; A$  Q"A6- }A0`G67@<@,.7@<@,Q A$ " Q"A 6- A0`G67@<@,.7@<@},Q A$ , Q"A6- A0`G67@<@,.7@<@,Q A$ 6 A$ @  6-}J F:Ag,"A6A)T 6-@^ @$h r | 6-6}. -@@ @7<,37@<@,) A3268,-@6-%@   ) @&6.7@}<@,)$ F&O:8@,&8@,, @F68@,-8@,%@ @+A8@,$@%8@},@A 8@, ++A8@,$@%8@, D6-F:A, A0`D67@<@,.7@<}@, D6-F:A , A0`D67@<@,.7@<@, $  =6.7@<@},+6-P:'@,=6-&+$@, ) @)67@<@,.=:, ) @)67@<@,.=:, 9}!@ 967@<@,.>:@e%&@, 9!@ 967@<@,.>:@e%&@,& $0 }: _L7@<@,0D)+7@<@,0:*7@<@,0:,U6.D:_ A1PD 6. $N 67}@,.$X ⠣b @ @p-@@@(ERROR F:Ag, while l 0F:Af,"@}&(opening 0 A2 v 0F:Af,"@&(closing 0 A2  0F:Af,"@&(reading 0 A2  }(writing  ( file named, -@@(  @$  E @p-@}@E( Entry must be numeric, try again   $  56-!A''6-A(56-}&A( ' @26-%@d' A3   @6-&@2  6-%$  }-@B:, 57<,20)7<,39)67 17<,}39.6-@%@:7<,,&@e1$H R 6-A:7<,,$\ f 56-!A'}'6-A(56-&A(p !@6-%$z " @d6-%@2%"$ 6-&@d%$ }훘 N6-F:A ,!6-F:A,06-F:A,<6-@N@ ##@@K: '6}-B6-@'6-@ RR;@',;@',;@,;@,;@,;@@,;@@, RR;@ },;@,;@@,;@@,9@,;@,;@ , GG;A `,;@@,;@,;A),; }AP,;AH, ;67@,. ,67@@,.7@,;67@,. 067@,.!67A `,.067@,. } 7 6.6-@76-F:@,%AV$F:@, dd6.Zhhhhhhhhhϱ fJ`$ @i @ i@ } jÆ`  6.6.6.6.6.100006.005 6.06.@KAAD' }AAE9A @KAR@$ .67@,.h867@,.>:@}1,B""67@,.DEL67@,.>:AW,V67@ ,.E`67@",.>:AW,j67@}#,.It67@',.>:AW,~67@(,.D67@1,.>:@1,##67@2,.]^`}67@H,.>:AU,67@I,.67@U,.>:AW,67@V,.B67@`,.>:AW},67@a,. H V0ڥ67@q,.>:AU,67@r,.67@u,.>:@',--67@v,.}+  BHI V67A,.>:A%, 67A,.ɀ67A,.>:AU,67A,.}ɠ(67A,.>:AS,2..67A,. fJ` i@ j]<67AF,.>:@1,F67AG,}.нPZ;AA,d--67@,.hhhThhhhhhΥ̰n67@',.>:AU,x3367}@(,. ԅ`RӭFi׭GiةL֢67@`,.>:AW,67@a,.E67@c,.>:AW,6}7@d,. IЅRթ67@t,.>:AW,67@u,.D67@y,.>:AW,67@,. B8}ѭ67@,.>:@1,@@67@,.-̅UэHI΍DύE B Veu67A8,.>:@1,}))67A9,. ԥӅR`ɥ67Aa,.>:AU,67Ab,.67Ah,.>:AW,$$6}7Ai,.H V0٥U8̅Х"67A,.>:@',,67A,.0667A,.>:@0,@67A,.} ,J67A,.>:A%,T67A,.^67A,.>:A&,h67A,.Dr67A,.>:A}',|67A,.67A,.>:AU,67A,.67A,.>:AV,67A,.}ɟ67A",.>:AS,67A#,.67A&,.>:AT,67A',.C67A0,.>:A}U,//67A1,.UЪБΥ Ṵ ͅUU67AY,.>:@1,SS67A`,.@U͐ΥЈ0 դ}֥ͅUUѰΈ Эш0%%67A$,.А ȑΈ$5(>:A%,#AR}@5@&C-C((0C-@C((| }ΠҠ|:C-@C((DC-@C(!}(| switches menu and design screen.|NC-@C((XC-"}@C((| |bC-@C((| |lC-#}@C((| |vC-@C((| $} |C-@ C((C-@C((|Ӡ%}|C-@C((&-@&( |Load :-@&}@(-@9@(|&-@&( |Save :-@@(-@9'}@(|&-@&( |Directory:-@@(-@9@(|C-@(}C((3-@3(|Variable Tag Character: -@$@()}-@9@(| 3-@3(|Set Screen Colors :*-@$@(4-@9@*}(|>3-@3(|Starting Line Number :H-@$@(R-@9@(|\3-+}@3(|Line Number Increment :f-@$@(p-@9@(|z3-@ 3(|Set Le,}ft Margin :-@$@ (-@9@ (|C-@!C((-}3-@"3(|QUIT - Enter Y to exit:-@9@"(|B-@#B('.}5-@9@#'@@g5(>:@0,AR$/} ( $AR@ @pgg&@AHAIAHpAH`AIpAIAI0AIP0}APAH`AP0$;-@@;( Enter a directory search string,;-@@8(eg. D1:*.*1} to scan for files.;$A-@@A(&Enter a device qualified file name to $:-@@7(load into t2}he design screen.:$.A-@@A(&Enter a device qualified file name to 8B-@@?($write the BAS3}IC subroutine lines on.B$B=-@@=("Enter the starting line number forLB-@@?($the subrout4}ine. Range is 1 to 32000.B$V@-@@@(%Enter the number (1-999) by which the`D-@@A(&subrou5}tine lines are to be incrementedD$j?-@@?($A 1 digit flag, when found on screentD-@@A(&6}indicates a variable is to be printed.D$~A-@@A(&Enter 5 hex digits(0-9,A-F). 1(color),B-@@7}?($2(bkg lum), 3(char lum, 4-5(border).B$?-@@?($Enter the column, (0-9) at which the>-@8}@;( left screen margin should begin.>$?-@@?($Press Y then RETURN to exit SCREEN '-@9}@$( DESIGNER.'$ D:DESIGN.BAS8̰ HBhIiB BHBB۩Bhi BBک捷BBFffڥۍB. SCREEN DESIGNER , by Mack McleodSCREEN DESIGNER allows you to key agraphics mode 0 screen with borders,titles, and mark;}ers where variableswill be, then save a LISTed BASICsubroutine to reproduce the screenwith a simple GOSUB. The file isENT<}ERed into other BASIC programs andcan be loaded back into SCREENDESIGNER for modifications. Other menuoptions allow for di=}splaying adirectory and setting values for:screen colors, subroutine linenumbering, left screen margin, and thecharacter >}to flag where variables willbe printed. FEATURESDesign screen and menu are switched bypressing START. Unfinished design?}screens may be saved and reloaded asnecessary. SCREEN DESIGNER menus canuse line 23, column 39 without causingthe scroll w@}hich usually occurs if youPRINT something there. You canexperiment with screen colors and seethe change immediately. Your A}savedsubroutine will set those colors eachtime it is called. Also, when you savea design screen file, a prompt-boxallows B}you to enter the name of avariable or string argument to printat the location of each "variable tag"character found on theC} design screen.SCREEN DESIGNER remembers where thevariables are, so subsequent saveprompts will already have the variableD}filled in for you. You may pressRETURN to use it, ESCAPE to ignore thetag, or key a new variable. Thevariable data is reloE}aded when youinput a file and tags set in theproper design screen locations. Thetag character is never printed by thesaveF}d subroutine. It is always removedfrom the text whether or not youchoose a variable to print. THE MENUMenu options are cG}hosen using thecursor-arrow keys. Type the data andpress RETURN to enter it. A"Completed" message appears in themessage wH}indow indicating the data wasaccepted. Invalid entries cause anerror message in the window. PressingESCAPE or an arrow keyI} restores thecontents of a menu selection,cancelling a partial entry. PressingOPTION displays help information forthe curJ}rent menu selection. This areais also used to display directoryentries and the progress of a loadoperation as each screen K}line andvariable name are processed. Filenamesfor I/O options default to disk 1 ifno qualifier is entered. For directorydL}isplay, enter a search argument as inDOS. Keying *.* causes all files fromD1: to be displayed. Screen colorselection is 5 M}hexadecimal digits; thefirst is background color, (0-F),second; background brightness, third;character brightness. Fourth N}and fifthare the color and brightness of thescreen border. You will not be allowedto set the brightness factors so thatthO}e text is invisible so there's nochance of the screen going blank. Forthe variable tag option, choose acharacter which youP} will not use inyour design screen text or blank toindicate that no variable processingis to be done. The default is @. Q}DESIGN SCREENThis is a free format screen where youtype up a great looking menu usingcharacter graphics for borders,inverR}se characters, etc. Remember the"variable tag", use it only forpositions where a variable will beprinted. The CLEAR key noS}t only clearsthe screen but is the only operationthat empties out the table ofvariables and locations. The designeditor iT}s full-screen. You may movethe cursor to any position and beginkeying. Scrolling doesn't occur whentyping the last byte ofU} a line. Thisensures that data is not repositionedor rolled off the screen. Scrollingdoes occur if you use the INSERT-LINEV}or DELETE-LINE keys. Pressing STARTreturns you to the menu. SUBROUTINE FILEThis is a BASIC LISTed file which canbe ENTEW}Red into other programs. Italways uses the ? for the PRINTstatement and fully spells outcommands like POSITION. If you modX}ifythe subroutine outside of SCREENDESIGNER, it may still be reloaded butyou will lose any special coding thatdoes not foY}llow the above conventionsor does something other than screenPRINT, poking colors or margin. Linenumbers may be modified, Z}but will berenumbered when you save the fileagain. The subroutine begins byclearing the screen. You may wish todelete tha[}t statement if your outputdisplay is only to cover some screenlines and leave others intact. LOGICThe program is fairly \}long and eachsubroutine is preceded by a comment,so I'll just mention some of theroutines that you could use in yourown p]}rograms. The assembler subroutine in stringFK$ is used in conjunction with theBASIC subroutine at lines 120 through190 to^} provide menu keyboard input.Editting keys such as insert anddelete won't affect the menu borders,and cursor left and righ_}t keys wraparound the input field, likecommercial data entry software. Theroutine ignores keys such as BREAK andCLEAR. FK`}$ is called with the screenline(0-23), start column(0-39), endcolumn(0-39), and address of a stringvariable in which to rea}turn the datakeyed. Each key pressed updates thescreen-field and string variable. Itreturns to BASIC only when an "actionb}key" is pressed, and the variable setby the USR call contains the number ofthat key: 3 - OPTION 5 - SELECT 6 - STARTc} 27 - ESCAPE 28 - CURSOR-UP 29 - CURSOR-DOWN155 - RETURNThe BASIC subroutine which calls it isthen freed from the task od}f handlingkey entry and can concentrate on thedata and "action key" entered. FK$ iscreated by lines 3900 to 4320 whichyoue} could LIST to disk and ENTER intoother programs. This routine used withSCREEN DESIGNER output can form thebasis for profef}ssional looking menus. SK$ is 148 bytes long and containsthe design screen keying routine. It'smain purpose is to avoid thg}e ATARIeditor's scrolling mechanism andprovide quick key response whiledesigning. It is called by the BASICroutine at linq}(B.CX85 BASB2CX85 DOCB%:CX85EXPROBJB-_DEMAPRNTBASBDEMAPRNTDOCBDESIGN BASB9:DESIGN DOCB.|DET BASB DET DOCBDRBOOM OBJe 1000 and no parametersmay be passed . You will notice theuse of memory location 93. This iswhere the ATARI editor storesr} thevalue of the screen byte under thecursor. Even when the cursor is turnedoff by poking a nonzero value intolocation 75s}2, the process of storingthe byte that is at the current PRINTlocation, (cursor position),continues. Since SCREEN DESIGNERt}manipulates screen data directly insome cases, this value must beadjusted to reflect what is currentlyon the screen. ATIu}C$ is an assembler routine whichconverts ATASCII to Internal Code andback. Internal Code is a translationof ATASCII which v}is used in screendisplay memory. This routine should beDIMensioned at 90 bytes and is loadedby line 3540. The parms are a w}flag toindicate translation type, source dataaddress, and receive field address.The flag is zero for ATASCII to ICODEand x}128 for ICODE to ATASCII. Examplesof its use are found at lines 1020 and1070. This routine allows the quickswitching of dey}sign screen and menu,also saving the entire screen contentsin a variable. This presents anothermethod of storing screens, z}as 960 bytestrings. ATIC$ could be used todisplay screens, (or parts), andreturn screen contents very quickly. SCREEN DES{}IGNER makes it easy togenerate full screen displays for yourBASIC programs and let your computerhandle the coding. !#$vHIRTNADALENDIDSDSODSODSDSODINDNDDNDNDS,$P$$@@0@7@B}}B5A B63 @6 8 $$ ;@ ,H~}(( } umber translation or ountingD( INPUT N or C H#4CA(''(INITIALIZING ..... Please wai}t2 B<FFF:Bi,"AG*F:Bx,"@x*F:Br,"AHAA A d Be 6.6.}fQ(&(INPUT A NUMBER 1-36 DIGETS M(" <- - - - - - - - - - - - - - - ->Qn -B:,6-@5&s67@<}@,.0x67<,.7@<@,}@67@,.67B:,%@,.-@@66}-A:7<,,+&@,% 6-?:Bhd<<<<," (} ((("(7@<,,-( ()(PRESS } TO CONTINUE -^ ACOUNTING&&&(Initializing...... please wait+%6-@6-A% B0F}FF:Bi,"AG*F:Bx,"@x*F:Br,"AHA: A X2.(&}INPUT A NUMBER FROM 1 TO 999,000,000 }2b2.(%INPUT AN INCREMENT FROM 1 TO 100,000 2l Apv((7@<, 6-% A %-Bh}dBy "!% 4$X**DEC.ENG.TRANSLATOR ROUTINE DN=NUMBERl 6-v B-@6@/}6-P:,'@6-P:,/6-+&,$@67<,.>:, 6-?:Bhd<<<<,$(#II8,104,141,13,148,216},169,0,133,212,133,213,104,56,201,4,240,3,76,17-#SS144,104,141,253,147,104,141,252,147,104,141,0,148,104,141,255,147,104,10}4,1412#KK254,147,104,141,2,148,104,141,1,148,169,0,141,16,148,141,3,148,141,117#KK148,173,254,147,141,12,148,56,201,3,144},23,240,21,24,173,11,148,105,1<#KK141,11,148,173,12,148,56,233,3,141,12,148,56,176,229,24,173,1,148,109A#JJ254,147,141,6,}148,173,2,148,105,0,141,7,148,24,173,255,147,141,4,148F#MM109,252,147,141,8,148,173,0,148,141,5,148,109,253,147,141,9,148,1}86,142K#KK14,148,32,57,145,174,12,148,202,208,3,76,169,144,202,208,3,76,194,144P#JJ202,208,3,76,17,145,32,150,146,173,15,}148,208,6,32,112,145,76,17,145U#II238,16,148,162,1,142,10,148,32,94,145,76,17,145,173,15,148,208,6,32Z#LL112,145,76,169,1}44,238,16,148,201,1,208,14,162,2,142,10,148,32,112,145_#HH32,94,145,76,17,145,162,3,142,10,148,32,94,145,173,15,148,208,6,3}2d#LL112,145,76,17,145,173,4,148,8,133,206,198,206,173,5,148,133,207,40,208i#LL2,198,207,160,0,173,232,147,145,206,76,169},144,173,15,148,208,6,32,112n#KK145,76,194,144,238,16,148,162,1,142,10,148,32,94,145,160,0,173,29,148s#MM133,206,173,30,1}48,133,207,32,53,146,76,194,144,173,1,148,133,204,173,2x#MM148,133,205,172,3,148,177,204,141,15,148,96,169,0,141,16,148,141},10,148}#JJ173,11,148,141,15,148,32,94,145,96,32,226,145,32,53,146,169,0,56,205#HH10,148,240,3,32,112,145,96,238,3,148,1}73,3,148,205,254,147,48,3,76#LL156,145,206,12,148,208,21,173,11,148,240,20,173,16,148,240,3,32,76,145#KK206,11,148,169,}3,141,12,148,32,57,145,96,56,173,4,148,205,255,147,208#KK23,173,5,148,205,0,148,208,15,160,0,173,31,148,133,206,173,32,148},133#HH207,32,53,146,173,4,148,208,3,206,5,148,206,4,148,173,4,148,56,237#NN255,147,133,212,173,5,148,237,0,148,133,213},174,14,148,154,173,13,148,72#OO40,96,173,10,148,10,168,173,27,148,133,204,173,28,148,133,205,177,204,200#TT133,206,177},204,200,133,207,177,204,200,170,177,204,133,205,138,133,204,56,229#NN206,133,203,198,203,165,205,229,207,240,3,32,150,146},160,0,56,196,203,48#MM3,32,150,146,177,206,200,56,205,15,148,208,1,96,177,206,200,170,200,202#MM208,252,76,24,146,177,}206,170,200,169,0,133,203,173,4,148,133,204,173,5#MM148,133,205,232,138,24,101,204,141,4,148,165,205,105,0,141,5,148,56,17}3#EE9,148,205,5,148,48,21,56,173,5,148,205,9,148,48,15,56,173,8,148#NN205,4,148,144,3,76,119,146,32,150,146,202,177,206},200,72,152,164,203,133#UU203,104,145,204,200,152,164,203,133,203,202,208,235,164,203,173,231,147,145,204#GG200,96,104,}133,212,104,133,213,76,216,145,0,1,8,84,72,79,85,83,65#==78,68,2,7,77,73,76,76,73,79,78,3,7,66,73,76,76,73,79,78#>>4,8,}84,82,73,76,76,73,79,78,5,11,81,85,65,68,82,73,76,76#??73,79,78,6,11,81,85,73,78,84,73,76,76,73,79,78,7,10,83,69#@@88,8}4,73,76,76,73,79,78,8,10,83,69,80,84,73,76,76,73,79,78#>>9,9,79,67,84,73,76,76,73,79,78,10,9,78,79,78,73,76,76,73#<<79,}78,11,9,68,69,67,73,76,76,73,79,78,1,3,79,78,69,2,3#;;84,87,79,3,5,84,72,82,69,69,4,4,70,79,85,82,5,4,70,73#;;86,69,6,3},83,73,88,7,5,83,69,86,69,78,8,5,69,73,71,72#;;84,9,4,78,73,78,69,0,3,84,69,78,1,6,69,76,69,86,69,78#;;2,6,84,87,69,76,}86,69,3,8,84,72,73,82,84,69,69,78,4,8$==70,79,85,82,84,69,69,78,5,7,70,73,70,84,69,69,78,6,7,83 $==73,88,84,69,69,78,7,9},83,69,86,69,78,84,69,69,78,8,8,69$==73,71,72,84,69,69,78,9,8,78,73,78,69,84,69,69,78,2,6,84$==87,69,78,84,89,3,6,84,72},73,82,84,89,4,5,70,79,82,84,89$;;5,5,70,73,70,84,89,6,5,83,73,88,84,89,7,7,83,69,86,69$==78,84,89,8,6,69,73,71,72,84,8}9,9,6,78,73,78,69,84,89,32"$>>45,4,90,69,82,79,7,72,85,78,68,82,69,68,5,69,82,82,79,82'$--0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},0,0,0,0,$DD0,160,146,25,147,79,147,169,147,231,147,17,148,238,147,233,1471$* 1057 BYTESpCLEAR STRINGSp##67@}<@,.>:,p67@<@,. p67<,.7@<@,p67<,.7@<@,p@}67@,.p67@,.p$Hqq!!͠μqr!!INIT FOR DEC.ENG.TRANSLATORr}6-@66-Ar ;,r ;,$r 6-C:,)r 6-C:,3r;,;,t!!ĠҠ͠Ԯt$ }D:DETNԮt$d> -&6-@:7,,%"AT+17; >$n["AUPage # 001 DET is an acronym for Decimal to English Translator. This program was an exercise in writing machin!}e language. The TRANSLATION ROUTINE is written entirly in machine language. This gives it the great speed needed. The!} basic program was a simple program to use the routine from basic. I am using an AUTHORS COPYWRITE on the MACHIN!}E LANGUAGE ROUTINE and it may not be reproduced in any other program without my permission. However, if you wish!} to alter the program for your own personal use then feel free to do so. I would appreciate a copy of your work if you !} deem it worth while. If you select N from the menu then you will be prompted to enter a number from !}1 to 36 digits long....the number will be converted to it's ENGLISH equivalent. If you select C from the menu then yo!}u will be prompted with a starting number and an increment. The program will count until it reaches a 36 digit number!}. If you type break and then run the program will check to see if it has been initialized and skip that part if it ha!}s already been done. I hope you enjoy this program. This is SHAREWARE and if you like the program send!} a donation. All $10.00 donations will be sent a disk with some of my other creations including the source code for DET.!} Joe Attanasio 1769 Silver Creek Cir. Stockton, Ca 95207 !$*@A j+UUUUUUUUUuUUUUUUUUUUUUUUUUUUAUUUUUUUUU%}UUUUUUUTUUUUUUUUUUUUUUUTPUUUUUUUUUUUUUUQTUUUUUUUUUUUU%}UTTUUUUUUUUUUUUUUUUUUUUUUUPUUUUUUUUT%}UUUUU?UUU@pUUUU?UUT> HUUU?UUP H$%}UUU<UUP p%UUU<|UU@ H=UUU<|UU@zVJ%UU%}U<|UUC% UUU<|UUBR%"@UU<UTBRAUU<%}UT8B@B@UU<UTx@@UU<UP@UU<%}UPpUU<|UP6`UU<|UP*BUU<|%}UP*TRUU<|UP *TR UU<|U@ *TR UU?|>%}U@ *BJU?|>U@ *J]U?|>U@ 6eJ]U?|U@%} p ]UU@]UU]UU%}]U?>UU~UUU%}A]Ux|UA]UxxxUwUp]UxxxUUu@]%}UxxxUuUp]UxxxUUUA]Uxx?UwWpBU%}xxUBUxxU A]UxxxU  ]Ux%}xxUU#WP]UxxxUUUXcUWP]UxxxUUUsYUWPA]Uxxx%}UUU#XUWPA]UxxxUUUXUWPBU|UUUXUWPBU%}UUUXUWP]UUUUsXCUWP]U?UUUYSUWP]UU%}UUYSUWP]UUUUYSUWP]UUUUsXCUWP]UUUU%}XUVUUUUXUTUU`UXUTUU0UUXU\%}UU0UUXUPUU0UUXUPUU0uUXUP%}UU0UsXCUp:UU0UYSU@:UU0UYSU@jU%}U0UYSU@UU0UsXCUUU0UXUU%}U0UXUUU0UXUUU0UXWU%}U1UXTUU5XUXTUU5XՀXTU%}U5XUX\:UU1UsXP:UU0UYPjUU0%}uYPUU0YpUU5XsX@UUU5X%}X@UUU?X@UUUU5XXUUUU5XX%}UUUU0XUUUUU0XUUUUU0XUUU%}UU1UUUUU5XUUUU5X(UUU%}U*5XUUUU*1UUUU0UUU%}U*09UUUU*0mUUUU5XnUUU%}U5XkUUUU?;UUU5XUU%}U5XpUUU06UUU0*PUUU0%}6UUU0pUUU1UUU5]`%}UUU5]pUUU5]pUU1X%}UU0\UU0\UU0V%}UU0WUU>0WUU>0UU%}U>0U00UUU`UUU`U%}UUpUUUpUUUXU%}UU\UUU\`UUV8pU%}U>VUU`UU`|UU`%}pUU`8UU`U%}U`UU`UU`?U%}U`UU` UU` UU`%}  UU` UUa !UU*eL%}UU*eL@UUeLPUU*a P%}!UU*` P?UU` @UU` %}UU` UU` @UU` PTU%}Ua PT!UUeLPTUUeL@U%}UeLUUa !UU` U%}U` @UU` @UU` @U%}U` UUa UUeL!UUe%}N8UUeOUUaUU`%}!UU`UU`UU`|%}UU`UU`UUU`?%}UUU`UUUUT?UUUUUUUU%}U|UPUUUUUUTUUUUU|UU@>UUUUU%}UUUPUUUUUU|UUUUUUUUUUUU@UUUUUU%}U|UUUTUUUUUUUUUUUUUUUUUUU|UUUUPUUUUUUU%}UUUUUTUUUUUUUUU|UUUUU@UUUUUUUUUUUUUUPUUUUUUUU%}pppO+O0%}O@%}AI"#["*#` -JL -JL!H fJ {p h` 5J H fJ%}hZJ bJHVJ^JhL& 0DT  @{` $J $ $J & $ ]&Y (%}J ) $J $ $LfJ$ $ W (W ' z7 !5-./E012EGHIU# "  %} #  U K 'QYo^Q$ U\ZU=>%} {  # txxttxUG  >AA99  qBwxAG}~G}%}cggcҁcSWWSҁS ^bb^ҁ^ ҁ=RVS%}=~<Q# ..i~i~hQ"\5>>::Ԁ  1LLHHԀ%}  QZZVVԀ   100,, ހhhdd ހ U77((/\=.UFGBA/\\/USTNN/\%}\/U`_mm/\?.[[WW6::66 ?Nj[[WWBFFBB ?Nj[[WWOSSOO ?NjLLHHOSSOO ?FNj>%}>::6::66?Nj>>::BFFBB?Nj>>::OSSOO?NjQUUQLHHLvy}}yv:}v ׇ;;2%}  Lj||{||db}77JJ88H{ $tbbPP| $tOOKK&} ppoo((''?Nj?Nj?Nj&}?Nj?Nj?Njyyssҁ%%ҁ&}MMGG?&Na__YY ?Na==77?NaTTNN]__]] ?NaFF@@]__]&}]?Nassoo.==.f}- ׇ''%%7==77?Na''%%.44..?Nahhdd ?Nj&}cc__ ?Nj]]YY ?NjWWSS ?NjPPLL ?NjIIEE&}?NjCC???Nj??;;?Nj::66?Njajmd}` ׇaa]]&} ?NjSSOO ?NjEEAA?Nj7733?Nj[[WWgkkgg &}>>::gkkggLLHHgkkgg ҁ%%AEEAҁAKOOKK&}?Nj[__[[?Njlppll?NjLLHHBFFBB ?DNjLLHH6::66 ?DNjHM& }G5MBSG5M=X8^Y6_77=3cY6_77=.i(n#ty :>HLVZ :& }>HLVZ :>HLVZOHSAIE :>HLVZ,0dhOHSAIE :>HLVZ,0dhOHSAIE :>HLVZ,0dh]G& }aOHSAIE3J7 :>HLVZ,0dh#]Ga3J7 :>HLVZ,0dh#]Ga3J7 :>HLVZ,0dh#]Ga3J7 & },0dh# ##############& }(/fm#o:s%<'(7AFNS_m#o:s%<'(7AFNS_m#o:s%<'(7AFNS_m#o:s%<'(&}7AFNS_m#o:s%<'(7AFNS_m#o:s%<'(7AFNS_m#o:s(7AFNS_m#o:s(7A&}FNS_mW[:>#o:sHTL(7AFNS_mW[:>#o:s%;'HTL(7AFNS_mW[:>#o:s%;'HTL  &}(7AFNS_mW[:>#o:s%;'HTL (7AFNS_m#o:s%;' (7AFNS_mo:s%;' (7AF&}NS_mo:s%;' Ȏ(7AFNS_m (7AFNS_m (7AFNS_lX )7AFNS_&}lXȋ)7AFNS_kXO%*7AFNS_kXW[: >O%HSL*7AFNS_jXW[: >O%HSL&}+7AFNS_jXW[: >O%HSL+7AFNS_iXW[: >HSL,7AFNS_iX&},7AFNS_hX-7AFNS_hX-7AFNS_gX.7AFNS_gX&}.7AFNS_fXP/7AFNS_fXP/7AFNS_eXP07AFNS_&}eXP07AFNS_dXW[HL:!>17AFNS_dXW[HL:!>G17AFNS_&}cXW[HL:!>G427AFNS_cXW[HL:!>G 827AFNS_bXG 837AFNS&}_bXG 837AFNS_aXG 47AFNS_aXG47AFNS_`XG47AFNS&}_`X57AFNS_`X57AFNS__X67AFNS__XQQN8T@&}9FQ N8T@9FQ   FF F&} F F FFWK[:L>HMLFWK[:L>HML&} ȆFWK[:L>HML ȇFLWK[:L>HML!ȈFL!ȉFLR"R&}#R#R$%%& & &}' (K"Q H(I"R)H"S*H"U*H"U+H"U&},H"UH S,H"TL S-I"RL 3".J"QL 8'. 8+.& }d=h6E:d=h6E:d=h6E:{$|%d=h6E:&!}{$|%{$|%-0 {$|%-0 {$|%-0_>c;D? &"} {$|%-0_>c;D?N {$|%_>c;D?N{$|%_>c;D?N{$|%o+&#}p',(N{$|%o+p',({$|%o+p',(s3y4%{$|%o+p',(s3y4%Y?]?CC&$}{$|%o+p',(s3y4%Y?]?CC{$|%o+p',(.1s3y4%Y?]?CC{$|%o+p',(.1&%}Y?]?CC{$|%o+p',(.1{$|%o+p',(.1{$|%o+p',({$|&&}%o+p',(S@WEBI{$|%o+p',(S@WEBI{$|%S@WEBI{$|%S@WEBI&'}{$|%{$|%2{$|%/2z&|S'؀/2LAPv&|&(}S'"؀/2LAPq&z3''݀/LAPm&v3!'+8(JLAPP)bh&r3%'08(JP)b&)}d&n3)'48(JP)bb&j<-'78(JP)bc&f<1'78(JP)b4'78(JP)b8&*}(JP)b8(JP)b8(JP)b 8(JP)b 8(JP)b| 8(JP)b&+}x! 8(JP)bu$ 8(JP)br' 8(JK*OP)bo* K*Ok- K*Oh0&,} K*Oe3 a6 ^9[<&-}&.}&/}&0}&1}&2}&3}&4}&5}&6}&7} :>HLVZ,0dhOHS :>HLVZ,0&8}dhOHS :>HLVZ,0dh]GaOHS :>HLVZ,0dh#]Ga :>HLVZ,0dh#]Ga :>HLVZ,0d&9}h#]Ga ,0dh# ############&:}##(/fm#o:s%<'(7AFNS_m#o:s%<'(7AFNS_m#o:s%<'(7AFNS_m#&;}o:s%<'(7AF(7AFNS_mW[:>#o:s%;'(7AFNS_mW[:>#o:s%;'  (7AFNS_m&<}W[:>#o:s%;' (7AFNS_m#o:s%;' (7AFNS_mo:s%;' (7AFNS_mo:s%;' &=}Ȏ(7AFNS_m (7AFNS_m (7AFNS_lX )7AFNS_lXȋ)7A&>}FNS_kXO%*7AFNS_kXW[: >O%HSL*7AFNS_jXW[: >O%HSL+7AFNS&?}_jXW[: >O%HSL+7AFNS_iXW[: >HSL,7AFNS_iX,7AFNS_hX&@}-7AFNS_hX-7AFNS_gX.7AFNS_gX.7AFNS_fX&A}P/7AFNS_fXP/7AFNS_eXP07AFNS_eXP&B}07AFNS_dXW[HL:!>17AFNS_dXW[HL:!>G17AFNS_cXW[HL:!>G&C}427AFNS_cXW[HL:!>G 827AFNS_bXG 837AFNS_bXG &D}837AFNS_aXG 47AFNS_aXG47AFNS_`XG47AFNS_`X57A&E}FNS_`X57AFNS__X67AFNS__XQQN8T@9FQ &F}N8T@9FQ   FF F F&G} F FFWK[:L>HMLFWK[:L>HML ȆFWK[:L>HML&H} ȇFLWK[:L>HML!ȈFL!ȉFLR"R#R&I}#R$%%& & ' &J}(K"Q H(I"R)H"S*H"U*H"U+H"U,H"U&K}H S,H"TL S-I"RL 3".J"QL 8'. 8+.&L}d=h6E:d=h6E:d=h6E:{$|%d=h6E:{$|%&M}{$|%-0 {$|%-0 {$|%-0_>c;D? {$|%-0&N}_>c;D?N {$|%_>c;D?N{$|%_>c;D?N{$|%o+p',(N&O}{$|%o+p',({$|%o+p',(s3y4%{$|%o+p',(s3y4%Y?]?CC{$|%o+p',(&P}s3y4%Y?]?CC{$|%o+p',(.1s3y4%Y?]?CC{$|%o+p',(.1Y?]?CC{&Q}$|%o+p',(.1{$|%o+p',(.1{$|%o+p',({$|%o+p',(S@WEBI&R}{$|%o+p',(S@WEBI{$|%S@WEBI{$|%S@WEBI{$|%&S}{$|%2{$|%/2z&|S'؀/2LAPv&|S'"؀/2LAP&T}q&z3''݀/LAPm&v3!'+8(JP)bh&r3%'08(JQ)cd&n3)'48(J&U}h&r3%'08(Jd&n3)'48(Jb&j<-'78(Jc&f<1'78(J4'78(J&V}8(J8(J8(J 8(J 8(J| 8(Jx!&W} 8(Ju$ 8(Jr' 8(JK*Oo* K*Ok- K*Oh0 K*Oe3&X} a6 ^9[<  ($$$ (,,0$  ,,,( $$$$,,&Y},,$$$      (,$ $,,4,$$$$ $$ $  8>>>>>D&Z}TRTTRT|?>@  =&[} @```aa?``~`&\}`?@87  8` C8<&]}x| x pp  |x<0``߁߁o&^}o7????8pa n8p?????8TTTTTTTTTTTT88D&_}D8?uUpuUpuUp?@@8lnk;x@@ ;knl8&`} @@xpՀ`ppX\\VWWUUuUU``=`&a}`00 `00pXXX XXX5XuXuXXXXUXUXUX&b} UXUXUp5W5\5 0`` 0``@0xx00&c}000 // @@ppppp 8((&d}````  x? `0`p``&e}p>80 `F80@x p~00~p pبppبppب&f}p 0d`0LFNN0` &ff&TTTTTTTTPPPPPPPPPPPPPPPPPPPPPPPP`````````&g}``````q?```````?es x} TTTTTTTTU&h}@Q@Q@Q@yypp  $(,048<@DHLPTX\`dgkosw{ #'+/37;?CGKNRVZ^bfjnrvz~&i} !%),047;?CFJNQUY\`dgkosvz~ "%(*-0369;>ADGJLOR&j}UX[]`cfiknqtwz|  "#%&()+,./134679:<=?@BCEFHIKMNPQSTVWYZ\]_` &k} !""#$%%&'())*+,,-./001 $0JJJJJљ &l}LދL`LҰJJ`LǠ(#eDžȪ} ދȠ``0eDžȪ&m} Ƞ8`Ǡ LLx $$  &n}w %/7?IǦ ݅Ǧڅ$0pPȥۥ pꈦPȦ&o}ۆ$0누ɠ҅eǪ}ɐW}ĄɐOӠ҅ӽ䄅Խե $03eܐ'ȱeېǥمɽԄ$0pPPZ&p}ܐHR`8eܐ8eېǥeمɩ 8Ԅ$0pPܐ e  Ԥɹc$0 &q}IiLW֩ L/  $(,048"3?&~}1=iȱȱȱȱee) Ѱф$L0 "0a 9Li ȩ@  L. &}눩  ӏ$0R0( i 4i ) Li 𩀅8   Lꌠi ȩ@ &}鑙ȥꑙȥ둙ȥȥȥȥ$Lf` LӹҠҍȱҍ `йѹ@z >&}VȐА  ] ZȪ`ȱЅȱ)ԥ 8ԅLύЅȱJJJJԥ )`$p&}Lйѹ@zЪȱЅ1"ȱȱЅJJJJ K )`` Ъȱ0ȱ)&} KȱЅȱJJJJȥ  KL`<eji()  8 ύ` 8&} ύ`$P $Pp$P`; 5%1=`1=;L5%ə/ 5%!2>"3?`&}!2>"3?/L5%6HHBpp I nf Б  gL\ <ǩ -' c ␠ &}8 A āݤ I`)`) f`j****`` Ɛ Ȉ Ɛ` &}hhhhL     L鐠 IɈ`i!ZWL5%^Hpp, w  &} L y8  犈qة8LGѩӠЄҩթԘJfХԑե&}ީ"H!hiǢ+Ƞ#H#hi(ǩȠǙiǥidK ӗ"&}L搤 ߗđy?z芙ꈹ@zH ( ) 5) &} X ( )8 $5)% (ɱ (6)7)ɈL$5)  vX5)8穔 |`&}q  犈qL $H ( (L$5)6)7)ٓݓL) " " "&} "  x&/0`0'e᪆⼄ؔҎHh&} ҠȄ`T T $0)6惥йѠЈ f&}L얥Ō fЂ) G) L) DăaŀS @ȱA *02Ō& fă&}нѽБƃЛ`Ĩ ȱ ة ĨȄK&}KeeĐȱȱ iei` Ĩ;ȱ ä‘Ñ&}ăŀ f` Ĩτⱄ±àȱ Иȱј L &}L¦æ  Љi`KFڌKNzKVևK^f`?0  &}  (8@@0I1ЩЩD`Щ$ѩҩӠґӥ+`Ԇՠԅҍb%ȱԅӍc%ȱԅȱ&}ԅȱԅȱԅȱ8`ґЈ0VБ҈0MQБЈ0B$%$%$&&` "/>IIINU $)#eׅй#iѤL$8e&}مҥi` $&%m%-%f%ع#8eׅй#iѤ٩QБнQБb%8eٍb%c%ic%и҆Ӡ&}҅ȱ҅ȱ֪҅%Iȱeԅȱe۪eՅڽ%`@ #н#ѥؤL"&EILI&%צԽ#н#&} I&ِ`QБڐЩI1БڐБڐQБ`I1Б`Б` % % %Ԑզ &ڦL&` % %ِ&}` %åĤՐ֐ ڐ ې`Ԑِ8`-Ijj` $҅Ӆڅ膆L5% ' *' &L&JJJ&}i )`  e``8Hh`äĤŅL& & & &0妍`L&Hȱh 9' 'ɐ&}ȱ'ȱ'LFiвŋŊ & &L' & & &0 &8`+ѠИЈѥI`HеѹԹ&}hҵ` 'եӐҐ ֠ґԈְ`ґԈґL( 'Ӑ Ґ֠Б`Б&}yi`yy`8Ǖ`8``7)6)5)`$ 8i:3)i)4)3) 5&}%ǹ6*8m7)6)7)`ۆܠ0 ()L((*Ypp`````p0`p0pppp0````ppppx&}pppppp`````<ppp&}ppp000000pp x000xx0000`)) &&}M-f>f1ffle0f80eȰf8*l*jʰj&}܈"*UUUUUUUUUuUUUUUUUUUUUUUUUUUUAUUUUUUUUU&}UUUUUUUT   $"$ $ $  $$ $@hK U _ H$_