' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 77777777777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Ϡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ u*`>/T:>+j t8|_(t|WT< hp x>Pix/(4xP `p} Sp^Pip7 ՠՠՠՠ́ԍĂűޱ́ժժժժըըըըpjpjp jp p U0U@~`U`U`U``*`+|@+@;+@++@+@.U@:V?x RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP>WvWVWW]+u,p~}.m.-./~:VjX`?|z\Z\Z\_|u,U0@xu85858?xjX*`<**>*>**`p0xTT|T|TT@`8`p((x(x((?@p RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP@`PPpPpPP?~`@  ` `  |~@ @ @@ @@ @ @x| px<**>*>**`p0000xTT|T|TT@`8````p((x(x((?@p RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP@@@@`PPpPpPP?~`@  ` `  |~@ @ @@ @@ @ @x| px@wuUUUkkk@w` "00k*nj***VVWo@8@ D` ~`V~T\TTTT,,._q @}@,|( RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´č͠ҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ  ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ <<(h JRJRKR5,` P("D x(x(P-P @$$$jX @ @ (PE@pQpQ [ *H*H.HU0*@Q  `#`"@6@*UU]*`6*U"@ "G@GmTl+@+@TT~nlZ(XWW((~|\X 4P0..PP|x80 RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP<<8h `:\:\  xpp`xx8p-P @ @u8u8 @ @?p`` @qpq`[ jpjp`?@;@c`c@6@*6U`U`**@w6G@GmUTl++@+@TT~nlZ*(XVWW((~|\X 4 TP0 ,..PP|x80 RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP<<8h( `X:\:\  xpp`xx8p-P*P @ @50u8u8 @ @?p`` @qpq`[ U j`jpjp`?@;@c`c@6@*@*6U@U`U`**@w6A`c`*@*U0U0T (*.`~<@G@UT*`*`(@PT\@~|x*(U@U@Q (8|xp RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP<> T P++"@Pp~xp`x|<( V V D `|p`@p8xx*P*@,, @ @?x?`@`pqpU U*X*X*p@?Apcp*@*@UU *:@@?`G`UU * **Tt~<@@**TTT((h~~|x RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP TT5(5((PPP||xp8<>((jPjP"P   ?xxp`p<x|*P PU U E @ @@pp`@`xqxU  *@*@ @`?`@p`pap*@*@_]U(*.`~<`A`C`UU>:*PT\@~|x@@@**|tT (8|xp RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINPαԽ˽˫ƽ˼α˼αź̠Ţ´čȠҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´´±ԽԫԼααԽ˽˫˼α˽ԱԽ´´±ԽԫԼ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čƳҠĢ̱Ơҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ <8| T Thh(PPP||xpxp8x8((P P P   ?xxp`p`ppp*P*P   @ @@pp`@`A`a`U U >@.@*@`?`@>**UUJ*:@@?|<TT** * Tt~<x8x((TTT( (h~~|x RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINPpppPP((5(4PPP||xp```  P PjPi %  ?xxp`@@@ @ @  U R@J@@pp`@ @*@*@%`?`@z             @p@pcp*`*@UU *:@@?``G`U@U * **Tt~<@@@+*TTT((h~~|x RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP  VT5(5((PPP||xp8>,(jPjP"P   ?xxp`p08|*X PU U E @ @@pp`@`8`8qxU0 *@*@ @`?`@*U*U*U*TU*U*U*U*U*U*U*U*U*U*U*U*Ph `:\:\  xpp`<<(h JRJRKR5,` P("D <<((h AJRjVX ` PD%( $;nng`p;n8n8;n.s`0;n8n;n@y`88@8N8@|8<@8>>`?~@8nn`8<`?~@8nn`8<0@?~8nn@8ժժժժժժժժժժժժ U*U*U*U*U*U*U*U*U´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čĵҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ R-ލ&'!1޼o`VIE ƥ LꢭɠL` ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čΠҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ ppppp?r}W7~|rh=~n}pP@`px````^LLL^~*U*U."JTQ*U*U>jU*UpzJW@JV>nU*]~fU*Y|[vxYjUfpX T`xx@8Lf?߀՟߀߀߿߀𿀀𿀀~5+553535+7{8|?*U(8 08|?|#x#p@ 0 0p((8(+8+(+(x @`x|p@ @ @|xxpp` `ppxxtH``%ZXzp%pp-P|kO~\/x@5,5,5?*T.t.t*T*T/t*T?}3 0 ?}*U*T((ЅЅժժբѢѪժժժժժժժժժժժՊՊՊժժժժЪЪЪժժիիիի쑆аРဇʕ쑆䂆335+5/.PP|x80PP|x805,5,5,4,4,5,5,5,5,5,4,4,5,5,5,5,5,5,5,5,5,5,0000000?:U*W:U*W???=*U/=*U/?0<<080h0(0 0`0X0:\0:\0 0 0x0p0p0`000000000?:U*W:U*W?hhhhhhhh|pժժժժ뒒뒒뒒뒒ժ??=*U/=*U/?00000000000000000ժժժժժժժժժժժժժժժժժժժժժժժժЪբѪժբѪЪբѪժբѪЪժժժժժժժժժժժժժժժժժ(P GbORNRJrKrGbP ((P FbNrNrNrNrFbP ((P GbKrJrNRORGbP ((P GbOrJRJROrGbP (hhhhhhhhժժժ*U*U*U*U*U**E"U*U*E"U**E"U*U*E"U**U*U*U*U*U*ժժժժժժժժժժժժժժժժժժժժժժժժժժժժՊբѪժբѪՊբѪժբѪՊժժժժժժժժժժժժժժժժժժժժժժժժժժժժ*U*U*U*U*U(*E"U*U*E"U(*E"U*U*E"U(*U*U*U*U*U(ժժժ՜𜀀պݯݼ׫ׯU*U*U*U*U*P t/*@U=/.@]=/.@]=/*@U= tU*U*U*U*U*PժժժժժժժժժU*U*U*U*ժժ****ժժU(U(U(U(ժ(PU.U~UNU~W.}.E.}.U.~ ? (PU.U~U~W.E.}.~ ? *U *U ((?q@|`|`?|`)|`9`p````@p@~Հր^w}N|(8൰ժ*U"Q"Q*Uժժ*U*U*U*UժժUUUUժժ*P*P*P*PժժU*E"E"U*ժ´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ´´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čΠҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ  ,H`|xzxrx8ux |xzxsx8ux |x{xrx8ux |x{xsx8ux `@`y`y΄y`y y}yLy}y y}y~yy}yO y y`}yɨ y y| }y8 `8998 yww L(xw w w w wެw0wwwwwKwKw`www w  `txtx`qxoxpxrxioxsxLxoxpxrx8oxsx x yqxoxwx$qxtx`oxxxqx&^ ]`yx ox px|vvv~vvvvv v vv v v)yvv~iv ,Hvɴvvvvvvv`vv v v  ,Hvvw v`w w ww`w4w#w #K wwK 88` 8uK8 "L 88 8ui+uK8 "L 88` @`L[v`[v8Sv Rv QvPv Yv  ,H88֭QvSvPvRvTvTvTvpyUvPviQv` w`v`v,vvv`MLYtYt LZtWtȱLXtYt stLu` @ >u`>u=u|:u9u?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwvyz{|}~        ! "$ % & () *+ - . / 0 ;?AB  ABiM= * ±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ´ / 0 12E34 D 5B7B89:B; < <=      "!!2]\$ #!!>$ # #"' %% & )%"P %5P !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  "^ ps $"q3r `/1 0/3` `!`"`#`$`%`&`'`(`)`*`+`,`-`.`/` `!`"`#`$`%`&`'`(`)`*`+`,`-`.`/` `!`"`#`$`%`&`'`(`)`*`+`,`-`.`/` `!`"`#`$`%`&`'`(`)`*`+`,`-`.´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢt| !%)-159=EM     ***  - - - - - - - - - - - - - - - - - - - - - - - - - - !- "- #- $- %- &- '- (-GBh" %< LRX^djpv| $,465,.-%&  ? : w ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ ˿/ A K /EAEKHJJ݌h ʿ ˿ ˿ ˿ ˿F HhHh݌FG$KiK ,KLHhG04Hh$Hh e- GLAA# GȄGL@L)L'HJJ݌h Hhꝍ݌``LݥHHh`ȱH HL%%%%%%%%% ,!"7%.%'.!(#$.%4,44"53,!"2# $%3/,# 42/0%2##9414-!##!941!%4!20-/#4'2.4.#:4.#0/)4!2%%%%%%%%%%%%cBcCCBcKc cUQ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ  Խ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čƠҠĢ̱ƠҠ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱҠ  ҠҠҠɠҠŠѠȠ̠ ՠǠǠ̠ҠҠŠ̠̠נǠŠΠΠ̠ՠԠˠǠ̠ҠҠՠРΠ٠ՠՠΠŠ٠ˠ̠ŠՠРΠL``'L XSVP 6$$'$ d ( ($$)$(ө$% [j L͠ĠРĠǠ̠͠ ϠǠРǠ٠נ ͠ĠРĠ ՠ  @Gg Enj F G  H H &I uG"S28)"DRIVE=>"D2;'16:B$"7":10180:S2(A$)'32:B$"2":10180:D2(A$): ' 779:DRV780:VOL781:TRK782:SCT783:BUF787:CMD790:OVL792`':DOS16:MB151:HX$"000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C1D1E1F202122"j'8::A$"ORIGINAL":S26:D21:10140:S1S2:D1D2t':::D2(D21)1:A$"DUPLICATE":10140>~´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ´E TRACK  ,HL(B,10)100HL(B,10)100L CP(CP(B)10.5):CP100ı*CP(HL(B,10).96.5)CP(HL(B,10)1.04.5)ī95016:12::"ONE MOMENT PLEASE":D$(4):BL$(7)MX20:EF1:SL157706,1:7,0:8,23:9,1: --/ ۠-H x( ( $8 H` jH    >  &)>ȥ')̻>JJJ >`*xY+&x'8*BIxix&&  x) + ') + &д +`FG8`0($ p,&" (0 8@ HPX !"#$`h%&px')*+,-./12345679:;<` aI꽌ɪ򠚽ɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɵ'*&%&,E'зЮ꽌ɪФ`2JJJ'J&J>Ƚ3JJJJ&'J&&3>ȽfJJJJ&'J&&f>ȥ2>&JJJȱ>'JJJ3ȱ>*JJJfȱ>J&*J&'J&&ȱ>J&*J&'J̻&*)')3*)f>)JJJ`80|'x&Hh & 󸩪 󸩭 󸘠Y'&Yxꪽ' 󸩪 󸽎`Hh&6H鷎귭෍ᷩ췭ⷍ㷍JJJJx L~8㷍෩췍緍 ⷩ᷍H 㷍෍ `巬 췌` 8LLx `C` J<&MJ=JJJ@F 3 C @>) <]?J@* JJ<JJJ)JJ*J@@A f2*'&>J l@ȑ @ Б = 3JAJ*J      :(TEMP$)4VC1:740GMM$(TEMP$,2):(MM$)1(MM$)12VC2:740yYY$(TEMP$,2):(YY$)75(YY$)99VC2:74021:BL$:"RE-ENTER DATE IN THIS FORMAT -- 06/87":VC2ĺ"DATE MUST BE BETWEEN 01/75 AND 12/99"UPDATE PRICER NUMERIC DATA ONLY--SUCH AS 24.50"::660c21:958:BL$::"ENTER WHOLE NUMBERS ONLY"::66021:958:BL$::"OUT OF RANGE--MUST BE FROM "(LO100)100" TO 999":23:"PLEASE RE-ENTER THE LAST ITEM": INPUT DATEVC0-&(TEMP$,V,1)"."(TEMP$,V,1)"9"VC1:X0V:TEMP(TEMP$):TEMPLOTEMPHIVC2^:uD --NO DECIMALNVC0:V1(TEMP$)X(TEMP$,V,1)"0"(TEMP$,V,1)"9"VC1:bV:TEMP(TEMP$):TEMPLOTEMPHIVC2l+v21:BL$::"ENT´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čƠҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ #$PVRTGgL/L/0*ȹ#,0L/L@ ´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čŠҠĢ̱ŠҠō˽ԽĽҺ½ԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ´ ´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ21:1:868:"ENTER NUMBER AND ";TEMP$:(TEMP$)1ĺBL$:480[(TEMP$)48ġ:1310~B((TEMP$).1):B1BNRı23:"IMPROPER ENTRY -- TRY AGAIN";:BL$:21:868:480VALIDITY CHECK  WITH DECIMALVC0:V1(TEMP$)YILS(X)1NRXĺX") "(NM$(X),(NM$(X))3);::(NM$(X),3);::440gNRXĺX") "NM$(X);:440p470LS(XY)1NRXYĺ20)XY") "(NM$(XY),(NM$(XY))3);::(NM$(XY),3)::470NRXYĺ20)XY") "NM$(XY):470XB5u'u ]鷍# lrĠԠ ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čƠҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ <<<h(` Pz^ xp`xxx-P*P @ u< @?p` @pqp[ U *@jx`?@`c`6@*@6UUp*@6*@`*@@((((((((((( U@ U~PPPPPPPPPPP*?*~|           RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP*T~*T?|x@@@@@@@@@@@U(|U(x?p*Px*Pp` U pU `@@@7`z@'`= S`n@o@ uO@ z@'@]_juO: RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP>/T:>+j t8|_(t|WT< hp x>Pix/(4xP `p} Sp^Pip7 ՠՠՠՠ́ԍĂűޱ́ժժժժըըըը´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ´T A STOCK ^( h4:958:NR1ī380} r"THERE ARE NO STOCK RECORDS ON FILE":10"PRESS TO PROCEED...";:A$:1310 |26::"ENTER 0 TO ESC"::"WHICH STOCK...?";:26::"TO MASTER MENU"::X139:"=";:: Y(MX2.6):Y10Y10X1ԱԽ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čƠҠĢ̱Šҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽  ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čƠҠĢ̱ƠҠ˽ԽĽҺ½ԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ  ̬̠z #?? ͮΠ ®ΠŮΠ ΠŠ  ήΠ ȮΠ Π ĵîΠ ĵΠ ĵΠ ΠŠΠŠ ΠŠ ΠŠΠŠΠŠ ΠŠ ͮΠ!ƮΠ ҮΠƲΠΠŠ > ΠŠ ΠŠ  ҠήΠΠ Š"Ԡ ЮΠӮΠ ҠӠ"ϠҠ ֱ נƳΠ Ӡ Π ҠϠҠҠ ˠŠ1ҠϠ®ʰ ؠ Lp l {РΠԠ렠ϠӠ򠠠ڠàҠԯӠƠɠؠ堠Šĩ堠򍣩堠ǩΩ䠠Щ֩à䠠کé䠠ةѩɠש򠠠͠ԩˠөʠɠ堠󠭠ȩ堠Ʃ堠 ̩oȌ7oɆ ?6oȌ7oНɉ ?6o7oɈSɍeɘhh`ɠ :Lz ,0o -6o 7oo,+o0)ɠɀ) @ 2oLz :Lz  LzoL,0oՍv,6o 7o Fw`hh  ,+o0) L{ HH` l {ҩ!o"o o>`o [o i$omH mo$hLx"o [!o i ]z ]zm!o ]z oo`())?(` o`,.omPn`o%o o&o*`6o7o0o { ,1o!HɘɍɈI ih :Lzhɏ LP{ɓ 0oI0oLzɎ 6 ɍhh` ,oȭoȩȭoȭoȩm ȭ$o,oȭo H` x {Ӡ򠪪  {䮮Ly@ {򮮮LyH {壠h hh : 8` o` o !o"o!o!o o zLp rLq $rLq x { x> om p` t qM ùm H i ih8 x {宮L `ɠ/,*o,3o ɠ2ɀ) @(@)Lx  @,+o0ɠ ) )L$L[2o1o zo2z oLvLwLw Xm; o>: />> > y x { ɐ4o5o uL5wLpm#8om.oLq : x {뮮L : x {򮮮L o99> y zL2zm%ɸ`)/oH5o0 z x h $ [ {H  J(  @ ( h4o 5o0L2z` om#oLsL: omoLsL: xv v tLq` v XtLv` t o"m:#9om/o t q Xt om> y z )o> yLp x {ɺ1o2o z oo`mLs s x { x > y z 2z` x {غ1o2o zo`o1 o>mLs sLu4o5o/o3 x { ɱ o!o!o !o"o zL2z o` o!o !o"o zL2z"o !oLvt`"o8 o o zL2z o`Lti o"o zL2z jz zL2z o!o"o zL2zmn %o'o&o(o o)o`'o( : x {򮮮L o%o(oo&onm) $o $o &$ nɽY x B {jj`WARNING`SECTORoBUFFER`MISMATCH`jj`DO`YOU`WANT`TO`WRITE`ANYWAY`hYoNi` $o y jzLp` x {ĩө© 'o.o jz uz p` 'o@.o멀.o o΍o qLqooooo#o`ooo"o` x {뺠 x >#o`L: x {򺠤 x >o`L:ooo ,o`ooo`*oI*oLp3oI3oLp+oI+oLp x {    =$ =$ (/[ {亠L$ [ {ӽĽ򽤠彤ƽ̽5$o $*o yq$+o yq$$ oL0 {` {Π`Lp$o y jzo%oo&oLp Xhh {򠭠̠LNpLoo qLqopo ,oooo)o$o-o3o*o%o&o'o(o.o/o uz jz ,+o 9 ,-o0 {-o p q z p #o pL~p@#o H~H`L:$ [ H m  h J m x L2z$        ȄIL$0$ Q0  ࿐ q2H)}20hJJJJ}20 iH *h * L* *L* *,)H$))ɀh  H *h ``,ȱ8eȱ K6L*`LK6 g8: /CATALYST2/QUARKCATALYST2E/QUARK=)=) CATALYST2E/CAT.CLOCK n)n) CATALYST2E/CAT.CONSOLE '' )L*L*`$ ` E*$0$ Q0  $0 *-*'( INTERPS2E(/(0A0 Catalyst Editor /CAT.INSTALL/CATALYST.EDIT  v(O(( CATALYST2E )  ))e`ʥ` '080:)`2 aI `/8 Ȱi: : :` c( )i(u(  k( )( u(`j' CAT.PRERUN0CAT PRERUN' CAT.CLOCKCAT CLOCK' CAT.CONSOLE CAT CONSOLE' CAT.DEVICE''q%  * ) & * ' & '  )L &))H ) )G &к ȫ) &Я))) ˱) & ̺) )(А *h`` E* )` * *Ġ {* :) * *ʈ L& N 2 * )L&2` ' ' ' eeaI A Pi   %' %' 9L$ )L$ * ),,:љ;ҙ<ә8L6 ŏ) ) /i)pL%0M&:)mi/i+:1/ /)) 1i'/JJJJ) 0!/H *hH) *L%/ * * *hLS g8 :8: ::L+% & 'aI YN )L$ & 'eʠ &Wn2ݣ2Mݦ2H  '/6 '1 2) %' %' %' %' 9L$ )L6$ & 's &pl ':c &^ TO CONTINUE, FOR MENU";:Z$::Z$(27)1100:::40)"DISK RESCUE -------------- RESURRECTOR"40)::34,4: 14 -'S:34,7::" SLOT NUMBER (DEFAULT="(SLOT);:"): ";A$'DA$""1SR$"0"SR$:::40)" DISK RESCUE ----- TRACK "TK$" - SECTOR "SR$;41)::34,4:5:HEXOUT::"PRESS TO RETURN TO MENU. ";:A$::110EF4:2130::12::"WARNING!";::" THIS OPTION DESTROYS THE VTOC":"BEFORE IT RECREATES IT."K$" - SECTOR $"SR$" READ INTO MEMORY":22:1:"PRESS TO CONTINUE";:Z$::P21::TW$TK$:SW$SR$:RF1:110EF3:2130RF1ė:12:"NO SECTOR IN MEMORY":22:"PRESS TO CONTINUE";:Z$:::180(TK$)1TK$"0"TK$ (SR$)(7):7:27:868:400T9:1:"SECTOR TO BE READ (IN HEX): ";H$:H$""ĺ(7):420SR$H$:340:SRD:SR0SR15ĺ(7):9:28:868:420(SR$)1SR$"0"SR$(TK$)1TK$"0"TK$CMD1:SX(SLOT):DX(DRIVE):370q:15:2:"TRACK $"T<rICMD,CMD:ITRK,TK:ISEC,SR:907,(SX16):908,DX:RWTS:L|EF2:2130:::40)" DISK RESCUE -------------- READ SECTOR "40)::34,4:: 14 -'S7:1:"TRACK TO BE READ (IN HEX): ";H$:H$""ĺ(7):400TK$H$:340:TKD:TK0TK35ĺ(121)110::SLOT,BS:DRIVE,BD::J@A380,480,1680,530,1120,1910,1030JH$"":N$"0123456789ABCDEF":H%D16:H$(N$,H%1,1)(N$,DH%161,1):(H$)1H$"0"H$:TD0:J1(H$):Z((H$,J,1))48:Z9ZZ7^Z0Z15D1:hD16DZ::TIALIZE ONE TRACK"2 5:"<7> CHANGE SLOT/DRIVE"M 5:"<8> EXIT PROGRAM"~ 22:1:"YOUR CHOICE IS:";:A$:A$(13)300 "A$ ,A$"1"A$"8"ĺ(7):22:16:868:280#6A(A$):A8ė:12:"ARE YOU SURE YOU WANT TO QUIT? ";AN$:AN$"Y"AN$,S"BS",D"BD( 7:"YOUR OPTIONS ARE: "0 :X 5:"<1> READ A SECTOR INTO MEMORY" 5:"<2> VIEW THE SECTOR IN MEMORY" 5:"<3> SCAN A DISK" 5:"<4> RESURRECT CLOBBERED DISKETTE" 5:"<5> RESURRECT A CLOBBERED TRACK" 5:"<6> INI)" ";:33:" DRIVE="(DRIVE):5 P1P11:P10180 I046:K:880I,K::176,7,169,0,133,11,76,125,3,169,1,133,11,96,0,0,169,3,160,138,32,217,3,76,112,3,1,96,1,0,17,15,155,3,0,149,0,0,1,0,254,96,2,0,1,239,216 EF1::2130 D$"BLOAD PHOENIX(4)"BINARY":FSVE37263:YSVE137259:NAME37267:F936259:TW$"XX":SW$"XX":TK$"XX":SR$"XX":P20:BS(SLOT):BD(DRIVE) n:::"** DISK RESCUE BY PRESTON R. BLACK,MD **"120)"** COPYRIGHT 1986 BY MICROSPARC, INC. **": x34,5 3::"SLOT="(SLOT6217:SAVFILE36366:UPDTE36604:TINIT36760:HEXOUT36898:TRACK37262:SECTR37264:FCOUNT37260:VOLUME11:ICMD918:ITRK910:ISEC911:RWTS896:P11:SLOT43626:DRIVE43624w dTS(15),TYPE$(4):TYPE$(0)"TEXT":TYPE$(1)"INTEGER BASIC":TYPE$(2)"APPLESOFT":TYPE$/ **********************9* DISK.RESCUE *U* BY PRESTON BLACK,MD*q(* COPYRIGHT (C) 1986 *2* BY MICROSPARC, INC *<* CONCORD, MA 01742 *F**********************P::36096 ZD$(4):MARKER0:BEGIN36096:FINDTSL73               A :(4);"CATALOG"0(4)"LOADPORTFOLIO"@(4)"LIST"*(7)::1310|$219:"PRESS RETURN TO CONTINUE":"PRESS TO RETURN TO MENU":"ANY OTHER KEY TO RESET PARAMETERS ";:A$$<A$(13)ĺ:1370$FA$(27)110$P:34,12::1150$Z34,11::SR0$d6:29:868:10:29:868:2%nD1D2S1S2Ģ1DEFAULT="((D11)1);:"): ";A$:A$""D2((D11)1):11:17:868:D2:1310l# A$"1"A$"2"ĺ(7)::1280#11:17:868:A$:D2(A$)#34,13:15:"ENTER TRACK";:"TO BE SAVED (IN HEX): ";H$:H$""ĺ(7)::1310 $(TK$H$:340:TKD:TK0TK35ĺ$"1"A$"2"ĺ(7)::12008"D1(A$):7:16:868:A$y"34,9:10::"DUPLICATE";::" SLOT (DEFAULT="S1;:"): ";A$"A$""S2S1:10:17:868:S2:1280"A$"1"A$"7"ĺ(7)::1240"10:17:868:A$:S2(A$)K#34,10:11:11:"DRIVE ( (DEFAULT="(SLOT);:"): ";A$K!A$""S1(SLOT):6:16:868:S1:1200d!A$"0"A$"7"1190v!(7)::1150!6:16:868:A$:S1(A$)!34,6:7:10:"DRIVE (DEFAULT="(DRIVE);:"): ";A$!A$""D1(DRIVE):7:16:868:D1:1240"A12:"BE SURE TO HAVE SEPARATE DISK":"TO MAKE TEMPORARY COPY OF BAD TRACK":21:" TO CONTINUE, FOR MENU";:Z$::Z$(27)110 t:::40)" DISK RESCUE -------------- TRACK SAVER"40)::34,4::14 -'S!~34,5:::"ORIGINAL";::" SLOTS1(S$):S11S1710807.(7):5:13:868:1050b87:1:"DRIVE NUMBER: ";S$:S$""1100BD1(S$):D11D121110L(7):7:14:868:1080VSLOT,S1:DRIVE,D1:S2S116:907,S2:47081,S2:908,D1:47082,D1:110`EF6:2130 j:: ";:A$::710o:"THE DISKETTE HAS BEEN RESURRECTED!!":"PRESS TO RETURN TO THE MENU. ";:A$:110EF5:2130:::40)" DISK RESCUE -------- CHANGE SLOT/DRIVE "40)::34,4:: 8 -'S 5:1:"SLOT NUMBER: ";S$:S$""1070$;:QNAMENAME35:((Q));::"IS THIS DATA CORRECT (Y/N)? ";AN$:AN$"Y"AN$"N"AN$(110)AN$(121)990:AN$"N"AN$(110)Ĺ512,0:910AN$"Y"970UPDTE::"THE FILE HAS BEEN REENTERED IN THE VTOC"::"PRESS TO CONTINUE.:A$""970::(7);"THIS IS AN ILLEGAL FILE NAME!!!"::"FILE NAMES MUST BEGIN WITH A LETTER":"AND CANNOT HAVE A COMMA IN THEM"::"PRESS TO RE-ENTER NAME";:A$::910T(FSVE)128:::"FILE TYPE: "TYPE$(T):"FILE NAME: "$"N"AN$"Y"AN$(110)AN$(121)900:AN$"Y"AN$(121)ī840b:SAVFILE:(14)206710:::Q$"":QNAMENAME35:Q$Q$((Q)):((Q$,1,1))128("A")((Q$,1,1))128("Z")960A$"":Q2(Q$):((Q$,Q,1))128(",")A$","Y"AN$(121)870z22:1:958:"DO YOU WISH TO VIEW THE":"NEXT SECTOR OF THE FILE (Y/N)? ";AN$:AN$"Y"AN$"N"AN$(110)AN$(121)890:AN$"Y"AN$(121)S2S22:850D22:958:"DO YOU WISH TO SEE":"THE ENTIRE FILE AGAIN (Y/N) ";AN$:AN958:"THAT IS ALL OF THE FILE!":23:"PRESS TOCONTINUE";:Z$::900p\ITRK,(S2):ISEC,(S21):RWTS|fHEXOUTp22:1:958:"DO YOU WISH TO VIEW THIS":"SECTOR ONCE AGAIN (Y/N)? ";AN$:AN$"Y"AN$"N"AN$(110)AN$(121)880:AN$"AT TRACK ";PT$;" - SECTOR";PS$( 34,6T*::5:"DO YOU WISH TO VIEW THE FIRST"45:"SECTOR OF THE FOUND FILE (Y/N)? ";AN$:AN$"Y"AN$"N"AN$(110)AN$(121)ĺ(7);:810>AN$"N"AN$(110)ī910HS237900:ICMD,1LR(S2)0Ģ22::12:4:958:1::"SEARCHING FOR TRACK/SECTOR LIST":LMARKER1760TINIT10,17:TINIT35,17:BEGIN:MARKER1:770FINDTSL7:(TRACK)351020D(TRACK):330:PT$H$:D(SECTR):330:PS$H$ :8:"TRACK/SECTOR LIST FOUND"8:"ON OF THE DISKETTE!"::"PRESS TO RETURN TO MENU ";:A$:A$(27)110SLOT,S1:DRIVE,D1:S2S116:907,S2:908,D1:47081,S2:47082,D1:34,4::12:1" TO FIND NEXT TRACK/SECTOR LIST":" TO QUIT";:Z$::Z$(27)ČF9:1020:620-D1(A$):10:13:868:10:14:A$^34,12:::"INPUT THE VOLUME NUMBER OF THE"1:"FOR THE RESURRECTED DISK (1-254): ";A$:A(A$):A1A254ĹVOLUME,A:690(7):7:33:868:660K:"PRESS TO BEGIN THE":"RESURRECTIVE,D1:S2S116:907,S2:908,D1:47081,S2:47082,D1:DTK:330:TK$H$4 19:"PRESS RETURN TO CONTINUE"::"PRESS ANY OTHER KEY":"TO RETURN TO MENU! ";:A$:A$(13)ī1104*NTTK1:NT0NTTK144ITRK,NT:ISEC,0:ICMD,1:RWTS5>(919)16(919):13:13:868:13:14:D1:2050E3(A$)49(A$)50ĺ(7)::1960l3D1(A$):13:13:868:13:14:A$334,13:15:"ENTER TRACK":"TO INITIALIZE (IN HEX): ";H$:H$""ĺ(7)::20503 TK$H$:340:TKD:TK0TK35ĺ(7)::2050C4SLOT,S1:DRIUMBER (DEFAULT="(SLOT);:"): ";A$X2A$""S1(SLOT):11:13:868:11:14:S1:2010t2(A$)48(A$)5520002(7)::19602S1(A$):11:13:868:11:14:A$234,12:13:"DRIVE NUMBER (DEFAULT="(DRIVE);:"): ";A$ 3A$""D1(DRIVE) CONTINUE, FOR MENU";:Z$::Z$(27)110~1:::40)" DISK RESCUE ------------- TRACK INITER "40)::34,4::13-'S15:13::"!!! WARNING !!!":17:8:"ALL DATA WILL BE ERASED":8:7:"FROM THE INITIALIZED TRACK""234,10::" SLOT NN";:Z$::21:1:958:Z$(27)K15:ISR40XK:I\0bM0Ĺ34,4::"NO ERRORS DETECTED!"0l22:"PRESS FOR MENU ";:A$::1100vEF8:2130/1::12::"WARNING!"::" THIS OPTION ERASES ALL":"DATA ON SELECTED TRACK.":21:" TOTS:(11)1860M/0(919)16ė::"THIS DISKETTE IS WRITE PROTECTED!":1900/:MM1:15:"ERROR WRITING TO TRACK $"TR$" - SECTOR $"SR$/DICMD,1*0N(16384)155Ĺ16368,0::21:" PRESSED TO STOP SCAN"::" TO QUIT, TO RESUME SCA,7::21:"PRESS TO STOP SCAN":ICMD,1:M0:ERR0: 10/5 SPACES Z.ITKSR:ITRK,In.K015:ISEC,K.DI:330:TR$H$:DK:330:SR$H$:5:8:TR$:5:38:SR$.RWTS:(11)MM1:13:"ERROR READING TRACK $"TR$" - SECTOR $"SR$/&ICMD,2:RW0(-SR$H$:340:SRD:SR0SR351770E-(7):9:28:868:1740-SRTKė:12:1:"ENDING TRACK IS LESS THAN STARTING TRACK";:22:" TO REENTER, FOR MENU";:Z$::Z$(27)110:1680E.:"TRACK $ SCANNING SECTOR $":34TART SCAN (IN HEX):":11:1:"ENTER 'ALL' TO SCAN ENTIRE DISK":7:30:" ";H$:H$""110:H$"ALL"TK0:SR34:1780,11:868:TK$H$:340:TKD:TK0TK351740,(7):7:30:868:1710-9:1:"TRACK TO END SCAN (IN HEX): ";H$:H$""ĺ(7):174N TO MENU ";:A$Y+SLOT,S1:DRIVE,D1:WWS116:907,WW:908,D1:47081,WW:47082,D1:110i+EF7:2130+:::40)" DISK RESCUE ------------- DISK SCANNER "40)::34,4:: 13 -'S+PS(SLOT)16:PD(DRIVE):907,PS:908,PDs,7:1:"TRACK TO S TO RETURN TO MENU. ";:A$l*rSLOT,S1:DRIVE,D1:WWS116:907,WW:908,D1:47081,WW:47082,D1:110+|:17:"A WRITING ERROR HAS OCCURRED ON THE":"STORAGE DISK. AN INITIALIZED DISK MUST":"BE USED FOR THIS PURPOSE."::"PRESS TO RETUR8:10:29:868:X)@D1D2S1S2Ģ17:"INSERT RESTORED DISK AND PRESS ";:A$:)J10:29:868:6:30::"RESTORING":)TCMD2:SXS1:DXD1:370)^SRSR1:SR151540#*h6:29:868:10:29:868::17:"DAMAGED TRACK RESTORED."::"PRESSV:TINIT10,TK:TINIT35,TK:TINIT::SR0F(TS(SR)1SRSR1:1540g(6:29:868:10:29:868:(D1D2S1S2Ģ17:"INSERT STORAGE DISK AND PRESS ";:A$:("6:29:868:10:30::"READING":(,CMD1:SXS2:DXD2:370)66:29:86ECTOR $"H$:I11000:I:SRSR1:SR151380>'10:29:868'S1S2D1D2ė:17:"INSERT DAMAGED DISK AND PRESS ";:A$:':17:7:"INITIALIZING DAMAGED TRACK":'SLOT,S1:DRIVE,D1:WWS116:907,WW:908,D1:47081,WW:47082,D1)(11,STORAGE DISK AND PRESS ";:A$:P&6:29::868:10:30::"WRITING":&CMD2:SXS2:DXD2:370:(919)16(919)32(919)64(919)1281660&SRSR1:SR151380&DSR:330:(TK$)1TK$"0"TK$,'17:"ERROR READING TRACK $"TK$" - S7:"INSERT DAMAGED DISK AND PRESS ";:A$:Z%x10:29:868:6:30::"READING":%CMD1:SXS1:DXD1:370:V(920):(919)16(919)32(919)64(919)128TS(SR)0:1470%TS(SR)1:6:29:868:10:29:868:'&D1D2S1S2Ģ17:"INSERT |January February March April May June July August September October November December Sunday Monday Tueh not foundVolume not foundFile not foundDisk fullDirectory fullFile lockedDirectory damagedDirectory damagedBoot device not foundBAD 80 COLUMN CARD DRIVERProDOS error $ddTROL RESET TO REBOOT ***  0. 0 0 Catalyst //e Drive Selection# Slot Drive Volume nameWhich drive do you wish to use for Catalyst //e? *** No Catalyst compatible drives installed ***I/O errorWrite protected diskPat    ( 6MM/DD/YY HH:MM:SS xMM  M  * * * P R E S S C O N T R O L R E S E T T O R E B O O T * * *  *** PRESS CON Copyright 1982-84 Quark Incorporated  "SYSTEM BUSY *** DRIVE NOT READY ***Press RETURN when drive is ready.Are the date and time correct?New date (MM/DD/YY)?New time (HH:MM)? Y29f.L*-.`Catalyst //e (version 2.0) _____________________________________________________________________________ N N N N N N N N N N N N N N N N N N N  M:`8:1 1 ,1 , , ,:0 ,: , ,:) m:81  1 , : , : , ,: ,: ,2:1Oi)Q:J:: 0i 0 012::: ,: ,: ,: ,: ,: , ,2$ *Ȣ̋󭇑ȩȌ`   ȩ   HΊ ΍  L`   LH`Lih h   L H H`>HɈ h > 8 i ɠ X XЛ `H L=HȌ..h 9-98-8L`i!ȭȭ` ␠  `Ί ` 'z4#D|`     D A>(EV !0x8x D- ܸ   H` ϠՠԠϠ Ӡſ o)߅  ` ԠŠƠŠ¬ɬҠԩ o)A91+ ԠŠƠŠ¬ɬҠԩ Lx ҠŠź oʠ$` 2     ȩ   HLiLy #L㍠ i L% i #L   ȩ     ȩ  H`       07E9ĺ"DISK FULL":2220<7E10ĺ"FILE LOCKED":2220X7"ERROR "E" IN LINE "EL723:8:"PRESS TO CONTINUE";:Z$:7EF160,380,480,530,1030,1120,1680,19100!":22:"PRESS TO RETURN TO MENU. ";:A$::110h6R3288:E(222):EL(218)256(219):216,06\E255A$"8":3106f:126pE6EF1ĺ"PHOENIX NOT FOUND":22206zE6ĺ"FILE NOT FOUND":22207E8ĺ"I/O ERROR--CHECK DRIVE DOOR":22232(919)64(919)128ė::"A DISK ERROR HAS OCCURED.":"CHECK DRIVE DOOR AND WRITE-PROTECT TAB"::"PRESS TO CONTINUE ";:A$:::208086H34,4::15:"INITIALIZING TRACK $";TK$:TINIT10,TK:TINIT35,TK:TINIT::15:"TRACK $"TK$" INITIALIZED' `ΐx!! =Tp(BB"`8PD2?(}L!5}hl湭 $2)ƥrlG 4M$f` nj  , m oj P dddd'ffffdddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddd````ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````* PRESS CONTROL RESET TO REBOOT *** )$% ȫ 3 ʵ 3 ̽ 3L` I(0 I@ I@'L,  /LX $CAN'T READ CATALYST DISK DRIVE **  (2?Ӆ҅хƅ 6 7 6L6 6 7 6 6$0QT L7L Є$01 )Ƥ 38 k7Φ`ф 6H6H`6667&7@7H787\7j7w7777666776666677767777777`eĩP$0Je…ũ…ä`4`ʊ `0($ p,&"    !"#$%&'()*+,-./0123456789:; G46 G4J)6 HHhh G4M6M6 I8`5`8*%6EҮ6 )5#66)5 H_)5 s4h]6)5H8E)5IL4)5)5) 65 4h) 6#5 4L4hL66.:/: :3 :3n/:n.:  & &L:36JJJ 6)666` 6)956FjFjJJ6x6 s4 366 6 )5L366 60 6 ͬ6)50î6(`6(F )6n꽌ɪ꽌ɖܭ6JTsday Wednesday Thursday Friday Saturday Sunday // :: M'+DEFHINQZ0123456789ABCDEF/INTERPS2EP d`& (ERR0A$"INITIALIZATION ERROR"F(ERR1A$"WRITE PROTECTED"l(ERR2A$"VOLUME MISMATCH ERROR"((ERR4A$"DRIVE ERROR"2(ERR8A$"READ ERROR"<(12:450:(7):O:B$"2":10180:D2(A$):)' GET A KEYQ'A$:(A$"1"A$B$)A$(13)10180'A$(13)A$(((40)(41)256(36))128)'A$;:' DISK ERROR'ERR(222):ERR15ERR254Ĺ216,0:822:'ERR254ĺ"TYPE AGAIN PLEASE:"::(ERR25521)1:A$"DUPLICATE":10140^~'A$"FORMAT BACK UP FIRST? N"(8)::12:450:A$:A$"Y"İ380':A$"INSERT DISKS IN PROPER DRIVES.":470::1000' GET SLOT & DRIVE#'450:::10)"SLOT=>"S28)"DRIVE=>"D2;'16:B$"7":10180:S2(A$)'322:INIT4:10220[V'IO768:SLT779:DRV780:VOL781:TRK782:SCT783:BUF787:CMD790:OVL792`':DOS16:MB151:HX$"000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C1D1E1F202122"j'8::A$"ORIGINAL":S26:D21:10140:S1S2:D1D2t':::D2(D$'(768)(769)50710060].':A$"* SUPER IOB *":450:::A$"CREATED BY RAY DARRAH":4508'10:A$"INSERT SUPER IOB DISK":450::::A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$B':(4)"BLOAD IOB.OBJ0,A$300"L'TKSTVLCDDVSO:RD1:WR0ERR255ERR254CDRD102305:ERR15Ĺ216,0:_D(7);:BUF,(BUF)1:(BUF)MBBF1eNX R/W A RANGE QUICKLYb0:0:860,MB:861,LT:862,LSlCMD,CD:TRK,TK:SCT,ST:430:863:1002:' CONFIGURATION TIME' BLOAD RWTS HERE@CD(CD1)1:CDRDA$"INSERT SOURCE DISK.":SOS1:DVD1:510iA$"INSERT TARGET DISK.":SOS2:DVD2D1D2S1S2İ470:1:1:39);::A$"READING":CDWRA$"WRITING"450::80 ONERR IGNORE UNREADABLE SECTORS&822:ERR(222) TRACK & SECTOR#U3:10:"TRACK $"(HX$,TK21,2)" SECTOR $"(HX$,ST21,2)" ":j CENTER MESSAGE21(A$)2:A$;: PRINT MESSAGE AND WAIT:11:450:13:A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$: TOGGLE READ/WRITEMAT DISKZ |A$"VOLUME NUMBER FOR COPY =>254"::450:32:"";VL$:VL(VL$):VL$""VL254o VL255VL0380 CMD,INIT:SOS2:DVD2:A$"INSERT BLANK DISK IN SLOT "(S2)", DRIVE "(D2):470 80::A$"FORMATTING"::450::IO:VL0: PRINT 360,A1: , THE SECTOR EDITOR@ 6A$:(A$,7)"CHANGES"310\ @A1(A$):A1,A2,A3,A4q JA1T1A1TKĂ: T9984(A1T1)4096(FAST15A2)256A3,A4:: ^ SWAP RWTS AT $1900 WITH THE ONE AT $B800 h253,25:255,184:224,8:832: r FOR,A2:47356,A3: NORMALIZERP 47505,222:47515,170:47413,222:47423,170 47445,213:47455,170:47466,150:47335,213 47345,170:47356,173:47360,0:47498,183:  IGNORE ADDRESS CHECKSUM 47498,0:  ALTERED CHECKSUM "A1:470 ( 16 SECTOR RWTS ALTERATIONSC ALTERED ENDING MARKS~ A1,A2,A3,A4:47505,A1:47515,A2:47413,A3:47423,A4: ALTERED ADDRESS MARKS A1,A2,A3:47445,A1:47455,A2:47466,A3: ALTERED DATA MARKS A1,A2,A3:47335,A1:47345VOL,VL:SLT,SO16:$ Z R/W SECTORh dBF0:TRK,TK:SCT,ST:CMD,CD:IO:BUF,(BUF)1:(BUF)MBBF1n n x MOVE S PHASES 49289SO16DV,0:49289SO16,0:APH(PH4)4:1144,128A:811,128SA:813,SO16:810:49288SO16,0:PHPHS:PH0PHк  ************************=** SUPER IOB 1.5 **[** BY RAY DARRAH **y(************************2 SET HIMEM BELOW BUFFER AND SET LOMEM ABOVE THE BLOADED RWTS<8448:9983:10010F INITIAL IOB SETUP PBUF,39:DRV,DV:     ((40)(41)256(36))128)('A$;:9' DISK ERRORf'ERR(222):ERR15ERR254Ĺ216,0:822:'ERR254ĺ"TYPE AGAIN PLEASE:"::(ERR255ij (ERR0A$"INITIALIZATION ERROR"(ERR1A$"WRITE PROTECTED"(ERR2A$"VOLUME MISMATCHA$"INSERT DISKS IN PROPER DRIVES.":470::1000H' GET SLOT & DRIVE#t'450:::10)"SLOT=>"S28)"DRIVE=>"D2;'16:B$"7":10180:S2(A$)'32:B$"2":10180:D2(A$):' GET A KEY'A$:(A$"1"A$B$)A$(13)10180'A$(13)A$(16:MB151:HX$"000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C1D1E1F202122"j'8::A$"ORIGINAL":S26:D21:10140:S1S2:D1D2t':::D2(D21)1:A$"DUPLICATE":10140~'A$"FORMAT BACK UP FIRST? N"(8)::12:450:A$:A$"Y"İ3800'::A$"INSERT SUPER IOB DISK":450::::A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$|B':(4)"BLOAD IOB.OBJ0,A$300"L'TKSTVLCDDVSO:RD1:WR2:INIT4:10220V'IO768:SLT779:DRV780:VOL781:TRK782:SCT783:BUF787:CMD790:OVL792W`':DOSAST149080,15:49095,0*490:610A49080,0:49095,15`:" 1 & 2 DATA WRITTEN":y' CONFIGURATION TIME'(4)"BLOAD MYFILE ,A$2700"$'(768)(769)50710060.':A$"* SUPER IOB *":450:::A$"CREATED BY RAY DARRAH":450Z8'100ERR255ERR254CDRD102305:ERR15Ĺ216,0:_D(7);:BUF,(BUF)1:(BUF)MBBF1eNX R/W A RANGE QUICKLYb0:0:860,MB:861,LT:862,LSlCMD,CD:TRK,TK:SCT,ST:430:863:1002: CATALYSTTK1:LT3:ST15:LS15:CDRD:F@CD(CD1)1:CDRDA$"INSERT SOURCE DISK.":SOS1:DVD1:510iA$"INSERT TARGET DISK.":SOS2:DVD2D1D2S1S2İ470:1:1:39);::A$"READING":CDWRA$"WRITING"450::80 ONERR IGNORE UNREADABLE SECTORS&822:ERR(222) TRACK & SECTOR#U3:10:"TRACK $"(HX$,TK21,2)" SECTOR $"(HX$,ST21,2)" ":j CENTER MESSAGE21(A$)2:A$;: PRINT MESSAGE AND WAIT:11:450:13:A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$: TOGGLE READ/WRITEMAT DISKZ |A$"VOLUME NUMBER FOR COPY =>254"::450:32:"";VL$:VL(VL$):VL$""VL254o VL255VL0380 CMD,INIT:SOS2:DVD2:A$"INSERT BLANK DISK IN SLOT "(S2)", DRIVE "(D2):470 80::A$"FORMATTING"::450::IO:VL0: PRINT 360,A1: , THE SECTOR EDITOR@ 6A$:(A$,7)"CHANGES"310\ @A1(A$):A1,A2,A3,A4q JA1T1A1TKĂ: T9984(A1T1)4096(FAST15A2)256A3,A4:: ^ SWAP RWTS AT $1900 WITH THE ONE AT $B800 h253,25:255,184:224,8:832: r FOR,A2:47356,A3: NORMALIZERP 47505,222:47515,170:47413,222:47423,170 47445,213:47455,170:47466,150:47335,213 47345,170:47356,173:47360,0:47498,183:  IGNORE ADDRESS CHECKSUM 47498,0:  ALTERED CHECKSUM "A1:470 ( 16 SECTOR RWTS ALTERATIONSC ALTERED ENDING MARKS~ A1,A2,A3,A4:47505,A1:47515,A2:47413,A3:47423,A4: ALTERED ADDRESS MARKS A1,A2,A3:47445,A1:47455,A2:47466,A3: ALTERED DATA MARKS A1,A2,A3:47335,A1:47345VOL,VL:SLT,SO16:$ Z R/W SECTORh dBF0:TRK,TK:SCT,ST:CMD,CD:IO:BUF,(BUF)1:(BUF)MBBF1n n x MOVE S PHASES 49289SO16DV,0:49289SO16,0:APH(PH4)4:1144,128A:811,128SA:813,SO16:810:49288SO16,0:PHPHS:PH0PHU ************************=** SUPER IOB 1.5 **[** BY RAY DARRAH **y(************************2 SET HIMEM BELOW BUFFER AND SET LOMEM ABOVE THE BLOADED RWTS<8448:9983:10010F INITIAL IOB SETUP PBUF,39:DRV,DV:      ``'`حJJJJLԩLLhhߚHH`Hh`5()$ $ \ŭ^ɭ] 00XLGXXX8 XZ X(L.X(Z[\]^_ bX X`8XX X 0XX 88`0 XmXXX+XX X` X`^ ] X ]`XLPX`X`\ +X q\  t uLXV`@@i Q Q Q  @@iQQQ  L` j%d$ [ $$ G * 05#1 * 0($ * 0  *  ` :LO L LO  4U`;U`Vkk kk`;UVYkA ik 8 y V[  ]VVVV8V  LV iVLV 8V`yc`;U`X` VV V VV V  k 8~ \[Z `;U`2(ERR8A$"READ ERROR"S<(12:450:(7):`ɰ` R`ZL'hN NLOɘ`ɞ`N NLO'Gg`` XL`hɘ?h?hN NLO|y NLhNLOwh`H` ɪ` ` hh#Kmh K8hg``h`gKmh0 K8hLfLgLgg`gK K8g0 gg ``XfyYf`LPg` ` ggXf#K K8g`L L nj`ɻ'`'` PL ɞL ''`'`ɰ(`(`  ,H eeee`` ۰zc`zc`XX X p qt uL `Vf`Wf` T`ɚ``i|yLf8|yLf [LfɘLf XfVfWfy%`Wf`Wf`|y& g iLfɅ LgXf`Xf`Lfwc` #e;` ۰`LOeezc. - ee e eɷ7e` e ee ezc S . - `8`i`ɯ ɳɷ`}Le}Led ]} eee e e e ` VV V  Vyc` @ @ xc`1d`1d0d/d0dD ] 8 i/d y&d}i /d0`xc0dzc{c1dN N;U`X\Q^Q[`VVyc`)jjjjJ b jcbb b b jcL>cb b b jcb0`_ ]bbb b a5ULjc `u``wc` vc`LkO `t uuvcvzc{cwc;U`X% bQ[Q ]Q  bQ[baaaaaɬ`[Z a a a oba_bb_b b Ljcb b Ljcaa a  aaaa``G` p`&   TLgLg  bbbbL L% b`b __ Si`8LaS` %WfVf_``Wf``tL_8Lfai L8Ka`Ka_LgLgaK;U`ɇ`__/U`( ];U=Ua5Ua/Ua1Ua0Uaaa aa a o` ` `_______`___`_`_ j___m__ ` _ eLe_LS ` `__ 3`````_0 `````Vf`Wf` Z`ɖ`S ´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čĵàҠĢ̱͠ҍ˽ԽĽҺ½ԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ´  ´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čàҠĢ̱àҠ˽ԽĽҺ½ԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ´,BY(SE),OT(SE):B1SE$~V(37)1cV:HM:"TRACK- ";:130:TK(B)A:" SECTOR- ";:130:ST(B)A" BYTE- ";:130:BY(B)A:" TO- ";:130:OT(B)A620:1:A$"N"1160V2:B:41024:1:HM:"INSERT DISK AND HIT A KEY: ";A$:A$CC$"A$+8:HM:"CONTROLLER NAME => ";:240LB(A$,1)"A"ĺCG$:V1:1080uLCN$A$".CON":V2:620:A$"N"1060VSCREEN DUMP, SECTOR EDITS`410::"NUMBER OF SECTOR EDITS? => ";:LN1:SP$"0":240j::SE(A$):SE01200tTK(SE),ST(SE)0:D5A:A"IGNORE UNREADABLE SECTORS? => ";:340:A$"Y"US1V620:A$"N"920dSET FIVEV(37)1:SP$" ":LN20:NL$CC$$V:1:HM:"FIRST LINE REM => ";:240:R2$A$" CONTROLLER".:"VER. # OR DATE => ";:240:A$""R2$R2$" - :"ADDRESS PROLOGUE (D5AA96) => ";E130:A1A:140:A2A:140:A3A:"ADDRESS EPILOGUE (DEAA) => ";:130:A4A:140:A5A:"DATA PROLOGUE (D5AAAD) => ";:130:D1A:140:D2A:140:D3A:"DATA EPILOGUE (DEAA) => ";:130:D4A:140:ANS810SET FOURT13:1:HM:"USE FOREIGN RWTS? => ";:340:A$"N"950z34,15:LD1::"ENTER NAME: ";R1$:13:HM:"FOREIGN RWTS => "R1$:1020SM1:13:1:HM:"CHANGE SECTOR MARKS? => ";340::A$"N"SM0:1020#13:HMSECTOR STEP=> ";:240:620:A$"N"810GRS1$B$:HSH1:LSL1:520:NSAV\SET THREEf9:HM:17)"WRITING:":"LOW SECTOR => ";:130pL2A:22:"HIGH SECTOR => ";:130:H2A1z:"SECTOR STEP=> ";:240:620:A$"N"870 S2$B$:HSH2:LSL2:52:390:"LOW TRACK => ";:130:LTAL22:"HIGH TRACK => ";:130:HTAq :"TRACK STEP => ";:240:TS$A$620:A$"N"760 SET TWO*5:HM:17)"READING:"4"LOW SECTOR => ";:130:L1A>22:"HIGH SECTOR => ";:130:H1A1&H:"958TITLE PAGE:10:12)"CONTROLLER WRITER":12b19)"BY":14:13)"NICK GALBREATH"17:3)"COPYRIGHT 1984, HARDCORE COMPUTIST":229)"PRESS ANY KEY TO BEGIN":23:14)" TO QUIT"16384,128:A$:A$(27)ĀSET ONE&K IF SET IS OK7l:HM:"CORRECT? ";:340:A$"Y"390=vWINITIALIZE VARIABLES|CC$(3):CD$(13)(4):CG$(7)Q$(34):HX$"0123456789ABCDEF"CC$CM$(13):CH$(8):A768776:LT:A,LT:CD$"NOMONC"CD$"MONIO"::SP$"!":LN25:HMA510768:(A)B$B$((A)):O &512,0:B517(B$):512,0:513,B512:216,0o 0514,2:515,5:516,0:1510 :A1(B$):516A,((B$,A,1)): DA516A:A,0:A1,1:A2,8:A3,7 NA4,0:A5,177:A6,0:104,2 XA0:STLS:5:104,8:bCHECA1:(B2)1% CA,B)A,B1)16< C160CC64:470Q A$(C)::A$;:_ :CM$;:r :CD$"PR#0": EVALUATE EXPRESSION A$"A=A+1:ST=ST+"B$":IFST<"(HS)"THEN5":B$"":540 A1(A$):511A,((A$,A,1))::511A,0:768  hA$"Y"ĺ"YES";:! r"NO";:< |PRINT BANNER OF "-"'S[ I140(32):I:"-";::t SCREEN DUMP ROUTINE 24:1:HM:"SCREEN DUMP? ";:340:A$"N"ı 24:1:HM:23:CD$"PR#1" B0402:ENTER LINES TO DUMP TIMES TWO A039 CM$A$CH$250, A$CM$B$NL$A$B$:B A$CH$B$""250l "A$CH$ĺA$" "A$;:(B$)1B$"":250 ,A$CH$B$(B$,(B$)1):250 6A$SP$250 @A$;:B$B$A$:250 JGET A "Y" OR "N" TA$:A$"Y"A$"N"A$CC$340 ^A$CC$Ĭ117:A$(HX$,J,1)Ă:140' J17Ĭ; A$;:A(J1)16U A$:A$CH$ĺA$;:140p A$CM$AA16:" ";: J117:A$(HX$,J,1)Ă:170 J17Ĭ A$;:AAJ1 GET A STRING B$"":A(36)1 A$:A$CC$Ĭ (B$)LNA$ /------------/!/ / CONTROLLER / !F/ WRITER / !](------------- !t2! BY: NICK ! !<! GALBREATH ! /F! HC NO. 16 ! /P-------------/Zd::255::1510n650x1 BYTE INPUT"$"; A$:J        s  Is s  Is t  Is t  Ist ,,L-)B> : 602.*&" ͝ ͖ ͈ ͏ ͤ Ͷ` sLIsꎘs ,0Θs` Π(Ӡ٠Ҡ(Ԡ(Ժ(к(׭!rLV8`pTp! ,ry!rrrrr rrrplr`ry r  !rLV`LK! ! pɲ ɳɱ`) rnro`Ƀ` s s  s  Is s  Is VVVVVVVX\bhpx`Q`8p  qq ȹ1q _ e e 88ͩ_*LOq`c`qNL+8 8{PKQ# ``Ơ  `8 8`@8 r pp "ppp p& p p 9p' p p 0Rp Pp QppPL0   pE  _F  :F :F ?( ?蠈 ? F q 4M` i 8 `5U$b`X) X qt u pL! `hd`\X8 8n i  88` Q Q  @@iQQQ  L` j%d$ [ $$ G * 05#1 * 0($ * 0  *  ` :LO L LO @8mLyn8nn8 `i `n8n`in`[ mmmmmmm`m^ ]`n n m m mm ,HmmmmmmmmLnmmmmm m`ynmim`n`(nl l +H ,H88lllllllllllyllilyllil`im"imcmemdmfmhmjmLm*RKem fmcm dm hm  hmcmemdmfmjmcmcmcmɌjm`cmcmcmjm`kk k lkkkk k l`kk k lkk k lkkkk ޜkޜkLjlkkk*ݠkkIkΨkk` kȹk ` 0 "G7ήl`l8l l lll l +H ,H8l l llԽ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čРҠĢ̱Ġҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽Ա " CONTROLLER ENTERED"Q$,CD$"CLOSE"CN$:<ERROR TRAPK:A(222)A0(A255A15)ĉ::CG$"ERROR #"A" IN LINE "(218)(219)256:A255Ĭ23:1:CG$"WEIRD DOS ERROR #"A:200162,255,160,2,132,19,76,108,213COSUB450:END"OSMĺ"5000DATA"A1","A2","A3","D1","D2","D3","A4","A5","D4","D5^SE01470"5010DATA"SE" CHANGES":A1SE5010A10"DATA"TK(A)","ST(A)","BY(A)","OT(A):LDĺ"10010?CHR$(4)"Q$"BLOAD"R1$",A$1900"Q$"?"Q$(CN$,(CN$)4)10:";PLDĺ"GOSUB360:";1ZSMĺ"GOSUB230:";Od"TK=T1:ST="L2":GOSUB490"n"1070GOSUB430:GOSUB100:ST=ST+"S2$":IFST<"H2"THEN1070"x"1080ST="L2":TK=TK+"TS$":IFBF=0ANDTKu>UP@?|*U*P5P5T5U*T:t>t>UW@|_zuO:Ѐŀנݠ 4 TP0 ,..PP|x80 T0(=/P|x0 40.P|0*T*T      U*U*~*T*T ! U*U*~*T*TU*U*~@@@@@@@@@C:N?|?x8?p?p?p`` @ @ @ @``*U*U*U*U*U*~*~** U U UUU````?*U?*U?*U??:W;_>w:W~ԀՀՈ׸վתꑢÁǁƁԀՀň׸վ쑆@yz{zi|z`b b b jcL>cb b b jcb0`_ ]bbb b a5ULjc `u``wc` vc`LkO `t uuvcvzc{cwc;U`X% bQ[Q ]Q  bQy i }y ~y+H ,H889̭}y8|y` 3z` 3z2z2zLSz2z i' 82z~ y4z ` ΂z`zzz5 ~z@}z ,Hzz|z`{z` ~z }z |z{z ,H|z~z{z}zzIz´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ  ԱԽ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čӠҠĢ̱ŠҠ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α² x@<<<?<<8s `~@|?xIN\8s]gG>  HIR$B HEB` HGN  HIB$I! HI(R?GB@s]g_g@B|?xp8@~pp x`833?3333333333333333;33333?333? ?00003333?3?33333337;3333333333337;3333303? 33333333333 33333?333 33333 ?0 ?8p`xx``xx>8888866$$~$~$>> >B%$R! *,88888"6">~~`p83;?73  ?30 ?30038<63?00?0333?3 333333>0 ~~ < <~b0𿀀𿀀 H0  HA1A6f AIM0AA2D 8ppppp?r}W7~|rh=~n}pP@`px````^LLL^~*U*U."JTQ*U*U>jU*UpzJW@JV>nU*]~fU*Y|[vxYjUfpX T`xx@8Lf?߀՟߀߀߿߀𿀀𿀀~5+553535+7{8|?*U(8 08|?|#x#p@ 0 0p((8(+8+(+(x @`x|p@ @ @|xxpp` `ppxxtH``%ZXzp%pp-P|kO~\/x@5,5,5?*T.t.t*T*T/t*T?}3 0 ?}*U*T((ЅЅժժբѢѪժժժժժժժժժժժՊՊՊժժժժЪЪЪժժ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čӠҠĢ̱ǠƠӠҠ˽ԽĽҺ½ԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ  p`pap*@*@_]U(*.`~<`A`C`UU>:*PT\@~|x@@@**|tT (8|xp RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP T Txh(@Pp~xp`(( p P P `|p`@<88<*P*P`  @ @?x?`@xp8pxU U /@.@*@p@?>8<**TUU0)0* .`~<|pxTT(**`R`T@\@~|xx`p((PTU@%@)8|xp RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINPp@`PP (+KRp~xp``@  @ P V$`|p`@@ @ @ , , H @?x?`@**@*XXp@?`@c@*@*U0U0T (*.`~<@GUT*`*`(@PT\@~|x *(U@U@Q (8|xp RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP88 >T P++"@Pp~xp`pp|85( V V D `|p`@`8`0xpjP*@,, @ @?x?`@@p@`q`U U*X*X*p@?@@C@*@*@}]U *:@@?UUz:*Tt~<>**ttT((h~~|x RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP<8| T Thh(PPP||xpxp8x8((P P P   ?xxp`p`ppp*P*P   @ @@pp`@`A`a`U U >@.@*@`?`@>**UUJ*:@@?|<TT** * Tt~<x8x((TTT( (h~~|x RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINPpppPP((5(4PPP||xp```  P PjPi %  ?xxp`@@@ @ @  U R@J@@pp`@ @*@*@%`?`@´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´čҠĢ̱͠ҍ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽ԱԽ! ! Խ´´±ԽԫԼαԽ˽˫ƽ˼α˼αź̠Ţ´č͠ҠĢ̱ϲҠ˽ԽĽҺ½ϵԽԱ˺´ź±²±´±ԽԫԼααԽ˽˫˼α²˽Ա!! @wuUUUkkk@w` "00k*nj***VVWo@8@ D` ~`V~T\TTTT,,._q @}@,|( RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP<8((((XX\>b27{XxPxpP P P P 0 08>|#Dd&ov 0p p=`    ``:p}xGHL_l`` @`{@:@*@*@*@5@5@u`{p?X5@?@pw@WUUUkkk@wp0"k*`o.***VVWo` 8`D~V~T@^\TTT,,._@q@|,|( RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP<8(((XX\??1cxXxPx p P P P 0 08~~cF p 0p <p`   ``:p}|G @``` @x;`+@*@*@*@5@5@u`{x?@5@?@@EEmT * *`;TlT*H@U$@  Z( @T@U@v(X(T *I  4P A%)5+ lP0P ( "T RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP<<((h AJRjVX ` PD%( $xxP(P-P @$U,70 @ @ @% )JPHpq Q [ *H*Xn`J@R )`b@"@6@*UU0]@*6*$ *@R @G@EmT * * : U@lT*E(@D Z( T@T@t@ +X(T Q   4P@%)%)%iV0P( " RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP<<(h JRJRKR5,` P("D x(x(P-P @$$$jX @ @ (PE@pQpQ [ *H*H.HU0*@Q  `#`"@6@*UU]*`6*U"@ "G@GmTl+@+@TT~nlZ(XWW((~|\X 4P0..PP|x80 RAWINPUT <1 #NYDATAE1 BADDATA  ^1 RAWINP<<8h `:\:\  xpp`xx8p-P @ @u8u8 @ @?p`` @qpq`[ jpjp`?@;@c`c@6@*6U`U`**@w6DMD1:310: KS10MDMCKS21MDMCTEMPMD:MD1:310j KS11MD1KS8MD1TEMPMD:MDMD1:310 "KS11MD1KS8MD1TEMPMD:MDMC:230 ,BL$:230 6TEMP23:868:8:MS$(MB,TEMP) @MD23:8::MS$(MB,MD)::230 J T SELEC TO EXECUTE": "UP OR DOWN ARROW KEYS MAY ALSO BE USED"[ 7:X2MC:8:MS$(MB,X):: 5:8::MS$(MB,1)::MD1:16368,0 KS(16384):KS128ī230 16368,0:KSKS128:KS13ı KS27MA1MD0: KS10MDMCKS21MDMCTEMPMD:M::J,I: n$ x MENU SELECTION* K :"PORTFOLIO";:MA0ĺ:160f 30::"ESC";::" TO" MS$(MB,0)" MENU";:MA0ĺ:180 30:"PREV. MENU" X139:"=";:: 22::"<-";::" ";::"->";::" TO SELECT";:22:::"RETURN";::"RL JOHNSON":12:3:"COPYRIGHT 1987 BY MICROSPARC, INC":22:8:"PRESS RETURN TO CONTINUE";:Z$::13:1:958x Z5280 dI1024110440:J0896128:K039:A(JKI):AA(A32)192:AA(A64)128:AA(A96)64:AA(A128)64:AA(A160)64:(A);:K :& **********************D * PORTFOLIO * b * BY KARL JOHNSON * ( * COPYRIGHT (C) 1987 *2 * BY MICROSPARC, INC *< * CONCORD, MA 01742 *F **********************n P:8:15:"PORTFOLIO":10:12:"BY KA"" " " "