L%hh LHH` X% " ӠӠΠǠ ˮԠˠǠӬĠӠ٠٠ϠŮ+JJJJ ,,,L Lک ٥ҥ>ӥ? ( ㆭ  ؆` | A""""""QQQYV <"<Q '(h((QQQ`@GHOHO $"!$q}T@` `@@``p0 8p@@`00 |0@` `pppPox`D3 < p?|@@@|@`f ppn|>0p  qcs6<, 3['Nxxxpp0` ```@vl  ?`@:3q  AcqcCyO@  0p`@@q @p?|`3cC ? ?>|xp`p`@Acwsssssss__????????~^^ ?~~~~~~~?>~||xpp`@~| xyy{~|@`pp xpp`@yyyyyyyx~ ~x`|xpxqa` cqx|||||||cCC?>>>??<<|||~?`ppxx||<||xxpp`|||||||| |?|p`@@@@`p|? OOGgccqpxsssssssppxxx|<<~?>~||xxxxppp```@@@`?~|x|~|||||||p@@p|~><|xp`@>|x|xpx}yyyyyyyAA?~|xpp`ppx|~? ?? 33@``@@glloLL LlOgloloG @`@glolo@@gLLL GaamGGlg`GGlg`G  xL| x@@xMLLxMyyM MyxAxMx|Yq @lllLglllgG LlL`@GLOLo033366m~0>3>33~G<`G}rccb``acccq{{{{8008????~ |lL COoooog CgoooocCFFLLXXPpqa88`}}}}>????~ | ~FCCFL ____|GG|GGccp{{{{ ;1q``qp`aas{{{{8008 0y| |}}}}AAQg((h' $C@0j ed`y < I1@@q q s8EE9EE8> ` `$DC0ANPQN@'h(' WPG((H@stq q8AyEx:NPQ@GhHHG#$p# @ (*Y9AyEy: QQQO~C%%C~_DDD qAAAaq9`ppxxx|xxx|AsGN8088 CcˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`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- ( t Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(` d ֠z# u`>ȥ')>JJJ >`+*xS&x'8*3Ixix&& 8 l {' o {& {x)*++`FG8`0($ p,&"USEDBY (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` Źz̘ՠ栠̺˥Šʠ̠éɠŠՐŖĠ跠Рᠤŗԝ̠ҠŠՐŦӮ踠ᠤ̗ŪӯشȠҠŠՐĠðŠփàŠ栌ՠȠϠŠԠٿŠōȠĠՠſĠĠԠӍԍD"$ՙİĠȘРŮåŹĠʲѪŪ9,0,133,254!169,138,133,255,162,150,160,0,177,254,42,24,106,145,254,230,254,208,6,230,255,228,255,240,3,76,70,3,104,168,104,170,104,96^:180 h:320:1420$ r38400* | 56,72,132,251,160,0,201,32,176,2,105,192,201,96,176,2,105,128,201,128,176,2,105,64,145,252,230 !252,208,2,230,253,104,164,251,96,0,0,0,0,169,160,96,104,168,104,166,223,154,72,152,72,96,72,138,72,152,72,16$(C))160Ĺ36,39:(DE$(C),161,40):LCLC1^,(DE$(C))200Ĺ36,39:(DE$(C),201,40):LCLC1d6q@"PR#0"}J" 40N"T::"IF MORE, INSERT NEW DISK AND HIT RETURN."::"-OR- HIT ANY OTHER KEY TO RETURN TO MENU";:16368,0:A$:A$(13)1640 C2C1X%LC55ĺ(12):LC0=T$(C);" ";FT$(C);^36,39:(DE$(C),40):LCLC1(DE$(C))40Ĺ36,39:(DE$(C),41,40):LCLC1(DE$(C))80Ĺ36,39:(DE$(C),81,40):LCLC1(DE$(C))120Ĺ36,39:(DE$(C),121,40):LCLC1*"(DE03008:"HARD COPY VIA PARALLEL CARD IN SLOT #1":m"TYPE ANY COMMENTS FOR TOP LINE OF PAGE ? ";CO$3:958:"TURN ON PRINTER AND SET TO TOP OF PAGE THEN HIT ";:"";A$"PR#1"" 80N"LC0CO$:" ":LCL ANY OTHER KEY WILL REVERSE STATUS ? ";:16368,0:A$:A$(13)1370^<CG1yFSN(C)1SN(C)2:1370PSN(C)1Z:_ED11390d::"THATS ALL - HIT ";::16368,0:"";A$nCG0260x870CG0260X1:1290DN$(C)D$:CG1X 958:TN$(C)T$(C):F2$(C)FT$(C):SN(C)SP(C)::ED11370(F2$(C),1)"T"(F2$(C),2,1)"T"1370SN(C)1ĺ"WILL NOT RUN FROM SELECTION LIST.":1330("WILL RUN FROM SELECTION LIST."U2:" IF CORRECT, NEW CHARECTERS FOR PARTS YOUWANT TO CHANGE OR ADD.(6 LINES MAXIMUM)"`ED0:CG0:XNX:C1XNy14:958:ED11290FT$(C);" ";T$(C):15:DE$(C)15:"";D$:D$""DN$(C)DE$(C):1290D$"R"260D$"E"CG0260D$"E"ED" GIVES NO CHANGE TO DESCRIPTION":"'E' & ENDS CHANGES.""'R' & RETURN TO MENU WITHOUT MAKING ANY CHANGES TO FILE."E"OR YOU MAY USE THE CURSOR MOVE KEYS TO COPY PARTS THAT YOU DO NOT WANT CHANGED AND TYPE INOG MANAGEMENT - EDIT' PROGRAM. INSERT THE DISK THAT THE PROG.LIST HAS BEEN SAVED ON AND THEN 'RUN'. WHEN THE MENU APPEARS, CHANGE THE DISK BACK AND ANSWER '1'"t38400:~X0300:"PROGRAMS WILL BE DISPLAYED ONE BY ONE."I:IST"<L::16368,0:"INSERT NEW DISK & HIT ";A$JVDF1:880`:"2. TRANSFER ONE OF YOUR PROGRAMS FROM THE DISK THAT IS FULL TO ANOTHER DISK THEN DELETE THAT PROGRAM TO MAKE ROOM FOR THE PROG.LIST FILE"j:"3. LOAD THE 'CATAL / A K /EAEKHJJ݌h F HhHh݌FG$Ki K ,KLHhG02HhHhHh e- GL Hh`GL@L9L7HJJ݌h Hhꝍ݌`  7H/LHH/Hh/ ۠-HЕ( ( $8 H` jHEjNWbՑ]mAp񩠅aL92DWbr:# LINE# > .STRING. .OLDSTR.NEWSTR. SOURCE FILE<#> # p 8e  Lȱ7 ) LhhLB  H>ȥ')>JJJ >`+*xS&x'8*3Ixix&& 8 l {' o {& {x)*++`FG8`0($ p,&"USEDBY (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` Źz̘ՠ栠̺˥Šʠ̠éɠŠՐŖĠ跠Рᠤŗԝ̠ҠŠՐŦӮ踠ᠤ̗ŪӯشȠҠŠՐĠðŠփàŠ栌ՠȠϠŠԠٿŠōȠĠՠſĠĠԠӍԍD"$ՙİĠȘРŮåŹĠʲѪŪcv / A K /EAEKHJJ݌h F HhHh݌FG$Ki K ,KLHhG02HhHhHh e- GLAA#  Hh`L7HJJ݌h Hhꝍ݌`  7H/LHH/Hh/ ۠-HЕ( ( $8 H` jHEjNWbՑ]mAp񩠅aL92DWbr:# LINE# > .STRING. .OLDSTR.NEWSTR. SOURCE FILE<#> # p 8e  Lȱ7 ) LhhLB  HE LINES (FROM,TO)? ";F1,T1X4F1(T)F1C113300D4TCLTCLC1R 5RTF1C1f5IF1CL(RC1)z5TX$(I)TX$(IR)L66CLCLR7:x7:"INSERT BEFORE WHICH LINE?";IL7ILCLIL0ĺ"INVALID LINE #": @8"INSERT HOW MANY LINES? ";N$  07800.p0:"NAME OF FILE TO LOAD? ";F$W0"QUICK (INPUT STATEMENT) LOAD? ";Y$h81T$"G"CL11D$;"OPEN ";F$;",V0"2D$;"READ ";F$d2(Y$,C1)"Y"4002LN$"":200,3D$;"CLOSE"3:"LOADED ";CLC1;" LINES"::78003:"DELETER LINE? ";CPE+T$"W"LN0:"SLOT? ";SO:"PR#";SO:CP80ĺ" 80N"Q$,IF1Th,LNĞ:"LINE ";I:t,TX$(I){P-I-T$"W"ĺ"PR#0".7800|."REPLACE WHICH LINE? ";EL.CV(37):TX$(EL):CV23CVCV1D/(CV1):16500/TX$(EL)LNSTED."A:" PUSH ANY KEY TO RETURN TO THE MAIN MENU";:K$:95n / A K /EAEKHJJ݌h F HhHh݌FG$Ki K ,KLHhG02HhHhHh e- GLAA# GȄGL@L9L7HJJ݌h Hhꝍ݌`  7H/LHH/Hh/ ۠-HЕ( ( $8 H` jHEjNWbՑ]mAp񩠅aL92DWbr:# LINE# > .STRING. .OLDSTR.NEWSTR. SOURCE FILE<#> # p 8e  Lȱ7 ) LhhLB  H>ȥ')>JJJ >`+*xS&x'8*3Ixix&& 8 l {' o {& {x)*++`FG8`0($ p,&"USEDBY (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` Źz̘ՠ栠̺˥Šʠ̠éɠŠՐŖĠ跠Рᠤŗԝ̠ҠŠՐŦӮ踠ᠤ̗ŪӯشȠҠŠՐĠðŠփàŠ栌ՠȠϠŠԠٿŠōȠĠՠſĠĠԠӍԍD"$ՙİĠȘРŮåŹĠʲѪŪq.?rb[!l]Fv]ŠŠŠϠ٬ӠϠӠȠ͠ ]Š<dJedKedede]Ԡ͠Ϡ!q]ԠŠԠ!N@"(] ]­ԠجرϠ]à]dedeر[!&]0] Ԡؠ!:]ӠϠحŠD]رN]Xرq.?rrUVW;@r|`<@*rr.?r$Y[Y!q.?r`$T q[!]]ԠҠ٠]%cPa(Ԡ٠٠Ϡ) d6?e `.?6@r$d6?e[!?r[!]"]ĠƤΠ,]!6] ҠƠԠ٠@]ϠƠԠJqqqT\`$h^a(ĠҠӽ)FQhUV WX#n]x]ƠŠ]qUVW;@rde<@*rrY[!]#]ŠŠŠŠϠƤ]]ΠŠ]qUVWde.?rYde.r`%[+ded eq\+(qq`%Y2q6[$<q.?rq.?rF`$P[!Z]$d]ŠƤϠŠŠPLE USERS GROUP#`T SAN DIEGO20800 "rQ"QER254Ħ5"RER5Ĺ16136,0:13100Q"lRER6ĺ"FILE NOT FOUND"n"vRER4ĺ"WRITE PROTECTED""RER9ĺ"DISK FULL""RER10ĺ"FILE LOCKED""RER77ĺ"OUT OF MEMORY":"R7800"4S BY CRAIG VAUGHAN"S REVISED BY TOM C. #S AP14500:17600)! N8300:TX$(F1)LN$:176004!N17800f!N:"RANGE (FROM, TO)? ";F1,T:F1C1TF17800y!LOTCLTCLC1!O"STRING TO APPEND:":16500:IF1T!PT$"@"TX$(I)LN$TX$(I)!xPT$"&"TX$(I)TX$(I)LN$!P:7800"@QER(222):216,0:A$"&"TX$(F1)TX$(F1)(LN$,C2,255):17600p LLN$"'"LN$TX$(F1):IC1(LN$):((LN$,I,C1))" ";:::17800 LLN$(68)LN$(100)TF1:13600:18100 XMLN$(65)LN$(97)ILF1C1:NIC1:14500:F1IL:17600 !MLN$(66)LN$(98)ILF1:NIC1:"LAST DELIMITER MISSING":17800G8JIC2SLC1:(LN$,I,C1)"/"19300MJtK"MIDDLE DELIMITER MISSING":17800dKTF1:Y$"Y":OL$(LN$,C2,IC2):NE$(LN$,IC1,SLIC1):1100:17800KA$(LN$,C1):A$"@"TX$(F1)(LN$,C2,255)TX$(F1):17600+ ,L0ELN$""ACD18300&PFF1F1C18FF1CLF1C1CG17600V|GLN$""18600sGF1F1C1:F1C1F1CLC1~DH17600HA(LN$):(ATR(A97A122))"X"7800 ILN$""ACD17800pI(LN$,C1)"/"19400 ISL(LN$):(LN$,SL,C1)"/"AU)):A$;:LN$LN$A$:LB(F2):FF(FC1):16600[BLN(LNC0):LNĺ:"LINE NUMBERING ON"~0CLNC0ĺ:"LINE NUMBERING OFF"C7800C:"STARTING LINE #? ";F1:OC1:F1C1F1C1\DF1CLF1CLC1DLNĞ:"MOD LINE ";F1:$ETX$(F1)E16501CLC1>TX$(I)H?)?D$;"CLOSE"3@7800>t@LN$""b@A$:A(A$):ACCACDACEĺ:D$;"WRITE ";F$>ICI:NIC1780028NICLC1LMĺ:"TOO MANY":7800L9ICLNIC1ILNIC1al9TX$(I)TX$(INI)g94:T$"COPY"T$"MOVE"ı:TMILNIC1:IILTM::"INSERT NEW LINE ";I::16500:8300:TX$(I)LN$:`;CLCLNI;("::D;:A$:A$"Y"4405::230D5::8::"SESSION TERMINATED":X5BY GARY LITTLEm5FOR APPLES B.C.05::8::"SESSION TERMINATED":5BY GARY LITTLE5FOR APPLES B.C.L5BY GARY LITTLE5FOR APPLES B.C.ND OF SESSION>>>>16);(I);20);"$";HX$(((I)16));HX$((I)16((I)16)),((I))T4^(37)213904h:"PRESS 'RETURN' TO CONTINUE":"OR PRESS 'S' TO STOP: ";:A$4rA$"S"4004|4I:4:"<<<<>>>>"5:"DO YOU WANT TO READ ANOTHER SECTOR ?" ?";S$:S$""26013S((S$)):S0S$"0"260C3S0S12260N3"836,TY3,837,Sb368223@:"CONTENTS OF TRACK ";T;", SECTOR ";S::" BYTE";16);"CONTENTS","CHR$":34,33JILL255B4TIL;5);"$";HX$(((IL)16));HX$(IL16((IL)16));D(X)((X256(X256))256.05)-2HX$(15)D2I015:HX$(I):Ij2 0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F210:958:"WHAT TRACK NUMBER (0-34) ?";T$:T$""2302T((T$)):T0T$"0"2302T0T34230311:958:"WHAT SECTOR NUMBER (0-12)1xL16384:BEGINNING OF 256-BYTE RWTS BUFFERH1I822852:J:I,J:I1169,3,160,64,32,217,3,96,0,0,1,96,1,0,17,12,81,3,140,60,0,0,1,0,4,96,1,0,1,239,2161THIS RWTS ROUTINE RESIDES FROM $336 TO $3541840,L256(L256):841,(L256) 2MO,03,160,138,32,217,3,96,0,0,1,96,1,0,0,0,153,3,0,32,0,0,1,0,0,96,1,0,1,239,216~ :125:16)"APPLE ";(93);(91):255:22: : REVIEWED IS ";SR6 910,TR:911,SR: POKE INTO IOB` :896: CALL CONTROLLING SUBROUTINE 768: CALL PRINTING SUBROUTINE :::23:7)"PRESS < RETURN > TO QUIT":5)"AND ANY OTHER KEY TO CONTINUE ";:A$:A$:A$(13)İ20:150N 169L-DJ xD$;"BLOAD DISK SNOOPER PRINTOUT,A$300": LOAD PRINTING SUBROUTINE POKE THE CONTROLLING SUBROUTINE, THE IOB AND THE DCT INTO MEMORY I030:RWTS(I):896I,RWTS(I): :12:958 "TRACK TO BE REVIEWED IS ";TR :"SECTOR TO BE ::20:100- ::X831:X)"*";::C 8)"*";:31)"*"f 8)"* DISK SNOOPER *" 8)"*";:19)"BY";:31)"*" 8)"* PRESTON R BLACK MD *" 8)"*";:31)"*" X831:X)"*";::  dRWTS(30) nD$(4): CTR  ************************? * *^ * DISK SNOOPER *} * PRESTON R. BLACK, MD * * NIBBLE * * MODIFIED CRS * * * ************************    rrp(ΠŸ) UVW;@rde<@*rrY dHeM6*[r°ðù°ù°)\O@p(ŶİŶ)\O@p(±øðİƷŠ)\#@p()[@B;@r]ԠŠĠҮ+O4 rD4 rD4 rD4rC@"Pr@p()]̭J@p(ų±ø±)\>@p(ųĹ°Ġ)\R@p(ù gW'  `^ :F Y %^LǏLZ^[_\Z][` 1 8tp`8M`y LHy0y h (`|)* X |`YLHHJhh`Ǘ˯߷ë󳏋'C/cO KC[/3k{'7w+Ss?AVENTION 80 L(OAD R(UN D(ELETE C(ATLG T(DRIV K(LOK U(NLOK X(ALL E(XIT SP(PAGE ----------------------------------------VOL PG OF SECT-USED LEFT ---------------------------------------- $% 0nmooة$eeVLԒؠ 58nnooؠ o 0n)JJJJ 0șn) 0șVJJJJ 0``i% $ BU ڑV V Hi&eh L`$V  ɍ ` X0 ` APPLE-)N*m+Jn)m)eeU`8VUU ڑ` :` ^6789 Q@ q . @^`6798 Q`H h``noVVi@iA)moo g p g) pmn:4020J$(13)ı6(J$)32Ğ:((J$)64);:CB$B$J$M4020Vh BSe|(B$)0ıt~B$(0)ı(8);:868(B$)1B$"":B$(B$,(B$)1)(D$;"NOMON C,I,O" 20:8684 D$;"DELETE "GP$A VSVSINO IN0540a VS254VS1h Xu &:22:9 0"INITIALISATION COMPLETE!": 2 CTRL-G'S IN QUOTES :958-:. |"TYPE 'Q' TO QUIT OR 'R' TO RESTART":? 21:5:868p "INSERT DISC AND PRESS 'RETURN': ";:I$:I$ I$"Q"ĉ:: I$"R"150 I$(13)390 D$;"MON C,I,O" 19:16((GP$)2) :958 D$;"INIT ";GP$;" ,V";VS: 14:5:958J "NUMBER TO INCREMENT EACH DISC:";IN$: CTRL-G IN QUOTES[ "IN$"0"320i ,IN(IN$)~ 6IN1IN254270 @16:5:958 J"NUMBER OF DISKS TO INITIALISE:";DI$: CTRL-G IN QUOTES TDI(DI$) ^DI1320 hX1DI r23:5: " = 'HELLO'":% 7:5] "GREETINGS PROGRAM NAME: ";GP$: CTRL-G IN QUOTESu GP$""GP$"HELLO" 7:29 GP$ 12:5:958 "VOLUME - NUMBER TO START WITH:";VS$: CTRL-G IN QUOTES VS(VS$) VS1VS254230  PROGRAM BY' ATHOL H. COHEN: 4TH MAY 1981@(Y2 WITH KIBBITZING BYm< FRANK MACHNIKsF{P:ZD$(4)d2:n40)" ":3x6)"MULTIPLE DISKETTE INITIALISER";:40)" "4:40)" "34,4: 9:13    . Do you want the catalog sorted? N ɍ  Disk Slot? JJJJ Drive Number? Lh TO EXIT *"^ d19:27:A$:A$:A$(13)ė:(4);"RUN FREECAT"q nA$(32)ī95 x6:958::::16:"APPLE ";(93);(91) 20: XS 3.2, AND THEREFORE CAN BEUSED WITH DOS 3.2 ONLY IN A 'HELLO'":"PROGRAM, FOR INSTANCE."_ P U"'FREECAT' IS INDEPENDENT OF MEMORY SIZE AND WILL RUN ON ANY SIZE OF APPLE ";(93);(91) Z"WITH APPLESOFT." [34,0* _18:"HIT < RETURN > TO RUNRUNNING 'FREECAT', THE FREE DISK SPACE FEATURE WILL BE AUTOMATICALLYINCLUDED WITHIN THE SLAVE DISK'S DOS." G23:"HIT < SPACE BAR > TO CONTINUE *" H23:34:A$:A$:A$(32)ī71 I:Y K"'FREECAT' INTERFERES WITH THE 'INIT'":"COMMAND IN DODED TO THE 'CATALOG' COMMAND."$ 7 <"AFTER RUNNING AND INSTALLING 'FREECAT', EACH TIME THE 'CATALOG' COMMAND IS GIVENTHE COMPUTER WILL AUTOMATICALLY TELL YOUHOW MUCH DISK SPACE REMAINS." Ak F"IF YOU INITIALIZE A 16 SECTOR (DOS 3.3) DISK AFTER  : FREECAT INSTRUCTIONS,:34,0:rX140:1:X:"*":5:X:"*":X:Y24:Y:1:"*":Y:40:"*":Y(T$"FREECAT INSTRUCTIONS":3:20(T$)2:T$:34,5:6 2:"'FREECAT' IS A PATCH ROUTINE STORED":"INSIDE THE DISK OPERATING SYSTEM, AD  :(7)"DATA STATEMENT ERROR":? ZA12287,179:A12286,AD25e d:10:10:"FREECAT IS INSTALLED" n20:4:"HIT < SPACE BAR > TO CONTINUE *";:36:A$:A$:A$(32)110 x:(4);"CATALOG":A36,23 7,160,243,185,249,181,32,237 ,253,200,208,247,76,47,174,0 ,160,198,210,197,197,160,211 ,197,195,212,207,210,211 FA111,AD22:A146,AD24:A155,AD17 PT0:IA1A169:TT(I):I UT3AD10412TERS":"PLEASE REBOOT AND RERUN FREECAT.":H AD(978):A1256AD6579e (IA1A169:B:(I),B:I 2 162,7,32,74,249,134,65,160,140,185,242,179,240,10,10,144,251,232,208,250,230,65,208,246,136,208,238,165,65,172,6,224,240,5 < 32,27,229,48,3,32, * FREECAT2 * FREE DISK SPACE COMMAND F * FOR DOS 3.3c * APPENDS TO 'CATALOG' * TO LIST FREE DISK SPACE * CALL-APPLE : SEPT 80 * NIBBLE VOL 2 NO 5+ (977)(978)16((978)16)19113ĺ:(7)"INCORRECT DOS POIN  Ơ%]ӠؠƠӠϠ]Ժ!]ԠƠӠ]ŠϠ])qq.?rq.?r!q\]ĠԯӠ UV WX6q.?rq.?MVq.? r``%[>ja(ɯϠҠӽ)Fa(˽)FE(ҽ)FQ!t]~]]]ŠǠ] ]Ժ#] ҠƠǠ&]ҠŠƠ)Q!]]ӌ!]]įŠ]ded ede$de.d e8deBdedeL@]ԠԠde-r%q\]ŠԠ9q.?rq.?rq\]ԯӠ,q.? rq.? rqded e-r\]ŭŠԠYa@E(̯Ω)&@`@:()$a@E(Š)E@ a(Ǡ)E@*رqq-r\4q]ԠƠŠ$>q-r]ȠH`.?r%q$Ra@E(Š)E@E()FE()F\]f]ŭŠԠp]z\ԠϠ٠]&d ed!e'd"eKM6,`6$a(ϠӠ)Q,oP a(Ԡ٠)\cUVW\]Ƥ\@]ĠΠ`$ a(Šź)E@ S(_l-rqqvq-r<d ed!eob-rGPa@*#r[d"eM6d2e?a(ŠŠ)Fd2ed ed!ed"e$` $q_]]ŠԠ)G_&-rq.?r0\]ŠŠ:-rq)Dqq`$bN\]ĠX`$lcbd ed2eoa(٠̇)d2eUVWYqq`$_1M6q`$q_9de-rde-rM'@Brp@*#;@rr q`;@r$ q6q_\@]ĠΠ`$&'oPa(WdedeM'q;@r`%qGa()E@*#rE(ݠ)E@*#rE()E@*#r-rqqq&*`%Yd2e?a(Ԡ٠)a(ԠΠҠ) d2eMq.?6@r`$d6?e`$qԠ-rM6P d2e?a@*#rd2e,|cPa()GPa(έ);oPd2e?a(ŠŠ)Fd2e1d ed!ed"eM6]Ԡ"qdedeFqUVرq.?r\q.?rq.?r "q*,q.?rرq.?rqرq\ 6q%@q8Jr]ŠJq.?rTq^]ĠǠKhdedededeM']#a@E(Πìɬ)a@E()2a@E(ң)a@E(Σ)]ΠƠԠ:]ǠנΠ٬ŠҠƠq.?r.?rq8r&q q qMq.?ra(Š)#xcP a(ŠҠ)&ccP a(ԠҠ) \]Šq.?Jr.?Kr&q@dede\Gd6ed7ed8e$d9eM]ΠΠԠK! ]"]ŠҠ!]٠ !(]խĠ٠!2]٠Ơ!<]F]P]ΠZ] dKM6noP           ZQZ Ȓ :L s ?LُL7^8_9Z:[`1'8tp`8M``i^j_kZl[`28tp`8M`y h (`|)* X |`YLHHJhh`Ǘ˯߷ë󳏋'C/cO KC[ a(נ)+Ss?ՠ) K(LOK U(NLK D(EL Q(UIT ----------------------------------------VOL PG OF SECT-FREE N(DRIV ---------------------------------------- $% 0 4'  `` C iiLح) 0JJJJ 0 0`% $ B2 3 3 Hi&eh Li`$3  ɍ ` X̅0 `JOHN'S SUPER UTILITY PROGRAM L(OAD R(UN C(ATRIFY\  2m2R&QPNQmRJnPmPee2`8322 ` :` 3^څ6789 Q H Ȓ @^38JJJJi 0`6798 Q`Hɍ3h`` 6  H5/5 s r > a ` `$$(ɠ$I $4 ``H$%  h\  `CATALOG\Y/N\LOAD\LOCK\UNLOCK\RUN\SAVE\DELETE\NOMONC\START A$\ LENGTH L$\,D\I/O ERROR\VELLx4 6 s j S5 B ꐭ5 L L P65 s j00   L222  Lx SO qLЪVТ2'56 s j S" $ j q L :L9% 5 I8Mt;=CH?JÍ QVQT_ɔ%8^7Z9[:^Z_[ 04 q1  )ȹ)ȹ)   L jɠ 0   LL M4'4В  X5 QLiTALOG" N24:9:4 X"HIT ANY KEY TO CONTINUE":K bAA$:F$"CAT"120X l:10:9w v"WOULD YOU LIKE A RE-RUN" 12:16 "Y / N ?:";:A$:A$ P1500: A$"Y"120 ::620 D$;"UNLOCK ";F$/ D$;"DELETE ";F$8 620F :10:13a "FILE NOT FOUND!"l 13:5 "WOULD YOU LIKE TO SEE THE CATALOG" :16 " Y / N :?";:A$:A$ P1500: &A$"Y"580 0A$"N"500 :620 D:D$;"CA"Z(222):Z10330! ,Z64805 6Z10Z6680> @150J J:16:W TX:F$:c ^18:14y h"FILE LOCKED!": r4 |" DO YOU WANT TO DELETE IT ANYWAY?" :16 "Y / N ?:";:A$:A$ P1500: A$"Y"450 A$"N"350 5 "FILE TO DELETE:";F$. F$"CAT"580: :5:9Y "DO YOU WANT TO DELETE:"o X((40(F$))2){ 8:X: F$ :13:16 "Y / N :?";:A$:A$ P1500: A$"Y"280 A$"N"220 630 D$;"DELETE ";F$:620  FILE DELETING PROGRAM$> BY ATHOL H. COHEN.D(Y2 JANUARY, 1981_<eFqP:290ZD$(4):4:5d"THIS IS A FILE DELETING PROGRAM"nP12500:x:12:9:"TYPE ";::"' CAT'";: " TO SEE CATALOG":8:  ;T$;F5$:78001)T$"S"ĺ:"SPEED? ";S:S:7800`h)T$"T"ĺ:"ENTERING TEXT MODE..."::7900~)"INVALID COMMAND!":78000*:"LIST FROM,TO?";F1,T:*(F1T)F10ĺ"FROM PARAMETER INVALID":7800*TCLTCL1 \+T$"W"Ą"HOW MANY COLUMNS PNG? ";:16500:OL$LN$:NE$LN$:Y$"Y":F1C1:TCLC1:OC1::1100Qt'T$"N"17100o'T$"COPY"T$"MOVE"2600<(T$"C"āIC1CLC1:TX$(I)"":CLC1:7800(T$"ADDN"ī3200(T$"CATALOG"ĺD$;T$:7800 (T$"UNLOCK"T$"LOCK"ĺ:"FILE? ";F5$:D$00"T$"M"17400&(#T$"R"119008#T$"G"12400Q#T$"D"İ13300:7800jT$T$"I"İ14200:7800|$T$"X"15400%T$"P"15500%T$"E"İ500:7800%T$"H"4500H&T$"@"T$"&"20200&T$"A"12400?'T$"F"ĺ:"FIND WHAT STRICE7900: 8300:8400l (LN$,C1)(3)ĺ:"CENTER OVER WHICH COLUMN? ";CZ:TL(LN$)C1:SCZTLC2:LN$(LN$,TL):JC1S:LN$(TR)LN$:  TX$(CL)LN$4!CLCL1:CLLM7900!"TEXT FILE FULL SAVE TO DISC"!7900`"T$"L"T$"W"108E WILL"/"PUT YOU BACK IN UPPER CASE MODE."F:"CTRL^C AS THE FIRST CHARACTER IN A":"LINE WILL ALLOW FOR CENTERING OF THE":"TEXT OVER A DESIRED COLUMN."x:"COMMAND? ";T$:8800LNĞ:CL:@16500LN$(88)LN$(120)7800 A"UNLOCK - FILES"*v"LOCK - FILES"0\ "WHILE ENTERING TEXT, HITTING ESC KEY""WILL FIRST SWITCH YOU TO LOWER CASE.""IN LOWER CASE MODE, HITTING THE ESC"L"KEY ONCE WILL MAKE THE NEXT LETTER""UPPER CASE. HITTING ESC TWICRINT THIS HELP LIST"0d"W - WRITE TO PRINTER"H"X - EXIT PROGRAM"o,:"HIT RETURN TO CONTINUE ";DU$:"MOVE - MOVE RANGE BEFORE LINE N""COPY - COPY RANGE BEFORE LINE N"X"ADDN - ADD LINE NUMBERS TO TEXT"b"CATALOG - TO DOS"l"G - GET A FILE FROM DISC TO EDIT"FD"A - APPEND A FILE FROM DISK"a"C - CLEAR TEXT AREA" "P - PUT CURRENT FILE TO DISK"p"D - DELETE LINES""I - INSERT LINES"8"S - SET SPEED""T - TEXT INPUT MODE (END WITH 'X')""H - PA LINE"3"@ - ADD STRING TO BEGINNING OF LINES"Y"& - ADD STRING TO END OF LINES"P"F - FIND A STRING IN RANGE OF LINES""E - EDIT A RANGE OF LINES""M - MODIFY MODE (C/R-FORWARD, ^U-BACK)"|" /OLD/NEW/,TEXT,A,B,D,@,&,',X"#) "NUMBER OF TEXT LINES EXPECTED?";NLD hTX$(NL100):LMNL100v :"INSTRUCTIONS (Y/N)? ";Y$:Y$"Y"ĺ:7800| 0 "YOU HAVE THE FOLLOWING COMMANDS:"  \"L - LIST CURRENT FILE" "N - TURN LINE NUMBERING OFF/ON"$"R - REPLACE 00 TCLTCLC1q H "STARTING NUMBER?";A:"INCREMENT? ";B:NA:IF1T:TX$(I)(N)" "TX$(I):NNB::7800 C00:AL65:AU90:CL1:LN1:CD21:CE24 LB0:F2:TR32:ES27:C11:C22:C33:CC13:C88 t"NOMON C,I,O"  <20800 D$""BEFORE LINE? ";IL:ILC1ILCL(ILF1ILT)ĺ"INVALID LINE #":7800r T NITF1C1:14500:F1ILF1F1NI:TTNI LDF1IL:TMILNIC1:IILTM:TX$(I)TX$(ILD)::CLCLNI:T$"COPY"7800  13600:7800 :"RANGE (FROM,TO)? ";F1,T:F1C1F1T32OC02100$ ORO9O9C1:1800b 4RSP9TL:LN$(LN$,C1,P9C1)NE$(LN$,RS,SLRSC1):EDC1{ OC0P9P9NL:1400 Y$"Y"Ğ:"EDIT LINE ";I::LN$ ` TX$(I)LN$ :: ( :"RANGE (FROM,TO) ";F1,T:F1C1F1T2600 TCLTCLD "RENCE (0 FOR ALL)? ";O:"WATCH? ";Y$J A(Y$):Y$(ATR(A97A122))d LTL(OL$):NL(NE$): IF1T:P9C1:O9C1:EDC0 LN$TX$(I) xSL(LN$) R((LN$,P9,TL)OL$)O9 @P9SLTLC1ĴEDC12500,2300 R1900 P9P9C1:1500 l! d3500HA$:(A$)CCTX$(CL)LN$:CLCLC1:LN$"":16135,0:200\,LN$LN$A$:200wTX$(CL):CLCLC1:400:"EDIT RANGE (FROM,TO) ";F1,TXF10F1T500TCLTCL "OLD? ";:16500:OL$LN$:"NEW? ";:16500:NE$LN$$ "OCCUR                 25)256254:4 MS$"SLAVE":(MS)54MS$"MASTER"J MS$;" DISKETTE."| 100:::16)"APPLE ";(93);(91):255:23: GE NOW IN MEMORY IS DOS ";P nMEM(978):L1(MEM34)256214:L2(MEM9)256179j x(L2)38RSLT$"3.1" (L2)(L1)240RSLT$"3.2" (L2)(L1)96RSLT$"3.2.1" (L2)3RSLT$"3.3" RSLT$ :"AND WAS BOOTED FROM A "; MS(MEMST THE PROGRAM, LINE '100' WILL DEMONSTRATE HOW TO WRITEMEMORY-INDEPENDENT PROGRAMS, MEANING THEY WILL RUN ON ANY MEMORY SIZE APPLE WITH DOS." !23:"PRESS THE < SPACE BAR > TO CONTINUE ";:R$:R$;:R$(32)33 "10:958: d"THE DOS IMA MAY 1981 *") 8)"*";:31)"*"D 8):X124:"*";::S X1500:[ 11 "THE PURPOSE OF THIS PROGRAM IS TO":"DETERMINE THE VERSION OF DOS PRESENT ON A DISKETTE, AND WHETHER IT IS A SLAVE ORA MASTER." :"IN ADDITION, IF YOU LI~ - DOS VERSION FINDER2 - VAL J GOLDINGN - MOD. C.R.S. 16.7.81V:q8):X124:"*";::8)"*";:31)"*"8)"* DOS VERSION FINDER *"8)"* BY VAL J GOLDING *"8)"* CALL - A.P.P.L.E. *" 8)"*      . $ ; &?1?=A>?I i`HH11`IJ듧ƙɾ5Ė+]̵b@a(̠Ԡ)e'ca(à)j'c[aΠԡ)<#cUVWY F#w_('KM6oP!'d2e?a(ˠ)d2e$'c*.'a(ҠĠҠ͠Š)+8'ca(נŠҠϠŠ)'B'ca(ŠҠҠԠ)V'ca(ѠԠ)`'cS(ӠԠŠŠՠԿ)&@)cS(ȠˠĠ)''`"$'ca(Ġˡ٠ή)_`$'ca(Ġҡ٠ή)_[(#`%[)2#ca(ϠҠӠΠΠϠծ)`.?6@r$ d6?e_(KM6a(š)Q Ka()) ca(Ԡ٠٠ϠΠϠծ) S()&@_(]Ԡؠ%a@*#rG%a@*#rG[%3c`]̠ jKM6 KM6\(#3d2e?P a(ˠ)FE(Ҡ)Fc d2ed<ed=e.?Mrd>ed?e.?Mr,ca(ԠŠҠϠ̠Ǯ)`.?6@r$Mp +cca(Ԡ٠٠Ϡ\(# M6c&a(ŠŠ̠ӠƠ)*a(ҠϠԠŠӠ)a(ԠԠ)G2q.?Mr\a(ΠĠǬ).$a(Š̠٠ϠΠϠՠ).cc BdeL Lde6 VdeĠdede deM_<7ca(ŠԠˠҠӠ)FE()FE()%cS(ӠԠŠŠՠԿ)&@`;@r$`@*#r9()$\ dededeM_( ]7d"eo<cS(ȠĿ)&@F`;@r$<P`@*#r9()$Z`@*#r9()$d`@*#r9()$g`@*#r9()$i`@9()$k`@9()$ na(Ġġ)xUVWXY_<\]Ԡˠκ=C>B`>L  L hL ) @JJJ @+`>L q6 N@"(rC@"r  ]ˠ ]é٠٠ ]#@p()(\']ԠΠΠB6d<e8.?rrd=e.?r8.?rrkd>e8.?<rrd?e.?=r8.?<rrdBedCe de.?>rde.??rM6_L LiB?CLx  <@=A @e8.?<r`rd?e.?=r8.?<r`rdBedCede.?>rde.??rM6_HHH LMȑ ȑ    -?? hhh`     z #1,CCCXհ Π͠ Ϡ   ˠҠԠĠҠŠӠ ӮĮҠ ΧӮîР ҮԠ  ՠ  ŠǠ͠ ŠҠ Ԡ ԠӠ ȠŠŠҠ ˠҠ ԠϠԠӠ ҠṲ̋ !Ҡ"РˠР ӠΠҠҠ ΠǠΠˠӠ ӠˠРˠР ӠŠΠ ӠŠXհİ]٠İˠӠ٠ǠԠǠԠԠΠΠĠdHɈ h  8 i ɠ 6 6Н`  (4);"BRUN MENU" n0 ************************<0** CONTENTS OF A SECTORD0**[0(** BY GARY LITTLEs02** FOR APPLES B.C.{0<**0F** JULY 19790P**0Z************************0d::5);::"READ DISKETTE TRACK AND SECTOR"::13);"BY GARY LITTLE".îӮi]ΠĠϠŠӠ͠ӠǠӠԠŠӠĠΠŠ]Ġ٠Ġ de<@*rrY dHeM6[`@p( Ĺ°ĠĠàĠĠĠĠ )[N @p(ºàŠƠĸ)[U]Ԡ٠ΠЮϮؠrd;e8r M60!d$ea()Gq\a()G(q.?/r`²$a()a()[:]ŠŠŠϠ٬ӠϠӠȠ N@"r\\@p()\ \[@B;@rrp(ΠŸ)UVW;@r`$|qq@d2edea@GY̱d2e `.?6@r$d6?e[q`²$" a()[]Ԡ֠Πֱ̠qֲqa@*ֱ#ֱrE@*ֲ#ֲrG[q±]ԠӠ±²d:e8 $qq_`@9()%\Qq±]ԠӠ±²"a()q\a()Gq,q.?r\a()G6q`²$, @a()GJU̱VWTqq.?̱r^`$rhq?qrq˱q"Աq S(ԠϠҠ)&@ `@9()$`@9()$_\ q\<`$.a()a()a(ˠ)FE(Ҡ)F±q²qa()\ `˱Ա$8q`²q² Y`±²²$2`;@r$(\c`@9()%\_ (\_2a(Ԡ)_<]įŠFdePdeZd e dMnq.? rxq.?r[+qҩ)=cS(٠Ԭԩ)&@`@9()$±q6²q1S(ԠϠ)&@`@9()$`@:()$\q;@r`@*r9()%q<UVWq<@*#rr` %q`$(`6±$2±q²²q_ )V~a(ˠΠةĠ٠)ca(ĠΠ̧ϠԠũ)Eca(ϠӠԠˬ)a(Ӡ٠ŠΧٮ)"ccS(ˬ)'' q\<ca(Ӡ)FG`$a(ϠoPa(Ԡ٠٠ϠԠ)d2ed"e)LS(Ǡˬ)''(VS(Ǡˬ)'˱'Ա``˱$Lj_Vtca(ΠĠ٠ӠԬԩҠϠŠӠϠ@"r3qqq]ƽ:q`dede]ΠӠԠҠ"$S(РŠàٯΩ)&@ .`@9()$8`@9()$_$>8S(٠ŠҠٯΩ)&@`@9()$t`@9()$L_8IBd2e?)[]ΠҠ$a@E(ң)[]ΠҠ;dJe0dKe de0de ]Ԡ͠[ ]\FN@"rq.?r.?r @p()]̭ĠΠ3N@"r@p()N@" rC d]ˠ٠٠Πn]ΠҠ\x]Ӡ͠ӠŠӠƠˬҠˠԠŠϠҠҠ;]ŠҠӠΠŵĠӠ"\\_]ŠȠ(@p()a@E(     D":D"CLOSE ";T$@6"DO YOU WANT TO LIST ANOTHER FILE ?";A$U6 (A$,1)"Y"1106:12:" <<<<>>>>"D$"S"4805520"5RR1:37015RR1:400M5TERMINATION OF LISTINGr5:"<<>>"::540x5512:9585D$;"CLOSE ";T$5&"DO YOU WANT TO LIST ANOTHER FILE ?";A$:(A$,1)"Y"11050:8::"SESSION TERMINATED":E"OPEN ";T$*4|:"CONTENTS OF: ";::T$:H4D$;"POSITION ";T$;",R";R[4D$;"READ ";T$4A$:ONE FIELD PER RECORD IS ASSUMED4R;7);A$4(37)204904D$;"CLOSE ";T$4:"PRESS 'RETURN' TO CONTINUE":"OR ENTER 'S' TO STOP: ";A$ 5A;R+3A$:ONE FIELD PER RECORD IS ASSUMED93R;7);A$K3(37)20340_3"D$;"CLOSE ";T$3,:"PRESS 'RETURN' TO CONTINUE":"OR ENTER 'S' TO STOP: ";A$36A$"S"3303@5203JRR1:2303TRR1:2503^**SEQUENTIAL FILE3hR0 4rD$;A SEQUENTIAL FILE ?";A$:A$""17072(A$,1)"Y"350Q2**RANDOM-ACCESS FILE218:958:"LENGTH OF EACH RECORD ?";A$:A$""2002L((A$)):L1L2552002R02D$;"OPEN ";T$;",L";L2:"CONTENTS OF: ";::T$:3D$;"READ ";T$;",R" **-17************************K1dD$(4):D$;"NOMON C,I,O"U1n::`1x216,016:8);::"CONTENTS OF TEXT FILES":112);"BY GARY LITTLE"114:958:"NAME OF THE TEXT FILE ?";T$:T$""1501510"216:958:"IS THIS 0 ************************=0** TEXT FILE CONTENTS **[0** **y0** BY **0** GARY B. LITTLE **0#** VANCOUVER, B.C. **0(** **0-** JULY 1979 **12** "D216,0: (FT$(S),1)"B"(FT$(S),2,1)"B"CMD$"BLOAD":460B CMD$"LOAD"U D$;CMD$;T$(S)[ e 560n ER0 "OPEN PROG.LIST" "READ PROG.LIST" X C1X T$(C):FT$(C):DE$(C):SP(C) &:570 0768:ER1:"CLOSE PROG.LIST,1)"T"(FT$(S),2,1)"T"Ģ20:370[ h18:"'1' RUN THIS PROGRAM":"'2' LOAD THIS PROGRAM" r"'3' RETURN TO LIST":"'ANY OTHER KEY' .. NEXT ENTRY"; |16368,0:A$: A$"1"260 A$"2"440 A$"3"150 SS1:SX1150 3202 CXė: (S$,1)"D"2907 S(S$):S1S70200I SP(S)2200 (FT$(S),1)"B"(FT$(S),2,1)"B"CMD$"BRUN":280 CMD$"RUN" D$;CMD$;T$(S) "S((S$,2,2)) ,S1SX200 @ JFT$(S);" ";T$(S) T:DE$(S)" ^(FT$(S))2Ė4:"*"; 5:T$(C)- (37)172003 20:958:"'#' OF SELECTION TO RUN (* WILL NOT RUN)'C' TO CONTINUE LIST 'R' TO RESTART LIST 'D' + '#' FOR PROGRAM DESCRIPTION ? ";S$ S$"R"150 S$"C"9,168:770,104:771,166:772,223:773,154:774,72:775,152:776,72:777,96a nD$"": CONTROL Dt x"NOMONI,C,O" T$(70),FT$(70),DE$(70),SP(70) 480 :ER1Ģ10::"NO PROGRAMS LISTED IN FILE AT THIS TIME"::: C1X C;".";:SP(C ***********************< * AUTHOR- JIM PFEIFFERX * NORTHWEST SUBURBANs( * APPLE USERS GROUP2 * (NSAUG) --PERMISSION< * GRANTED FOR FREEF * REPRODUCTION & USE.P ************************Z:J d768,104:76     UCTIONS DOWN IF YOU CANNOT REMEMBER THEM, FOR AFTER THE FIRST STEP YOU MAY NO LONGER HAVE INSTRUCTIONS TO FOLLOW."8::8:"HIT TO CONTINUE ";A$:B:"1. INSERT A DISK THAT IS NOT FULL AND HAS ROOM FOR THE FILE NAMED PROG.L180811:216,0."CLOSE PROG.LIST"G"DELETE PROG.LIST":::12:"THE DISK IS FULL"::6:"FOLLOW DIRECTIONS CAREFULLY":$:"IF YOU DO NOT FOLLOW DIRECTIONS YOU WILLLOSE THE PROG.LIST FILE"}.:"BE ADVISED TO WRITE THESE INSTR;A$ f:10:15::"WORKING":+p1020Bz"OPEN PROG.LIST"["DELETE PROG.LIST"r"OPEN PROG.LIST""WRITE PROG.LIST"XNC1XNTN$(C)F2$(C):DN$(C):SN(C)"CLOSE PROG.LIST"216,0DF11120s4:16368,0:"SHOULD USER BE ABLE TO RUN THIS PROGRAM FROM SELECTION LIST ? Y/N ";A$:(A$,1)"Y"SN(C)2:840>SN(C)1HR:"EITHER THERE ARE NO NEW FILES OR YOU HAVE JUST ENTERED THE LAST DESCRIPTION."\:16368,0:" HIT "CRIPTIONS AS NEEDED. DO NOT EXCEED 6 LINES OF DESCRIPTION."IC1XN[SN(C)0840|5:958:F2$(C);" ";TN$(C) "DESCRIPTION FOR THIS FILE--":16368,0:"";DN$(C) DN$(C)""DN$(C)"--"*(F2$(C),1)"T"(F2$(C),2,1)"T"830$(C)730?TN$(XN)(CA$(CA),8,30):F2$(XN)(CA$(CA),7)SCACA1:XNXN1pCA$(CA)""XNXN1:740y660TN$(XN)(CA$(CA),8,30):F2$(XN)FT$(C):DN$(XN)DE$(C):SN(XN)SP(C):700=:"NEW FILES WILL BE DISPLAYED ONE BY ONE, INSERT DES08)256(107)7)EN(252)(253)256@LE38:AL57:AH138I&IN3T0PO,LEa:PO1,ALnDPO2,AH{NPOPOINXALALLEbAL255AHAH1:ALAL256lAH256ALEN1640v560821XN1:CA0C1X(CA$(CA),8,30)T"CLOSE PROG.LIST"$216,0:2811:ER1J"CLOSE PROG.LIST"W216,0:y::8:"UPDATE PROGRAM LIST"10:15::"WORKING":252,0:253,13854,0:55,3:56,40:57,3:1002"CATALOG""PR#0""IN#0"PO(1OGRAMS IN PROGRAM LIST AT THIS TIME":j,20:16368,0:"SELECTION BY NUMBER ? ";A$:A(A$):A1A43006A450,1150,1420,1650@420JER0T"OPEN PROG.LIST"^"READ PROG.LIST"hXrC1X|T$(C):FT$(C):DE$(C):SP(C)M MUST HAVE 48K AND DOS 3.2 BOOTED.IF YOUR DISK HAS MORE THAN 70 FILES DO NOT USE THIS PROGRAM." 9:"<1> UPDATE PROGRAM LIST."::"<2> CHANGE OR ADD DESCRIPTIONS."::"<3> PRINT HARDCOPY CATALOG." :"<4> EXIT PROGRAM."&"ER1Ģ18::"NO PRISH TO USE (OR ARE CURRENTLY USING) THE 'CATALOG MANAGEMENT' PROGRAM ON. THEN HIT -OR- TYPE 'Q' & TO QUIT ";A$ A$"Q"1650 320d ::"CATALOG MANAGEMENT - EDIT MENU "::"SYSTELABLE ON THE DISK, AND ALSOPROVIDE A EASY WAY TO RUN OR LOAD A"b "PROGRAM BY NUMBER SELECTION" :"SYSTEM MUST HAVE 48K AND DOS 3.2 BOOTED.PROGRAM ALLOWS ONLY UP TO 70 PROGRAMS PER DISK TO BE ENTERED." :16368,0:" INSERT THE DISK YOU Wt "THIS PROGRAM IS ONE OF A PAIR. IT WILL CREATE A TEXT FILE FOR USE WITH THE 'CATALOG MANAGEMENT' PROGRAM"? "'CATALOG MANAGEMENT' IS INTENDED TO BE USED AS A HELLO PROGRAM WHICH WILL ALLOWTHE USER TO READ A DESCRIPTION OF THE PROGRAMS AVAI:IN0:AL0:AH0:LE0! nCA$(70)8 xD$"": CONTROL DK "NOMONI,C,O"d X768863:V:X,V:p X0:: T$(70),FT$(70),DE$(70),BA(70),BL(70),SP(70) TN$(70),F2$(70),DN$(70),BN(70),B2(70),SN(70) :"CATALOG MANAGEMENT - EDIT PROGRAM": ***********************< * AUTHOR- JIM PFEIFFERX * NORTHWEST SUBURBANs( * APPLE USERS GROUP2 * (NSAUG) --PERMISSION< * GRANTED FOR FREEF * REPRODUCTION & USE.P ************************Z35327 dPO0:EN0          ΠĠԠŠҠƠŠǠӍӠ٠٠ϠŠčӠōӠčϠćˠ̍ˠŠčŠčɯϠҍĠԠ٠ϠΠ͍Š۠ӠϠҠ٠ҍξϠŠǠŠҍ̭þξϠٍ̠ҮŽĠՠŠϠŠҠٿԠŠˠĠӠԠΠˠĠӠ٠ϠՠԠǿōϠӠ&3>Ou0:?VcqqqqqŠԿſΠԿſſԠӮӠþϠΠϠΠՠҠ٠Ҡ٠Ϡ΍٠ӮŠΠנŠŠҠŠɀ@ 4 L 5  LƠ砠ŠυÒŠ̳à鶠栌źŗϠɆűҠȠࠃ̶íհѥĪƠ蠠Ӯt h "#!$6CPbt~?O^d ㎬М 4LHHH:612 L] 34Lhhh`HHH J ( 4L <hhh` : :4  ,>  4,$ 12 """zm"""` 3` # # 1 "2 " ̷`12 `HHHλ0+>jj9hhh`( 68>` `1#2#34`ȱ`ȭ`#1#2 13` ` X,3` #1ȹ #2Ȍ 1 `,30 "" = ` ` : :   oOɃ  hhhhhh`DDTPɍɬCDL$,)  o : L  `   DLI,ɽ! ʎ`8`HH nɽ"̿̿88hh` ȹHH`hh" XL  < L < < B,30ޭ# #   ` H h ` $>=!D  # o? : L  hh` >)`ʽ!08`  `  ?,06 /,0&莽 ,0ȌP8``Ȉ!`  nɽ! 莼Ȍ`8`  n$'   hhh`, `Hh`h`< q  ` Y  < LK ` !!`! !8`!1!2  `iii!Lk !Lk H m hLk !>!2!1!!n o00Щ莻ɽదɬnɽ̻ʎ! o : Lm  ɛhhL%H% h% ` ` `HHH  hhh`HHH : 7 , ) ; <7698  ; ` o ɱɸ" L; )9 o ɱɳ# L_ )7`  o ɱɸ" L )8 o ɱɳ# L )6789<<` L  D5   , b Y L> b @   Lvم38%0` X L8 :   < `" X    i(  ! o , и` X$i( " X ,          ΠĠԠŠҠƠŠǠӍӠ٠٠ϠŠčӠōӠčϠćˠ̍ˠŠčŠčɯϠҍĠԠ٠ϠΠ͍ԠĮϮӮϠҠ٠ҍξϠŠǠŠҍ̭þξϠٍ̠ҮŽĠՠŠϠŠҠٿԠŠˠĠӠԠΠˠĠӠ٠ϠՠԠǿōϠӠ&3>Ou0:?VcqqqqqŠԿſΠԿſſԠӮӠþϠΠϠΠՠҠ٠Ҡ٠Ϡ΍٠ӮŠΠנŠŠҠŠɀ@ 4 L 5  LƠ砠ŠυÒŠ̳à鶠栌źŗϠɆűҠȠࠃ̶íհѥĪƠ蠠Ӯt h "#!$6CPbt~?O^d ㎬М 4LHHH:612 L] 34Lhhh`HHH J ( 4L <hhh` : :4  ,>  4,$ 12 """zm"""` 3` # # 1 "2 " ̷`12 `HHHλ0+>jj9hhh`( 68>` `1#2#34`ȱ`ȭ`#1#2 13` ` X,3` #1ȹ #2Ȍ 1 `,30 "" = ` ` : :   oOɃ  hhhhhh`DDTPɍɬCDL$,)  o : L  `   DLI,ɽ! ʎ`8`HH nɽ"̿̿88hh` ȹHH`hh" XL  < L < < B,30ޭ# #   ` H h ` $>=!D  # o? : L  hh` >)`ʽ!08`  `  ?,06 /,0&莽 ,0ȌP8``Ȉ!`  nɽ! 莼Ȍ`8`  n$'   hhh`, `Hh`h`< q  ` Y  < LK ` !!`! !8`!1!2  `iii!Lk !Lk H m hLk !>!2!1!!n o00Щ莻ɽదɬnɽ̻ʎ! o : Lm  ɛhhL%H% h% ` ` `HHH  hhh`HHH : 7 , ) ; <7698  ; ` o ɱɸ" L; )9 o ɱɳ# L_ )7`  o ɱɸ" L )8 o ɱɳ# L )6789<<` L  D5   , b Y L> b @   Lvم38%0` X L8 :   < `" X    i(  ! o , и` X$i( " X ,       THIN COMMANDS ARE NOT ALLOWED, BUT THEY ARE ALLOWED IN ERROR MESSAGES.":{ "WHICH DO YOU WANT TO CHANGE: COMMANDS OR ERROR MESSAGES? ";I$} :(I$,1)"C"TY0:3200~ (I$,1)"E"TY1:3200 3195 "HERE IS THE FIRST ONE..."$ "******TYPED. YOU MUST THEN"2l "TYPE A SHORTER WORD."8n q "NOTE: ERROR MESSAGES ARE STORED SLIGHTLYDIFFERENTLY, AND A REPLACEMENT MESSAGE MUST BE THE SAME LENGTH AS THE ORIGINAL.THIS PROGRAM WILL PAD IT WITH BLANKS IF NECESSARY."v Ix "SPACES WIW COMMANDS MUST FIT IN WHERE THE OLD ONES WERE IN MEMORY, SO IF YOU MAKE A NEW COMMAND LONGER IN LENGTH THAN AN"b "OLD ONE YOU MUST MAKE ANOTHER ONE SHORTER. YOU WILL GET THE MESSAGE 'TOO LONG!' IF THERE IS NO ROOM TO FIT THE COMMAND YOU N WORDS WILL APPEAR ONE BY ONE."L "IF YOU WANT TO CHANGE THE COMMAND OR"v "ERROR MESSAGE SHOWING, HIT THE KEY"& "MARKED 'ESC'. IF YOU DO NOT WANT TO"0 "CHANGE IT, HIT ANY OTHER KEY."N S "HIT RETURN TO CONTINUE. ";I$::qX "THE NEMMANDS ARE NOW CHANGED." 1 INSTRUCTIONS; ::A g 6:"*** DOS COMMAND CHANGER ***"o 11 "BY DANIEL TOBIAS" "ALLOWS YOU TO CHANGE 'TOKEN' WORDS" "(COMMANDS AND ERROR MESSAGES)" "IN APPLE DOS 3.3."  "TOKEN)"; "";I$" (I$,1)"N"Ā( > "FILE NAME: ";N$D  TY1Ą"IF YOU HAVE CHANGED YOUR 'BSAVE' COMMAND, WHAT IS IT NOW? ";B$:B$""BS$B$ D$;BS$;N$;",A"ST",L"LN  "TO RETREIVE, TYPE 'BLOAD "N$"'." "YOUR DOS CO IN NEW VALUES QADST% VA1X1: [(J$(A))11150N `B1(J$(A))1f jAD,((J$(A),B,1))r oADAD1y tB ~AD,((J$(A),1))128:ADAD1 A   END 1100 :"DO YOU WANT TO SAVE THESE ALTERED TOKENS TO DISK? (Y/NG!":1000 15  CHANGE& ? "CHANGE "A$" TO: ";I 4000 TY1(B$)(A$)B$B$(" ",(A$)(B$)) LL(B$):LLN(NWX)ĺ"TOO LONG!":LL(B$):1000 TY0X25BS$B$ J$(X)B$:XX1:15 L POKEIII:II127IIII128( A$A$(II)7 I127100H 2ADSTLN20P 7:c <"THAT'S ALL."m F2000} d LIST WORD iX25T0BS$A$ nA$ pJ$ uJ$(27)1000 wJ$(X)A$:XX1 LL(A$):LLN(NW(X1))XX1:LL(A$):"TOO LO  DOS COMMAND CHANGER9 BY DAN TOBIAS 9/29/81IBS$"BSAVE"UD$(4)_3000p J$(100):X1 TY0ST(978)2562948:LN132:NW28 TY1ST(978)2563188:LN202:NW14 ADSTA$""XNW55I(AD)ADAD1   Ů)qRca(ƠՠԠϠΠҠӬ)a(Š)GM6a(̠)M6|QBe3cca(ԠˠĠӠ)M6ca@E()'ca(ҠǠٯΩ)GM6q.?6@r`Y$!d6Ced6BeHd6Be^cca(ҠϠŠҠŠΠҠӠ١)ca(ƠӠ͠ӠŠƠΠɯҠՠ)GM6a()GM6|=a(ϠҠҠŠ̠Šš)8]ӠΠ΍ӠΠӠa@E(Ġ)!d6CeLd6Bed6_C ]ΠNJ٠ԠŊ̠ō֭à d_n#nM6@p()]̠ĠΠӊCxa(Ǡ)ca()8ca(ԠŠ)ca(ź)Gka(ˠ   ΠĠԠŠҠƠŠǠӍӠ٠٠ϠŠčӠōӠčϠćˠ̍ˠŠčŠčɯϠҍĠԠ٠ϠΠ͍Š۠ӠϠҠ٠ҍξϠŠǠŠҍ̭þξϠٍ̠ҮŽĠՠŠϠŠҠٿԠŠˠĠӠԠΠˠĠӠ٠ϠՠԠǿōϠӠ&3>Ou0:?VcqqqqqŠԿſΠԿſſԠӮӠþϠΠϠΠՠҠ٠Ҡ٠Ϡ΍٠ӮŠΠנŠŠҠŠɀ@ 4 L 5  LƠ砠ŠυÒŠ̳à鶠栌źŗϠɆűҠȠࠃ̶íհѥĪƠ蠠Ӯt h "#!$6CPbt~?O^d ㎬М 4LHHH:612 L] 34Lhhh`HHH J ( 4L <hhh` : :4  ,>  4,$ 12 """zm"""` 3` # # 1 "2 " ̷`12 `HHHλ0+>jj9hhh`( 68>` `1#2#34`ȱ`ȭ`#1#2 13` ` X,3` #1ȹ #2Ȍ 1 `,30 "" = ` ` : :   oOɃ  hhhhhh`DDTPɍɬCDL$,)  o : L  `   DLI,ɽ! ʎ`8`HH nɽ"̿̿88hh` ȹHH`hh" XL  < L < < B,30ޭ# #   ` H h ` $>=!D  # o? : L  hh` >)`ʽ!08`  `  ?,06 /,0&莽 ,0ȌP8``Ȉ!`  nɽ! 莼Ȍ`8`  n$'   hhh`, `Hh`h`< q  ` Y  < LK ` !!`! !8`!1!2  `iii!Lk !Lk H m hLk !>!2!1!!n o00Щ莻ɽదɬnɽ̻ʎ! o : Lm  ɛhhL%H% h% ` ` `HHH  hhh`HHH : 7 , ) ; <7698  ; ` o ɱɸ" L; )9 o ɱɳ# L_ )7`  o ɱɸ" L )8 o ɱɳ# L )6789<<` L  D5   , b Y L> b @   Lvم38%0` X L8 :   < `" X    i(  ! o , и` X$i( " X ,           ˠDEưưW РҠ˿٭ΠC ˠĠҠWԠˠĠӠ٠٠    5 L? HLb 9> iŰݐ穠 LO  L , L   ` L @ )$$X )% "L I` HH H H`W`  O j `AΧӠN @p(ºàŠƠĸ)[)[)a()[]ӠȠ͠ N@"r\\@p()\ \[@B;@rrp(ΠŸ)UVW;@rde<@*rrY dHeM6[`@p( Ĺ°ĠĠàĠĠĠĠ )[r$d6?e[q`²$" a()[]Ԡ֠Πֱqֲqa@*ֱ#ֱrE@*ֲ#ֲrG[q±]Ԡà±²d:e8rd;e8r!d$ea()Gq\a()G'q.?/r`$a(%\Qq±"a()q\a()Gq,q.?r\a()G6q`²$, @a()GJU̱VWTqq.?̱r^`$rhq?qr`$|qq@d2edeY̱d2e `.?6@@ `@9()$`@9()$_\ q\<`$.a()a()a(ˠ)FE(Ҡ)F±q²qa()\ `˱Ա$8q` $qq_`@9()c`@9()%\_ (\_2a(Ԡ)_<]įŠFdePdeZd e dMnq.? rxq.?r[+qq˱q"Աq S(ԠϠҠ)&²qS(ԠϠҠ)&@`@9()$`@:()$\q;@r`@*r9()%q<UVWq<@*#rr` %q`$(`6±$2±q²²q_ ²q² Y`±²²$2`;@r$(\ӠϠ)L~a(ˠΠةĠ٠)a(Ӡ٠ŠΧٮ)#ccS(ˬҠ)'' q\<ca(Ӡ)FG`$a(Ϡҩ)=cS(٠Ԭԩ)&@`@9()$±q6_8IBd2e?oPa(Ԡ٠٠ϠԠ)d2ed"e)LS(Ǡˬ)'')VS(ǠˬҠ)'˱'Ա``˱$Lj_Wtca(ΠĠ٠ӠԬԩҠϠŠӵ)N@" rC@"r4qqq]ƽ3S(Ԡ)'qdede#$S(РŠàٯΩ)&@ .`@9()$8`@9()$_$>8S(٠ŠҠٯΩ)&@`@9()$t`@9()$L]ŠȠ$a@E(ң)[]ΠҠΠ#a@E(ң)[]ΠƠ9dJe0dKe de0de ]Ԡ͠[ ]DN@"rq.?r.?r @p()]̠ĠΠ3N@"r@p(M 'd]ˠӠ٠٠Πn]ΠҠ[x]Ӡ͠ӠŠӠƠˬҠˠԠŠϠҠҠ=]ŠҠӠΠŠĠӠq±]ԠӠ±²#\\_     :8999HXA$::A$::6000H(222)59000;HESW:NH'#(222)59500eH(#"ERR NBR ";(222)H%D$"CLOSE":D$"PR#0":TĄA$G|ESW330G:A$:;GBRBR(A$)W:BRRL370DG335VGD$"OPEN "NF$\GG"P=PRINTER S=SCREEN (P OR S)? ";PS$GPS$"S"575G&PS$"P"570G0((37)):868:530G:D$"PR#1":G?:NF$:"================"HND$"READ "NF$:317FAD$"PR#1":OFE:NF$;" REC LENGTH = ";RL:"====================="gFJD$"OPEN "NF$",L"RLFORNRNW:"---- REC NBR ";RN;FPPS$"S"338FQ:350FR" HIT RETURN OR RESET";R$F^D$"READ "NF$",R"RN:BRZFh1000FmESZGrESZANT TO START AT RECORD ZERO (Y OR N)? ";R$:E8R$"Y"316JE9R$"N"315bE:((37)):868:311E;:"ENTER STARTING RECORD NUMBER ";RNE<RN((RN))W:E="P=PRINTER S=SCREEN (P OR S)? ";PS$E>PS$"S"325E?PS$"P"321F@((37)):868ESZDPESZĄA$"DZ216,Z:BLZ0D_PH1200DDn(HMBL)Z195[DxBLBLW:BLSB150dD110}DRLRLBF:RNRNW:60DPHWD(HMBL)Z310DBLBLW:BLSB150D200D6RLRLBL:::"REC LENGTH = ";RL:RNW:D$"CLOSE":*E7RNZ:"WS FULL"{C3" OR":"RECORD NUMBER ONE IS EMPTY"::" SUPER.RAT COMES UP WITH THE WRONG":25:"RECORD LENGTH."C4:"RESET ME IF I SEEM TO BE IN A LOOP"C<D$"OPEN "NF$",L256"C>IWBF:HMWI,Z:C@D$"READ "NF$",R"RNCF1000DK((37)):868:31BB#"DO YOU KNOW RECORD LENGTH (Y OR N)? ";R$QB$R$"N"50`B%R$"Y"40wB&((37)):868:35}B(B)"ENTER RECORD LENGTH ";RLB*RL((RL))::311C2:8:"PARDON ME WHILE I DETERMINE REC LENGTH"::"IF YOUR ZERO RECORD IFILE"&A"THAT DOES NOT EXIST ---":LA10:"SUPER.RAT CREATES AN EMPTY"iA10:"FILE BY THAT NAME"A:"IT'S UP TO YOU TO DELETE IT."A:"ENTER FILE NAME ";NF$:A"S=SEQUENTIAL R=RANDOM (S OR R)? ";R$:A R$"S"500A!R$"R"35B"%@ SUPER.RAT READS APPLE TEXT V@ D$(4):Z0:W1:BF256:SB255:RLZ:RNZ:PHZo@D$"CLOSE":D$"PR#0"@HM(115)256(116)@:3:"SUPER.RAT READS APPLE TEXT FILES"@:"IT'S OK TO HIT RESET ANYTIME."A:"IF YOU ENTER THE NAME OF A < A < ɰ$0 $` d'OONTAL AXIS).THE STATUS OF EACH SECTOR IS BASEDON THE BIT MAP OR VTOC IN TRACK 17,SECTOR 0.LEFTMOST VERTICAL COLUMN SERVES AS ASECTOR INDEX. PRESS ESC TO STOP. TO RESTART, TYPE: CALL 2051` LM`st`ɩXLhh L HH` `ȑ`ȑ`, ,ɛȑ  L  APPLE DOS SECTOR USE MAP LAWRENCE HALL OF SCIENCETHE FOLLOWING MAP DISPLAYS 16 SECTORS(VERTICAL AXIS) IN EACH OF THE 35TRACKS (HORIZĩ R  FREE SECTORS (effff  K)$  VOLUME=  : J di i   i8ȱ8& F  di i  L #Н,,, . 9 D   . X l  INSERT DISKETTE, PRESS RETURN,,,ɍ F   READ ERROR IN VTOCL8 Đ @  DOS 4 6 8 0 2 4 D 0 2 4 6 8 0 2 4 ĩ I Žҩν    a(à) g'd2ej'c[ed?e.?MrMp ca(ң) `@9()%[!S(Ԡξ)&@_#KM6a(š)Q Ka()) ca(Ԡ٠r9()$\ dededeM_#\(#!M6a(ҠӠԠ)G2q.?Mr\a(ΠĠǬ)$a(Š̠٠Ϡ) BdeL Lde6 Vde jKM6 KM6\(#q`$Z`@9()$d`@9()$g`@9()$h`@9()$ i`@9()$k`@9()$ n_#*\dededeM_#7ca(ŠԠˠҠӠ)FE()FE()cS(Կ)&@`@*#=C>B`>L  L hL ) @JJJ @+`>L q6 N@"(rC@"r ccc @p();#\'d"eoS(Ŀ)&@q`@9()$$U`@9()%ǠB6d<e8.?rrd=e.?r8.?rrkd>e8.?<rrd?e.?=r8.?<rrdBedCe de.?>rde.??rM6_L LiB?CLx  <@=A @e8.?<r`rd?e.?=r8.?<r`rdBedCede.?>rde.??rM6_HHH LMȑ ȑ    -?? hhh`     /5 qs r ; qa ` `$$(ɠ$C q$W ``H$%  h\  `CATALOG\Y/N\LOAD\LOCK\UNLOCK\RUN\SAVE\DELETE\NOMONC\START\ LENGTH\,D\I/O ERROR\@  UmU+&*Y Y P ,X B АX I8Mt_=gH?J QVQT_ɕ%[^ZZ\[]^Z_[ 0W Г J1  @)ȹ@)ȹ@) q P^ɠ 0   qL MW'WП < XX QLiLLs4 O CONTINUE, PRESS A KEY";:Q$::: QNIC MAIL SYSTEM AND"="DOWN LOADED INTO THE BUFFER OF MY"i"TERMINAL PROGRAM FOR LATER DISC SAVE"o"APPLES AND MICROMODEM II WERE USED ON""ON BOTH ENDS OF THE EXCHANGE""--E.A.STURGES 1/31/82"34,0# 24:"TROM APPLESOFT"I800AN"I BELIEVE THIS ROUTINE APPEARED IN"oX"CALL A.P.P.L.E. BUT AM NOT SURE. THIS"b"VERSION WAS SENT TO ME BY LEIGHTON"l"PAUL OF TEHACHAPI, CALIF. IT WAS"v"UPLOADED AS A TEXTFILE INTO THE""TELEMAIL ELECTROFIG-"/"URATION IS FUTILE. THE APPLE WILL"Z"DEVELOP DOS AMNESIA AND REBOOT WILL"m"BE NECESSARYs!&"THE MACHINE LANGUAGE PROGRAM BEGINS"0"AT $4000 AND ENDS AT $4430. BRUN":"FROM DISC; 4000G FROM MONITOR;"D"CALL 16384 FIONS;" "E.G.:"3" 1. RUN DOS MOVE"H" 2. CATALOG"e" 3. RUN BIG PROGRAM"u" WHICH?"{"THIS WORKS NICELY IN START UP BOOT"800"OBVIOUSLY, ONE NEEDS 48K AND 16K RAM""CARD. RUNNING ON ANY OTHER CON w, |"THE PROGRAM AUTOMATICALLY RUNS"V "'HELLO' AFTER EXECUTION. THE DISC" "HELLO SHOULD NOT LOOK FOR THE LANGUAGE" "CARD TO AVOID I/O ERROR. THE PROGRAM" "CAN BE BRUN OR A HELLO PROGRAM CAN""BE WRITTEN PROVIDING INPUT OPTEM BE SET"4 @"--PROGRAMS DESIGNED TO USE THE RAM"Y J" CARD WILL NOT WORK PROPERLY"b O800 T"IT IS SUGGESTED THAT DOS MOVE BE" ^"EXECUTED JUST BEFORE RUNNING A" h"SPECIFIC PROGRAM AND THAT THE SYSTEM" r"BE REBOOTED UPON COMPLETION."VAILABLE"6 "--THE OTHER LANGUAGE CANNOT BE LOADED"b " EITHER INTO MEMORY OR THE RAM CARD" "--PROGRAMS THAT DO NOT LOOK AT HIMEM" "" AND ADJUST WILL NOT ACCESS THE" ," EXTRA SPACE AND NEITHER WILL PRO-" 6" GRAMS THAT REQUIRE HIME PROGRAM." 800> "WHEN THE PROGRAM IS BRUN, HIMEM IS"i "MOVED FROM $9600 TO $BF00, AND-----"o "--ALL DOS COMMANDS RESPOND NORMALLY" "--INIT COMMAND IS **NOT** AVAILABLE" "--ONLY THE LANGUAGE ON THE MOTHERBOARD" " IS AANTAGE IS POSTPONE-"B "MENT OF DELAYS CAUSED BY HOUSECLEANING"l "OR FRE(0) INSERTION. ALTHOUGH THE" "SPACE IS ALSO AVAILABLE FOR PROGRAM" "COMMANDS, STRINGS AND VARIABLES" "DOS MOVE MIGHT ELIMINATE HAVING TO" "CHAIN A VERY LARG% 6:8:" DOS MOVE INFORMATION "::34,2:cd"DOS MOVE IS FOR THOSE WITH A LANGUAGE"n"CARD OR A 16K RAM CARD, WHO MIGHT NEED"x"EXTRA ROOM FOR SPECIFIC PROGRAMS.""IT FREES UP ABOUT 10 K OF MOTHERBOARD" "RAM. ITS MAIN ADV      ` JOHN`S SUPER UTILITY PROGRAM L(OAD R(UN K(LOK U(NLOK X(ALL C(ATL D(EL V(RFY S(TOP Q(UIT VOL PG OF SECT-FREE N(DRIV ĿѕH!ɾL [ Q ԧLLJJJJ 0 0` [$ B  i&e L`$  ɍ ` X :$   LѕL` 8`ة;^Z_[` ` 9 X΅  [$ `( `0 Lee`8 ` :8` ^r67 Qx`4 N [ = X @^8JJJJi 0΍4`67LQ S TLQHɍh` 8 iiLح) 0L{L@^    [  Ux s r $$ a ` L  ` `ii LY/NOMONSTART ALENGTH Lx  m&NmJnm0  з0MLH c _ XHL [  ؗ  Ж mL c _ Ҡ [ C0  3  $ S!  [$ ЖLH ؗ Ж  L{И~Д [  ؗ+ $$$o  Ж 4<=>?BC ,ڍ ԧLS T  m鷽 ݌ 0 X '1  x)ȹx)ȹx)    [$ $ q L {{l lpx|~𷄝]V߼ȿBhzBB5zaM|wQTWZ\^`cegkޔ6G݀ $-H^ݭ_%H\ݭ]HZݭ[H`ݭa rsLNHhL{ K @ jLrs`au`hhHHL9DLQL#VXZdfLf Lf Lf Lf e fL䍁L׍L6 -Lf ]Lfl8 o,,(`l6LfLlll f ލ` f Lи fL fL f L f L f QLB'Byyyy-Bz9BEBWBWBWBfBlBrBxBBhBBBBBBimBXmB z5hDLw@@DiLj@AC@B@BCAC KB C@ CAB"@lL@ʽBi@ȽBi}@ΩL6 ݍ̹A_COkhC濹տ AuA LBPADL Lf @2ɝ @ `ƠĠàō#C@CCA @i@@AAACCi$΢D@DA@ /k@ɝe*ɷ@MIiՐɵA@餐;-7iϑ@ȩ53@ʭXCWC _C@Ƚ`C @i@@8/e@@eAA    GRAM WILL STORE THE DATA ON DISK AS A BINARY OR TEXT FILE AS DIRECTED.":z" PUSH ANY KEY TO CONTINUE";:K$::8:"TO LIST A PROGRAM , THIS CONVERT PROGRAMCOULD BE RENUMBERED STARTING WITH 63000 AND THEN 'EXEC' IT INTO THE PROGRAM TO BE LIEED TO BE CREATED IN SEGMENTS TO AVOID OVERRUNNING DOS":" SELECT THE QUIT OPTION FROM THE APPLE- WRITER MENU. AND RUN THIS PROGRAM. THIS WILL SHOW YOU THE DATA STORED IN MEMORY"O" ---- IF THIS IS OK , THEN ASSIGN A FILE NAME AND THE PRONG THE OUTPUT TO MEMORY LOCATION $5000.":^" PUSH ANY KEY TO CONTINUE":K$::5"RUN THE PRINT AS NORMAL -- HOWEVER THE TEXT WILL BE STORED IN MEMORY RATHER THAN ON THE PRINTER.":" ::: NOTE :::":" VERY LONG FILES MAY N 0"." RIGHT MARGIN 132"P" HIGH BIT (SET) 1"r" PAGE NUMBER (OFF) 0"" SINGLE PAGE (YES) 1"" PRINTER ADDRESS $4FE0"35);"THESE SPECIFICATIIONS HAVE THE EFFECT OF DIRECTI:K$::5"AFTER CREATING THE APPLEWRITER TEXT FILETHE PRINT ROUTINE MUST BE CALLED FROM THE STANDARD MENU. THE FOLLOWING PRINT SPECIFICATIONS MUST BE SET:":" TOP MARGIN 0"" BOTTOM MARGIN 255" " LEFT MARGIN "THE PROGRAM 'DIVERTER A$4FE0/L$1B' MUST BE 'BLOADED' FROM APPLEWRITER BEFORE DIRECTING OUTPUT TO THE PRINT ROUTINE. THIS CAN BE DONE BY USING A CONTROL D TO ACCESS THE DOS FROM WITHIN APPLEWRITER.": "PUSH ANY KEY TO CONTINUE "NARY FILES :+ ***** NOTE ******1: THE PROGRAM 'DIVERTER A$4FE0/L$1B' MUST BE 'BLOADED' FROM APPLEWRITER BEFORE DIRECTING OUTPUT TO THE PRINT ROUTINEn:o ***** INSTRUCTIONS *****p:5z5);"OPERATING INSTRUCTIONS": PAGE NUMBER (OFF) 0 1 SINGLE PAGE (YES) 1 M PRINTER ADDRESS $4FE0S:j *** NOTE *****p :  THESE SPECIFICATIONS HAVE THE EFFECT OF DIRECTING THE PRINTER OUTPUT TO THE MEMORY LOCATION $5000 FOR SUBSEQUENT OUTPUT TO TEXT OR BI:(4)"CATALOG":3020 . 0:1002:1104<::R APPLE WRITER o PRINTER SPECIFICATIONS TOP MARGIN 0  BOTTOM MARGIN 255 LEFT MARGIN 0  RIGHT MARGIN 132 HIGH BIT (SET) 1  ORY SEARCH !": 255= :(4)"OPEN";N$:(4)"WRITE";N$Z 2000::(4);"CLOSE";N$b :y 10:20:"THE END" I20480EN:((I)); I(EN255)2020:(I)141(I1)160(I2)141(I3)160(I4)141(I5)160ı :: DY FOR DISK SAVE - (Y/N) ? ";:Y$:Y$"Y"Ā:4 :[ ***** SAVE TO DISK ROUTINE **** "FILE NAME ? ";N$::" SAVE AS BINARY (B) OR TEXT (T) ? ";:S$:S$ S$"T"160::(4)"BSAVE"N$" ,A20480,L"(EN20479): 125 :" WAIT FOR MEMMEMORY Q QUIT" i:" CHOICE ? ";:A$:A$:A$"I"6000:A$"Q"3900:A$"A"110:(4)"BRUN DIVERTER A$4FE0/L$1B" j:54,224:55,79:1002:A$"C"3000:A$"L"3010 k95 nEN(20449)(20450)256 x2000. :" CORRECT -REAKEY TO CONTINUE ";:K$ _:10& b:H c ***** MENU SELECTION *****m d"SELECT OPTION DESIRED BELOW": h" A PRINT APPLEWRITER FILE IN MEMORY C PRINT CATALOG OF DISK IN DRIVE I DISPLAY INSTRUCIONS L LIST PROGRAM IN ++++++++++++++++++++++++++"q <"** REQUIRES COMPANION PROGRAM 'DIVERTER' TO BE 'BLOADED' PRIOR TO OPERATION **" F:"THIS PROGRAM CREATES TEXT OR BINARY FILES FROM EITHER APPLEWRITER FILES, DOS CATALOGS, OR PROGRAM LISTS." P Z"PUSH ANY B) :3:5);"APPLEWITER CONVERTER - "Q2);"CATALOG FILE CREATOR UTILITY"W"BY FRANK KIRSCHNER & VAL GOLDING"#("CALL A.P.P.L.E. * FEB 1982"-2"ENTERED AND ENHANCED BY MICHAEL MOORE 2