@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED697 FREE SECTORS COPYING---D8:COPY32.COMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 170ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8u 34 AXLPB0NZ<( ((@!@d"( T} +AdAUcAA'A @9@@K@@7Q(}cAR@U}++(#++(#| |++(#| P.D. #38 - UTILITIESV} |++(#++(# @ -@AW} $ GG;@@,;@ ,;@@,;A,;@,;@@, "D1:MENU" &&@@X}D:*.* 6,6." 6 @0i6-%@(6.7@<@,A67@ <@ ,.Y}.i67@<@,.7@<@,3 6.|67B:,%@,.367B:,%@,.G67@<@,.(-Z}-@B:,:7<,4 G67<,..] 6.=:, @D67@<@,.7@<@,]67@<@[},.0$@(''7@<@,4FREE@- @ 2() <@F''7@\}<@,4FREE@K @ P(7@<@,)|U @0W'!-@6+'@,%@' |Z]}++(#| |[ ( |  |\++(#xAR^}[@@9'-@@"C( SELECTIONM A0Q[ BP:,A0_}0"@&6.7@<@,0 AELB6.7+&@,$@%@<+&@,$@%@,L B3`}7@<@,4 36.7@<@,!7@<@,4DOS!.0 6.-@B:,07<,4 AHa}67B:,%@,.7<,   6.! 6.D1:!67B:,%@,.?AR@'-@@"?  b} LOADING ? A@@91@@5%? BK-@@"-  CANNOT RUN 7c} @A BK A0D:MENUAUTORUN .SYS . LK-@@"-  CANNOT RUN 7KEiͩkΩ͙kCop j`j {j`Hi͝Νh`Pe}L"UNEM:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh`PLMIROUTINRATCCOLOCURSOAA@B%@B%Hd"PMCURSOR.BAS"fBY JERRY W@g}HITEh33ANTIC MAGAZINE NOVEMBER '84 PAGE 68n A x#-A"#%2-@&@h}@(% 2AR8-@@8(POKE 752,1 TURNS OUR CURSOR ON+(+( POKE 752,0 T@i}URNS ATARI CURSOR ON8(*(ENTER CURSOR FLASH RATE (1-64)4 A8!! @)!@dA%@U@j}>(&(ENTER CURSOR COLOR (O,255)0 A 4> B!! )!AUA %@t.(.(#W@k}ARNING: THIS ROUTINE USES PAGE SIX((AS P/M (PLAYER 2). 6-?:,",5AR@("(BASIC*(BD}$.%L2L3%L2-LU%L'L(L(L(L(Lu%L~%L%L%L%L+L+LQ(L(L+L}(Lh+L'L-L+L1(LI'LY'L'L'L,L6,L6'Lx'L]'L.'L.L.L-L.L m}.L.L .L.L..L)L)L%L%L%L%L&L&L,&L3&L<&LE&LS&LL&L=)LD)LS)Lp)L-L/)L&L&L&L&L&L&L*L *L-Lb&Ls&LZ&L'L'L'LH.L'L n}x.L.L.L.L.L/L/LP/Ld/Ly/L/L7/L'L'L&L&L.L.L.L%3%/(2% ɩR1%22 '22捦2 o}2`ԤՄԅ`ȱ`ȱ`ȥ`ԑȥՑ`ԤՄ`ԤԅդՅ` &0<C &03/6 p} % )0,( &0 & & 8`ԅ` & & & &ѐ & &ʥ %а q}Ъ %Зьɛ &0 &0 `ԥ`Ɠƒ` % %L) %L) %eԥe` %L) % u% r} )Lu% %L) % %L) %L) ~%L% u% ` BLV䅆L]' u%ԅ` B VԩLu%PpKJ s}BDELy, %L( u%ԅ`U 1%R1%eɐ1%L' o+` u% % u%` u%Ԅԅ` t},/%0%``&eԅԥeՅ`L% 'ԨL~%Ԅ % u%eԥe`1(-Ԅ %ɛ o+0` ( ذ u}I ( 8ԅԩՅLu%L,ȹɛ꩛` ( %ɛɛ摥0L(` v}2 2L,0(,ɛM0(M0( ()ɛ ()򩀅` u%ԍ`ԄLu%ԄLu% w}ɛԆLu% %󅐅 ( u%``ԅԥՅLu%82ԭ2Lu%ԤՄԅե`8ե` x}eեe` ) *fLu% ) *fLu%8ԨՄԅLu% % )ԥՄԩՅօפԥFf *ԥ *ԅ y}ԥզЦ`ԅՅʩ0ݴ** * 08f$˹ `' d G+1ԦԄ z}զՄFԐ eਊe&L*Ԇ`hh L, G+Ff&֐ݥ ԆՅԠ&&&8થօԈ` {}քע V+Ե 8`R1% +L,`GHFH` +0ɛȄ ؐL,HI h 8ԅԩՅLu |}%?Ƞ+ ,򦅩DEBHILy,ɛ o+` o+` u%HI BLy,՝HI }} v,Lu%EDH I Lv,EDH ILv,B Vúl/% g-dd1g-8/ i h- 0i-_- ,2 ~}%>- ,--2%+ h+ '-Ԏ-8ե -L,m- , +ɛD(C` ذ K-L- N-L2 N-}- ,L }- N- H-L-l lp '8`ERROR- ?Run address> BASIC exitTrace:-v.8Յթԅ` -L+ - }-ȘH c*h00,)` % ҅ԭ ) )օեׅ` L,L.L.L.L.``Յ`8Յթԅ` }0 ԩ`ԅ`` ' u%`BԝK)I JtD.ELVS:x./)H)h y` % u% % u%TԅUՅV`&B } y,NLսM` % u%ԝL՝MN%BLy, % /` BHILy, % /`B JKLy, u%ԅUՅV % u }%ԅT` H )hҘ` u%)xԩLu% u%))L$&L& u%)pԩLu% u%)|L&L$& / }2%L- / / / `29.8.899 $ $j68 $ $ <$ <$:8 E$ <$Z8 E$ <$x8 } E$ <$8 E$ <$8 E$ <$Ҡ8 E$ <$8 E$ <$99ԩ $08 $9 $$9 E$ <$Щ l$ }-9 $L2L2L259 E$ *$ᢕ9 9$9 $B9 $9 $$9 !$9 $9 $$999ԩ } $ᢥ9 `$ N$F9 $9 $$9 $ $68 $L3B9 $9 $$L39 $H9 $L{3B9 $9 $$D }9 $9 $$ <$9 $ B$L9 E$ <$39 $ W$39 $ W$9 9LS468 $ W$[9 $ W$]9 $ W$ }_9 $ W$9 9L468 $ W$[9 $ W$]9 $ W$a9 $ W$9 9L4c9 $9 $$9 $ $ W$9 } $e9 $L49 9L5g9 $9 $$9 $ $ W$9 $e9 $L4i9 $ W$k9 $ W$m9 $ W$2 }8 $ W$o9 $ W$q9 $ W$s9 $ W$u9 $ W$9 9L5w9 $ W$9 9L5o9 $ W$k9 $ }W$68 $ W$y9 $ W$68 $ W$[9 $ W${9 $ W$68 $ W$9 9L-648 $ W$9 9LF6 }k9 $ W$}9 $ W$9 $ W$9 $ W$9 $ W$9 $ W$9 9L6_9 $ W$9 $ W$ }08 $ W$_9 $ W$9 $ W$9 9L.7a9 $ W$9 $ W$08 $ W$a9 $ W$9 $ W$ }9 $ W$9 $ W$o9 $ W$ l$ W$ l$ W$9 $ W$ l$ W$ l$ W$ݠ9 $$9 }$ W$9 $ W$9 $ W$9 $ W$68 $ W$9 9L8_9 $ W$9 9L!8a9 $ W$ Q$L2L$ }j  |ˠҠˠŠ|  | by } | | Dusty Allen | PUT THE CARTRIDGE INTO SLOT AD:THEN PUSH START }FILENAME 舸5K CARTRIDGE. -"mM @ ʿL$L.L-L.L r]qZZZZZZ1IOCFILERESPONSEDECHEXBLANKCIOSEGMENDECNUMBEFLAGFLAGKHEBYTECECNUMBEMLSTARMLEN}SIZDECNUMEBLOCSUINITINITINILRUHRUGOADDERRO} } !"#$%&'}""HEADER.BAS-DOS FILE ANALYZERK6-6-@'6-@36-@?6-@K6-@!6-@!}AR@00;,;,;A,;@2,;@1,% 6.D1:6-6-6-%6-6.123456789ABCDE}F$467@,. %67@2,. 467@,.. A%`8 ABCOMMAND ROUTINEL AV(-@}( PRESS OPTION TO QUIT`)) !PRESS SELECT TO LOOK FOR RUN/INITj$$ PRESS START TO LOAD NEW FILEt2F:B2y,"@}*AdAU/2%~ F:B2y,"@A p F:B2y,"@A CTRL-R AUTO SCANS FOR INI}T F:Ad,"AhA p@w A@&AR!AdAU&DECIMAL-}TO-HEX CONVERTER6-A@ $ "6-6- -6-P:', 7%<%,  6-&$ 6-'}   ( "6-6-2$< SEGMENT AF FILE APCLEAR THE MESSAGE BOARDZ -}d n$x= >:A%,-= "HEADER.BAS - DOS 2.0 FILE ANALYZER0-@& ENTER NAME OF FILE0 A`} -** INPUT ERROR - TRY AGAIN>:AS,-A  Ap-@!@ 7@<@},-@!@67<,.7@<@, A 110DOS.SYS*0DUP.SYS*0MEM.SAV}A Ap -'' DO NOT USE DOS FILES>:AS,"-A , A 6""FETCH FIRST TWO H}EADER BYTES@"@AJ67<,.T^ ))h)Apr Ap| -'' }THAT IS A BASIC FILE>:AS, A-@  FIRST BYTE =  6-6- A@ SECOND }BYTE =  6-6- A@$ A""FETCH NEXT FOUR HEADER BYTES )) ))}6-@COMPUTE START AND END&6-%AV$06-%AV$:.6-P:&,%.!B) A&`}D-@!@N 7@<@,X-@!@b 7@<@,l-@!@v 7@}<@,-@ STARTING ADRESS =  6--@(@ A@ ENDING ADDRESS = } 6--@(@ A@ LENGTH OF FILE =  6--@(@ A@ A} !!MOVE POINTER TO SEGMENT END- 6-6--!B) A&`  A!@*;%@*+"A$)"}A&,16-; A!P4'!A%6-&A%' A!>6-?:C:,<,H 6-%6-&A!R A!}P\5 Ap-+ END OF FILE REACHED5 Af A!@))p-@ z-@ }1"AU*"AU# A*)1)!!"A$*"@A$!!"A&*"@A"COMPOUN}D LOAD FILE 6-6-< Ap-4 THIS IS A COMPOUND LOAD FILE<6-%:-@ : "THESE PARAMETERS AR}E FOR SEGMENT #%-@ -@  )) A0SIMPLE LOAD FILE ))}!!A')@A  )) -@$ -@.  INIT ADDRESS =8 6-B -@}(@L -@(@V ) A@AdAU) A'` 6-@ Aj  ))t /}"A%*"@%6-/ A$P~ /"A'*"@%6-@/ A$P A  )) }6-%AV$ -@ " RUN ADDRESS = "6- -@(@ ) A@AdAU) A'} A# %6-6-@% A ""MACHINE LANGUAGE BYTE READER ""DATA FROM DISK IS NOT SAVED. }EXECUTED ON FIRST RUN ONLY -@0 " 67<,.>:,  ( $2 104,162,48,169,7,157,66,3< 169,0,1}57,68,3,169,224,157F 69,3,104,157,73,3,104,157P 72,3,32,86,228,96Z CHECK FOR END OF FILEd  A&)n <} >:A%,"-@@2  FATAL ERROR< Ax F:A,"A6A!@ A&p TONE %%2}@P@@ -@@P  (%2($ D:HEADER.BASMLSTARMLENn.X=n=PQQCQ2MXLOLSCRZATXREDCOLEOSCTFIRSOADJOADJCURSOPMGCHABBTTBNFREOFFSTO}MAINDELICCOICBAICBLICSTALCIOERLCOPCLRCSPLUBRKTCMWIDTDSNCHECKSU} } !"}#$%&'()*+,-./012}3456789@:;<=>?@AB}CDEFGHIJKdҠĠҠi22͠}šӠĠˠƠɠРn AP% D:SCRIPTOR) 6- @!6-@9)6-&#!@96-}@#6-%  6-6-&6- !6-6-%6-  6- !+&,6-& " $!} 6-$%6-?::A%,e* 6.>:,67+%,$,.*67@,.lI%6-F:@,%AV$F:@},7AY@FIAB@v'6-@6-6-'A*** ENTRY FOR EACH PAGEBBA}I --( Scriptor Word Processor7@2=/I,@2 6-$%6-?:%%$H6-+%&,$%&R67<,.>:,\ 6-}%& A`f 6- ApAUA zJ A&@%%$@067<%&%,.<6-@J6-%}@+67<,.>:@,! A`+ AP%"@6-A'% A0+"@(6-&! A`+ A}+"@)6-%! A`+ A+"@06-&! A`+ A%"@6-@t% A0}+"@16-%! A`+ A "6-@r A07"A&6-&! A`'6--6-7 }A0AUAp446-?:67$%<$%,.B t 6-+%&,$ 67%<%,.~+6-@!}AY@F+ APN"AY A-( Tab set at &36-D67&<&,.*N A@S"AX A}1(Tab cleared at &76-I67&<&,.>:,S A@A'A04 4 A$( No tabs set *6}-4 A@K -7<,4>:, #6-/6-@76-%A A`K A 6-6-  6-% A}AVA A( Delete Line A@AYE-%&.6.7+%,$%<+%@,$},A67$%<$%,.E  6-$67%<%,.+6-@!AY@F+ AP B"@ A6-}2(Clear all tabs86.B A@(A%AP2 A(Erase: < A&PF"AUAPK}@eApP( -  A%@U AZ@A\)( Remainder -  A%@) A&@_96}7,.>:,!67+%,$,.>:,/67%,.7,9 APd@h)"6APx(Defined Lines - # A%@AY}# A@G -&06.7+%%,$%<+%%@,$,C67$%<$%,.G + -& 67$%<$%,.$ +6}-6AY@F AP@A A( Define Lines 6-6-6-%6-%}@%$+%,A#?6-$%+%&,$!6-$%$06.7%<%,?67%<%,. A&P-"@)*% @"}#6-%- A3"@(*%!+%@%$+%,36-&"AUAP A/ -!%@}%$+%,% / AP":B2H >:A%,(-@:( Р,( Control Keys:6##(=Adv}ance Page =Page Back;,,($=Define Lines =Print Format char.J((( =Kill all tabs =Line DuplicateT(=Print tex}t =Quit^# (Atari Key=Cancel Command#(c""(^x Print special characterhI)(! Erase:ll efined Lines;}@@I( emainderr##( Non-destructive CR|&&( Filer:ecall or aveFF(> 'Home'} cursor. Press twice to go to start of text.( Mini DOS)(Press .6-?:,) AP@}A* A*(Duplicate defined lines& AP0 -:%%&!6- AD6-$%$}N6-$%+%&,$X6.7%<%,b67%<%,.l% 6-%% A`% APv@'A$9-@}9(%irectory,ock,nlock,ename,cratch? A&P6-??@v*@*@*@h*@A}0@:D,A (>:A%,B2H* A!p*@@D:*.*+@(+B:, }@A  A`@ B" A6(Press a key..B6-@L A&P`"@'A } AP A6-)"@v(ˠ>)6-@5)"@(>)6-@3)"@}(>)6-@6 "@:R,A!0(Enter Filename: 6-@6- A' *N67@,.},67@<@,.D:8-@N(7@<@,4Q A!p"@3%-@$/ A%@9@2E,@$}Q/@8>* A!p @* BH B APRg A((>Current name? 46-}@> A' M67@,.g67@<@,.D:\X A$(>New name? 06-@: A' J67B:,}%,.,X67B:,%,.f0 A!p&@2@0 Bp APzv A!pAY@F*@}5@? Af(>:AS, I/O Error #F:A,l6-v A@! A!(ave or ecallP6-A4%}@H%6-%@36-%@G6-A5%@HPIOCB#3! A&P!"AUA@:S,A"o }A&(SAVE: File name? 26-@< A' K67@,.e67@<@,.D:o AP 4D:C6.C}: A"@1-@1(7@<@,ING[ A"8$@@/@9 AQ( }:  - [ A%@( A( REPLACING ( A"@+@+F:A,ApA!p$ A!p$}@@H@6-C:,+%P:'AV,H&+P:'AV,$AV,A6-+%%,$$%P:'AV},A&+P:'AV,$AV,@6-?:C:,<@H, 6-F:,,A@!@A!p.@ B$B}2y. AP@:R,AP 6- d A%(RECALL: Filename? 16-@; A' J67@,.d6}7@<@,.D:  4D:C6.C: ?6-+%&,$%67,.>:,167+%,$,.>:,?67%,.7, R A!p-}@;(7@<@,INGR@@ 36-A4%@H%6-%@36-%@$ U}@%6-C:7+%&,$%,,8%P:'AV,U&+P:'AV,$AV,. E6-+&+%&,,$(%P:'AV,E&+P}:'AV,$AV,8 J6-?:C:,<@H, 6-F:,,AJ!@*A6A!pB 2@B2y$ B}2"APL ) 6-6-6-@)6-?::@!,>:@0,& A&P?(>:@2,>:@0, "AUA(  D"A&*B:,!@26.7}@:,D A'@ ("A&*B:,"(>:,( A'0 B:,"A'@ 77+ @2)!@,* @})!A"A'@  (>:,67B:,%,.>:, A'@  6-4' AP $ *** Printer Output}"  A( PRINT: (C/F), 2 6-6--@ .68,-@H%2 6 ! A&P!"AUA)@ K"@g }6-@&)-@A(>:@g%A($,K A(pJ J"@p6-@&)-@@(>:@p%A($ },J A(pT A(p^ ' A!p'@@P:h  A( Printing...r '6-@6-@u!6- }'6-| -6-@6-@f'6-@P-6- % A@"@%AY - /F:Ad, AU" } A&P%'/ A1@ 6-@:7,, "*A'A4` -- @b)+!@* A#,A0p -"@ } A2# A1P- A1  2"@r6-(*@@2 A1  2"@t6-(*@@2 A1 } a6-@:7%,,1"@b*!@* @&I*@8&@,W6-%@a A1  "A'A20} P "*@@$-7*@@2; P*@@$ 6-%@ $$*@%@2$+ @}d,  6-&@A1! 8-@B:,*%@2@:7<,,. 8 A1# L6-@:7%,,/")"@})")"@86-B:,< F A1PL6-& +"*@:7%,,"6-%+ A10  : A1PD ? @}@+AY@F5 B? APN  - @ X  6-6-% 6-b   $l a "}-AU@J2AU&@@&P:'@,N W6-?:,a A2v  -& @  6- $} *** SKIP TRAILING BLANKS %6-P:',"6-+%&+'",,$%$ Handle special formatting 6-% 6.7<%,}6. -%@ N)7<,1>:@,*7<,2>:@&,J67B:,%,.>:@:7<,,%@2,N  " 6-6- A2}"6-A:,  A!p4cn6- " 4ln- A1P"   4sp6-  4pl6-  4lp}6- "4lm*!6-"6- 4rm*!6- 2 4fp A12AY@F&@F$*  4}as*@4 5 4cm-%@y)7<,0^- 56-&>  4cm6-% A4PH 0nfA40R j 6}.D:-@,6-@:7%<%,,>@*%f67@%,.>:%@2$+ @c,,j W 067,.>:,!67+%,}$,.>:,067@,.\ KAY@F A/( Printing 56-;6-A6-K A# f 3@:,!@*@:, @&}368@:,&@,-p 7<,0^* A2@z  A2 6-% A)p *** CENTER STRING 2 6--%}@y&7<,0^.6-%2  + 6-&6-%7<,4>:@r,+6- 0-+&,'@%,*@@20 }  6-%6-6 A)Π #AS' +@'0@@@i-6-F:A`,%AV}$F:Aa,%@A%@@U%@@i%@@Y-@@+(@=}-@@Y(@Ġx(@x(@ >:A6,>:A',>:A7, >:A }E,>:AS,>:AR,>:AG,9(@9(@ compute publ>:@,.(@.(@ !} CHARLES BRANNON6-6-@'6-@#/6-%;6-AG6-A9S6-A6_6-@k6-@8"}w6-A6-A1\\;@y,;@ ,;,;,;@,;@,9@ ,;@ ,;@,Q 6.>:#},67,.$67@,.36.>:AT,B67@ ,.Q67@,.d 6.6. ,.!?;:-"6.hhh:67@,.>:Ap$},L67@,.LVd67@,.>:A(,@@K:( 6-6-6-!6-@@(6-6 86-F:%}A,&@,AY@F8B2H!BBy!B2w@+6-$AV%A+A@V(&}?-AU%;A%@$H:,F:B7p,? <0@@@W-@p")A'}%16-%SA%@$H:,F:B7p,W ]-AG")A6%16-%YA%@$H:(},F:B7p,] =Bwe: >:AS,Error in DATA statements...=WW72,138,72,169,10,162,2,141,10,212,141,2)}4,208,141,26,208,142,23,208,104,170,104,64ii104,173,252,2,201,255,240,249,133,124,162,255,142,252,2,32,51,5,32,254,246,13*}3,212,169,0,133,213,96JJ162,0,142,0,210,162,15,142,1,210,160,0,234,200,208,252,202,16,244,96216,104,104,133,213,104+}133,212,104,133,204,104133,203,104,104,208,4732,109,6,165,205,7643,6,160,0,177,205200,145,205,1,}98,205,165205,201,255,208,2,198"206,197,212,208,235,165,206,197,213,208,229,16060,177,205,200,145,205@-}136,152,145,205,96,201J1,240,3,76,221,6T32,109,6,76,91,6^160,1,177,212,136,145h212,230,212,208,2,230r.}213,165,213,197,206,208|237,165,212,197,205,208231,169,0,168,145,21296,165,212,133,205,165213,133,/}206,160,0,177205,201,94,240,18,230205,208,2,230,206,165206,197,204,208,238,165205,197,203,208,232,960}165,88,133,203,165,89133,204,104,104,133,206104,133,205,162,24,76188,6,160,0,177,205200,200,145,1}203,136,19238,208,245,24,169,38101,205,133,205,144,2230,206,24,169,40,101203,133,203,144,2,230&22}04,202,208,218,96,1040104,133,204,104,133,203:104,168,104,145,203,200D192,4,208,249,96,160N0,177,212,208,3}20,198X212,165,212,201,255,208b2,198,213,197,203,208l238,165,213,197,204,208v 232,96p= +AY4}+@@d=B7t@dzK0@@10@@@?0@KARa3F:A5}`,%AV$F:Aa,%@AEAWA@a AD:SCRIPTOR.BASREOFFSTOm@AA 7} 8} !"#$9}%&'()*+,-./01234:}56789:;<=>?6-6-@'6-@;}36-@?6-@K6-@W6-@c6-@o6-@{6-@ 6-A6-@6-@<}6-@6-@6-@6-@06-@p6-@6-@6-A(6-A'6-AU36=}-AV?6-B2yK6-A`W6-Ac6-Ao6-A`{6-A6-A6-A 6-Aic6->}Ap6-Aq'6-Ar36-As?6-AxK6-AyW6-A c6-A PK  6-6-6-6-&?};,26.h S`D6-P:I:,',$&K;,< 6-'  AF -6-'P3 +&P:,,$'@}P:,-3.6-?:C:,,6-%!6-$%'-.(B F:,-&(ERROR #F:,>( AT SECTOR #A}B '"P:',   "    6-6-%  -6-'3 +&P:,,$'PB}:,-3.6-?:C:,,6-%!6-$%'-.(,B F:,-&(ERROR #F:,>( AT SECTOR #BC} 6#'"P:',6-%  #$@"AJ  6-6-% h<67<,.67<,.'67,.7,06-C:D},96-C:,<$;  - ( the lockpik&-;( by c.c.i. - -#(copyright c - AT -E}%(DOS 2 IS RECOMMENDED+-F(INPUT 1 OR 2 DRIVESTK:7  -(?)3 @I)!@PF}7 C BEg-*-6-&@H5-9 ?"C @w" -  -(INSERG}T!--(DISK% F:,"-%( ORIGINATING% F:,"-%( DESTINATION   ! -F:,"H}!(READING F:,"(WRITING -( SECTOR # $M  -(INSERT3( ORIGINATINGI}M( DISK IN DRIVE #1O(( INSERT5( DESTINATIONO( DISK IN DRIVE #2:    J}X( +@00%0($8  -#( DO NOT USE 8( LOCKPIK TOT(( PRODUCE K}9( ILLICIT COPIES OF T( COPYRITED SOFTWARE3( ((( HAPPY PROGRAMMING!, 0 3% M --AL}AP)2;2%@`C0M0%>2  22'0/02$9 -6-M}-!0+296-%@ $ -   !2$$& -2 #2&$ F:,"N}$ F:,"+ D:GOOD /  SDCCC1C2MENUAoq(@@@ AA@ @ @P}2 AU @H *****HOME INVENTORY****** By 9/15/81** Roy R.Dugan **Q} ACE OF EUGENE NEWS ** 3662 VINE MAPLE ** EUGENE, OR 97405 *************************o&;@R},;A`,;@@,26->6-@J6-@V6-@ b6-Ao67<,.; !@@S}K:!  +-@"(HOME INVENTORY%(((+$$67B:,%,.!67B:,%,.;$$d+,X --(SPACE REMAINING = T}A`&B:,0(T( PRESS RETURN FOR NO ENTRYX 6(ITEM:4 ; @((MODEL: J(U}( SERIAL #: T"((YEAR ACQUIRED:" ^((VALUE: $  6.# PAGE ENDRB:,!AYV}6( END OF INVENTORY STORAGE SPACEJ-@A N R  ALIST INVENTORY ROUTINE B:,  W}+AR6-6-70@@@70@@@ (ITEM #-B:,&VX}7<,4;((JAPA`ApAAAR6-%V 7<,4#A0 (7<, Y} A@d-@.(PRESS RETURN FOR NEXT ITEM;)@I6-%@O(}S `(ITEM #d > (}-(Z}(END OF INVENTORY RUN6-A: > &(ITEM: $0(MODEL: $:( SERIAL #: $D(YEAR ACQUIRED[}: $N(VALUE: $$S 6- $XSAVE INVENTORY ROUTINEY B:,  Z A ]K(&( POSITION CASSETTE \}FOR SAVEK( PRESS PLAY & RECORD THEN RETURNb@C:v ($$( INVENTORY SAVED ON CASSETTE]}-@A   LOAD INVENTORY SUBROUTINE" A"%E()( POSITION CASSETTE FOR LOADINGE( PRE^}SS PLAY THEN RETURN*!@C:! AP/ 6.CLEAR STRING4-@A`>)@H67B_}:,%@,.>:, R*@*6.7@@H (R\ (}INVENTORY SAVED ON DISKf Ae}`N(( ENTER FILESPEC(D:FILE.EXT OR C:),N7@<@,4D:A" $$7@<@,0CA" f}ALOAD INVEN FROM DISK@ A"u 6. CLEAR STRING-@A`)@g}67B:,%@,.>:, ##(}INVENTORY LOADED FROM DISK ApD:INVTRY@ @ @jb%DOS SYSb*)DUP SYSbSMENU b(lCARTCOP2OBJb&HEADER BASb|SCRIPTORBASb6LOCKPIX BASbOINVTORY BASbKqGEMINI BASb$LISTER BASb TOOLBOX BASb"NOORDA BASb""CARDFILEBASb EOUTPUT BASbNCHECK2 BASbePMCURSORBASbfPMCURSORALLb!BILOADERBASbXLDOS BASbSNAIL BASbdAUTORUN SYSb|README DOCUV$$PABCDEFGIJKLMNOPQSTUVWRFBLCDLLLPCFCCTABXCOLAS(($(!r}P(x(#(!(#(( @"( h( (  ( %(%(0$(X((%!s}(%( ( !(H$(p%%@w@ !@"!t}A#$ %(%@&'A' $$Ԡ٠à$$Ġͺ$$!u}ԮӠ٠ˠɠ$$ĠԱ٠̠Ӡ$$ɠؠҠ#$$̠Šԭ!v}͠($$ҠŠȠìî-$$2$$ȠӺ7$$!w}Ơ<$$ƠA$$ƠF$$Π!x}K$$d@@nb A@&"A80+@B-!y}@@_(@TURN ON PRINTERbx##@@K:##@@P:::(@!z}>:@',>:@d,>:@',>:@a, +9AA0'AA09A @!{}6-@;@@,;@@,;@@,;@@,;@@,;@@,;@@,;@@,;@@,;@@!|},;@@,;@@,;@@,;@@,;@@,;@@,;@@,;@@,;@@,;@@,;@!}}@,;@@,;@7,9AU,;@@,) 6. 67@7,.)67@,...6.$ Ҡ SET (80!~} CHAR./LINE)((6.(A) ELITE FONT (96 CHAR./LINE)..6.$(B) COMPRESSED FONT (136 CHAR./LINE)""6.(C) ITALIC CHARAC!}TER SET6.(D) DOUBLE WIDTH--6.#(E) SUPERSCRIPT ԠȠĩҠʩ++6.!(F) SUBSCRIPT ԠȠĩҠʩ"-!}-6.#(G) subscript FONT (toggles B:F:L5),6.(I) DOUBLE STRIKE6,,6."(J) EMPHASIZED ԠȠ¬ƠҠ@""6.(K)!} UNIDIRECTIONAL PRINTJ((6.(L) N/72 IN. LINE (12/72 STD.)T6. (M) MENU ^//6.%(N) FORM LENGTH/INCHES 11 S!}TD.h//6.%(O) FORM LENGTH/LINES 66 STD.r..6.$(P) FIRST LINE OF FORM 1 STD.|6.(Q) 6.(!}S) SKIP OVER PERF//6.%(T) CHARACTER INDENT(SET LEFT MARGIN)//6.%(U) CHARACTERS/LINE(SET RIGHT MARGIN)6. (V) !}SET TABS++6.!(W) PAPER-OUT ENABLE (SW.2-1 =ON)//6.%(X) BIT 7 ACCEPTED AS IS (0 SET STD.) A@4-@!}4(* GEMINI PRINTER OPTIONS *4-@@4(********ՠ**********)&( (H) HELP (R) RE!}SET)(#( ((((((#(( (((((4-@@"4(ŠѧΠĠ+!}-@@#+(YOUR CHOICE(S): )@>:,4H A(}>:,4R%&~>:,4A:(@!}>:@',>:@f,>:@,S67@<@,.*l67@<@,. r6.~6-@0h>:,4B$(@!}>:@,=67@<@,.*V67@<@,. \6.h6-A6:H>:,4C/(@>:@',>:@R!},H67@<@,.*DS>:,4D:(@>:@',>:@,>:@,S67@<@,.*N<>:,4E!}*7@<@,0**7@<@,0*h(@>:@',>:@,>:,67@<@,.*X<>:,!}4F*7@<@,0**7@<@,0*h(@>:@',>:@,>:@,67@<@,.*bf!}>:,4Gf(@>:@',>:@e,>:@,>:@,>:@',>:@,>:@,lr>:,4G(67@<@!},.*5A67@<@,.*Z67@<@,.*f6-@r6-A6vH>:,4I/(@>:@',>:!}@q,H67@<@,.*_S>:,4J*7@<@,0**7@<@,0**7@<@,0*_6-@!}`&"@*7@<@,0*G(@>:@',>:@i,`67@<@,.*S>:,4K:(@>!}:@',>:@,>:@,S67@<@,.*u>:,4L -@@ 1( >ӯ5[(@>:@!}',>:@e,>:,u67@<@,.*N/>:,4M6. (M) MENU %(}/ Ap>:,4Q A !}AP (}1-@ @1(** GEMINI PRINT MODE **.-@@.( -----------------(K37!}@<@,0**7@<@,0*E( REGULAR FONTK6-77@<@,4*1(7@<@,76-!}77@<@,4*1(7@<@,76- )7@<@,4*)(7@,=7@<@,4*)(!}7@,76-'@=6- 17@<@,4*1(7@<@,*17@<@,4*1(7@<@!},477@<@,4*1(7@<@,76->)7@<@,4*)(7@,H17@<@,4!}*1(7@<@,R)7@<@,4*)(7@,\@7@<@,4*@(7@<@, (/7!}2)fC7@<@,4*C(7@<@, ( INCHES)pB7@<@,4*B(7@<@, (!} LINES)zE7@<@,4*E(7@<@", ( FROM TOP);7@<@,4*;(7@, !}( LINES)H7@<@,4*@(7@<@ , ( SET)H6-&M7@<@,4*A(7@!}<@, ( SET)G!M6-"7@<@,4*"6->37@<@,4**7@<@,4*>6!}-P:&, 6-P:&,-7@<@,4*-( * TABS RESET57@<@,4*5(7@<@ !},D17@<@,4*1(7@<@$,"6-@6-P:@f$+@',,1(1( !} THIS MODE GIVES  LINES/ 11 IN.''( OF  CHARACTERS PER LINE0(0(% ՠ٠נҠҠΠ͠!}--(% ΠΠƠŠįҠŠ--(% Šɠ̠٠ΠӠŮ@@$. !} Ap84-@4(* GEMINI PRINTER OPTIONS *B4-@@4(********ՠ**********L)&( !} (H) HELP (R) RESET)(V'( ((((((#('(` ( (j4-@@"4(ŠѧΠ!}Ġt+-@@#+(YOUR CHOICE(S): ~)@>:,4H A(}>:,4R%h>:,4N!} -@@3( >͠ 7h(@>:@',>:@g,>:,>:,'>:,4N'67@<@,!}.*u>:,4O -@ @2( >͠ 6\(@>:@',>:@g,>:,u67@<@,.*u!}>:,4P -@@2( >Ԡ 6\(@>:@',>:@,>:,u67@<@,.*u>:,4!}S -@ @2( >Ơ 6\(@>:@',>:@x,>:,u67@<@,.*v>:,4T -@!}@ 3( >Ԡ 7](@>:@',>:@w,>:,v67@<@,.*w>:,4U -@ @!} 4(>Ԡ 8^(@>:@',>:@,>:,w67@<@,.*>:,4VAH>:,4!}W/(@>:@',>:@W,H67@<@,.*H>:,4X/(@>:@',>:@5,H67@<@!},.*/>:,4M6. (M) MENU %(}/ A@>:,4Q A  A$$(} GEMSET INSTRUCTI!}ONS,(,(! This is a program to send all(**("those CONTROL CODE combinations to2''(the GEMINI 10X printer for s!}uch<++(#things as compressed print or 'sub-F**("script font' (try this I use it toP**("get 150+ lines on an 11 inch !}sheetZ++(#of paper!!!) or Double-Width or anyd**("other things you may need (mix andn**("match).(subscript font = B !}F L Q )x((All you need do is:++(#1. TURN ON PRINTER & INTERFACE MOD.,,($2. RUN THIS PROGRAM (RESETS PRINTER)!},,($3. ENTER THE LETTER OF THE OPTION(S)((( YOU DESIRE (A '*' WILL APPEAR,,($ NEXT TO THE OPTION AS IT IS SEN!}T)++(#4. WHEN DONE TYPE 'Q' (AS IN QUIT).,,($5. YOU CAN NOW TURN OFF THE COMPUTER--(% AND/OR THE DISK DRIVE. TH!}E PRINTER( WILL REMEMBER!!!!!--@@#-(HIT TO BEGIN F:B2y,@A$@L!}(>:A%,I(4THIS OPTION WILL RESET THE TAB SPACINGOF THE PRINTERL(J8#(TABS ARE NOW SET AT COLUMNS5( 10,20,30,ETC.!}8(T:#(IF THIS SETTING IS SUITABLE7( M Ҡ:(^+(HIT TO CONTINUE+)@h%>:,4M(>:A!}%,% Ar9(>:A%,9($ENTER COLUMN # FOR EACH TAB REQUIRED|EB(:EACH TAB SETTING MUST BE GREATER THAN THE ON!}E PRECEDING ITE("(ENTER 0 TO END SETTINGS"(-68@,-@-68,-46-A'(7@<!}@,4*46-AU1-@168,-8,%@(TAB  9"/68,-!}8,&@9 Ap!A 8&@,A 68,-"Ap $$(@>:@'!},>:@h,-@8,(@>:8,, I(@>:,267@<@,.*?(>!}:A%,I A D:GEMST10XKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK,267@<@,.*!}?(>:A%,I A D:GEMST10XOPQSTUVWRFBLCDLLLPCFCCTABXCOLAS(($( )+,AQAFBRLYDSPPRQLIDNL%} %} * PROGRAM LISTER ** BY DANA NOONAN *$$* THIS PROGRAM WILL PRINTOUT *#$$* ANY LISTED BASIC P%}ROGRAM *%$$* IN A READABLE FORMAT *(SET-UP PROGRAM2]];A,;@,;@ ,;@,;@%},;@,;@ ,;@0,<)6. )6.REM F-#@@K:- APP/%}@6-F:AY,/AYZW A *@@J@@P:W@%}d\F(@>:,7@,PAGE 7@,7@,Q(@\(@n\(@ | | = Invers%}e7@, [ ] = Control7@,< > = Control Inverseg(@s6-@6-%@ A@xGET DATA%} A @\ 6-B:,6-$6-06-\6-@e$+"@,%A $+"@,**CH%}ECK REMS, QUOTES, AND LINE NUMBERS-@6-@:7<,,/"@4)!AY%6-@/ A -%}-@@)@:7,,@2- *7%@<%@,0*6-@("(@(6-%@.%} (@7@<, .6-%@-"* #(@7,- ACHECK ASC VALUE- 6--%}6-@:7<,,-6-%@'q!+%@,5(@>:AU,7@,C6-%@q6-%@e$+"@,%A%} $+"@,,!!!@1* A%A`6!!!AY* ATA@!!!A'* AUA0J @%}'A`T#^ "h  APmu+%,!+%@,9(@>:AU,7@,G6-%@u6-%}%@e$+"@,%A $+"@,r%(@[]!6-%% |8827,8,ESCAPE,28,4,UP,29,6,DOWN,30,6,LEFT,3%}1,7,RIGHT--125,7,CLEAR,126,10,BACK SPACE,127,5,TABJJ156,13,DELETE LINE,157,13,INSERT LINE,158,11,CLEAR TAB,159,9,SET %}TAB**253,6,BELL,254,8,DELETE,255,8,INSERT INVERSE CONTROL CHARACTERS3"A(!(@<,>/6-%@%}3 <6-&@d*(@<>:,>86-%@< CONTROL CHARACTERS3"!(@[,]/6-%}%@3 <6-%@d*(@[>:,]86-%@< INVERSE NORMAL CHARACTERS3"AS!(@%}<;>/6-%@3 46-&A(&(@|>:,46-%@ A@6-%@)6-%@7%}6-@:7<,,G!+%@,i(@>:AU,7@,w6-%@6-%@e$+"@,%A $+"@,%}B!AY* AS'6-&A(8(@>:,B A+(@|!6-%@+ A@ A0(@%}|((@66-%@@ A&!!PRINT LINE AND GET NEXT ONE03"@!(@[.]/6-%@%}3 :3"A#!(@[;]/6-%@3 D#(@>:, #(@N'6-%@ @`' A%}0X2#-@@&+&@`,.(@2 ba'(@7@,PAGE 2(@=(@K6-%@%}W6-@a A0l ENDvd(@AY$+6-@@H( COPY COMPLETES@^@%}ad TITLE( +((( ͠$( ( ( ENTER FILE NAME;$37@<@,0:%}*7@<@,0:M67@<@,.D:\67@,.b6.s67@,. 67@ ,. 67@,.(%}( DATE(( SOURSEJ(%( CONDENSED PRINT (Y or N))70Y*0N@(J A2 4Y%}6-@#6-A /6-@2$2 4N6-@#6-@e/6-@2$ERROR TRAPPING F:A,"%}A6A O A0@#@/AYO@@K: F:A,"ApA%} F:A,"A8A9 (}-@@9(CANNOT PRINT THIS LISTING F-@@3(PRESS RETU%}RN TO TRY AGAIN@)@CF%IF:A,"Ap(}0-@@I(NO FILE BY THAT NAME F-@@%}3(PRESS RETURN TO TRY AGAIN@)@CF%*U (}-@@>(CHECK PRINTER AND PRESS RETURNK)@%}U @4+(@>!6-&@+ AD:LISTER$HxF[YZ )} &&** ANTIC ** JAN 84 ** PAGE 76 **+u***TYPER'S TOOLBOX**,u*BY STEVEN BOBULSKY*-u* ANTIC MAGAZINE *)}.u* JANUARY, 1984 */u********************0u] B5( }Enter the starting line number.9<(Y(Increment)} between lines]:u;;A ,;A ,'6-;!B&BDue B .(}Enter '1' for regular lines)}J(OR '-1' for DATA lines.NeO:,@B Nu%6-"@% BXuw6-@6-$6-O:)},4( }DATA MODE:7(w(;Enter your items, or none,& hit twice when finished.bud(( Item #(267B:,%)}@,.H67B:,%@,.,V6-%@d6-%@lu 06- BPvuU 467B:,,.%6-&@)}36-&@A6-%@U"@Bu"@BPu4B u 6-%67B:,,.u[6-)}(}(%(DATA((+(4(CONTF-XAB@[&uV B(3(Proposed next lin)}e is %6(<%?(S(=continueV(uy(Any other key = MENU'@G@@K:T)@)}_@y"@:>:AU,,Bu] B(!"6@&(9( item count=W(Items in current block=)}Z(](uh(( Current line'( =D(Proposed next line =%J%M(]( 1=next lineh(2=edituf(3=cha)}nge increment,( 4=shift modesK(5=restart (no lines lost) f(6=Delete a line range.uL((:"@0(Re)}gular lines.3(L( Free RAM=I:,u;"6@( DATA lines"(;( Free RAM=I:,uhI:, A,)}( P(LIST or SAVE your program linese(to tape or disk.huW@.@@K:)};)@W @:1,)!@:6,Bv@"@:2,9(&}:When done, hit over CONT.=@( v5"@:2,(()} '"6@5(DATA v6"@:2,(((!(CONT3-6& v,"@:2,(}6."(, B)}P*vW"@:3,2(}Enter the new line increment.6<(}?(CJ6.M(W BP4vB"@:4,(}((%6)}.16-@86-6B BP>v"@:5, BHv"@:6, BRv7 6.(}6-@$6-%-6-O:)},7 B0\vAB@(}$fvd( } 8(Type in the line or just pressX( to skip to the M)}ENU.[(d( pvR@.@@K:;)@R67B:,%@,.>:,zv"@:>:AU,, B)}Pv >:, B vB4>:AU,/(}No new entry on line 86-O:,B BPv"@:>:AU,, Bpv)}9( ((CONT$-@6AB@9&v. B6-O:,%!($(. B vj%(}ŠŠ)}:CAUTIONj(@ANY line range may be specified, even this program, if you wish.v^ B(,( LOWEST line to delete)}0L(HIGHEST line to deleteP^!Bvd($(Enter the line increment.L(#(If unsure, use '1' for this value)})Pd!B'Bvp(}Lowest line =.(Highest line =@( ARE YOU SURE?C(^(Press 'Y' to continue,pA)}@dvu"(or any other key to abort.-@M@@K:Z)@e@:Y,k(}u B)}PvU(,(!If you want to watch the process,U($press '1'. If you would like speed,vi+(#any other key will blank the)} screenM(during the delete to initiatei('direct memory access.'vi@.@@K:;)@)}A(}L@:1,^AYi@wj-@@6(POKE 842,12:POKE 559,34:CONTH-@@j()}POSITION 2,6:? Q:POSITION 2,4w`-@@9(Q=Q+S:IF Q<=U THEN POSITION 2,1K-@]AB@`)}&w/ (} B%AY@4/ BP D:TOOLBOX.BAS (FmxABXLINSUBYTSECTOER .}BOSTON COMPUTER SOCIETY""AUTOBOOT BINARY MENU PROGRAM$$RUN THIS PROGRAM TO REFORMAT A""DOS 2.0 FORMATTED DISK,.} THEN""COPY YOUR BINARY PROGRAMS TO!!THE DISK. DOS NOT REQUIRED.d..;A(,;@$A(,;@,nMI(.}A}Be sure you have blank formatted disk in drive #1. Press .Mx(....6-A 6..}6-%@##6-#-@@!"67B:,%@,.>:,! 6-% ," & .}, line ),AAP((DATA '#(Enter TO WRITE BOOT.'-@@.}&&6.7$A(&A'<$A(,#Ap@ AP# +Ap@!6-A`+ AP67@.},.>:A,67@,.>:@,"Ap@ AP,+Ap@!6-Aa+ AP6F#6.}7@<@,.>:@,F67@<@,. Noorda Disk@Ap@ APJ(OPERATION COMPLETEDT. }^<6-P:C:,'AV,#As<ArC:,&$AVh'At@'Ai@r66-P:'AV, . }Ay6Ax&AV${|6-?:C:hLS,,!6-F:Aq,"@!$(ERROR FOR SECTOR  (E. }RROR NUMBER IS  0,5,0,7,139,8,169,0,328((133,82,169,125,32,164,246,169,1120 82,141,2,3,169,1,141,1,540. }##3,169,0,141,216,8,141,217,895""8,169,1,141,11,3,169,105,607!!141,10,3,169,47,141,5,3,519$##169,240,141,4,3,32. },83,228,900.!!238,10,3,24,173,4,3,105,5608!!128,141,4,3,173,5,3,105,562B 0,141,5,3,173,10,3,201,536L''113,208,22.}6,160,0,152,72,185,1116V''160,8,32,164,246,104,168,200,1082`&&192,28,208,241,173,0,48,240,1130j$$92,41,128,208,88,23.}8,115,7,917t!!162,3,189,0,48,157,0,32,591~%%202,16,247,24,173,118,7,105,892""4,141,118,7,162,15,189,0,636$$48,1.}57,141,8,202,224,4,208,992''245,238,216,8,169,10,205,216,1307!!8,208,8,169,0,141,216,8,758$$238,217,8,24,173,217,.}8,105,990$$48,141,141,8,173,216,8,105,840##48,141,142,8,160,0,152,72,723''185,140,8,32,164,246,104,168,1047((.}200,192,20,208,241,24,173,101,1159$$7,105,16,141,101,7,141,115,633!!7,141,135,7,8,173,101,7,579&&201,240,240,18,4.}0,173,102,7,1021##105,0,141,102,7,141,116,7,619 $$141,136,7,76,100,7,173,102,742%%7,201,51,208,231,160,0,152,1010.}%%72,185,188,8,32,164,246,104,999(''168,200,192,28,208,241,162,0,11992&&189,219,8,157,104,3,232,208,1120<""247,32.},117,8,141,35,8,32,620F""117,8,141,52,8,169,0,141,636P&&218,8,160,255,240,13,24,173,1091Z$$218,8,105,40,141,218,8,13.}6,874d##76,36,8,160,255,240,13,24,812n##173,218,8,105,4,141,218,8,875x""136,76,53,8,173,218,8,24,696$$233,1,168,.}185,0,32,141,126,886""4,200,185,0,32,141,125,4,691""169,82,141,2,3,169,1,141,7081,3,169,4,141,5,3,169,495 .}0,141,4,3,141,68,2,141,500##200,3,76,104,3,32,226,246,890&&201,58,16,249,201,48,48,245,1066%%141,136,8,32,164,246.},24,169,920##255,233,47,96,32,32,32,32,759!!18,32,32,32,32,32,32,32,242!!32,32,32,32,32,32,32,32,256!!32,32,3.}2,32,32,32,32,32,256((32,32,160,196,201,210,197,195,1223**212,207,210,217,160,205,197,206,1614&&213,160,155,155,1.}55,32,32,32,934""32,32,32,32,32,32,32,160,384"**197,206,212,197,210,160,178,160,1520,))196,201,199,201,212,211,160,.}32,14126!!0,0,0,169,212,141,226,2,750@""169,3,141,227,2,32,199,3,776J$$141,160,3,141,134,3,32,199,813T##3,141,161.},3,201,255,208,4,976^&&201,255,240,223,32,199,3,24,1177h""105,1,141,187,3,8,32,199,676r!!3,40,105,0,141,180,3,32,504.}|''199,3,141,255,255,24,173,160,1210##3,105,1,141,160,3,173,161,747##3,105,0,141,161,3,201,255,869((208,229,17.}3,160,3,201,255,208,1437##222,32,196,3,76,104,3,108,744''226,2,169,255,240,10,206,200,1308 3,173,0,4,238,207,3,9. }6,724!!173,125,4,41,3,141,11,3,501""173,126,4,141,10,3,208,5,670##173,11,3,240,19,32,83,228,789$$173,127,4,41.!},127,141,200,3,816""169,0,141,207,3,76,203,3,802108,224,2,0,0,0,0,0,3340,0,0,0,0,0,0,0,0 D:NOORDA.BAS,}OP04FKK25K25AFILELINEPPHOLDFNSCREEKDRAMTOBYTEHLIIIAPMBASAUAU2#}@ 2$}ǠĠŠAUGUST, 1984!!: IF NEW S2%}CREEN THEN DRAW A : BLANK SCREEN AND PUT THE!!: CURSOR ON THE FIRST LINE.##: IF OLD SCREEN THEN LOAD THE2&}%%: SELECTED SCREEN, GOTO EDITOR,: AND SAVE OVER OLD FILE.  KK** PRESENTED BY A.D. ANDREWS **11 REM *********2'}* J.A.C.S. ***********K6-@6-AU#6-%- @ 9ARK( }INITIALIZING;;;,;@,9@%2(},;@@,;,;@,Z'6-F:@,%$F:@,%@@5-@#>68,-L6-%@@P Z A12)}ΠՠΠY @ +#AY@b5B2w@C0@M BY@[( ('(*2*}** ANALOG CARD FILE ****(96.>:@,H67@@,.W67@,.[(Q+(#AFTER SCREEN IS LOADED, TYPE ON THEQ(!SC2+}REEN AS DESIRED. START=SAVE TO//('DISK. OPTION=START OVER WITHOUT SAVING+$(SELECT=PRINT OUT THE SCREEN.'(+(m2,}('(EW OR LD SCREEN, IRECTORY>(OR URGE A CARD: CW@K:d)@m6.>:,(4OA2-}-4PA24DA <0N@0cנΠŠdH (NEW(((FILE NAME TO SAVE AS2 2.}A@6+HAY@bnqB2w@/0@@@=0@K0@g6-F:A`,%F:A2/}a,$q BxB%@@p+%@@B( ANALOG CARD FILEҠŠX @ &20}@K:2@>ARD-L(XAd+F:Ad,)!(>:,+ A@5F:B2y21},"@$AR+(5 A F:B2y,"@@  F:B2y,"@A0 A@22}ŠŠZ (PURGE(;(!ENTER FILENAME TO DELETE OR PRESSP(RETURN TO ABORTZ A@4@ &23}@3@& @ ԠΠŠ 9 (OLD(%(FILE NAME TO EDIT/ A@9 A 24}ˠ٠_(}DRIVE #)%6.D1:*.*?67@<@,.>:,DK(>:,N(_@Q-@d25}'6.7@,Q7@<@,4 FREE SECTOA EB'@"P:'@,4-@+%,'@8(B 26}A @%!-@+%@,'@%( 4(((PRESS ANY KEY TO CONTINUE...4AdF:Ad,"A P27}Ad @ ŠΠϠˠ@5*F:A 9,'-AA28}1*F:,5 M6-F:A,$06-F:A`,%$F:Aa,86-&C6-P:',M6-&$7AP@!AV29}-AW7 A 0ĠΠ͠ˠ@M )+ AY@b2B2w@2:}F-AAM)A   B)AP@5AVAAW^ARF:A`,-AS2;}F:Aa,I6-?:C:hhhLV,<@,T@^ A0 ԠԠŠΠ 4 A0&@2<}P:4-@# G-@@)67,.7F:8,%&,%,- 4 8 =G A0 ٠ϠŠàϠà 7 -2=}6-6-#!A')6-76-&A(& 1 @d'6-%@2%A($1 A1@0 1 @'6-&@d2>}%A($1 A1@: 6-%A($D 67%,.>:,  Я͠Π .6-F:A,&@&BBy2?}.6-$ 3-B2VB2Y#@' 3B2` ,@,@F:A,&@ C#-%A %A 2@}@3-A$;%? C  Q-AA! 3AY@bEB2w@QA#2A} (-B2HB2U"!% ($ ##48,80,112,144,176,184,192,200ŠŠҠ4$$-2B}B:,7<,4:!6.$$" 6.D:67@,."$/uŠˠ٠0uD6-F:@,!A',6-&2C}A(8@DB7t:u$ D:CARDFILEDRAMTOBYTEHLIIIAPMBASAUAU07IS5%D:MENU6@C +AR@1@@C@@9JT^$$6-+F:A,&@3Bt}  CABVxxx@@2@@@@##*****************************##*** 6F}FROM K-POWER MAGAZINE ***##*** APRIL 1984 PAGE 46 ***##***************************** (;A ,;A 6G},((>:A%,6-@gg6.]THIS IS A SHORT DEMO OF HOW EASY THIS SUBROUTINE IS TO USE. LIST THE PROGRAM AND LO6H}OK AT ...( A0236-@)6.LINES 10-170 TO SEE3 A P66-@,6.HOW TO PRINT LINES. OR6 A 6I}n26-@(6.LINES 1000-2100 TO2 A 16-@'6.SEE THE ROUTINES.1 A ##*** LINE BRE6J}AK SUBROUTINE ***,B:,@86.6.) A ,$8#6-@8#-@@9L7<,4 6-&@6K}`) 6.7@<,)6.7%@,~ A 6-%@ A0*** OUTPUT SUBROUTINE *** 6-B:,6L}='@P:'@,/67@%,. =6-%@-@'@/-@ &/(7@<,7&%6M}@,* 4$ D:OUTPUT.BAS@@2@@@@##*****************************##*** 4*RS , FIPIISSULINECOUNICRSRANGLINCOUNCHECKSUNUMBEPRODUCITETOTADATU:O}@ @ :P}d88 DEBUGGING AID BY ISTVAN MOHOSi""VERSION 2 MODS BY TOM HUDSONn[ +:Q}([(FThis run will LIST data statements with the name: , to the disk.xi(f([The DATA is created by evaluatin:R}g each character of a user program, LISTed to disk.i(};@,&@"(ENTER FILENAME&*6-F:A:S}Y,6-*,((ENTER ISSUE NUMBER( A@,* A0*@@A:T}0A0f (},(DISABLING SCREEN...STAND BY...@-@AD PAYfdebug before poking 6-:U};A&,( A@(6-%@ AK@6-P:'@,69,9,;@,K+":V})4,A`II@:7@<@,, @H)@:7@<@,,!@WA`6-@ AP4 6-6:W}-#-@@067<,. 4  6-*@6-@*6-%@87<,0  67<,.7<,.:X}6-%@8 A` 6-A:, 68,-6-%@" A @,%6-%@%"@A@6:Y} A@$@6-@$ APJ-@6-TF)@6-$ 6-%.6-%@:"@:Z}F6-@Y"AUA`^ A@h?6-&A$P:'A,'68,-3!@ ?6-@m r@:[}@1@@D:BUG:6-8,@6-|'6-@6-! @'6- @ DATA :\}B-@$6-8@$%,6 @,>6-%B  @36-%@6-&@3 @:]}AP 6-8, A@AYUU(M}To check data against printed data statements, t:^}ype NEW. Then type:\\(ENTER >:@4,@D:BUG Type LIST after the READY prompt.U(U(JThe:_} line number of each data statementcoincides with the first line of the88(0user program which the data statement evaluate:`}s.aa(YNumbers within each data statement represent consecutive lines of the user program.%%(The last number is:a} the total.R(R(GCheck the number of each state- ment against the printed version;PP(Honly in case of a discre:b}pancy check each number in the data statement.]](7Make note of the lines containing the bugs. Then ENTER >:@4,:c}D:yourprog&# (to make the corrections.#0PAY(}P(5Your typed-in program was not properlyLISTed to:d} disk.:e(_(*Please LIST your program to disk, thenRUN >:@4,D:CHECK>:@4, again.beD:CHECK28|LMIROUTINRATCCOLOCURSOAA@B%@%AUB%Hd"PMCURSOR.BAS"fBY JERRY W>f}HITEh33ANTIC MAGAZINE NOVEMBER '84 PAGE 68n A x#-A"#%2-@&>g}@(% 2AR8-@@8(POKE 752,1 TURNS OUR CURSOR ON+(+( POKE 752,0 T>h}URNS ATARI CURSOR ON8(*(ENTER CURSOR FLASH RATE (1-64)4 A8!! @)!@dA%@U>i}>(&(ENTER CURSOR COLOR (O,255)0 A 4> B!! )!AUA %@t.(.(#W>j}ARNING: THIS ROUTINE USES PAGE SIX((AS P/M (PLAYER 2). 6-?:,",5AR@("(BASIC*(>k}IS5%D:MENU6@C +AR@1@@C@@9JT^$$6-+F:A,&@3>l},$AVh'('(PLAYER CURSOR BY JERRY WHITEr.(.(!MACHINE LANGUAGE ROUTINE ADDRESS=|((%(STORING DATA AT LO>m}CATION ($##104,165,212,24,105,36,133,212!!165,213,105,0,133,213,162,7!!160,144,177,212,157,0,6,136>n}$$202,16,247,164,212,166,213,1697,76,92,228,173,240,2,240124,173,43,2,240,4,169,0240,6,173,8,6,24,105,8>o} 141,8,6,48,104,160,255,1690,153,0,6,136,192,8,208!!248,169,10,141,194,2,141,20 208,169,1,141,111,2,141,27>p} 208,169,0,141,10,208,169,0 141,7,212,169,2,141,29,208169,58,141,47,2,141,0,212&!!166,85,164,84,165,87,13,>q}14702,240,12,173,191,2,201,4:""208,35,152,24,105,20,168,138D 10,10,105,48,141,2,208,152N10,10,10,105,39,168,>r}162,7X189,0,6,153,0,6,136,202b 16,246,76,98,228,169,0,141l2,208,76,98,228v0,0,0,0,0,0,0,240DATA IN L>s}INE 630 IS THEPLAYER CURSOR SHAPE.D:PMCURSOR.BAS141l2,208,76,98,228v0,0,0,0,0,0,0,240DATA IN L<?,$AVh'('(PLAYER CURSOR BY JERRY WHITEr.(.(!MACHINE LANGUAGE ROUTINE ADDRESS=|((%(STORING DATA AT LOBu}CATION ($##104,165,212,24,105,36,133,212!!165,213,105,0,133,213,162,7!!160,144,177,212,157,0,6,136Bv}$$202,16,247,164,212,166,213,1697,76,92,228,173,240,2,240124,173,43,2,240,4,169,0240,6,173,8,6,24,105,8Bw} 141,8,6,48,104,160,255,1690,153,0,6,136,192,8,208!!248,169,10,141,194,2,141,20 208,169,1,141,111,2,141,27Bx} 208,169,0,141,10,208,169,0 141,7,212,169,2,141,29,208169,58,141,47,2,141,0,212&!!166,85,164,84,165,87,13,By}14702,240,12,173,191,2,201,4:""208,35,152,24,105,20,168,138D 10,10,105,48,141,2,208,152N10,10,10,105,39,168,Bz}162,7X189,0,6,153,0,6,136,202b 16,246,76,98,228,169,0,141l2,208,76,98,228v%%240,240,240,240,240,240,240,240B{}DATA IN LINE 630 IS THEPLAYER CURSOR SHAPE.D:PMCURSOR.ALL,76,98,228v%%240,240,240,240,240,240,240,240@MSCRIPTOR REQUIRES TRANSLATOR FOR XL/XE MODELS...D800 H,ɛh`2L1NEED D1 THRU D8uT1,16,247,164,212,166,213,1697,76,92,228,173,240,2,240124,173,43,2,240,4,169,0240,6,173,8,6,24,105,8 141B~},8,6,48,104,160,255,1690,153,0,6,136,192,8,208!!248,169,10,141,194,2,141,20 208,169,1,141,111,2,141,27 20B}8,169,0,141,10,208,169,0 141,7,212,169,2,141,29,208169,58,141,47,2,141,0,212&!!166,85,164,84,165,87,13,1470B}2,240,12,173,191,2,201,4:""208,35,152,24,105,20,168,138D 10,10,105,48,141,2,208,152N10,10,10,105,39,168,162,7XB}189,0,6,153,0,6,136,202b 16,246,76,98,228,169,0,141l2,208,76,98,228v%%240,240,240,240,240,240,240,240DATB}A IN LINE 630 IS THEPLAYER CURSOR SHAPE.D:PMCURSOR.ALLB%Hd"PMCURSOR.BAS"fBY JERRY W@E 1ATO@dBINARY FILE MENU/LOADERnBASIC PROGRAM TO CREATExF}AN AUTORUN.SYS FILELOADING AT $1DFCBY RICHARD J. KALAGHER..@@ D:AUTORUN.SYSF}9@, Ap-AA@+  READING LINE +-@@"68,-6-%F} "Ap+-@@'*@8,+   ERROR IN LINE --255,255,124,F}29,255,29,32,224,30,32,1265))37,31,32,224,29,32,193,30.48,6,1927**32,85,31,76,133,29,32,187,31,32,2595,,182,30,32F},177,30,32,148,32,32,246,3536**31,32,115,32,32,177,30,32,61,32,4110))32,21,30,32,78,30,32,213,29,32,4639$++147,30,F}32,125,30,32,78,30,32,136,5311.((30,32,98,30,32,165,30,48,9,32,58178,,203,29,76,171,29,108,226,2,32,182,6875B,,30,10F}8,224,2,96,169,212,141,226,2,8085L++169,29,141,227,2,96,162,32,169,3,9115V++157,66,3,169,6,157,74,3,169,250,10169`**F}157,68,3,169,29,157,69,3,32,86,10942j**228,96,68,49,58,42,46,42,18,30,11619t++158,32,155,0,0,162,32,169,3,157,12487~*F}*66,3,169,0,157,68,3,169,30,157,13309))69,3,169,4,157,74,3,32,86,228,14134,,96,162,32,169,7,157,66,3,165,192,15183F}--157,68,3,165,193,157,69,3,165,198,16361++157,72,3,165,199,157,73,3,32,86,1730800228,96,169,19,133,192,169,30,133,F}193,18670--169,2,133,198,169,0,133,199,32,47,197520030,96,165,196,56,229,194,133,198,165,2121400197,229,195,133,1F}99,24,165,198,105,1,2266000133,198,165,199,105,0,133,199,96,173,24061..19,30,133,194,173,20,30,133,195,96,25084//F}173,19,30,133,196,173,20,30,133,197,26188,,96,174,19,30,232,240,1,96,174,20,27270++30,232,240,1,96,32,78,30,96,165,28F}270 00194,133,192,165,195,133,193,32,47,30,29584--96,162,48,76,184,30,162,32,169,12,30555,,157,66,3,32,86,228,96,1F}62,32,169,31586())5,157,66,3,169,0,157,68,3,169,323832++30,157,69,3,169,18,157,72,3,169,33230<**0,157,73,3,32,86,228F},96,162,48,34115F))169,3,157,66,3,169,4,157,68,3,34914P**169,31,157,69,3,169,8,157,74,3,35754Z**169,0,157,75,3,32,86F},228,169,1,36674d,,141,240,2,96,69,58,162,48,169,11,37670n--157,66,3,165,194,157,68,3,165,195,38843x--157,69,3,165,1F}98,157,72,3,165,199,40031++157,73,3,32,86,228,96,169,1,133,41009//84,169,10,133,85,169,67,133,194,169,42222//31,1F}33,195,169,16,133,198,169,0,133,43399,,199,32,6,31,230,84,96,66,105,110,44358--97,114,121,32,76,111,97,100,32,77,4521F}5--101,110,117,65,0,32,153,31,32,177,46033//31,169,0,133,194,169,30,133,195,169,47256//10,133,198,169,0,133,199,2F}30,84,160,48572,,6,173,83,31,201,78,144,12,160,24,49484,,165,84,201,16,208,4,169,3,133,84,50551,,132,85,173,83,31F},141,0,30,169,45,51440))141,1,30,32,18,32,32,6,31,238,52001,,83,31,96,173,10,30,201,83,208,16,52932,,173,11,30,20F}1,89,208,9,173,12,30,53868,,201,83,208,2,104,104,96,173,1,30,54870..201,32,240,2,104,104,96,169,20,133,55971"//84,F}169,4,133,85,169,215,133,194,169,57326,//31,133,195,169,31,133,198,169,0,133,585186--199,32,6,31,96,80,114,101,115,115,F}59407@0032,116,104,101,32,76,101,116,116,101,60302J//114,32,111,102,32,89,111,117,114,32,61156T..67,104,111,105,99,1F}01,162,48,169,3,62125^++157,66,3,169,16,157,68,3,169,32,62965h))157,69,3,169,4,157,74,3,32,86,63719r,,228,96,75,58,1F}60,0,174,84,31,177,64802|00194,9,128,157,159,32,232,200,200,177,6629000194,157,159,32,201,32,240,11,232,200,6774800F}192,10,144,241,169,32,157,159,32,142,69026**84,31,238,84,31,96,0,162,0,189,69941//159,32,232,205,60,32,208,247,169,6F}8,71353**141,0,30,169,58,141,1,30,160,0,72083..189,159,32,153,2,30,232,200,201,32,73313//208,244,136,169,46,153,2F},30,200,169,74670++42,153,2,30,200,169,32,153,2,30,75483**96,162,48,169,7,157,66,3,169,0,76360++157,72,3,157,73,3F},32,86,228,201,77372..65,144,234,205,83,31,176,229,9,128,78676..141,60,32,96,169,212,141,224,2,169,79922++29,141,F}225,2,96,226,2,227,2,124,80996 29,0,0,0,0,0,0,0,0,0,81025 D:BILOADERENU/LOADERnBASIC PROGRAM TO CREATExDQ$%m FLINCDONDATCHARCKSUCLINCKSU44Ac@A AVAAcdJ}2 +-@@2(XL-DOS CREATORn((((NOW CHECKING YOUR DATA LINES:x;A,6-6-J}-@@" 6-%("AV'6-@( A67B:,%@,.>:, )")J}6-F:A,%AV$F:A, 6-%A(LINE # IS OK!(A0))(!DATA ALL OK - CJ}REATING PATCH FILE2 A2@@D:PATCH: B!-@A6*@@:7<,,: J}(@%(PATCH FILE CREATED(!(ERROR IN DATA LINE #!"G#(ERROR IN OPENING PATCH FILED(DISK MAY BEJ} WRITE PROTECTED.G''255,255,122,21,124,21,76,192,2066##23,70,23,137,23,32,85,24,1427''169,0,133,212,133,214,169J},29,2079))133,215,169,192,133,213,162,16,2263((32,119,24,169,216,133,213,162,2108""7,32,119,24,32,70,24,96,1454$J}((169,0,133,212,169,224,133,213,2313.$$160,0,162,3,177,212,72,32,18888%%85,24,104,145,212,32,70,24,1776B))200,208,J}241,230,213,202,16,236,2636L%%96,182,23,251,23,240,73,32,2020V$$70,23,206,158,23,48,65,32,1735`''170,25,32,105,23,16J}9,255,141,2040j''158,21,141,157,21,162,16,169,1975t$$47,157,68,3,169,24,157,69,1834~##3,32,164,21,32,85,24,162,1673J}''21,169,0,133,212,133,214,169,2211((31,133,215,169,228,133,213,32,2324$$119,24,32,70,24,169,0,141,1759##157,2J}1,96,19,24,39,24,32,1602&&85,24,169,0,133,214,133,212,2170))169,228,133,215,169,31,133,213,2501%%162,21,208,18,58J},24,135,24,1870%%32,119,24,32,70,24,206,157,1894$$21,76,117,32,32,102,24,88,1732((169,112,141,14,212,165,16,141,2J}220%%14,210,96,120,169,0,141,14,2024&&212,141,14,210,173,1,211,41,2273$$254,76,107,24,173,1,211,9,2135 %%1,141J},1,211,96,234,234,234,2442%%234,32,180,25,96,160,0,177,2204**214,145,212,200,208,249,230,213,2981(''230,215,202,20J}8,242,96,63,25,26012##97,25,32,85,24,169,0,133,1895<))212,133,214,169,29,133,213,169,2612F''192,133,215,162,16,32,11J}9,24,2243P''169,216,133,215,162,7,32,119,2413Z""24,32,70,24,96,50,31,52,1749d31,88,76,32,256,1863D:XLDOSH|12 MLDUMMYWORKHNEHOLTESTPMPAGPMBASDRIVN} d,+"A @, AnV6-?:C:,&6-P:A6'+'@2,,&Aq2 @>6-@!N}@56-@586-@%6-$@%@R+ 86-6@=AA+ @)!@=AN}@pJ -B2H-B2I%@1 76-C-@J(w"-&@6@.-N}@<(>:@,@ ^-%@@5@j-@s( w  A* INITIALIZATIONi1;@rN},;@,;A(,;@2,]6-P:+F:AE,%@,'@,$@iBByoAY@F'B2wN}@56-$AVI-@@rM"Y67,.>:,] oA;-%Ap%At"%) ;N}B2H@$;-%A%A"%) ;B2I@2u-@@"'67,.>:,+ =ARN}@O-@@u(!̠=-@@=(#N};-@@;(!275 280 285 290 295 300 305s Ap-@@K:?-@@\N}(Which drive (1-4)? i)@s B:@6-&@H: @)!@Ap"uAi!N}Ap@3ArEAsAUWAx@iAyu6-@$,W6-?:C:,,$F:AqN},@6-@@M(W Ap6i-@@-( Testing Drive # ?-@@N}_(Press START to change drivei A@* M/L ROUTINEJ]]104,104,141,5,3,104,141,4,3,104,133,204,104,133,203,216,16N}9,0,133,212,133,213,32,83,228T__169,31,133,205,169,0,133,20,32,83,228,165,20,164,205,145,203,136,48,10,132,205,173,31,208N}^TT201,6,208,231,96,160,31,24,177,203,101,212,133,212,144,2,230,213,136,16,242,96h * SHELLr12,30,63,127,255| *N} HEAD160,64,64,64,192,192,192* TEST ROUTINE104,76,83,228D:SNAILLZWIOUTPUNULDIRICOUNSPACWIDTHEADCNLINEPAGANR} B6((*/(W@R}@@@@@@ @!"@#@$@A%@&'R}Ak +@/6-F:A`,%F:Aa,$AVC%@ @W%@@k%@@Q!B'f6R}-B'fZ*_*****************d* VARIABLE INIT *i*****************n*sD;@,;@@,*;R}@,7;@@,D;@,x>6.D:*.*>6.( }o6-@6-@'R}6-@36-@?6-@K6-W6-@c6-@o6-@******************** GET R}^pAFBICCOICBAICBAICBLICBLCIBBLBLBBABAAUXSTARDEVTABDIRECTORYFILENAMEANSDISPRNTEDIRTACOLP}