' +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`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*`]ӠƠŠĠǠԠa@E(Ġ)a@E(άìɬ)KK M6oa(ԠŠĠ٠ǠŠǠӺ)ca()G M4cS(٠ҠŠ)&@`@*#r9()$ bca(š)cQ]]ɠ]BdKe de de dJededeN@"r ]L]ŠԠŠŠԠŠƠ٠Ҡ͠Ӡ@p()]̭<q   (116)256(115)1792Č10132::"GOODBYE!":1:A$(J)::23R:(9):"DONE! YOU NOW HAVE A TEXT FILE NAMED:"::" ";NM$:"ANY FURTHER EDITING OF THIS FILE ? ";:G$::G$"Y"56:"CREATE ANY MORE TEXT FILES ? ";:G$:G$"Y"ĬD$;"MAXFILES 3":216,0:(1018)256(1017)j8Let9<gkmhjln89<hgeLfРŠԠРŠРԠҤΠТĵΠǢϠİƷΠĸǢ̠ΠؤҠɠϠ̺ŠɬàĤؤɬԠŠ̠ؤŠŠàİŠ±ư±øİààРŠԠРŠРؤŹ°à°õ°ƴ°ŠĠàƠ Ġ°àŠŵŸ¹  н˨ŠЍŠŠЪԢҠԠӠ̠נԠԠӠЪΠ٢ˠԠӺˠˠԠͺˠˠ̠ԠԺˠˠԠĺˠˠԠӺˠˠԠӺˠˠԠźˠ  ԠĤŠǢŠԠԠĤŠǢŠŠŠ̠ ԠšĠΠ̠Ԡ̠ ԠǢŠŠŠ ĠΠĤԠĤΠìɬϢԠĤΠǢԠĤŠǢԠĤΠǢ  ŠŠĠĠΠō  [iȱiȱi  E` b`   LE iȩiȩi` LE A ɈL) . E  E L L L  L )   L  E L ɍ)` Ɉ[ɛ1ɕaɍc) Ev_L  `H ɕɈɠ ɝ Lt L LU LL  L L0 B b`L=   :LL 8e E B `    56B:"SAVE THE TEXT FILE ? ";:G$::G$"N"G$"Y"180RG$"N"192:"SAVE AS A NEW FILE (N), OR APPEND (A) ":"TO AN OLD FILE ON DISK ? ";:G$::G$"N"G$"A"18219G$"N"18725:18920:24:2021:J1I:56$X11ĺ"SYNTAX ERROR!":56JX13ĺ"FILE TYPE MISMATCH!":56X10ĺ"FILE LOCKED!":"UNLOCK THE FILE ? ";:F$::F$"Y"İ28:185X10ĺ"ERROR #";X56:29:56F56IN:F0:23:56IN:23:I2İ24:X6:156(0):20:22:N(G$"A")(I1):F1=NN1:13:A$(N)X$:148SX(222):X5175YX77ĺ"OUT OF MEMORY!":GB$"":K(0):172X4ĺ"WRITE PROTECTED!":56X6ĺ"FILE NOT FOUND!":56X8ĺ"I/O ERROR!":56X9ĺ"DISK FULL!"LINE END(BEG)"e" ESC (CHAR) : MOVE CURSOR TO CHAR":" ESC CTL-SFT-M: DELETE TO RT OF CURSOR":"PRESS ANY KEY TO RESUME: ";:G$::56::"LOAD A NEW FILE (N), OR APPEND (A)":"TO THE PRESENT FILE ? ";:G$::G$"N"G$"A"140!19:KMANDS AND FUNCTIONS":::"LINE EDIT FUNCTIONS"::" RIGHT ARROW : MOVE CURSOR RIGHT":" LEFT ARROW : MOVE CURSOR LEFT"" RETURN : TERMINATE LINE":" ESC RT ARROW: INSERT MODE":" ESC LF ARROW: DELETE CHARACTER":" ESC SP BAR : CURSOR TO TRL-D: DELETE LINE(S)":" CTRL-E: EDIT A LINE"" CTRL-I: INSERT LINE(S)":" CTRL-L: LIST TEXT FILE TO SCREEN":" CTRL-P: LIST TEXT FILE TO PRINTER":" CTRL-S: STOP, SAVE & EXIT OPTIONS":" CTRL-X: DELETE IMMEDIATE LINE"z" CTRL- : LIST COM$(9)50rG$(4)60*sG$(12)70;tG$(16)90LuG$(3)170]vG$(24)80lwG$""121~x(G$)32130yA$(I)X$:102::"TEXT EDITOR COMMANDS":0" CTRL-A: LOAD OR APPEND DISK FILE":" CTRL-C: LIST DISK CATALOG":" CLOT OR DRIVER ADDRESS: ";P:,[P7ČP:93<\D$;"PR#";PB]T^JJ1:JI98d_NJ:30:16j`ra94bD$;"PR#0"::56d"BEGIN ENTRY:"::I0fII1hNI:30:15:G$(X$,1)nG$(19)180oG$(1)140pG$(5)40 qG1::J(I1)J056&HJJ1:JI786JNJ:30:16UL(37)22ľG$:G$(27)56]M72N:"END OF FILE":J12000::16368,0:56P4);"LINE CANCELLED":104Z::"POSITION PRINTER PAPER AND HIT RETURN";:G$:::J0:PĄ"ENTER PRINTER SN(N)(N0):N(I1)N1Ĺ216,X:56u >9);"TO LINE #";:"";V:216,X:V(V):V(V(I1))(I1)(V(I1))V:VN56 @VVN1:K1V:II1:JNI:A$(J)A$(J1)::A$(J1)""::56F12::::"LIST FROM WHICH LINE #: ";J:216,X:J(J):J(J0)(J0)JLINE #:";N:216,X:N(N):N(I2)N056q 4NN1:"NEW LINE #";N;":"::30:15:G$(X$,1):G$(24)NN1::52 5(G$)0ĭ(G$)3256 6JIN11:A$(J)A$(J1)::A$(N)X$:II1::52 8:"RESUME:"::104$ <12::"DELETE FROM LINE #";:"";N:" "N$:32 "N$;">";:T (12::"EDIT LINE #: ";N:216,X:N(N):N(I1)N156n *"OLD LINE #";N;":": ,X$A$(N):30:14:G$(X$,1):G$(24)ĺ4);"LINE DELETED":VN:64 .(G$)0ĭ(G$)3256 0A$(N)X$:56( 212::"INSERT AFTER WHICH PEN ";NM$:" D$;"WRITE ";NM$:8 D$;"READ ";NM$:J D$;"CLOSE":b D$;"DELETE ";NM$:z D$;"APPEND ";NM$: :"DO YOU NEED A CATALOG ? ";:F$::F$"Y"İ29:  D$;"UNLOCK ";NM$: D$;"CATALOG": N$(N) (N$)3N$": 1505 I042:GB$GB$(32)::K(0):100K X(216):216,0:b 2645:X$(X$,1):y 2599:X$(X$,1): 2626:X$(X$,1): X$A$(N):2592: 26::"INPUT FILE NAME >";NM$::"INSERT DISKETTE AND HIT RETURN";:F$:: D$;"O3 TEXT FILE CREATOR0 BY WES HUNTRESSH *****************N"MAXFILES 1":X$"":F$X$:N$F$:G$N$:NM$G$:D$(13)(4):A$(999)D$;"PR#0":D$;"IN#0":I0:JI:KJ:NK:VN:XV:FX:PF :::5);"** TEXT FILE CREATOR/EDITOR **      `  +n  ɠ i м*ȱ  ``RE COPIES OF THIS FILE ? ";:60::G$"Y"40m 4"DO YOU WISH TO ACCESS ANY NEW FILES ? ";:60::G$"Y"10 634,0:"BYE!": <G$:: F7,NS:IOB3,0:IOB4,17:IOB8,0:IOB9,HH:IOB12,1:IOB13,0:NHHHMSAR@LML72S &D$"BLOAD ";NM$;",A";LM:"DO YOU WISH TO COPY THIS FILE ? ";:60::G$"N"52 ("INSERT COPY DISKETTE AND HIT RETURN";:60::"SAVING ";NM$ *D$"BSAVE ";NM$;",A";LM;",L";L ,70:DSCAN .HM,AL:HM1,AH:IOB12,2:RWTS, 2:"DONE! ANY MOYPE MISMATCH!":14@ AL(HM):AH(HM1):L(HM2)(HM3)256 :(4):"DATA FOR: ";NM$::(7):4);"START ADDRESS: ";ALAH256;" IN DECIMAL": "4);"LENGTH OF FILE: ";L;" IN DECIMAL":34,13:(13) $LDMĺ:"FILE TOO LONG FOR COPY!"::5COPIER **":(6)C :"INSERT MASTER DISKETTE AND HIT RETURN";:60 :"DO YOU NEED A CATALOG ? ";:60:G$"Y"ĺD$"CATALOG":14 :"NAME OF BFILE: ";NM$:I02:25I,(SAI): 70:DSCAN (6)30,26 "FILE NOT FOUND!":14 "FILE T8:AH(L256):9,AH:8,LAH256:IOBL5:G$NM$:D$(13)(4) RWTSLM1536:DSCANRWTS8:LMLM2048:ALAL6:RWTS1,AH:RWTS6,AH:RWTS22,AL:RWTS136,AL:RWTS21,I:RWTS135,I NS16 D$"NOMON C,I,O":DMHMLM :::5);"** BINARY FILE DATA/ BINARY FILE COPIER5 BY WES HUNTRESSP ******************"MAXFILES 3":(115)ė:(4):"DOS IS MESSED UP!"NM$"":HH(116):29,HH:HMHH256:SA(105)2(106)256:AL(104):I(103)1:LMAL256I< L(55)256(54)644     z#??????  Įɠ Įɠٮɠ ٮɠٮɠ ɠԮŠՠ ӠŠРŠŮ Р      ԠϠ ٠Š  ֠     Ԡ Šՠ      ŠĠ ٠ !Ġ"Ġ  -             ՠՠq_GP3|q`$qq.?r8.?rr>}`$`%q`$`$|`$~q` %\dea@G_|a()Gq[c`.?%r%\_z%qqq6\_|)&@/la(ԠҠ٠Š)G\`$xnqq\\2pM\\qca(Ҡ)F5rca(ĠҠҠ)G\`$[_p4xqqqq6\\\M"zqqbҠŠ)G\`$d]ca(š)Q"^a(ĠƠ)c\_\`dKMcP a(ԠŠҠ)oa(ԠŠŠĠԠΠ)G\2fca(ϠՠĠǠ)G\`$ jcS(ŠƠԠźҠӺ)'[!F`.?r%_deH`.?r%[ Jwc_\Pa(ŠԠġ)Ra@E()Ta@E(Š)E@w_f3Zw`$^Mo a(ĠƠ)[d"ed ed!e(=\a@E()oa(UVWq8.?r8.?rrr`$4dea@G_7'4q@ded2e?a@Gd2e7Y[@<ca(ĠϠҠ)G\`%[`7%\D`$?>a@E(ң)cq[ ?M[Aa@E(ң)q[4DcS(ҠҠԠҠҠ)a()a()a()a()G d"ed!e d e[*a@E(Π)E@q.?r`%_ұ?"dede.?Lrd e.?Mrd e[C(q.?r`%_dede.?rM*[>2ede a@E(Πìɬ)Ka@E()_da@E()_f'q.?r`$dec[IMoa(ź)E@oa()$a()La()a()a()a(.?6r+q nq6qqqqq(q2q<qAqFұqPqZ,qq6@q6?N@"(r9 dededede dede` q.?& rd ]ԠŠҠ]٠ӠӠ]ài@p()@p()qqqqqqqqqqqq8.?Kr8.?Krrr.?Jrdq8.?Mr8.?Mrrr.?Lrq8.?7r8.?7rrr     Ҡ)G\`$hpd"ed ed!e(.rca(ĠҠˠ)G\`$dtca(š)Q#xo a(Ҡ)_n#$jca(̠ˠ)UVWY_hWjS(Ҡ)'`6$lca(̠Ҡ)UVWYM_jOloM6da(ˠ)FE()E(Ҡ)Fo\`.?r$x\9noMa(ĠҠeM*[>2UVWq8.?r8.?rrr`$4dea@G_7'4q@ded2e?a@Gd2e7Y[1dMcPa(ˠҠҠ)o1fa(ԠŠĠԠ)G\\XhMS(ˠ)'`66@r`$d6?ec[1Moa()$a()La()a()a()a()a()a()a()a()G%d"ed!e d eo['(M6dedqDq q6qqqq(q29 dededede dede` q.?& rdede= dede.?Lrd e.?Mrd ea@E(Πìɬ)K_d&q.?]ˠҠ]٠ӠӠ]àT@p()@p()qqqqqq8.?Kr8.?Krrr.?Jrbq8.?Mr8.?Mrrr.?Lrq8.?7r8.?7rrr.?6r+q      M`$rIa(ϠՠȠϠӠ٠ҠӠ)G\d"e`$dca(š)QԠ)G\Ma(ǠϠ)<dedede-rUVWde.?[rY-d<ed=ed>e!d?eM630d<ed=e d>ed?e M63OMa(š)ca(٠ŠӠƠӠŠ)G\Ԡ)G\M`$x`$_rLxMa(Ԡ٠ŠĠԠ)G\Ma(Ǡ)E@z\q q6|UVWqq&~a@E(Š)E@E()Fc\Y\_MMa(ԠŠҠĠ#hcS(ŠƠź)&@c\0jUVWqq \Y\RnMoa(ǠŠŠ)a@c\bE()o d"e ?pa(ϠՠȠϠ٠ӠŠ)G\M`$Era(٠ϠˠҠŠr_FJa()[ Lb-r[Pa(ŠԠġ)Ra@E()Ta@E(Š)E@w_f`dKMcP a(ԠŠҠ)oa(ԠҠŠĠԠ)G\2fca(ϠՠĠǠ)G\`$r$@_>F@q`$B`.?r$@-rq `$Bq_>%B`$Dqa(̠)[/Dqa(͠ŬĠȠ)Gq3FqqUVWq8-r-rrY.H`$L`$J-rq-Ϡǡ)a@E(Š)E@_>(de.?rde.?rd eM*[A2dBe.?LrdCe.?Mrd<ed=ed>ed?eM64[@<q q 88rrqUVW-rqY(>q`$B`.??ec[a@E(Π)E@a@E(Š)E@a@E(Π)E@[a@E()[&a@E(Π)E@`.?r%_ұ0 deded eq#"q`.?r$$_"!$q`.?Mr$&[,&a(Šqqqqq(q2q<ұqPq9 dededede dede` q.?& rdede a@E(Πìɬ)Ka@E()_da@E()_f&q.?6@r`$d6l ]ԠŠ]٠ӠӠ]à3@p()qqqqqqqqqO4rC@"rdq8.?Mr8.?Mrrr.?Lrq8.?7r8.?7rrr.?6r+q ]q6     Š)G\`$xLca(ϠՠȠϠӠ٠ҠӠ)Gd"e\`$dca(š)Q tbE()o d"e LxMa(Ԡ٠ŠĠԠ)G\Ma(Ǡ)E@z\q q6|UVWqq&~a@E(Š)E@E()Fc\Y \IMa(š)ca(٠ŠӠƠӠd<ed=ed>e!d?eM6:hq.?rd<ed=e d>ed?e M63jq.?rq.?rUVWd2e.?rY*nMoa(ź)E@c`$r+pa(͠ŬĠȠ)Ic_tra(̠)c@a@E(Š)E@a@E(Π)E@[a@E()[A2dBe.?LrdCe.?Mrd<ed=ed>ed?eM64[[dMcPa(ŠԠŠҠ)o a(ԠŠҠĠԠ)Ge\Mo a()-fu]ŭˠŠ]٠ӠӠ]à%@p()qqqqqq N@"r0q6qqq2q a@E(Πìɬ)K_d&q.?6@r`$d6?ec[a@E(Π)E    ɠ i м*ȱ ` `Ԡ)UVWYQRa@E(Ġ)E@\<M6qd<ed=ed>ed?eM63TM6_2IZM6oa(ŠӠĠŭΠٮ)a(͠)Q ` ` +n c`$ 6d"ea(š)8Q&<q.?6@r`$<d6?ec[>a@E()_ZFdedededed ed ed e[WPa(ҠˠŠӬ)a(ԠŠҠĠ)G\<M6a(Ǡ)E@E(Ϡ)#*a@E(Š)E@E()FE()F,\FM(.deded eMJ2M6a(š٠ŠӠƠӠŠ)G\<M6`$&A4a(ϠՠȠϠӠ٠נӠ)G\<"e o `$$(#ca(ŠϠǠҠ١)c_4Y$a@E(Ġ)E@E()Fca(ϠՠȠϠ٠ӠŠ)G\<M6`$4@&a(٠ϠˠҠŠ)G\<M6`$P`$&P(a(Ԡ٠ŠĠԠԠġ)_ a(ŠŠȡ)_Nq.?rq.?rq.?r.?rq88rrU M6oa(Һ)E@coPa(ԠӺ)FE(Π)cE"Pa(ȠƠź)FE(Π)dKM6cPa(٠ŠҠ)o4 ca(ԠҠŠĠԠ)G\<2ca(ϠՠĠǠ)G\<`$>'cS(ŠƠź)&@de;@r\FM"q.?r`$`$a(Šeded e@p()q.?Krq.?Jr`$qq qjdedeqqqdededede9 a@E(Πìɬ)qqx`w$ q8 ^]٠Š]٠Ӡ]9`.?Lr$Z8.?r8.?rrr.?rpN@"rq.?Mrq88rrqq.?7rq88rr.?6r+qDd      ɈL* / E  E L L L  L    L  E L ɍʆ`ɍ` L L  Ɉ[ɛ1ɕaɍc ExaLɠ) `J ɕɈɠ ɝ Lw L LX LL  L L0 B b`L@   :LL 8e E B `    D$;"RUN TREAD"* G$"C"ĺD$;"RUN TCOPY"F "G$"D"ĺD$;"RUN DREAD"b $G$"M"ĺD$;"RUN MREAD"~ &G$"B"ĺD$;"RUN BCOPY" (G$"X"ė:928,0:D$;"CATALOG": *10D (TCOPY)":3 "D: DISK SECTOR READER (DREAD)":V "M: MEMORY READER (MREAD)": "B: BINARY FILE DATA/COPIER (BCOPY)": "X: EXIT TO CATALOG"::: "PRESS CODE KEY AT LEFT OF CHOICE: ";:G$: G$"E"ĺD$;"RUN TWRITE" G$"R"ĺ UTILITIES MENU+  **************= D$(13)(4)U :D$;"NOMON C,I,O" :5);"** TEXT FILE UTILITIES MENU **":(5) "E: TEXT FILE CREATOR/EDITOR (TWRITE)": "R: DISK TEXT FILE READER (TREAD)": "C: DISK TEXT FILE COPIER  `%a@E(ΠĮ) `%a@E(Πٮ)"`%a@E(ΠĮ)&`%a@E(Πٮ)(`%a@E(Πٮ))`%a@E(ΠԠ)*`$.,_ .M6a@E()Q`ٮɩ)c-a(ԺŠԠŠҠٮɩ)c)a(ĺˠҠҠĮɩ)c.a(º٠ŠҠٮɩ)c a(غԠϠ)ccc*a(ӠŠ٠ԠԠƠź)G$q.?6@r`$d6?ec]Ӡ] @p()Ka@E(Πìɬ) de6 M6a(ԠŠӠՠ)o) a(źŠҠϠԠϩ)c,a(ҺˠԠŠҠĮɩ)c'a(úԠŠҠ  ˠՍˠՍŠլКŠլՍŠКՍˠՍˠՍA(2056I16)::A4110ĺD$;"BLOAD GETLNA"A 2D$;"RUN TWCODE"S <D$;"EXEC MV"U TWRITE LOADER) *************7D$(4):M D$;"NOMON C,I,O"}:(12):"LOADING TEXT FILE CREATOR/EDITOR"(104)256(103)281760A0:I09:AA(2560I10)::A835ĺD$;"BLOAD GIA", (A(2048)(2050)(2509):I028:A LE ? ";:16368,0:G$::G$"Y"ė:1027:"BYE!":":D ` ,`sɠ) `sɍɠ) ``T ` ,`sɠ) `sɍɠ) ``sɍ/|33,35:32,4:LPNT:32,0:33,40:(6)0129Y~:(37)22ľG$:G$(27)ĺ:58:193b122uTT2:40:124:E1ĺ"(END OF DATA)"::58:I12000::193:(11):8);"END OF DATA"34,0:32,0:33,40&28:(24):"READ ANOTHER FIE OF TEXT FILE: ";NM$:I j"LIST OR DISPLAY MODE ? ";:G$::G$"L"120b nE0:S0:T2:30:20 p:SS1:TT2:40:DPNT::"SECTOR #";S r:"READ ANOTHER SECTOR ? ";:G$::G$"N"192 t112 xE1:T0:J1:6,T:30:40:50: zJJ1:J;:5RESS: ";PR 6PR7ČPR:- 8D$;"PR#";PR:> :D$;"PR#0":V P"FILE NOT FOUND!"r RD$;"DELETE ";NM$:28: V:"DO YOU NEED A CATALOG ? ";:G$:::G$"Y"ĺD$;"CATALOG":86 X104 f::"INSERT DISKETTE AND HIT RETURN ";:G$::86 h"NAMTKSCT):Q(TKSCT1):(PQ)46< *IOB4,P:IOB5,Q:RWTSB ,\ .SS1:TT2:T24440 /T0:P(TKSC11):Q(TKSC10):(PQ)190 0IOB9,HH1:42:34:40 2:"SEND TO PRINTER ? ";:G$::G$"Y"ı 4PRĺ:"ENTER PRINT SLOT OR DRIVER ADD" 0- ":" 32- ":" 64- ":" 96- ":"128- ":"160- ":"192- ":"224- ";b 34,7:33,32:32,5:t D$;"CLOSE": D$;"OPEN ";NM$ P0:I0243:PP(TKSCI)::PP(TKSC11)(TKSC10):P80 "IOB3,0:IOB8,HL:IOB9,HH:IOB12,1: (P(:28? RWTS(103)(104)2561919:DPNTRWTS14:LPNTRWTS31e P(IOB3366):RWTS1,P:RWTS6,P ::9);"** TEXT FILE READER **"::102 :(3):5);"FILE: ";NM$:(6):" 0 8 16 24" " ' ' ' '"I  TEXT FILE READER 8 BY WES HUNTRESS R **************** e"MAXFILES 3"D$(4):G$D$:NM$G$:I0:EI:JE:SJ:PS:QS:TQ:PRTHH(116):HL(115):HMHH256HL:TKSCHM268:IOB(55)256(54)6443 D$;"NOMON C,I,O":     COPIES OF THIS FILE ? ";:G$::G$"Y"ė:28:88o:"ACCESS ANY OTHER FILES ? ";:G$::34,0:G$"Y"ė:100D$;"MAXFILES 3"::"BYE!":":BBMEI ` ,`LQ08,0:103&xEE1:90:29:20:124.z29F|RLM1:I1S:RR1}LL1:P(TKSCTT):Q(TKSCTT1):TTTT2:(PQ)125~D$;"WRITE ";NN$;",R";L::50:I:RLM:34:Sİ2924D$;"RENAME ";NN$;",";NM$0:"DONE!"::"ANY MORE T:ST:SST:RLM:L1rgP(TKSCT):Q(TKSCT1):SSSS(PQ):PQĹIOB9,R:40:RR1:SS1:SS0:RHHİ120:28hTT2:T244103jSİ120kLLSS:T0:TTT:SST:P(TKSC11):Q(TKSC10):(PQ)180lSİ28 mIOB9,HH1:IOB8,HL:40:IOB ";NM$:NN$NM$".C"$X30:E0:102_Z:(4):"CHECKING FILE TYPE FOR":NM$::60:13:34,12\"DO YOU WISH TO COPY THIS FILE ? ";:G$::G$"N"ġ:192^d:9);"** TEXT FILE COPIER **":14);"SINGLE DRIVE":5:34,4:28::34,0:86fT0:TT:QB(I)B(1):PP((((Q(Q))B(1).05)(Q))0):? JP078K KB677_ LB(1)B(1)B:72u M"UNDETERMINED": NB(1): P"FILE NOT FOUND!" RD$;"DELETE ";NM$: V:"DO YOU NEED A CATALOG ? ";:G$:::G$"Y"İ27:86W"NAME OF FILE:LM256:BQ:BMQ(1(S1))256:J1:I18:B(I)0:IF =BB1:BBM68U >(B)064] ?61p @BB1:BBM68 A(B)064 BB(J)BQ:J868 CJJ1:61 DJ170 E"SERIAL FILE": F"RANDOM FILE, RECORD LENGTH ";:B13 HBB1:P0:I2J::"WRITING ";NM$:SDOS:/ D$;"OPEN ";NM$q P0:I0243:PP(TKSCI)::PP(TKSC11)(TKSC10):P80 "IOB3,0:IOB8,0:IOB12,1:IOB13,0: (IOB4,P:IOB5,Q:RWTS * 266,166:67,HH2:60,0:61,R:62,255:63,R:MOVE 43 <Q D$;"OPEN ";NN$+ D$;"DELETE ";NN$I D$;"OPEN ";NN$;",L256":[ D$;"CLOSE":o D$;"CATALOG": S0:18::"INSERT MASTER DISKETTE AND HIT RETURN ";:G$:::"READING ";NM$:SDOS: 18::"INSERT COPY DISKETTE AND HIT RETURN ";:G$:6(54)6443G LM(104)12((103)1):115,0:116,LM:111,0:112,LM RWTS(103)(104)2562479:MOVERWTS8:SDOSRWTS14 P(IOB3366):RWTS1,P:RWTS6,P:RWTS16,(IOB6523) D$;"NOMON C,I,O"::24:100 54,240:55,253:56,27:57,253:  TEXT FILE COPIER7 BY WES HUNTRESS R **************** e"MAXFILES 2"B0:BMB:EBM:IE:JI:LJ:PL:QP:RQ:SR:TS:SST:TTSSG$"":NM$G$:NN$G$:D$(4):B(8) HH(116):HL(115):TKSCHH256HL268:IOB(55)25      v:"BYE!":#v:"BYE!":4w"RUN MENU"U$"N"108B n"READ ANOTHER DISK ? ";:G$::G$"N"G$"Y"110e p34,0:32,0:33,40:G$"Y"100z rD$;"MAXFILES 3" v:"BYE!":DG ` ` ,`sɠ) `110 p34,0:32,0:33,40:G$"Y"100 rD$;"MAXFILES 3"h"SECTOR #";SC%:SC%1SC%NS106T i:"ILLEGAL SECTOR # !":I12000:::104 j(3):868:"TRACK #";TK%;", SECTOR #";SC%:(8):40:(ER)128Ģ(12):6);"SECTOR CLEAR":108 kDPNT l(20)::"READ ANOTHER SECTOR ? ";:G$::G$"Y"102 mG":"128- ":"160- ":"192- ":"224- ";F 34,19:33,32:32,5:(20):l (958:IOB4,TK%:IOB5,SC%:RWTSr , d::"INSERT DISKETTE AND HIT RETURN ";:G$::20 f:"TRACK #";TK%:TK%1TK%35104 g:"ILLEGAL TRACK # !":I12000::102$ (103)(104)2561183:DPNTRWTS14J P(IOB3366):RWTS1,P:RWTS6,P} IOB3,0:IOB8,(115):IOB9,(116):IOB12,1 100 :(6):" 0 8 16 24" " ' ' ' '"& " 0- ":" 32- ":" 64- ":" 96-  DISK FILE READER4 BY WES HUNTRESSO **************** b"MAXFILES 1"D$(4):G$D$:I0:TK%0:SC%TK%IOB(55)256(54)6443:ERIOB13NS16D$;"NOMON C,I,O": ::9);"** DISK FILE READER **":$ RWTS!! ! ! ! ! 03):LD912:HS512% BHDHL727 DSLSD72A FD0:g H"RANGE OVERLAPS PROGRAM!":D1:SGDSɠ) `IBH)GE OVERLAPS PROGRAM!":D1:E"RANGE OVERLAPS PROGRAM!":D1::G$"Y"36" !SS512:60:D36* "23[ $"READ ANOTHER RANGE ? ";:G$:::G$"Y"20p '34,0:"BYE!": 2L(S$):D5L:D0ı 4J1D:S$" "S$:: <S(S):(S)1S65536S >S65024ĺ"RANGES ABOVE 65535!":D1: @D(104)256(1 16 24"7 (3):7);"'";7);"'";7);"'";7);"'":B SS32s I015:(I4):SS32:S$(S):50:S$;"- ": SS480:33,32:32,7:(4) H(S256):LSH256:6,L:7,H:P:7,(7)1:P 34,22:32,0:33,40:(23): "CONTINUE ? ";:G$:: MEMORY READER) BY W HUNTRESS= *************yS$"":G$S$:DS:SH:HL:LI:IJ:P(104)256(103)895::10);"** MEMORY DISPLAY **"::"INPUT START ADDRESS IN DECIMAL: ";S:60:D20 34,0::(2):" 0 8 "" " "