IMD 1.15: 15/05/2007 8:50:03 fog hak 018         -FOG/HAK018/HAK#018DOC )FUNDTRNDCOM[ !"#$%&NECDSKL2AQM'(OSBYEZ2HAQMxWSPTCHDDAQM4 WSPTCHDDCOM WSPTCHDDDOC! /HAK#018CRC*@,FUNDTRND.t|!"n͖* d  =""6#}|B=!"n "}00-!~G#~ }q+ph##a"p#w *o"o"o"o*o*o*o}!a6#6#q#p*o"o*o|`i"o* ,X5 }HƐ'@'_ ERROR $ AT PC $"DM6#6#!"*{w#zw!">2DM}|*ڄ"^#V{^#V{_zWڄ{zҾ*w#ww#w###s#rq#p#!5#ʄOM+F+N*}|!"~#fo{z   }|~#~#~#O~G!}|*##^#V}|?s#r##q#pw#w#~w#~w7!N#F#~#foho}|p`i}W:0!9BKÞ DM!9͞ !9! 9N#F#͞ ͷÖBKw !9DMw ͖DMw !9DM! 9DMw !9DM͖ͷͮ>'wڮ*oͿ #~'w!o~w:o=82o!oìo͞  og bDZA}2ox2oiOG>F2o!or#ti`)!o~'w#… ~ !o +» #?µ! < !o=> pT]w+ ~w!ooG# !9DMË ͮË DMw !9DM*!9DMw !9DMͷʹʹ*Lͷͫjͫ!9DMw d͌ͫ! 9DMw !9DMͷ̓j̓ë͌̓ÅDMZ!9DMw ͼ !9!9!9DM w :oз! !o!o5q!oow+) p!o55 po + + + + + + 'm P'> 'm o g"o`ioâ *o|• ɵ!oâ ~#~#~#~#~#~#~#~#!o'w#'w#'w#'w#'w#'w#'w!9~A 6/OGͮü @PP"ò*o!9~w{_!y+##!o2*o  |g"o!HU >'-lw# M>@2o2o o͋ À*%*o§o*o"o>2o:oWw !o:ow o͋ w !oo͞ !o:ow:oW!o2 #6= x>#w| DM!x& y), )2 )8 )> )D )J )P )| | ʖ zp x)yOxGyxڈ GyO#=t ogeop p )ګ #£ OÍ U `i!:oAOw# $q#,:o!oVoͿ M>uog b!o< o!o{7>' #i +>'w#>'w #†:o2o !o~PM:oM6!o~ U+w# @ }6w{2oo!o~#!o~#!x  {? )܏ A 0 l&_K|g}o 1 D &l&Ï "o"n"n*n*nn "o!9DMw !o"o:o!2o:o¡ 2o>NN:o#+ $ ͔$# >$:oä * ͔*# >*ø . ͔#>.¸ 2oS - ͔# .>-¸ >oq#!o"o~#M/Go*o +#4?MGo*o'w# :!o5*o#  og !o~ȯw+6+wo:o<2oOF!o 怮w J_#~ȓAPw>2o`i"o2oo*o>'#>'#>'#>'#>'#>'#>'2o2oOS >2o+ \͔̔ä 2o3 > 2o ͔#2 ,H >2o2 !oq.d >2o͔#d X !oq^w ͔j !oq-ˆ >2o͔>2oo͋ :oO 2o2o!or#§ :oʵ =2o:o> â :o :o!o67 y@G /%2o2o2oow 2:o2oGy@w:o!o>_ >_ 4!o5<2o:o!oG:ox :oOxGxҢ oW?< =… z` zg !o~ʢ bÈ :o :o!o:o :o >-G:oOW* $ $ :o!o  Oz $>$*͔*>*-.͔#.>-\͔̔*o++!"oã:00!{~Gwog:00! !*|ʲF#N#íN͊# x£ ͊U" p2pz͐*o#"o n  >2n:pi2 p2oGWy:oʩ—:o—:o©×:o2> >0> 2oog b!o~2o6:o@2o!o lr6!op2o/O!o #~ ʌ y2o=/2o:o>0é:o=!o5:o2o!o~>.:o!o/:o:oG:oG2ox:o !o52 p͛~"G͛8͛~">2 p~,c͛W* pF:nʔo&##a6#nGw#‹* ps#r:n#ʥ: p+~ʷ"¼:p !oq~!n w !orimproper input - r:o:oM>E!o:o'5~ 2/<-Gyx/ : Gyx0:o^2o2o:o:o2o"o|ƒ:o~W#^#:o¬zʢ~# Ò|~:o2o>NS"o"o:o/!&\͔͔̔ʳ/͔âeenter $F^|,##ap#q#w x"s#rFlxG! w#w^DMl^DMl*oDM*o}|ڄODF#N# "o͍go͇ ڧO͊o&͇o&}2o&E{2xn&}!9>OU"p>2py2pw# ͸I g :o> !n4O:o3* YI Bg >2n> #> #I ]g :o:ne> k͎b͎B!o:n=B2o!o~5*o~+"o0G>0 0:o:o:o+2 p2p0 +#-&>2p00#.U: p/2 py˜00+:p=2pCEʞeʞ<lyGʊ :p2p҆xÊ: pژ:p<2p0+y0 ʞG-_ʷxº0<G0<OxG{G:p@*pwɯ2py2p0+->,*o:o> >-*o|*F||>2o~G#N#"o"o`i"o"o|!#a&Ê/ʈ&ʈ!ʈ\Š xŠ2o>UN. xV"o*o|¨*o"o*oñ+"o*o~#"o2o*o~#"o*o|+"o> ĸ"o!o454!>:o#/!&$ ͔>2p)DM)) O 0<:p+z/W{/_s#r:p=2p~#0:?^#V* }||~!oN q!o ^!n!o n&*hp"o*hp!4#Ìzz2pzW{_!p5ʔ*p| |g}o"p*p|g}o"pg*p*pDM*hp;͞"jp*jp"jpBN|>>>)=; a"hp;p#z  *hp "op"qp}#~!np>w:up2p&!p58Ͱ:np2np*jp+"spñ*qp"sp!np~wX͐͞"op:np*op~F *lp|jRE"!9"|p*sp*op#{zڬ"op:np*opn&:np͐͞"opâ!nj , Gy2 p#*lp|Fn!"2upælp*hp$ ~#$*hp lp w#* kp~#DF*hpr+s"lp:up=|!np~@w"xp)|{>(>NF|ʥ~¥#~#ʤG*hp:ʨz6#> 6 #=®x:ҥw#2pP .2pP p !j"!!p6,!p6!n"pD2p!n"p2p:p AF PÀj!pk x*pw#"p!p~w:pw.d# ]7*}:p>*}>2p6?#`ډ{҉_:ʤ*ʤ?ʝw#:pڬIF>?Ø*jp*qp}O|Gr# x*qp*op#{z"op2p;3͂z:p*hp!p|A> s#r~#fo1F#NyOxTA*lpas#rr#sTF#wzJFFA>"s#r*lp|F …!np~ЇwWR"ͦ*op*jp{_zW{z<Ͱ=¸ͦұ!np>w*|p*zp|DW"G:ox *lp|~w:p*hp!~w͒C*hp!^w#Vw*hp. s#rͱ>;zV|EX*xp)pw#w>p^#f|OEk2p;3͂zzڮ*hp!:~ʮ!~wͭ±MEk>p s#rkp ^#VzFU"hp*xp)>p ^#V"zp *lp"~p!9"|p*~p|ER"+"~p͐*jp"op:np<*hp! N#F p+q*opw!np>w!9"|p}:oj>"p:o>"Ëj ËL :o>,:oڣ>"p:o>"j L :o*~p|++> +|> > *hp!0np  :upRB="RU"|IR"+DM*lp\*jp{o>g+{z_yW͐!*hp s#r!np~w"opzr!!9"|p*z*z+zzһ!!9"|p+z+z*vp*jps#rͦ*hp!0! ~! w#w*op+"op!np~w*|p*zp|EFkp ^w#VwzCU ""hpͦ ͐ͦͲzc EX>p w#w;!È p)~#fo, *p#"p{zu kp ^w#VwzDU ""hpͦͲz EX͗c !9"|p!;͂z<FR"*hp"p!;͂  z<3!*hp *p~# !z;*p"hp;!;*p"hp;!!;>2p͂*hp 6?##6?!"p_*hp~ʆ!=_"o<EX]"o<EX##FNz!`*jpO yŷ!~##!!!~#!!*p"pê!;2p*p"pDM:p=%+~+ng# :p_ "pa"p*p"p)"p*p+F+N ##6# xI&~#fo#:p_ og"p:pù&2p*p+V+^"pÜ&*p*p"p*p+r+s"p*p+"p|‚&#~#fo#)og"p:p=q&*p*ps#r:p=&B, &SQi*w ʹq͋ w !o~G)!*|p$PY$ |L"##a"p$%%Q%Q%*p! 9SLzʦ"|ʰ"$PY$y_xW¼"xʋ"‹"# x~"Q%Q%ʠ"ڢ"ɯ>$ʋ"7Ë"$ʋ"7?Ë"zË"N#Fy"x+B%|"~l$~ws#r$"n&Q%AC wo!O*o|g~xY*ܴ>q͋ i*ʹq͋ qw q̓qͮ=#'Ë B, 2q w '͖' ͫq!a*͞ 2q>+,q͋ w ͼ qw }q*!*'ڻ'ʹç'#ë':qĂ(Ë :q}UË CbQYDesB, 2p='LN>A !a$q++*zSS$yx/#PY##a"p$BK%Q%*p|$++Q%zSS$yOxGڐ# ##a"p$BK%Q%*p|~l$DMx#z#|~#+¼#Q%!$yOxG#yx#PYa"p$BK%Q%*pSS!"p+w ʹ+q͋ 2qq!=+͞ ʹ]+>,q͋ pw q!+͞ 5+>,q̓qʹq͋ :pAO>h(/GZi*ͮ+ʹqͮË q͋ a*w ÃB, :W zw e+ͫ/:oҧ(m+ͮ:o(ͮ/(ͫ(!o~w:o:)q͋ m+̓q͋ ʹ+>#!o~2pw2n9$j *n&##axw#q#n%:p2o !n4^w|~l$$j$a~c$~_w# xY$$! a$BK%++"p|!"p$$$`i ##a"p$ x$G*pp#z$$%*p+|"p$Q%*p|DM~G#N#zw#,Ë B,w m+ͮ͋ Ö(B,w !o~>w2q:oAI)q͋ q͋ ^)+q͋ +ͮq͋ qw ʹ>+,:q!owË *ʪ)&q͞ 'w ʹ!9DM͋ T'!9w!9*)DM'w ʹâ)*)&q͞ 'w !9DM)!9w! 9*s#x%@-% %y&%Ow# %yOw#w#w#w# -%^#V* }||~!9 ʄ%%~#fo"##Î%Æ%~#†%=`%`i"p^#V* }|Ҷ%*pw#w}%%>%>2p!p"p!9N#F# y2p &2p+~+ng# *ps#r#ʮ)DM'w !9DMʹß)~NE&q!9͞ B,͖(&q )B,w &q̓B,Ë 07HWgtA1A@P\d5bEHyed"BA1PYTAE(('@ @@I@hfffff?hfffffA>533333>=ii<0$;9"sU':9"sU'9BT8!%8hxVg 7"hC60w  YEG417Gv@`v'b1AAPX#C`QI"U&Àe(HBCTbDvRWaGv"C%T$a'ÙH%Csrb"(HdA1AAXS&YA1AIy&cypt dYd?Sh&&iyv&3uF=84SY592xXT(E133@P5D @cbe@(u?Bp6W>W"f(@E3Sxq͋ a*ͮq͋ P@P@P@P@P@PNEUTRALUPDOWNNEUTRALUPDOWNNEUTRALUPDOWN.VARIANCE IS ZERO - CANNOT CALCULATE STATISTICS@p3@0f9THIS ROUTINE WILL CREATE DATA FILES THAT MAY BE USED WITH7THE OSGRAPH 'XY' PLOTTING SOFw a*ͫqÃp͋ %,ͮpʹ! DM=,q Ĵqî!9DMB=!"n "}00-!~G#~ }q+ph#?EDaEDa000303060811131619212426BW0CPR6CPR9C`R6CPR9CPR6BW0BW0//=)(vWSPTCHDD.ASM[  !"$#%'&o()*,+.-/1032546798:<;>=?@ABDECGTlmAPEDaEDaTo continue, press RETURN.??MUTUAL FUND TREND ANALYSTWRITTEN BY J. P. HANLON####.#####.##-##.###-"HAVE YOU USED THIS PROGRAM BEFORE?NYFUND.NAMFUND.DATDATE OF LAST UPDATE: %ENTER DATE OF THIS UPDFIHJKLMNPOQRSUTVWXYZo)/s_t|pi]*gXxKNlJqC6-@.l̳)-/iR͞-@n(J ,go)~N^.[gDgO3?KxKͫ9R,1-KATE (MM/DD/YY):SELECT PROGRAM OPTION NUMBER:*1. ENTER CURRENT DATA AND DO FUND ANALYSIS2. UPDATE MARKET INDICATORS3. VERIFY OR CORRECT DATA4. DISPLAY FILE DIRECTORY5. CREATE OSGRAPH DATA FILES6. DATA ENTRY ROUTINE7. END ENTER CHOICE:)DO YOZsnQ\EJLm,-5JxK5Y3?vdwVҖn4tu*]].JxKY=Z^.bAs® ,kaeO-3R:[ܩH|_B_s y~YX=y)0yeO懾؇Jڒ}-̢,e@C0yeO懾W:vT; R90[U WANT TO PRINT THE ANALYSIS RESULTSY4CHECK TO BE SURE PRINTER IS SWITCHED ON AND READY...ENTER S&P 500 AVERAGE 8AT ? ENTER CLOSING PRICE, 'SKIP', 'DIVIDEND' OR 'SPLIT' FOR EACH FUND MUTUAL FUND: ? MUTUAL FUND: ?SPLSKIDIV@P@ g#e@/ʞJ-G ({*9(P3"e@C恿ʏё]vw[90ۡfEʀ҃)G Ő:6=53n凾W: Iy)J> M}#i?1I,0ㆶsy6R4}Rf!u$u!mz|'!)qf~{\O ͡f IuH+7%GmhOʀP ]`\~NH*4G=  C}Rt$4u=vHiVEa9\4'e@ ]'~>fۺ候?hN*0"e@[恿:MTC`oɟO:Zةn6,R4| L$LR;if[ m6KZESgzֿ*v sq Š,.l )f]P̏ע+=LRWLm*OMsmpOs$u!mz;9p'η? (Vo *?-&͖p܉90pϼNvncZgorTxŘbʶsIuH+S%sNoρ`B|M 7y苣\9p'{w2os`FQ4f9k_=T7F^$|4V1tC_x9B|e_{xx]80<]@<ע1CuwsdyTy`Ci^MS=ϑ:MMh O 8?H}EnSe-MMhKPr0[ Aܰa#pkw"wğutމ.z9]*^vrbDSNWW?Z)gϑݥR[ǵbh'n;[:?N]vJ=Vm6ķ́1u]*9{ .:;S 2 mYf]v v-j.r1SwC۹m,+E{:́EX.b,+ES8s` F.9ÉeHA"uÉYۡ1jowu*ۡfz&-Xou5M|综i^gbnK^gl3?v+ҍX]y e}RhT_is`1s`4f`Ks`mT7Fkanj9ٛ,A%-K ho%> \G (+ lud>ovw[iu4N Uv D9_k*j ΁;w:s`N/_C~N}w {o^dEQ9P 90p,x('ωsǪc?qVIn]ZEVEՍѐ WW)J[!dw/pUכՍѐ Gg%깞 @Â:x~YK9Pe0!ҚWڷsO>900JB=|)4;J?}@ucC;q۹u;rTuxCۺ90SNvncdw3%90XNvncZg<9]*;>O3_"g΁y e}ݥR~Efc//́U}y .zs`Uu NvncDYANvJ=U/uv:e:_n-c*cձcv_s7bVEVEՍѐ _/ΡPUv\pWڷsޅρUiE-ӟx\kEțs5kolzbgߤ.zssք4Y\́h΁1\Gms> __ELDՍѐ Ǜ(ڥ@ωB!|}kOwMω;w:s`  ND@][YneT7FC/` 3K99R_n5Cu^dE_xN a |n(aKu99po@ &|Vo7qH } Ѕρ5=|)4;ܱρ1\;_Db,{o^dÉh́{fɟ5;'y;V]&|n^\[Սѐ w8u]*_omRIל.[+f(5up _z~[$NxKy~/ϧ]*^!ߗ|%w#NݥO=}s`Nti@]*9]*  Sn?:!ߗrDWzݥ蚓ݥR[s`79ɧ[罻s`Uyosy9P|xKyg_ŋ ޮ yi90SXuǵ{Ԇ/~ыVoȟՍѐ __עs90PM%Ҋ&9K%iss`L?]/`">Z׷~o%x+Y=s$z˭֒_9RG7p!퇾ThG;GRwՂ4Mc8u?&|fX c~m~Z3k[9191z~OaE.}il)Vr՗{/Ḿ-Gm?NYb6^R~Z;?;ܱ?ݣ6|Mh3k[9Q@uc4/&vi?905='ǩA/k%|os`KJssD,wXu1z,@uc4x;V]/ ́1\GmgI(Ջ\O ́h΁1j[cv\ۤ5ρ1\;@N۹@=w} p_=|]'~nyT́VW׬۹m*zI[~[96=f׶ϙw|JB>-o_#bsʎ!Y%Q\|.C)4'sǪc?quia܋H9P 90p,PIT(;́;q>_$*i%Jx7q́9M9h_ dI[_6U*cuc[s]M^Ioe܉2~DY.>5-KƢVѠ́;q]՞΁#QcMRu4(ssǵ{ԆU&~N9P 99pU~<_il39xti<:4m1uvJ=[ww G7G/2N#ܫfn186[ʳ&N~;}{*]].~>έ= ǩro9K90kSms`5vnwx*H: a7H[YA7;a;!tk3]Zx7!/z{3:zɟ߰2x{3:zɟCa RO͜HL5u9n5u4aţCw w99Vu37u.\ʳxz:Y% TJZ{K\ʳ;XSop99^uU˝ksU9Ptcײǵ{ԆU&~N9P 99pU~<_i N\;* !O"!3+~Z +~O###q#p!6#?s#r!6#Fs#r!?!!N{w #¡!d"j!"h"|"~\<!"\*"*}|\    WRONG!$ ERROR: FILE NOT FOUND, RESTART AND TRY AGAIN! $ ERROR: READ BUFFER OVERFLOW, BAD SOURCE FILE ? $ ERROR: WORDSTAR FILE CORRUPT OR VERSION IS DIFFERENT FROM VERSION EXPECTED BY PATCH (SEE ABOVE) $ WSPATCH REV 1.0 TEGER ISTST(2) !QIO IO STATUS. INTEGER IOSTAT(2) ! C COMMON /BLOCK1/BIGBUF C DATA FLAG1/1/ DATA FLAG2/2/ DATA NAK/"025/ !ASCII NAK. DATA ACK/"006/  ERROR: WORDSTAR FILENAME.EXT AND SOURCE DRIVE MUST BE SPECIFIED IN COMMAND LINE. --EG: lWSPATCH B:WS.COMm --TRY AGAIN! $ WSPATCH REV 1.0 ERROR: TWO FILENAMES GIVEN IN COMMAND LINE, SOURCE FILE MUST BE SAME AS DESTINATION FILE. --TRY AG WSPTCHDD.DOC -BLINKING CURSOR FOR DOUBLE DENSITY WORDSTAR- NOTE: WSPTCHDD IS A MODIFICATION OF WSPATCH FOUND ON -FOG/APP.005. SEVERAL CHANGES WERE NECESSARY TO MAKE WSPATCH OPERATE ON DOUBLE DENSITY WORDSTAR. SEE WSPATAIN! $ WSPATCH REV. 1.0 INSTALLATION PROGRAM FOR WORDSTAR PATCHES: -BLINKING CURSOR -ARROW KEY RE-DEFINITION FOR OSBORNE CP/M 2.2A-00F & WORDSTAR 2.26-01D ENTER DESIRED BLINK RATE (0 TO 9) 0 IS VERY FAST, 9 IS VERY SCH.DOC AND COMPARE ASM FILES FOR DETAILS. WSPTCHDD.DOC WORDSTAR PATCH INSERTION PROGRAM DOCUMENTATION The Wordstar patch insertion program 'WSPTCHDD.COM' installs two permanent patches into theLOW BLINK RATE ? $ **** MODIFICATIONS COMPLETED SUCCESSFULLY **** $DEFINITION FOR OSBORNE CP/M 2.2A-00F & WORDSTAR 2.26-01D ENTER DESIRED BLINK RATE (0 TO 9) 0 IS VERY FAST, 9 IS VERY S Wordstar main program (usually called 'WS.COM'). The first patch causes the cursor in wordstar to 'blink' whenever Wordstar is waiting for keyboard input (which is most of the time), this makes the cursor easy to find on a crow !"" INTEGER ERRLIM !ALLOWABLE NUMBER OF ERRORS. INTEGER FLAG1 !EVENT FLAG. INTEGER FLAG2 !"" INTEGER COUNT !TEMP COUNTER. INded screen. The second patch is a short routine which is only invoked when Wordstar is first started up. This routine changes the 'arrow key' cluster assignments to those preferred by Wordstar (as opposed to those preferred by   CP/M and almost every other program which runs under CP/M). The second patch performs exactly the same function as the CP/M 'SETUP' configuration utility menu selection 'F' (arrow key toggle), except the change from 'CP/M' to ER'S REFERENCE GUIDE CONTAINS INSTRUCTIONS FOR USING MOVCPM.When WSPTCHDD is used to modify WS.COM on a 58K system it uses memory from E800h to EC00h for the cursor blink routine. If you try to modify WS.COM on the original 59K system 'Wordstar' assignments is only in effect while Wordstar is running, when Wordstar ends, CP/M is warm-started (booted) and the assignments resort back to 'CP/M preferred'. Changing arrow key codes in this way prevents the proble, part of BIOS will be wiped out and your computer will do strange things. WSPTCHDD can be used with any system smaller than the original 59K system by changing "NEWTOPFDOS" in the ASM file and reassembling. See WSPTCHDD.ASM for details. m of jumping back and forth between Wordstar and other programs such as 'Cbasic' or 'ASM' and trying to use the left arrow key for back-spacing, etc. To install the two patches into Wordstar using the program 'WSPTCHDD.COM', put 'WSPT Boot CP/M, if not running already, and give the command: WSPTCHDD B:WS.COM The WSPTCHDD program will then be loaded into memory. It will identify itself and request a 'blink rate' value of 0 to 9. This selects the speed at wCHDD.COM' onto a 'system' disk (any disk with CP/M on it); put this disk in drive 'A'. Put a disk containing the Wordstar main program 'WS.COM' (or whatever name you have it under) unprotected into drive 'B' (never use the orighich the cursor will blink every time Wordstar is loaded and run; '4' is a good compromise value. When the value has been entered, Wordstar will be modified and the message: **** MODIFICATIONS COMPLETED SUCCESSFULLY **** will be dinal copy of Wordstar). IT IS NECESSARY THAT THE WORDSTAR DISC IN DRIVE B: BE RECONFIGURED FROM THE ORIGINAL 59K SYSTEM TO A 58K SYSTEM. USE THE MOVCPM UTILITY ON YOUR SYSTEM DISC TO DO THIS. THE CP/M REVISITED SECTION OF THE OSBORNE USisplayed, if an error occurs, WSPTCHDD will terminate and must be re-run with the source of the error corrected. Because the two patches are address dependant, the WSPTCHDD.COM program may not work with future revisions of CP/M or Wo  rdstar. The cursor will always blink while Wordstar is running except during 'timed events' such as the delay between the entry of a two character command and the appearance of a 'help' message at the top of the screen. This progra4 CHARACTERS. CALL WTQIO("2440,5,1,,IOSTAT,IP,IDS) !SET /VT100=TI: C WRITE(5,2000)IOSTAT(1),IOSTAT(2),IDS C2000 FORMAT(' ',3O6) C CALL EXIT END C C********************************************************************* m may be run any number of times on the same Wordstar file (for example: to adjust the blink rate to a comfortable speed). When the patches have been installed successfully, the SETUP utility should be run to ensure the arrow key function  C C SUBROUTINE WRITE: WRITES TO DEC DISK. C C********************************************************************* C SUBROUTINE WRITE C BYTE BIGBUF(256,128) BYTE WBUFF(255) BYTE CR,LF,EOF C COMMON/BLOCK1/BIGBUF Cis set to 'CP/M' and the correct printer function is selected on the Wordstar disk.  rate to a comfortable speed). When the patches have been installed successfully, the SETUP utility should be run to ensure the arrow key function  DATA CR/"15/ DATA LF/"12/ DATA EOF/"32/ C K=0 DO 920 I = 1,256 DO 930 J = 1,128 IF(BIGBUF(I,J).EQ.CR)GO TO 915 !CP/M END OF RECORD. IF(BIGBUF(I,J).EQ.EOF)GO TO 940 !LOOK OUT FOR CP/M LENGTH OF WRITE BUFFER. CALL WTQIO("410,ILUN,1,,,IP) !WRITE FINAL ACK. C CALL WRITE !WRITE FINAL BLOCK. C C999 WRITE(5,777)NAKNUM C777 FORMAT(' *** ',I2) 999 CLOSE(UNIT = 1) C SMC2(1)="10 END OF FILE. IF(BIGBUF(I,J).EQ.LF)GO TO 930 !IGNORE LINE FEEDS. K=K+1 C*** IF(K.EQ.256)GO TO 915 !WATCH OUT FOR BIG RECORD. C*** WBUFF(K)=BIGBUF(I,J) GO TO 930 C915*** IF(K.EQ !TERMINAL TYPE SMC2(2)="15 !IS VT100. SMC2(3)="50 !SLAVE, SMC2(4)=0 !NO. C CALL GETADR(IP(1),SMC2(1)) ! IP(2)=4 !SEND .0)K=1 915 WRITE(1,918)(WBUFF(L),L=1,K) !WRITE RECORD TO DISK. 918 FORMAT(255A1) K=0 !RESET COUNT AFTER WRITE. 930 CONTINUE 920 CONTINUE C 940 RETURN END   v*OSBYEZ2H.ASMx  ! "#$%'&()*+,-./1023456789;:=<>?@ACBD N'/Ǵ,pWU\W_HdN\rqKvYpE\?RT:98XF+Ku5s0q4_ǍW:9|.\pnÏg\vX/EN9/0x) g p~=s]gWE55Ý#p2(T;,[U-p ̢:GzU? o` sbg^. :`{)RtEFGIHKJoLMNPOQRSuTUWVXZY[]\^_`abdcfhgekjilnm;-,D:rqpsvuwtor&407<9KHQsӇS8a%RXp/EGzU?^S{)sW,E-N[װX>uSܒ 3or 2%pq/Euv rn ~L9]G{hѽՂ;S] _vEܢc˜pnN9/էBX\8Gy8pt{sljIwE-kqQsgn9%&pS,(\8O8#K\ L-#>x0 sgNpLKTw{[VcxuӪP YVbJrr%;|V+(K8c&3,LW71-٩b W_g eWk,>+)08fE?R[ʭ:ba&_:s?^Ĵ*(Dܸ)^\3xbȋ>〫V {)]\3Õ^!/vp+ \~/`̲>>&>u%8|V"qU?"'[,=5F=5ە ?§dk: ߔ_ө7Jm?5TG,Aܢ瞅Ù%Hle[ Lj&A}xϜէEpWd N?|E>fD~N,9d~|+Ep9 X`K8eqݢ/Lqlj/ub~:1'fWJ盖Wv޷]̚t'q~puKVe:}QUEy ޸$xmQh+{bvwbvoKp?^Wuͮ6jiݑ/S\W[V 98n V9*XwF~ř\ ;'S. &˔e8 &nU$0ع*p.`Q{\8Xs71vK?..[9 7+g3EPtg8+ DW!+rQ`E-N`[+0*`W0rvq2~ %\q^} vS-"<[ pAb'Kp|]S9$S`a˖ ݅|E-.8w .qJGLy8gj105,NY|KvZ\P(8Sg XپfSTj$EHЙNm]/gÏSwȸLyru%[!xD\WgS +s vjUp(Μ " *>Un#b[a8ߢWp~+\UI㲓؅pEWdpnQ8[?Ϊ(d ؅F8+ E-]gW`qϝ&D2g-YV?%\p8KuQ8u U'k$#X)O /̬,«/s)rKvru%[SȜ~ g`sL/޳pZ^p\ 8aE.X.X^mXp \3ÏE4]S.sE-NA^\Nϝ ~ qr5,㱶  )5]G{URw|ap"~TU]EQUsuq؋&NaL &Îɰ8T#. $0 aܪB~gl۳_){"ˢvIYtmN?'MnSZDEZ?-t'xoH',jG;eϮɪ~M,Qkdʕ۶Dsy}fH',j~_ngu$/*NiI΂  p.U/|8^A|v~?<~΂lflju&_G, ?C%HЩ ǪLgsU;Ni7eQϦKG{u6;gS]Ys5F=eQgS]Ys2kLD_i$YkGtf~M먦otRgk:jUN_O!NQ8̹^\ƹf&Δ8~I1XRx9X\` \E*tjۍ{Ku5s0UN_gSn')ֹιf&*"tj {Kbk`E}4'|YE}5ڣė":9)0iN. BVwHgSn;|k̳e_){"jty{}dg&+4UNiI*4$H*_i$I$+ mcf:]o{k:+ԙh:Mwt<6T6|e~M6Q#ݴ5'&>Nwm~\U"`SNA!pD [.+^ ViNtJkHOGR4  4'F7Mɾ?m~fSաT'3|V+ 3lq8p?^\3/vMgG;i_өZ= `QrW9 '~Mgk/Xe'X+Μ~rS;n %wq[fS{yD@\TkMtj|؜rJww/絇>_ө)g,q#!_5tjng" %;/?K=ݝѼF {?_ʼn9t{|4f8C=D4;iXۯyk*g_gzhUO٣d~C*~k:<[X{_T?ZhԎWmz NObRZW^t\OM{T'?IPo/Q_Qx}/E'y*bnWuҥ۾^}?4SMt܆o$?ʼnEvҾ"œtQyUN_'>Iw,KzoGz4'Ƿ2Qa )"|ۋ"Iw,KzoGz4}?êL/u.v;ouRSIm_/>멩~OtD' Eq"t;jH$=1Ve:}QOVyBԢvR}˳Czjڟn>Mz"8~NRx/6ϰ*"'eIuRHOF$UU&3la0U [{#=nT}LηNs9*#L,~2YArqNSߒIPXpߒ.iio͒2W~Umczgo͒rqzyUh61l=Нo͒vqzy#Jfr<=n'շ ʞD)˻Fm.jm'ͺw6y({PHOohOQ?U]K{SoO'v(  IBSL>Qz[j_ɆO'z+WvrƶM.)rSuyOf[r_#6z"㛝Djѥ~[ToE&vDXTRZԓڊ?Q?L](Nʾh>{.mjlN4=J{Օ)Mw5f{rh^M]7dzn+.hbuehJgYۤjlr&Ҽm&~!`pS-`9y+" +8N!s ps٢;Y%8Xș |JN8wwl9yP2afaW?¯ة'_qIew?4eL$)jWY~[%]!^M+VR6b?D65^~7HSYCdIe۟t{o%GˬKr/Kyi]fM'5][idiӲ}Fi]!Nٴ3=>ԿsV ?}O ݳ_q(=_N꯲De~/Kt*SBEMg?㪺+FqZ{g p .A,30YS3 #p&Q`<۷g"PA-qr w7B\Dh&Gv;+г^;}~ pzQ3X°#= vN?pe3l6f]eVp*r2[3J_qIew?4n&jPZI\/x~jg~M% TG479jLyn ?7ޏKr/KyM4+~γtoqH3~M% <&Nm]/46te'G$_ v6QUEt~hk:.ɽ,neKvoKC%ۯmFҽޛ ?/)=iU՟۵~n|?_YO#=J~M%m͆a˜pnQ-jqg`a2LnlbSȜSܕꢻ2sIJ0X-ٰ#=\3;&>y-jqNjl͞'ߒ]R-)E1ɕ#%zlppxϜS`)bGŰ#=+G+Euq8fÏ/#|,i_qIewGT%6MbNz#^;Of]ѵKk7B, yFFy6BA=s7 n+D,[-jB&,AܢdeǓ7]!r1A슝5,% q") ?%8p c20%U8$"~Te (tR" |<~s>`c Kx-jqY8)0Xg0v SܒZ\ΉBl։G e%sN`ŧ(tN e9ra0?3cõ_|KvZB5˖s2`XG`pKv n2,5)0õ_ ?.:&XDxpnQ3Z/^_.[Yqgװ8a]u %ܢf508 |NعSpe-`9y+"8QA-q9AwwZ!qJWn5)9ܒ'1'cs` E#|YC_qIew?4<~/8NpL]MV\W_HdN\r6oMڔ瑆Wfu5s0qE}`ggj9W[S6%yW>fk:.ɽ,n瑆50 %\9G, 5%k ~Cnt\{Y# %k֔y.<~\U~lj;E-.swgL>n nQ;[YN!_2juWxyE-0w9AÙ%#"N %ܢT/%\`(W\%8~}""QE}pp瞅Ù;?6;Y/3" d8qŁ\]\3S8a#Jٯ$*JMey˒I 2=41/'i;v寗Qd?aװ= 3c 2[}N"qU"~as[֧S/PK(ÉqKȲj+:NY ?͒VKr/Kc>  , #|&dz:'g-|PkHO#HBgέh/+^ ;yXV#[) ~LȎE ^} d`p1l=uI䗋_ϛT]6v]ț;J- 9ʖ ˊ&n L!X1 ш=_ϛOecnNϛhbCvhmYD+-eJ P?jS[xl3<> 8r\v:X.8ja'Էn8nq,;f98]ݕ-V8K[m+YÏ jF>&>Wq[NYWk,>+8cc+v258rZIPW,DLXܢ'E8p,WV;@Y(5ƌFG,MGˡ*zx"lr&^lrROLMMU]/M<?dF.gb!$U- D>YϟԚ~^EG1QK ?(xa2l}s 330?G߷_qIew L:s,b{k9D'ۢPOD]O&~g?Pkh61'kom5%kSk#dz \p j&,̳ƌFGm~)Yr]?LV=Q!` NÄ́֘y#VE-ɊsHl䂻%E-gg~]|V+dx :;:p"``/ , ܪ 劝, 3lqeXՁᜐ3q,J;X+ 2wwqYv\Ve) _fEۥN9,U?lbŲmv;%{/\ fGq.ZClGS\ʾh>{.mjljT2=v;\|:⵳t|Q/?km8#gg?N`)ɳ5b`p.nQ9 ?m+#8ܢ'8yP,N@2safeKǿpR ' gwasg/W`-ٽԎ +p>8Aena +pj pᅻ,%e*q nÏZcW~# 6G# GU/<Nϛh.ٲmr/~ߊXYTpp%#E4Kr/K?Ұ{9y,&nN` ,G/-jqKX,>N$R`rq0x98#E-ݢV" ~o4~M% T2=v]  {Ч4~+ G-!zrh^E^lPe*7Cwor?T2={M{zrtjzy=%G{Ujƌt6zt9sYU͆.fjګ{Օlѣ˙H{UjGSuyOf[r_#6EE7;EEfJҫR ?V!`s,GS 3 Lb gY3%OY#|QfKOZm&rb9K%:ڹ֘YLr[,T2=v-uj Sk,\q`pov*+,9Ǯ+SHk73Q!`Sa  +jg[?3 Jn%;N,KXjmrf"pNAqj34M`Nvpp^ju>y8p !_Ddm5%kSk'"~on*?jg[?f9730 y8|rϚXFβ[px53QY|E5Sܳf"β[px5>g-; ^p\ OQ2XJsQ+ay֕?3=I!X|38Y.eF!t\{Yq3/n5`+_\/8.HOQ7XJsQ+Zm"'T[{5PƌRmg"'Sߢgk)&&^js +lN󽟙`3Uv*if&*r ~qBaC1lcg{\A-dlje C1MNL\D8| )#N-摆)<½j( Ϻ}q\A,BoMڔkJ֦\ORE "dk:.ɽ,n#dzay֕ZcFzO4 f?T-+_8[YvpsUnJ-E#m~[+'=ݟJNtW,re2L[Ƀp^p`E#֘IoX=7-ѭ$(ob}vH7G$?DD,+hJczuCn,֘L }Lj!_3n>(Ī35^~?3=5fȶ+3K A\ݢf05fȶ.'Y\"ESn3=v7 [{͓z21ۭzy]j禇f5HOFZ?<ц?=zbz,z.g~Gy|,UV Ž /8-jq 㲢+*%׮]>|V\MU4 jC&r V\Ezj80ŗ_q0sePe4Q)) gY-A8~-v Gp %#.sE-ggZuÏX0O]~Z3<%<5P qrZk,,~+G`Kx1)9E-E%E- (:÷+ }FV5+ |X^퉡lNA^#-jq 㲰8n %w j+ZG)~M% ~?W|lthi;b?j?L^=wz+;9j~mty}[r,F!Cv?=4G~,p8S` qZ\s2`.'\ԈGѦ;~M%"~Ɯ顎M<1l1( %HߢS G\.1[+Jp-)9e9xQ8IP/fL~?4{M1թ5PN8#D',uj[_BvXNvh7Qs,Wk,I=Em6zt9s1t9'΢ry}gyRO&w;ڮvm6zt9SOLE,GzbzymVDngz=Emѣ˙zbz~.'!]C#xdzA8, dW0rrE-N߇S8ap'ܳ\ɃpXeʅc b'Kp%ܢSȗ  }xzoE# C_qIewO%C9ѨsQIl;ej~?Cgs9>sQ^/PGg[UmPe5f6ѣ˙zbz,z.g~?CsQ^/PGT2=tZ  [ϳiCZcFz?Fz5f6^'>OI^OaUwnWuҥ۾^}?4SMt܆o$?z{Q|?ݎZk'{)R~DKr/K֘Io~bh#;7;$ONf"v)jڜE~oggmr+!+Y_ɑj'?I+9|#)mD' f^'>OI^OaUE:Cַ:tEglT'j]Mu"gQo/Q_Qx}/E'y*"nWuҥ۾^}?4SMt܆o$?z{Q|?ݎZk'{)Rk|?I6D]VBV>%I?'l?5^~7SuN4j%1l=Ϛxʇƌt||">ɴ=5M[m]/ϮGĿT>45^~7HCڔkJ֦\bq+!+%;GpJX# lfaNܒB5υxʇfi(Yr#S, 5%kSORfw [L)oU~M% Gzܨ:ws%U~aUdݮhf7Ҧ;?4}m7Ҧ;Jl6Eq"t;jH$=1Ve:}QLs1ۙm};CHZNozyy\OM{T'?I68~NRx2(&+^ vU!]jjQ;y.<~{ Gܒ ܒWGMjk:.ɽ,n#tyR6?ة'&$qK,W$Cs=F=nQ3|*2I٪k*W V]BvJN 8Dupk\.87^hb$fQ[u )9qnT#8Npzjϣ.p͔ƭ+VOlT&VߪKNɉs 8=ՙ!{Cs=DOmh&=IB٨ʼnEvҾ"œt7[ٯ$6ϰ*'eIuRHOF$UlvW(ϰf^gcUNdݮhf7Ҧ;?4}m7Ҧ;Jl6͞|?ݎZk'{)R멩~OtD' fDONl6͞|?ݎZk'{)RQʽ9Iw|6l=5^~7C1MNb  euI=Emo?gIMMueyn}]PZIvÏx}!|_ٯ$]Ni?L].&]i;SovZY6zt9jk7-)5>V 9'< vmÏCԘۯ$#dz?١OiB3v7gMەƆǁ?3M̉F[|wHCڔ瑆,?/*U}OItu Pk̐m2Qsrq ֘461ɬƮtIm؉QLL=1=?]N顳gS]Ykg⳩9$]CgsϦ~?C격v"ٹtDg.I= 4b{mQKH~oz_'&겱jbh{:y6?Ϣ礞ngG#夞:{6Օ5v&>ʚORLL=1=t=l+kGI=1=I7lNl蕝\Ӗ PkT=my.nGߖƮD}d̚tx'Nh7sQn\OռvC1%x+OȒz'z+G{6zt9Qo!6t9г9uvȶ ?[jt\{Yƌ69isQ*d ?zS Gp-ٹUSݪO%C׾=?3=t94G/Sr9Lwιg)<ËsgT2=t]T2={&PkHOgG3?bݢ /Ν czuI%Su7?3=0ca%шhqWj[o%$d 65^~7cZ_i?ѣ{"kMueYO?R=7y?y#Jk|oSu쵝Ӗ{J+iC1#=ß#LL=1=?,gxqKvZ[~چj~M% ~?W|ʲSO&wʲ/Jov*v 2=H~?L]WDnWY=Dfb?D?Onר]DX^+c([.8w&,ַ.,M؉ݮ|SR>~dN[)1l=K4M[sRZw&#V[DXŹ3aM7t\{Y y'v;{R}z^{e"?^v~=mSuеwK+;VoC1Si}-?3oMMU줨tbNoKIM7Ţ"gzL  QEEۯ/ѷ%zxJHYE$?mZ/>{~)j%?rZ\qq S{t\{YGT]N"dznv?ϭ_qIew?3GJ֦\6SȜ[ays=빘wڵ~*MD*~6Zcl˔%k G92t\{YLQgەTJ~{viS.OIEs,޷~ߊt%ZcF9Ѩ]{kކ6qVr˩ߢ<+]r?L-WpV. 8~4_:"ܸ}JN8RwK?2t-`9|s8l9Q(SK t\{Yy(NMU^eor+?驕wc۾hن?ylMivməN1'5l:YJF.gZu?Yt99>zx)ob}6*M'k_~}d vZSMl˭ND'rVeĢO%ӳ/P_wU{Cs=L+D' OΪL>nWvrtE?yq SSxE,T65^~7C1MNyiL9/5%kSkdU''?I^W&Z?kLgVzѲ&ʬ=Dv"DZBUL~}^E_RTy(N vw7LitR}"=Hv]7.se'tCl_gov'c>CT6֘&'mb\79۶{{ix1A)\ap9bQ:%ܒyIMdYR{SKJٯ$GCǎngzHۆ?驕DmrFORdz- ]Ï#UN _s`ESȜ?gU~M% TnGߖdFO"'gU&XTL9eWpB, ljՁ%?U]ݮ46:cO⟜*&ގлyq S8y8B]ĜE^>~k:.ɽ,n#?]N顉JSJejPGm_7BLl_g:$CT6֘&'mb[Wzvoj:U9mlt\{Y@y({ϦdWfQ?U]K.ۧ۵~tbNt;M%?I&6e"{v6d5?yGXBJ6joJFXrG\\s,+>ySuص4,Lݢ'ϔ  "Ӊi"'1 x8- ^.S.Z,' ϳe-jGyn3GMD8X}N\LUmlt\{YO%#_&Z-a/nQ;[YV ԿGa|5{?'ֿc,r1-jqP*%p K p2X-jqY6?g5fdH6=X]R_ǰ%d|TPkhi(YygT2=ҚOq&z+g9٦5f.3}(S8|S&.o \hb5fdH6_R_MߡBl_lczkYIM2Qm֘lĪ??OQn}~M% ~.L}24_KkV2;4uWUk  [{-ZcFz?رJ"S}O,ʾ4KCL$$^U{ÏQ't\{YOecnGߖn?*bk8YA[E"L0W65^~7~?'~eQ;ө5G;DZc [{ͪ|#mn֘3ڦ;?maI2l:s6zt9uWMGCv+# re8XĽ nibJ|-kXOmX` ~$c~M% yebhtw&<=EE^EyO,*j<=EEt9.'Mܾ+\⨷<[6dz[~Umѣ˙zh69C52rrQ"jtFvmCԚͶßNXCL$.tjѷ%gG3IÏZc7R?&>ٳ2NL$.vdۧ$UT2v4J7?¯|ek:.ɽ,nZY'wg?ر?UVcbrJL0>ZW.Ƀ3[GP(Ot\{YGi=m}*?=9Ѩm?]5ٲgg4Zц?LSXu>k%UF.g52?US\o-%lX¢>%GUٯ$ƮΞT6Ͳ癘l;YՆ?(U~yרmFyß&>TўT]'N~Ld ~i~M% fuZ5vFihOQ(m_Hh_Q5]ힶ=Em)j'F.gbiWi{Kr/K5f*lhQ}{kJ:cGA]i?ISim=9}F.g"횮vOt9MW $!45fTmlDm̹]OygZMTAY蚮vOў y({ig9ra0qKvr|sq\8ɃpX'0. ˔ 7UKr/Kt9Fө5gsdWmC1C;ͶʙN9ڑfßN؉mI"vĢG}N  F.Gd | 㲰8x9"(^#᳂Ï#֘!>~?|O|m_nn$OQ::هRc<?]ےS T]6NvhOy-y:{[ttڵFRmczzY^⾟=?رg=K4?{6Xom6lZ8;Qv= $ꦇF.Gy[?4W{ß$D8A:W!3 K :U"QWRmk:.ɽ,nԿGlD쐇k|k:.ɽ,n겡jbhoKLӖbO[ hĞļkԮC(O[Cs=$?Wi35^~7C1co=m7}rQ\%' ꦇ&Rrhǟh{?kSj}i T2=vMn'Yr]č-yLQ7=45^~7\OڟnG;jU4!&z]{Nmty,Kzoho%Cs=5Z=1ʯcYR{*3#nVQCOecĶ}?رNn$!&79{>D}dD쐇?63l:6#}n3v*.'gg{V'Ͻ7]qq SVN8$sĢt0G~M% <K7ޗ[Y<ߦ?4L^^ngu62gι2 ¹2pKv⊃Ec0HS[ֵum][ֵum][ֵum]?=رhGMڵ~(5G~_\˹+1d?¯z~M% ~G~ ₰#[N8#c gܲB񖓫|e=sY.H2YV|n.S.ʥ~?3Dj ћoژ(?Zc7R,ғךT5Peiv.vdۧ~OectbhoKEzp,}#:O ~?Fln(յDT9>#H2`YPE-ܙ.f7Kr/K1l=5UI>SHk>=Kr/Kdzu hĞ7y( $!7#dzMDu={_͆?Y^T?3=ш=5IPG7'IY?(SpnQsgyFnz~jWWU{O$vG-͒VTNt&G'NӖM*:?] ?4׃cHߛ\ɑTi?IS|'O{ǰשuѧR#ۺ79:4{>oSuеXvButSkcmc#mÏ𫞶ok:.ɽ,ngG3 ?jC&r+ܢ'WN _sr%E-~٨~M% ~.I_lL֜5'?yߓ{DoeC1C;i7z3J]/q[un'O{|TTǰj ?%i' w'6h^jM[_\{zHÅ#[8|"os]ek:.ɽ,nG#H'O{$=ܞ}?lDkt!&T2=tSًmsޛkٴPkHOǰv}?yGo#MloO)9S6?y=d_RTRSuص47UߤßNP?VMdVlnoBǰ+<oٯ$Gß+X(\W/,lٯ$GßyNi5!# w#cSrps8|K8ysdt\{YOyy&O[ToECs=<ʛX_{oTTL,*z:ˉF mSuN4j%֘ ~UIKr/K֘لu?4M ix@ ˖sg^;[\x#M[ٯ$JsQ+ƌt?1'k}V]CZcW6NpₓaG' PkoyJ* pZ#nw-#<-jG\Ap">7nLH'O{=oC1#f{>o||$Cvӎ4Kr/KS Կ 5fd#G)Uv?3TL?=ʮ#{>o||$CvS2Etk:.ɽ,n#t9ʮz|Tv=I_v֔Mj_iD;y NVN` +ܒݢ pN!`K< - ^ ?XlQ 2L'-%ܒݢ Vr˅MNq+pdB65fk̶ htS'sjʪ֘Ml+z*R ~C1MNDs٫6# $sw2\V;o]?L]7jFkn)A n#|_B_qIew?3G_- %\!Sx瑆wn`EpEuWkk lr&*ÏiG=m_qIewÏ'O{$=S3¢hfժ+~+tKr/KdzjC1lcƌFL+Ϊpg0Q8ɃbqHlo||$CvGF65^~7=SOY겡k 5Pfo=m'== G*%p SP3r1ɳbF.nɊ W1" d™}JKr/Kyp[hbuVo \#|t\{Y_Ʋt\{Y_F;Ͷۯ$Ov~M% <~eKr/Kyԁˌk:.ɽ,n?uGճ_y"ٯȦMۯ騆Z95Uçٯ鼼F_yql~M߷_S _z%fㆾT"~MRr>lU|F.g52~ᳶ)A_qIew?45 վ8k#K^;xqnbqr^^N@sTWARE. THE FILES WILL BE 8NAMED 'MUTUAL_FUND.DAT', WHERE 'MUTUAL_FUND' IS THE LEFT:8 CHARACTERS OF THE MUTUAL FUND TITLE USED BY THIS PROGRAM .DAT-TEN '.DAT' FILES WRITTEN FOR USE WITH OSGRAPHLISTING FILE DIRECTORYSTANDARD & POOR 500 INDEX  1 - 40 41 - 80 81 - 120 121 - 160 161 - 200 201 - 240 241 - 280 281 - 320 321 - 360 361 - 400 401 - 440ETHIS ROUTINE ALLOWS YOU TO VERIFY OR CORRECT ITEMS IN EACH DATA ARRAY!WHICH ARRAY DO YOU WANT TO CHECK?1S&P 500 INDEX DATA12NON  E, RETURN TO MENUENTER YOUR CHOICE...THIS ROUTINE WILL REPLACE ALL DATA CURRENTLY IN YOUR DATA BASE#OR CREATE DATA FILES IF NONE EXIST.@IF YOU WISH TO CHANGE OR VERIFY ONLY A FEW ITEMS, USE THE VERIFY OR CORRECT ROUTINE (MENU ITEM 4)>DO YOU WISH TO CONTINUE (EN 40 WK -ALPHACORRELATION (R)BETA"COEFFICIENT OF DETERMINATION (R^2)INTERPRETATION OF DATA:40 WK 15 WK 5 WK E6>>> SUPER GTL METHOD OR AUTOMATIC PLAN SELL SIGNAL <<<9>>> IF NOT NOW HELD, AVOID REGARDLESS OF MARKET TREND <<<FD>TER 'N' TO GO TO MAIN MENU) (Y/N)? NY&INPUT ALL DATA WITH MOST RECENT FIRST:@(MAXIMUM IS S&P 500 INDEX + 10 FUNDS WITH 40 WEEKS OF DATA EACH)ENTER S&P 500 INDEX DATAENTER NAME OF MUTUAL FUND NO.: FUND.NAMFUND.DATENTER DIVISOR FOR SPLIT:>> SUPER GTL METHOD SWITCH SIGNAL OR AUTOMATIC PLAN SELL SIGNAL <<<9>>> IF NOT NOW HELD, AVOID REGARDLESS OF MARKET TREND <<<F0>>> WARNING ! GTL MAY TURN DOWN NEXT PERIOD <<<FC>>> CAUTION - CURRENT PRICES HAVE DROPPED BELOW LONGER AVERAGES <<<FE@P ADJUSTED FOR SPLITENTER CURRENT PRICEENTER DIVIDEND AMOUNT:@P ADJUSTED FOR DIVIDENDENTER CURRENT PRICEFUND.BAKFUND.DATFUND.DAT#PROGRAM COMPLETED AND FILES UPDATEDUPDATE MARKET INDICATORS:8ENTER CURRENT GROWTH TREND LINE>>> NONE OF THE ANALYSIS CRITERIA MET. WATCH CAREFULLY FOR TREND <<<FEINTERPRETATION OF DATA======================FTOTALSMRepresents the sum of the prices for 5, 15 or 40 week periods. May be usefulKin considering the sensitivity of the ave SUMMARY [U(p) OR D(own)]UDU;ENTER CURRENT MONETARY THERMOMETER [BU(llish) OR BE(arish)]BUBEBUEANALYSIS DATA FOR  AS OF  (CLOSING PRICE - $)FTOTALSMOVING AVERAGESSTRENGTH OSCILLATORLAST 5 WK -LAST 5 WK -LAST rages to price changes in the nextperiod.MOVING AVERAGESPRepresents the 5, 15 and 40 week average prices for the current and prior weeks.NThe 40 week average is used for buy and sell signals; the shorter averages areͮ!Nq!NqB>!rqZ%*rqm *rq+!U  $*vq+ $!,*vq+ #!͚#$!!xq!q{ozg|go*tq$!jq͎!jqþC>!qZ%*q!!͚#!q͎*f the relative strength of funds.ALPHANRepresents the annualized price movement yield in excess of the average market(S&P 500) yield.BETAJRepresents an index of the volatility of the fund's price relative to the Lmarket (S&P 500) average of 1.00, q!!͚#!q͎*q!!͚#!l$!q͎!!qGCÃC!!qͱ !!qͱwC!!q͎ÃC!!q͎,!q@ !q ,!q@!,a $!q !q͎!q!q E>!qZ%q!,͟ !$!q͎,!q@!,y !q !qi.e. a number greater than 1.00 represents*volatility higher than the market average.CORRELATION (R)NRepresents the degree of correlation between price changes of the fund and theMmarket (S&P 500) as a whole, i.e. the higher the number (nearer to 1.00͎!!qͱ !R!qͿ3D!!q͎?D!!q͎![!qa!qcDq!q!q͎q!,͟ !q͎,!q@ !qy!q͎! !qD!!q͎!!q !q͎!l!qy!q͎!q̀$!,"!q̀$"!,"!q̀$"), theJgreater the likelyhood that the fund's price will move in concert with themarket"COEFFICIENT OF DETERMINATION (R^2)NRepresents the percentage of the fund's volatility (risk) that is explained by"movement of the market as a whole.n!,"o"q"*q*qPE>!qZ%!#!,"*q#"*q#"m!q!qdE!#m!q!qE!#!,"m!q!qÚE!#!,"m!q!qE>!qZ%*q*qÈ!q͎!#!-"m!q!qE!#!-"m!q!q F!#!-"mo!,"o!".q!"0q! "2q!"4q!"6q!"8q! ":q!,""q!"@q!"Bq*.q#Dq"*0q#Fq"*2q#Hq"!#Jq"!#Lq"@B>!VqZ%>ͮZq!,͉B!!bq͎AZq!bq#m!!bq !bq͎*Vq!bqAB!!Zq !Zq͎!r!r9F>!rZ%*r*rÈ!q͎*rm! r! rÙF>!"rZ%*&r*$rÈ!q͎gÈ!q͎*&r{ozF*"rwÅF*"rm͂È!q͎!r!rF>!0rZ%0r! -@ "8r!":rF!"r!>rMG>!NrZ%*Rr *Pr!- !"Tr*Tr*Nr!Fr!FrG>!^rZ%*fr *dr!- !"Tr*br{zG*br"8rñG*`rog"`r*brog"8r!"hrG*Tr*^r*Tr*`r"Tr*hr#"hr*8r}|G!Vr!Vr"H>!rrZ%*xr*vr!-"r!-"!!È!q͎!-w!!#! !\Hr"*rF$!-W"WL_*rF$!-W"vLF̀!q͎+L!!͝È!q͎!-!!!>!"hrL!*r*hr)n}*hr#"hrҧL!, !-!!!>!!rn}!!rbr*tr!*rrPG̀!q͎!jr!jrYH>!rZ%*r*r*r!*rPG̀!q͎!zr!zr?I>!rZ%!"r*r*rÈ!q͎I*r*r*r G̀!q͎!"hrþH͐"r*r|ʷH I*hr#"hrҦH*r*r*r G̀!q͎!"hrH͐"r*r|H I*hr#"hr/}!!rb}!"hr8M!*r*hr)))h}*hr#"hrGM!, SÈ!q͎! !!- F̀!q͎*rwB!-͖>ͻ!r *rL#++++++++|ʹM! !&͝È!q͎F̀!q͎QMSÈ!q͎!!!. F̀!q͎BB!͎!..w!͎!Z.w!͎H*@q|…H͙"r*r*r*r G̀!q͎*r#r"*r*rðI!!!!-q*:q\Hr"ÛIF̀!q͎!!*>q*:q\Hr"*r*HqW"vI!r!rI>!rZ%*r*rÈ!q͎*rm!>-͖!r>ͻ*rr"*r*rAJ>!r!w.w!͎!.w!͎!.w!͎!.w!͎!.w!!!. F̀!q͎!!! !\Hr"*r!r͎!!r!!rҤNF̀!q͎ùM!r+)N~#foNAf]j\WZ_1n!"rSÈ!q͎!!!.ͳIr"*r!#F$!$/W" Z%*r*rÈ!q͎*rm!A-͖!r>ͻ*r!r͎!r!rZK>!rZ%*r*r{ozg+"r*r*r{ozg+"r*r*r! G̀!q͎*r*r#*r!G̀!q͎*r*r! G̀!q͎*r#*r*r! %H̀!q͎*r*r! G̀!q͎*r*r+*rO!"rO!"rSÈ!q͎*r|POB!'/wBBÌ!q͎!!͝È!q͎! !!]/ͳIr"*r!r͎!!rƒOPO7Q! !͝È!q͎!!È!q͎!v/w!/wB!)"s!-"s!("s!"hrQ*r|+P! !!/ͻ*rF$!#!/W"uP͸b*rF$!#!/W"PQ*rF$!#!/W"©Pc*r!r͎!!rPO͞RW*s("s*s("s*s("s*r|Q! !͝È  !q͎*hr#"hrO*r|)QBÌ!q͎*r|4QmùM!!s͎!!s͎!("hr2R*hr{zQ*r*hr)))*hr+*r)))̀*r*hr)))̀*r*hr)))̀ͷ͛*hr+|Q*r*hr)))*r*hr)))̀!ry*r*hr)))̀ͷ͛*r*hr)))̀!s !s͎)!s !s͎*t*s*r)))̀*r*t)))̀R!s !s͎*t#"tU*r*s)))̀!8sy!r !@s͎*s#"s!!sͱ!Hs͎Hs!xs@!/  !xsͨ!Hs͎!! sͱ!Ps͎Ps!xs@!0  !xsͨ!Ps͎!!(sͱ!Xs͎Xs!xs@! 0  !xsͨ!Xs*r*hr)))̀/!)!s !s͎*hr"hr![*t!!!>v*t( (}o|g#"s*t( "s!"t*s"t$\!*!͎!4wB!4w!Z4wB!4w!4wB!4͖>ͻ!"t *"tF$!#5W"R`ùM*"tF$!&5W"e`.`SÈ!q͎!)5w!Q5wB!"s!("s!!È!q͎!5w b!"hr`!!È!q͎!5m*hr*r*hr)!!#!5ͳI" b*hr#"hrҲ`tͅ*r*t)))̀͵*t#"t*t#"t*s}|[!, *t#"tҐZ!!!1 F̀!q͎BÌ!q͎ùMSÈ!q͎!1w!1m!(͎!1w*r^#Vm!(͎!2w*r^#Vm!(͎!2w*r^#Vm!(͎!2w*r^#Vm!(͎!)2w*rt!5"*tC!|+a*t!!!>?a*t!!!>v!"hrea!*r*hr)^#V͕*hr#"hrHa!, t!5"*tC!|ʝa*t!!!>ña*t!!!>v!*r͕!*r;!*r;!"hra!*r*hr)))̀͵*hr#"hrG^#Vm!(͎!42w*r^#Vm!(͎!?2w*r^#Vm!(͎!J2w*r^#Vm!(͎!U2w*r ^#Vm!(͎!`2w*r ^#Vm!(͎!k2wBBBÌ!q͎ùMSÈ!q͎!v2wBB!2wB!2m!͎!2w!"hr^*hr!͎*hr+*a!, ùM!"t!"t*s"tmb*r*t)))*t*t!5Ì͛*t"t*t={zfb!"t*t#"t*t#"t*s}|!b!"tÜb*t!͝È!q͎*t#"tҁb*s("s*s("sB!d!xs͎*s#"s!5͖>ͻ!sL*s"tGc*r*t)))*r*t))r^#Vw*hr#"hr]!2m!͎!2wB!!!3Ì"t*t {ozW^ùM*t+|*t {zs^ñ]SÈ!q͎!"r!'3w!e3w!3wB*t+|»^!3w!"s!("s^^!3m*t+*r^#Vw*t( (}o|g#"s*t( "s!"t!"t)̀!sͨ͛*r*t)))*r*t)))̀!xsI!6  !xsͨ͛*t#"t*s}|b*r*hr)^#Vm!6wB*s#}o|g"s!6͖>ͻ!r !!͝È!q͎!!͝È!q͎!!͝È!q͎!!͝È!q͎B!d!xs͎*s#"s!26͖>ͻ t!3"*s"hrû_*t*tÈ!q͎* t"*r*hr)))̀!!!3ͳI"t"*"t!#F$!4W"|__*t "tÆ_*t"t*t={z_!"t*t#"t!! ͝È!q͎*hr#"hr*s}|_ñ]*t "t*r*hr)))*t*t!4Ì͛SÈ!q͎!sL*s"tkd*r*t)))*r*t)))̀!sa͛*r*t)))*r*t)))̀!xsI!J6  !xsͨ͛*t#"t*s}|d*r*hr)^#Vm!R6wB*s#}o|g"s!j6͖>ͻ!r !!͝È!q͎!!͝È!q͎!!͝È!q͎!!͝È!q͎!  *r!#6"*r!!͚#"!6"$t"*$tC!|Re*$t!!!>fe*$t!!!>v!͖ *$t!6 "&tt!6"*tC!|ʤe*t!!!>øe*t!!!>v!*r͕!*r;!*r;!"hrf!*r*hr)))̀͵*hr#!8m*r"*r*s)))̀!hsa!hsͨ!R?!8m*r"!@s̀!͎!8m*r"!ps̀!8͎!8m*r"r!psX!psͨ!R?*r|ʣj>ͮ*r|ʱj>ͮ*tL#|@kB!9m!͎*r"!s̀!#͎!9m!F͎*r"!s̀?! "hrGe!, SÈ!q͎!!!6 F̀!q͎BÌ!q͎!"rSÈ!q͎!6wBB!!!6ͳI(t"*(tF$!7W"*(tF$!7W"ҪfF̀!q͎_f*(tF$!7W"f!"rf!"r!!!"7ͳI*t"**tF$!#!_7W"**tF$!9m!͎*r"!s̀!#͎!&9m!F͎*r"!s̀?IkB*tw*r|ZkBBB!J9wB!c9m* tm!k9m* tm!x9m*tw*r|ʟk!#!9"wps!hsͱW_*r}/o|/g{ozg|k!9w!9wB*r|kB!#!9"w>ͮkps!hsͱW#!c7W""gF̀!q͎f**tF$!#!g7W"Bg!"rHg!"rùM*r|Xg>ͮ*r|ygBB!#!k7"wÅgSÈ!q͎!n7m*r*hr)^#Vm!7m*rw!7m*r"!r̀!7wB!#!7"w!͎!7m!͎!7m!8͎!7w*r|_*r{ozg|Cl!9w!C:wB*r|BlB!#!~:"w>ͮCl`s!psͱ/Ps!psͱ/ґl!:wB*r|ʐlBB!#!:"w>ͮÑlPs!psͱ/Ps!`sͱ/l!:wB*r|lBB!#!:"w>ͮlm!:wB*r|mBB!#hB!7m*r"!s̀!͎!7m*r"!Hs̀!8͎!7m*r"*r*s)))̀!Hsa!Hsͨ!R?! 8m*r"! s̀!͎!8m*r"!Ps̀!8͎!+8m*r"r!PsX!Psͨ!R?*r|hBB!<8m*r"!(s̀!!E;"w>ͮm>ͮBB!#!H;"w!͎!K;w!͎!c;wB!#!{;"w!~;wB!;w!;w!"wB!(>w!x>wB!>wB!>w!>w!*?wB!V?wB!g?w!?w!͎!M8m*r"!Xs̀!8͎!^8m*r"*r*s)))̀!Xsa!Xsͨ!R?!o8m*r"!0s̀!͎!8m*r"!`s̀!8͎!8m*r"r!`sX!`sͨ!R?*r|iBB!8m*r"!8s̀!͎!8m*r"!hs̀!8͎@w!R@wB!Z@wB!~@w!@w! #w>ͮ*r|wB!(>w!x>wB!>wB!>w!>w!*?wB!V?wB!g?w!?w!"  o [Ƕj2?E#~+A"3dh2l}U3yS9V~1q{,Aՠm?S| * [e/py!ҠqC4|Sl~j)ګ?Ev ʯ4S۶.mWI*dt4L[M,nQ^/Qޞ=7B i4Rˆȏ%ڥj|~< ! )9NgsV;! xv$h_< x쫐@Fɋ/_'gBc> Xv5BQ`#h!8)1SebS*3&V9FO_`/5 X)ګ?(%ۇi۶?>5kaRa; ]`B&孩9CJ8_@h6OP^CK X:)yYݎR!R߼dU^}du:vNECDSKL2.ASM[  !"#$%&'(o)*+,-./0123456789:;<=>?@ABCDEYNV'B!ͦl,M%hLrj/ɮBKB?15Z*T4(*\.!SbF܂6,uH,k! ʟrHS-#aJ.(v5XJ/N/c! ʟbO 6V9FB!M۱IP~,%L,Y=`by(@#%EK!A3%]+K5CH1&I3PkFX^w34I|ǔXJ,%*\BvFGHIJKLMNOPQRSTUVWXYZMcTc/5 X[!vUq0o0а$J8?o4(gUM^)?Ϊ6_ϱoYo#WE ip* 9 i۶?>.*}~! MQ-j-# i$BYJanLXJU$I,%z{XJU[j[eg!M3p;%YXJzIf% i$a-S.jZK!L*fLqiP8[g;pZK('A)U/ }I@.'f ;@UK5ÚwB@qf:r;yg1R>/l-]x~'Oh U^i)ڏEo_:;y^U}73_ͷVB3dXT/77 hSq;BH#Agr- bܞü0Ҡ-fFX5w 3t;!MTnGa;R]w ,%idCP˨;VBH#IP>.MRŒ;\ǻ^R PB$YbbcdB!Mi1Pp Ʊ$DH5ڪFHYzB@.^G, (0y'I@ ͘Q,U3> Ջ/4B?^-,% L @z"%ŨB#  PAHK wV8%ּÈ[PkF bB$ [8XQň%@Ò,B$Y>VVּCMK!! Oo|ew !RB%*FSe1fЮKɭ4(?AּC_XgkYLrl%InFЈzImxK5Úwz4R$ `)Vr!I! _@A 7q ҳ `fXG4(oqD*È[yg11`XJMŦB11"(|ø%yg)<*ǔ-٦ȳIi|>Ÿ/(|/ [!LP^Oρ}V:ܬ!sp:V:'8|]nVW|L3|1o ö=mq:~)$J1=O|37~lq_nޭ^!!^<͸i  o,U*%٠AÑq&AHX:Z|a kLb۟-&]K [cb24K5Ñ,A,9R05-4@;8~ )3f:κ0Dh&zF,%! PpqXJY0A5fv;K d4ac7jD(܈A3H1hFPB %ET3yv 15RR½݃Rͧm21cjrjLr B YfSTyzzռ-NOQ0}Rq0>ѿ^R7~W69?L#jLr j!Qyaop:IP~7bq; ۱p@T(:B)LAqKDϔہq}~q/dzzq$(\V Y'dzz͡($CʛUw =Kq;!%j0K !FH,%xG#jbd,%nXac7 Ay]T3UГ i EK K B׳Zr /u(pj|QňbiWk[ iP^?-^c٫g{Dr['_Qޠ >9f!r[Ay_Q~E|1(`BQ/) i޿bDMHnRXJzIQH򚥚a;hKr;!>.{'Q9  Y(7K4(~#b =ךXJ^@HWzIQH#+exqcSTy ۩oOYJ05 ]`Xfv;1d11wBNHߌOz<~M lq_^ 1*h6ʯ$'/3n?Ŧʯ ;!m>m DISK.DOC FOG/HAK.018 First Osborne Group (FOG) Hackers Disk FUNDTRND is a mutual fund trend analysis application which appears to work but has no accompanying documentation. OSBYEZ2H is an as獟bSTyVWh6Oz<m$0߷y$1aG;' ;!mq:~ 118ir\$OΞ3< <pÿ'g'Viǝ|i4BIHA[K z:_T3hKKIH31 Ki:T$0%ajCf|DR! K Asembly language version of the RCP/M program BYE for the Osborne 1 with ZCPR and a Hayes Smartmodem. Thanks to Bryan Stallard for categorizing this file. NECDSKL2 is an overlay to convert the disk directory labeling program DSKLABL2 to support $  an NEC 8023 or C. Itoh 8510 instead of an Epson. DSKLABL1 may be found on FOG/UTL.038. WSPTCHDD is another version of the WSPATCH program found on FOG/APP.005 converted for the double- density Osborne 1. This one is different from WSPTCHDD found on FOG/APP.029. This one was described by Phil Pflager on p.30 of the FOGHORN, Vol.III, No.9, 6/84. It requires use of MOVCPM to establish a 58K CP/M system, which could be confusing unless all your disks were set up that way. Because of t --> FILE: -FOG/HAK.018 CRC = 00 00 --> FILE: /HAK#018.DOC CRC = 4F 0F --> FILE: FUNDTRND.COM CRC = 76 25 --> FILE: NECDSKL2.AQM CRC = F9 24 --> FILE: OSBYEZ2H.AQM CRC = F7 A4 --> FILE: WSPTCHDD.AQM CRC = 88 2E --> FILE: WSPhis 58K system requirement, it was decided to install the program in the Hackers category. Refer to WSPTCHDD.DOC. Squeezed xQx files may be unsqueezed using utilities found on FOG/UTL.003, 004, 014, 031, and 042. Jim WoolleTCHDD.COM CRC = 0C 7F --> FILE: WSPTCHDD.DOC CRC = C3 6D ---------------------> SUM OF CRCS = 0E 16 LE: NECDSKL2.AQM CRC = F9 24 --> FILE: OSBYEZ2H.AQM CRC = F7 A4 --> FILE: WSPTCHDD.AQM CRC = 88 2E --> FILE: WSPy FOG Disk Librarian June 1984 ed xQx files may be unsqueezed using utilities found on FOG/UTL.003, 004, 014, 031, and 042. Jim Woolle%  &  '