@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( 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ꭝL 3u } 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- 128ɛ+,' 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_`(%(AHINNHIMSRNCTJIPSCSECCRIFGHRAACCEPTACCEPACCEPTAGREWAIF1INBv`T}F=@@@ @@% @ @ @ Au @EU}@@FAQ@@E @ @V}!"#A$%EŠΠ̠͠ŠĠ٠Үԛu +@W}'0@@@A0@@@[0@@@u0@@-@@X}0(@ >> ATARI <<B-@@](@ > f i l e <oAR@r(u(( Version 3.1%-Y}@A %+ ';A`,'6-I:,$? MAIN PROGRAM AND MENU;$?,;$?Z},90@@@S0@@@m0@@@@@;@ ,;@ ,[}d##@@K:iAR@nY A(}5( ** DATABASE FILE SYSTEM **8(;(Y((I) IN\}ITIALIZE A NEW FILEp%%((F) PRINT OUT DISK FILE NAMESx+((L) LOAD EXISTING FILE!(+(--> )@AR]}1>:,4L( Ġ' A1 A8>:,4I$(Ԯנ. A8 A6>:^},4F"(ԠŠ, A6 A(>:AS, A A6-+%@,$90@@ @_}S0@@ @m0@@ @|( }COMMANDS:((AdAUAR@(`} (D) DUMP FILE((P) PRINT FILE( (A) ADD DATA((C) CHANGE A RECORD((R) REMOVE A RECORD( (S) SORa}T FILE((L) LIST FILE NAMES((E) ENTER NEW FILE"((Q) QUIT#(( ((( WHAT DO YOU WANT ? ,)@b}@7>:,4D(DUMP! A -6-@7 AJ,>:,4P(PRINT" A0, AT7>:,4A(Ac}DD ! A@-6-7 A^F>:,4C6-@&(CHANGE 0 A<6-F AhE>:,4R6-d}@%(REMOVE/ A;6-E Ar8>:,4S(SORT " Ap.6-8 A|">:,4L Ae}" A>:,4Q)>:,4EA(>:AS, A"@A@ 6-W(% CURRENT FILf}E IS NOT SAVED.C CONTINUE COMMAND? (Y/N) P)@W >:,>:,4NA>:,0YA>:,4Eg}%& +X +b&&@@D:*.*g APl@n,,7B:,&@ to abort.>( (DATABASE default)U(ENTER FILE NAME? _ Aj}< 6.B:,!@2(} 8 CHARACTERS ONLY.< A 46.DATABASE"@'A! A!k}67@ ,..DATOAd@6.D:267B:,%@,.O@@@@l}@4@4;$%%@,;$%%@,V6-@t6-@y@zBm}:,"A~ 67,.6-%AP AE6-@@ 67,.*B:,"n}AP 6-%AP* AU@6-@$T(0(>:AS,FILE NOT FOUND =)@@o}(J APT AINITIALIZE SUBR."((HOW MANY HEADINGS " @A*&(ENTER MAXIMUM HEAp}DING LENGTH * @A26-&@6-6@6-A 6.6."-,%!(q} HEADING #%@ :%-; B:,!1(MAXIMUM LENGTH IS  . REENTER; A/, B:, "67B:,%@,. r}, A167B:,%@,.6 @6-$SAVE SUBR.mAR6(Press to abort.s}L(( DEFAULT)c(ENTER FILE NAME? m A"@'A 06.*! A"!67@ ,.t}.DAT4OAd@6.D:267B:,%@,.O@@H(@I(@J(@u}K(@R6-@W3B:, %AI)(@7:,4P6-@$ A0P >:,0SA0z} d6-@(=(&AFTER EACH RECORD WILL RETURN TOd("THE MENU, ANY OTHER KEY CONTINUES. ((PRINT: {}( (A) ALL RECORDS ( (S) SELECTIVE PRINTING )@ ">:,4S A" A0 >:,0AA0V |}4(6-6-@*6. 4 A @ $& (+ (RECORD %@(0 -: 77}}(7$%@<$%,7$%@%$<$%$%,D  N )@S "@'$X  b A  " (~}}(RECORD %@"( - <<(7$%@<$%, 7$%@%$<$%$%,   ()@}"@'(6-@ $H 6-+%@,$R \ -f 3 k 3RECORD %@3 p -}z 7737$%@<$%,7$%@%$<$%$%,     $33RECORD %@3}-$7737$%@<$%,7$%@%$<$%$%,. 8$6-6-%@!}A@&"(ENTER MAXIMUM ITEM LENGTH&% @6-% A@'';$%%@,;$%%@,7}(#(RECORD NUMBER %@&()(7-%!(7$%@<$%, : %B B:,!8(TOO LONG,MAXIMUM SIZE} IS  . REENTERB A@ , B:, "67B:,%@,. , A@%67B:,%@,. $O(.(#}(C}) CHANGE ITEM, (K) KEEP ITEM, ORO((R) KEEP REMAINDER OF RECORD((RECORD %@)6-@6-)-}I(I(7$%@<$%, :7$%@%$<$%$%, ?"@( AP?)@}?>:,0C*>:,0K*>:,0R*@'AP`"@'' AP (>:,>:,4KAP$>:,4R6-}@$ AP%!(7$%@<$%, : %C B:,!9(TOO LONG. MAXIMUM SIZE IS  . REENTERC AP, }B:, "67B:,%@,. , AP$$67$%@%$<$%$%,.6- 6-"}6-$op (}((RECORD %@(-==(7$%@<$%, : 7$%@}%$<$%$%, %%(DELETE THIS RECORD? (Y OR N),)@,>:,0Y*>:,0NA`p (>:,>:,4}NAa`67B:,%@,. ))67$%@,.7$%@%$%,6-&@6-6.7@:,,6-&@ )!$8(+( (A) ASCENDING, OR} (D) DESCENDING8)@$>:,4A6-@$ Aq$>:,4D6-@$ Aq Ap`P (}-}@@ ((Ġ:AR@P-&@ 6--%@1-@@( }1B2yAq0Aq@E?7$%@%$<$%$%,27$%@%$<$%$%,E6- AqE}E?7$%@%$<$%$%,37$%@%$<$%$%,E6- "Aqa6.7$%@<$%,H6}7$%@<$%,.7$%@<$%,a67$%@<$%,.   6-$? SEARCH@"6@ A}$J (}(Ƞ!(;0@@@U0@o0@AR}T(0) RECORD NUMBER^;-7(%@) 7$%@<$%,; hL( ( (((SEARCH WHICH HE}ADING: ,L )!%@A@r6-&@| A !6-6-!6- 6@}AP "@6-A:, "@6-A:,6-& "@6-A:,: -D "6@A0N }AAAX //7$%@%$<$%$%B:,,/A0] Ab //7$%@%$<$%$%B:,,4}A0g 7B:,AR@A$#'"A&6-&@' A%#6-%@#67,.>:,# (>:,# A}%INITILIZE SEARCH&%-@@(0%I"6@%(SEARCH RECORD# )I @)!%@A:%&}6@"( SEARCH VALUE&?%AR@D%((PRINT OUT ITEMS:F%'('( 1) LESS THAN OR EQUAL TO...H%}( 2) EQUAL TO...J%''( 3) GREATER THAN OR EQUAL TO...L%4"6@(*( ...RECORD#  ?4 A`N%.(.(...} IN HEADING #%@?X%)@6-A:>:,,b%!! @)!@A`l%!"6@!6.=:&@,}v%$j' Bp':(FORMAT NOT FOUND%)@0@: A( B`(4( DISK ERROR)@*}@4 B D:DATABASE#./OACADEBCDEF }  } !"#( B) %- }g +@2(@ =(@\(@ FORMATTEDg(@2{"(@ }DRIVE #1.@K(@ W@u(@ esc {7$ F:," +@ }$ @A< 6-F:, @(@UF: +@@4(@ working:P@6-?:<<<<,,6-F }:,%AV$F:%,@ A!AZ*@*(@ WORKINGK -% 6-?:<%<<<,,@ }G(@ K %6-?:<<<<,%6-?:<<<<,4 % D:DOS.SYS4$%D:G }@ ,(@ aan ??3)G"@@A %+J+000+-@ };( >(JARV 6-6-%-A6Ab=6-F:,%F:%,$AVI!A L'V A@ }G -( SECTOR# #6-%7%"$* Ax=6-G6-%$+%"@7* A !6-+6-$% - }A E-@#*(̠ɠ٠Π8-A< E6-F:,`+@C,*+@5,)-@# }D( SHALL I TRY AGAIN ??R-AV ` A@$"@5+.  @A Z+A }@P5( ;Z(() Write DOS to disk(s). M( (,(() Change directory sectors./(2(M( }() Use boot sectors. B( ("(() Skip to format.%(((B(() Do both and . )( (#( Selection:>>> }) F:,"A0 K )$+!@S,)+ @I,5( C-AG K  ' (>:,6-&@H }' %$A  ((A10! E (}E(1CANNOT write DOS if BOOT sectors are being used.& 6(0($Press }'Y' to cancel BOOT sector use.6+ F:,"A10 % )(>:,%"@A105 L('( Write DOS CA }NCELED./-9-$= D(H L : L 6-6-+67@<@,.>:$,.(L(Adjusting to write DOS.? A }6-@:7<,,!A%6-&367<,.>:,A67<,.>:,D ( --$  ($ (  ((A20 : }(}:(&MUST write altered DOS to diskette(s). 6(0($Press 'Y' to cancel BOOT sector use.6 F:,"A2 } % )(>:,%"@A20 L('( Directory alter CANCELED./-9-$= D(H L  h 6- }6-+67@<@,.>:$,.(L(Adjusting to write DOS.h67@<@,.>:$, R67<,.>:A,+67< },.>:A,9-AC-$G N(R  `(} ٠+@46-F:,`( Directory leng }th is  sector(s). !(( NEW LENGTH=! F:,"A2P G )+!,)+ @I,1( OUT OF BOUNDS }9-= G A2@ 6 (>:,6-&@H*6-A2p6 A2`% )67<,.>:,%67<,.>:@c,)  )67 }<,.>:,%67<,.>:@1,)  )67<,.>:,%67<,.>:@,)  )67<,.>:,%67<,.>:@,)  )67< },.>:,%67<,.>:@,)  )67<,.>:,%67<,.>:@,)  )67<,.>:,%67<,.>:A,)  %67<,. }>:A',%67<,.>:, ? 6-%&6-@:7<,,#6-%167<,.>:,?67<,.>:, Z(4( Directory changed to F:, } sector(s).7(T( Press 'Y' if correct.Z F:,"A2  )@A2@ ! (>:,-A } !  ((A30 J (}J(6 CANNOT use BOOT sectors if DOS is being written. 2(,( Press 'Y' } to cancel DOS write.2 F:,"A3 % )(>:,%"@A30 O(*( Use BOOT sectors CANCELED }.2-<-$@ G(K O  Y 6-6-/67@<@,.>:A',2(Y(! Adjusting to use BOOT sector }s. 56-@:7<,,6-%'67<,.>:,567<,.>:, ( --$  ($ ( H $ a 6-67<,.>:A },167<,.>:A,Q67@<@,.>:A',W6-a A2@'<;A`,;A(,;@,;A, };A(,H6-@T6-Ad`6-A6l6-@3x6-AU6-A0'c6-@6-A`#6-%+6-% }36-%;6-%G6-B2yO%W6-&c6-@' +@@7(@ DISK FORMATB(@\( }@ g(@(@ verify6-'ic67@,.Phh h  hhhhhh8 }˥`Ω1iˍi6-$'XX67@,.Ei̍  @! W)  Y }&''67AP,.>:AU,'6-A9('67AQ,. ԩ`)'A@ (@8(@ by: }A6-C:,.'`-AA867&A<&A,.>:F:,,< W67@<@,.`6-C:,8'nn6.d }='8/67A,. }86-C:,B'1-A(% )6-@V16-%G'? 6.67A(,.%67,..6-C:, }<K:?$D2:FORMATIX.BAS (| AXLPB0NZ } +{6-P:H:,$@,10@@E0@@W@@i}@@7{AR@,,($}ĠΠӠS+(#S(}#ˠӠ++(# @ -@A $ }<<;@ ,;@@,;A,;@,;@@, "D1:MENU" &&@@D:*.* 6,6." } 6 @0<6-%@(6.7@<@,<67B:,%@,.Y 6.=:, @@}67@<@,.7@<@,Y67@<@,.0$:6-@& AP:"@@0}(;6-@:7@<@,,;!@G* @X@- @ 2(| () <:6-@}& AP:"@@`F;6-@:7@<@,,;!@G* @X@K @ P( ()|U} @0W'!-@6+'@,%@' |Z++(#| |[ ( |  |}\++(#xARI-@@"1( SELECTION; A0?}I BP:,A0"%LB6.7+&@,$@%@<+&@,$@%@,L B}=7@ <@ ,4 36.7@<@,= AE] -@@6@@67<,.7&@<&@,}D ]67@ <@ ,..!7@<@,4DOS!.2 6.D:-@B:,27<,4 AH67B:,%}@,.7<, ?AR@'-@@"?  LOADING  A% BK-@}@"-  CANNOT RUN 7 @A BK A0^{l7@<@,4MENU)7@<@,4DOC)7@ }<@,4N SYS)7@<@,4OBJx6-@{$cwh7@<@,4ASM)7@<@,4SYS)7@}<@,4PRT)7@<@,4IDt6-@w$h$D:MENUK%&Y i XMDESCFNSANSWETITLETA } $ 6$/+@%@/0ASAp(@} 0(@ MENU MAKER?(@ Y(@ FORh(@ (@ BINARY LOAD FILES}-@A  %%̮ͮՠҠ 8/12/82 (}Zm<;AW,;@,;@,;@6,;@6},M67@,. ^67AW,. m67@,.duu67@<@,.Z@B @`DAET @ A }@ BuDAEH AT]DBE euu67@<A,.Z@>AA@ A쨩0:ۢ}Ў / eipԩiBՠ ԙfuu67A<Ap,.Z: D ) @L`@ B0H V`Hp B Vp}BBDAE JhK Vp`guu67Aq<A`,.ZH9 e ԍ ԍЭ h8`hhh` iS: SK } iY +((8( INPUT A FOUR CHARACTER DISK ID#<E6-B:,Y@Aj67A}<A,.k5-@@6$67<,. 167<,. 5 ne +(%( SELECT((+(>( 1. ADVENTURE}SP( 2. UTILITIESe( 3. ARCADE GAMESoE( 4. WORD PROCESSORSE(% 5. I would rather make my own title.x/ A }/ @)!@A }//A0A@APA`ApI?67Aa<A,.$ ADVENTURES }MENU FOR DISK # I AI?67Aa<A,.$ UTILITIES MENU FOR DISK # I AI?67Aa<A,.}$ ARCADE GAMES MENU FOR DISK # I AI?67Aa<A,.$ WORD PROCESSORS MENU FOR DISK # I AP }+-@ @)(TITLE;-@@P(1234567890123456. Aq6-B:,.!@Aq:} 6-B:,$6-+@ &,'@-6-P:,:67<%,.S-@&@&67<,. * S67@ <@6,. MENU} FOR DISK # $67Aa<A,.$ A--67A<A),. SELECT NUMBER ? ""67AQ<AW,.}@c#67A1<A1,.>:AU,C67Ay<Ay,.>:AU,c67A0<A0,.>:AU,7-AA}@!367<,.>:AU,7  +AR@1-@@=(PROGRAMO-@@`( DESCRIPTIO}Nr-@&@( FILE NAME:-@@:( 12345678901234567 1234567890127-@@ +-@}%@3(.7 D-@@(0..-@@ D(Enter '*' to end."AR,?-@}@ +-@@%/?4*A6_6-@!$%A'67<,.=:,D67%@<%@,.._67%}@<%@,.N-@%@%N67A1%$@<A1%$@%@,. )-@@})4*A467A<A,.0.467A<A,.&0-@%@067A1<AB,.X-}-@@"-(ՠb9@9@@ D:AUTORUN.SYSl(@v@} (}&(HIT RETURN TO RUN AGAIN#&%D:MYMENUBST\APPCRECVOLDSNDESTYPSCRDATSECXINSVPLSNISSSEOSEBYSRC  *>>h}l x      @@IAb}@@@@@@@A`@ DDOPEN#3,8},0,"D:PROGLIB.DB":CLOSE#3:XIO 35,#3,0,0,"D:PROGLIB.DB" A;@2,;@,A6. ̠͠ }MARCUSE--COMPUTE#17;#@@K:5@;(2]];@b,;@,;@,;@"},;@,;@,;@,;@,<U1;A,;@ ,;@ ,;@,B6. D:DISK.CATU6. D:PROG}LIB.DBdP +@@d1B7t@d4(9(P( CATALOG OPTIONSn//(' 1 AUTO CATALOG 5 UPDAT}E RECORDx--(% 2 LIST DIRECTORY 6 SORT LIBRARY,,($ 3 ADD DISK (NON DOS) 7 RUN PROGRAM,,($ 4 INQUIRY/LIST } 8 END SESSIONK Ai A`#6-A:>:,,- BK @)!@A`%6-%@%!@A}("@A.$( ԠˠϠŠ. AiA A@*@@4 B}A@@'B:, @)7@<@,06( ERROR- @ AP06-@&6.7@<@,0 A};@6-A'@;ApA:(Ҡˠ (DNNN) =>#:B:,"AE6}-A` A6@@E(@"3@3@5@,H6-A } A<@@D:*.*H6-6$ A@$ B@B:, @AJ },"@("6-%@, AT(-@@$7<,0 ( ^f+67@<@,.7@<@, }D67@ <@ ,. f67&@,.7@<@,h57&@,0 567&@<&@,..r>>4DOS }.SYS)4DUP.SYS)4MEM.SAV)4DISK.CATA|F+67%@<%@,. F67%@<%@,.G/6 }7%@<%@,.7@<@,=6-%@G A@6-'@@(@( FILES FOUND= , } FREE SPACE= 7@<@,: @!( DISK IS # :( Ԡĺ®! Ai!"A}OOAAAA A0A@APAUA  + AbP A' }A-@A $** RE-CATALOG[6-@ Ab6.+6-@76-@C6-@O}6-[6-! Ap!"@ AD-@D7$@&@<$@&@,4A}; 67@b,.D1(  DELETED ON ; ALb767@Y<@a,.7$@&@<$@,T67$@}<$@,.*b6-%@V)@(@) A  AbP"A** AUTO CATALOG6}-@  Ab@-@@"@*7$@<$@,4*A@[.6.7$@&@<$@&@},Q6.7$@&@<$@,[ Ah  A P** MANUAL ADD-6-@  Ab# Ah- A} P 5(}  - INQY/LIST(6-@2 Ae5( <( OUTPUT: 1. INQUIRY,( 2. BROWSE<( 3. LISTING K }Ai A0@#6-A:>:,,- BK @)!@A0@ E6-6-@% Ab16-E @}A1 Z6-A0 A 9@@P:C BZ(@ D,5>F / Ap6-%@}/!@A3& A1 A1`A20  Av(: =6- ( (E=END) OR* Ai=>:,4E}A PD A1X 2"@/(}VOL FILE ID DESCRIP2(b #( #"@A10l A1 }!@A2  //(@  PERSONAL PROGRAM LIBRARY  KK(@:DISK# PROG/FILE ID DESCRIPTION TYPE SOURCE D}ATE SECTORS  44(@       1!@U6-1 @>:@, A1} "@@ "@ Ai A P5(}  -RECORD UPDATE+6-@5 Ae%6}-@ Ab%6-! Ap!!@A P9 Av(9($ TYPE FIELD # TO UPDATE, D TO DELETE)} Ai>:,4D)67@b,.DA AC6-A:>:,,# BA @)!@AC& #A-@ }"# &((( ENTER NEW A`@%( A@03 Aa@)(@3 A@ 6 (}  - !}SORT/COMPRESS,6-@6 Ae/%( TYPE Y TO SORT ON FIELD # / Ai>:,0YA+A&@"}+A&@,( LOADING SORT PROGRAM,% D:PROGSORT|RUN PROGD(( ҠǠ==>!-6-@#}DB:,"A` Ab6-%6-@66-@%B:,B6-@L Ap`"@ A P'($}'( Ԡ  TO RUN 8(( TYPE 'Y' TO RUN% Ai8>:,0YA P,67@,.,67@<@%},.D:.(( LOADING  AUp$%. B1((  NOT ON DISK' A 1 A Pp( } TO ADD &}, ENTER:z% #A!-@@%"77 @*+"@)"@)"@,A`@( A`@%  '} $(|----| $ (|------------|  $*#(|----------------------| '*$( |-------| (}$( |-------| $( |------| $(|---| $(-@@a$67<,. ( _)}67@<@,.167@<@,.H67@<@8,._67@9<@E,.K67@F<@R,.167@S*}<@X,.H67@Y<@b,.K$8J6-Ab A%@J@6@B'@+}$ B'$j$6-AbP A$@t4@4@5@~ B,}$d( KEY:#An9-@" ( $ /(E END9 Ai; A `6-A:>:,,# B;-} @)!A `"@Ae2#-@" 2"@Ae0( ENTER VALUE0B:.}, @A `%B:,&@!Aep6-%B:,&@$2 A` Aa(67@b,.*2 Av/}6( TYPE 'Y' IF OK # Ai6>:,0YAh(@$4(( Ԡ==>*)@1(>:,40}$@#( PRESS ANY KEY TO CONTINUE0)@=( >:,@$X("@)"@(@b= Ap`@1}$ B=7@b,4DApl"@Ap@v07<,Apm6-%@(6.7@<@2},?6.7@<@,V6.7@<@8,m6.7@9<@E,K6.7@F<@R,16.7@S<@X,H6.3}7@Y<@a,K$66-@ ()( RECORDS FOUND= 3 A 6$) (}#A)-@@)"(4}  " Av%& )$ ( $ ( $ ( $ ( $ ( $ ( $ ( $(#H@@5}:( ˠˠ ERROR D AiH <#E@@7( ˠ ERROR A AiE &,,1,6}4,5,16,17,38,39,45,46,52,53,58,59,61&LLˠ ,Ǡ , ,Š , ,Š , ,ALL RECORDS D:PRO7}GLIBQRVALUFREBFRFILEEXTADDRESSECTONUMBLOCBLOCLENGTCOMMANREADINAMELEEXTLEAA@B)99}p9p9p EpB8  !!"ӠҠ֠" :}!!"Ҡà٠î̠ͮ"'AAT'A ,,($} S+(# ;} Convert 3 S(#  Revision 1.0 By C.M.GILL (++(# 2%-A<}6A@"!% <104,32,83,228,96F6-I:,&AP ;,;@,;@,Z6. =} d 6-C:,n567@,.,67@,.7@,567,.xO(,(! You may convert a file that isO( >}up to  bytes long.V(.(# ӠV(# 堣N(+( E?}nter the filename or press N( Π for a directory.( FILENAME.EXT 4A@S37@@}<@,4:)7@<@,4:K( Do not use D: S6.  Ap6-@ A-@A}A@7<%@,4AP %6-%@%!@#A` A!6-@:7%@<B}%@,,?6-@:7%@<%@,,6-@:7%@<%@,,%AV$@:7%@<%@,, A%(%C}( File  was not found.&&( Press Ԡ to try again. F:B2y,@Au%"A ! (7(& ThD}e file you have chosen is too long.A Ap,9/+++%,&@,$@,%@2!A 9 A6 6-C:,@==-+$E}@,%@%+++%,&@,$@,%@2J AT6-%A(^ hV(.(# ӠF}V(# 堣rL(0(% Enter the filename you wish to use.H( D:FILENAME.EXT LG}w4Ap|T37@<@,0:*7@<@,0:J( Don't forget D: T Ap!(!( Writing H} ... @@ 6-C:,AP@HASP:'AV,HARP:+'AV&PI}:'AV,,$AV,HAWP:'AV,HAVP:+'AV&P:'AV,,$AV,6-?:C:hhhLV,<@,J}@%-@HAyP:'AV,HAxP:+'AV&P:'AV,,$AV,Ai@K}HAsP:'AV,HArP:+'AV&P:'AV,,$AV,Ap&6-?:A6,0$: 6-B:,DL}-@N97<,4.!6.7%@,/6-&@9 A0X b7B:, @ 6-%@-67<,. 7M} Al Av6.7@<,7B:, @ 6-%@-67<,. 7 A@ 6-B:,7B:, @N} 6-%@-67<,. 7 A`67@ <@,.$o-(%} The file you have selected is on ano(O}< enhanced density DOS 3 disk. It is stored past sectorT ( 720.2( DOS 2.0 can not access a sector T(larger tP}han 720. If you move O)(! your file to a DOS 3 disk with O(!fewer files on it and rerun this 1$( program it will Q}convert it.'(1 Ap36-@(0(} DOS 3 DIRECTORY3( A-@A@t=R}7<%@,0 *7&@<&@,4t( 7<%@,.7%@<%@, %6-S}%@%!@#A  AE4(*( Press Ԡ to continue.4 Au D:CONVERTp<=%%FNTANKDISITEMENTEXTFLAGIDCBINCIOCURNMNWNMRABUFCBICISTARNAMMENHALSREAICYCLPRNCONVERDIRE!U}AFSECONLSEDISPLAFILSECDIFILNBCNTYPBYTESTADCMSWRITBUFLBUFHUNDENAMESECDICHOICOPTIOREXRETHIFLASC!V}NTSCNTSSNSSNSCNSSSEARCNSENSECHNSECLCBCSTAALLATEMLOHERRO !W}   / BYg ?_>_>BB8BA@AA A!X}BA AAQ`A@ !"#$@!Y}%&'(@)*+,-./0@V1@234!Z}56789:;<=>?@ABC![}DEFGHIJKLMNOPQ!\}򸵒籰󄛖z (}(Okay...z;@%,;A0,;@,;@%,;@%,;@,;@%,;@!]},;@2,&&;@,;@,;@,A@@d'B7t@dA0@@$6-!^}P:I:,$?u,$;, 6-C:,6-C:,6-C:,I 6.67,.#67@,.+6.:67A0,.I67@!_},.o6-A@6-A'6-A 36-A?6-BK6-A W6-Ac6-AQ`o6-A@ F:!`}Ar,"@A(#-ApAt"$( --@@2")67<,.>:,- 7-@!a}@")67<,.>:,- 7 A104,32,83,228,96nn104,104,104,141,144,6,141,145,6,78,144,6,78,144,6,162,5,14!b},145,6,202,16,250,162,5,78,145,6,202,16,250,96104,104,104,170,76,86,2289 AP)(}ENTER FIRST SECTOR !c}-96-@ (ENTER LAST SECTOR  _AdAU A 6(DISPLAY SECTORS :S7@<@!d},4Y_6-@c A 0(LOAD SECTOR DATA INTO BUFFER4M7@<@,4YY6-@c BNA!e}dAU A%J(%INSERT SOURCE DISK AND PRESS RETURNN B(,1 -6F:B2y,"@!f} ;&"@&(ǠҠ@ "@ B'@ $( ŠϮ'(E/"@'67!g}<%,.7@<,/6-%J "@$6((HIT START TO SAVE6(HIT OPTION TO RESTART F:B2y,!q}B%DOS SYSB*)DUP SYSBQSDATABASE B,FORMATIX BMENU BMLMENUMK B<PROGLIB B8CONVERT BASBLTDISKRX BASBLABLGEMIBASB1MULTICPYBASB PROGSORTBASBRAINBOW BASBRENUMBERBASB#.SKETCH BASBOQSLFMODPMBASB CONVERT DOCBAUTORUN SYS"@A%F:B2y,"@  A; @(1(>:AS,NO DATA TO SAVE; B8A!r}dAU4(}ENTER OUTPUT FILESPEC 8%%7@<@,0D:A% (PARAMETERS FOR FILE  6-!s}( BYTES READ=..(WHICH EQUALS P:'A%, SECTORS& 6-C:,6-@ & B!!*** SECTOR!t} READ ROUTINE ***9Ai@'Ap@9Ay!"@!Ap@/6-&AV$!u}P:'AV,/6-P:'AV, ArAs$$Ax&AV$P:'AV,AyP:'AV,6!v}-?:Ap,$!X]b-@A(gF:B2y,"@ l%(>:@',7<, ("(%$!w}*** Πՠ ***%c6-6-'6-36-?6-@K6-W6-c6-!x}@GAdAU G()}ˠؠ --@@U)B2y- !y}( ***OPTIONS***$!!( [1] BROKEN FILE BUILDER. ( [2] SPECIAL DOS 8""( [3] ACTIVE DIRECTORY !z} B""( [4] SECTOR DIRECTORY G( [5] QUIT PROGRAM K BL"@A0V"@!{}`"@B j"@A`t@ ~+ AP+(}ŠҠ( *!|}**OPTIONS***!!( [1] CONSECUTIVE SECTORS ( [2] DISK SEARCH /!( [3] MAIN MENU %/ B!}}%"@6-A%% A"@ @AP F:B2y,"@ !~}F:B2y,"@$   *** SPECIAL DOS ***  + A0+(}̠Ӡ ( !}***OPTIONS*** ( [1] UNDELETE FILE ( [2] RENAME FILE  ( [3] DELETE FILE  /!( [4] MAIN MENU !} %/ B !!A1A2A1 A0& *** UNDELETE ROUTINE0 s B6-@ !}667@<@,.BB6-AaN6-@Z"@s67@<@,.: H?67@%$@<@%$@!},.7@<@,H6-C:,D -(-("HIT Ԡ TO WRITE NEW DIRECTORYF ''(HIT Π TO ABORT PROCEDUREK F:!}B2y,"@ N F:B2y,"@A1`S A1GX  b -@@l 6-%@6-%A(!}v   6- 6- B *** RENAME ROUTINE ;6-@-(ENTER CURRENT FILENAME15 !};6. ?6-@+(ENTER NEW FILENAME /3 96.?6. \ B6-@# A@:67@<@!},.F6-AaR6-@\ A10*** DIRECTORY SEARCH ***. A@*(ENTER TARGET FILESPEC . 6!}-B:, "A@(-@7<,4.( AB ; A@ '7@<@,4D:;6.7@!}:AS,!} NOT FOUND5 B6-%@ A@@"@$00((}*************************************5(,(!}7@<@, IS FILE NO./(56-6-@:7@<@,,76-@:7@<@,,Q6-@:7@<@,,!}k6-@:7@<@,,6-@:7@<@,,26-$AV%#6-$AV%/"@2$"("(*** PARAMETE!}RS FOR FILE&(#(DISK STARTING SECTOR =&(# (TOTAL SECTOR COUNT =#(>6.7@<@,.0b*0B*!}0>6. UNDEFINED)7@<@,4b)6.LOCKED +7@<@,4B+6.UNLOCKED*7@<@!},4*6.DELETED"@$#(#(CURRENT FILE STATE IS 7(%(HIT ANY KEY TO BEGIN TRACE7AdA!}U" F:Ad,AUAP' AA0h/6.7%@<,/6.7@<&@,mX 6-B:, @26!}7%@,. AB:,!@X6.7@<@,r.(>:AS,$67B:,%@,.. A@!!(}>>!}>>>>FILE TRACE<<<<<<-6-6--AdAUP AP'('(DISPLAY SECTORS+D7@<@!},4YP6-@c AP00(LOAD SECTOR DATA INTO BUFFER4M7@<@,4YY6-@c BU6!}-@6-'6-36-?6-A%K6-@Q6-U  7(4(ԣ= ң= =!} =7(/"@'67<%,.7@<,/6-%"@ ^  (2(ŠҠȠ>:!}AS,5(Z( Π-ABORT/Ԡ-CONTINUE^ $$7A'<A',4A 6- F:B2y,"@!}  AP@ *** BYTE CONVERT *** AQ0(""6-?:<@:7A&<A&,,,2U6-F:A,!6-F!}:A,;6-@:7A'<A',,U6-@:7A(<A(,,<6-$AV%F$p *** SECTOR DIR. PRINTOUT *!}l6-Aa6-Ah'6-36-@?6-A(K6-@W6-@c6-l6-C:,6-@!} V A``(#( WANT PRINTOUT'@7@<@,4YL6-@V Ab,,($}Ҡ!}٠**("RECFILENAMESSNSCNTSTATUS..6.7@%$@<@%$@, A@p A@!}6 7@<@,4,6-6 B,"@,37@<@,\-@%@(/!}-@%@D(7@<@,X-@%@\(c-@#%@(/-@(%@3(A6-%@!}O6-%@c@A`4AdAU(4([X]=END....[C]=CONTINUEF:Ad,"@" .F:!}Ad,"@$6-. A`` Aa@8@ Ab 3 3 @3"Ҡ٠BJ!}@38REC# FILENAME SSN SCNT STATUSG3 J$L&((ΠΠҠ& B_m`m** SH!}ORT FORM FILE I/O **amym6-@6-@$+6-A4%96-A5%G6-A6%U6-A7%c6-A@%!}q6-AA%}6-@"@6-@mK@%6-/ B`5;A6-K B`!}m: #6-?:C:,<,,6-F:,7@:$m*6-P:'AV,'6-P:&$AV,*$y7AdAU(!}(7(HIT ANY KEY TO CONTINUE"yF:Ad,AU ,y B}ˠ٠ }8&@@!}D:*.*8@@}@ (} B!(@(%ˠ٠(}@( 2}@!}( B @n}y@(](F o@@!}y B D:DISKRX.BAS $@tuu OFAARRAYSORTINUMREROWROLASDATEBQBEg@Y~~%} A ;@@'%}@@91 A ; A @PA @A@3@D:DISKLABL.BAKZN A%}N@2@D:DISKLABL.EPS,DISKLABL.BAKdD:DISKLABL.EPS &n6-BEgxDD;@%%},;@d$@,;A&,;@,;@%, +AAxII6.?hhhhhЩڅϢ؅֥م%}օe֥ׅͅiפ˥ Ԑ, RR67@d,.?Ԑ ߩڤ͈HԑhЬЦА`7( ( %}(4(#TURN ON PRINTER/850 INTERFACE UNIT.7("(ENTER DATE(MM/DD/YY):")&(INSERT DISKETTE INTO DRIVE #1.)("(%}TYPE WHEN READY."( AP'#@@P:' (@>:@',0(@%}>:@',E8.(&ENTER DISKETTE NAME ( to Quit )286.6-4"3 6. $67@d$%}@,. 367@,.T0&@@D:*.*0 A^-@@dh@m(r,%}&67$@&@<$@,.,6-| 6-&@@ 62()CONTINUE PRINTING OR DO NEXT ONE?(1%}=CONT)6"@A5 Ap++(@>:@,DISK =  'A@'A@%}'A@'A6-?:C:,(@B E$>E@"6-@"&3%}-@%@>(@B E$H$STARTUP SCREEN(>:A%,3(0(%******** PROGRAM DESCRIPTION %}********3(ff(] This program will allow you to printdirectory listings on address labels. It will sort the LL(Ddire%}ctory and print it out on the labels with 3 listings per line.(ff(] This program uses the Gemini 10X with Aver%}y Tabulabel address labels(# 4146)--4 inches xee(] 1 7/16 inches. It will print 11 lines per label, includ-ing one for%} the disk title & date.(\\(T This program is a modification of one written by Rick Groszkiewicz on 02/12/84(%}(((******** BILL DEBRUIN *******( 74035,212%%(........ 5/18/85 ..........-@A  %}$ D2:LABPRT(A @(A @@B$Y\]M~BBFFDD2MAIOCADRHADRLNUMLNUMHEOSEBYTDSEDBYTFLABYTEDRSOURCDESKENBH ``)}`ac@AA @ )}0e@@@I@@iiŠȠӠҠ)} Š٠Ӡ -----------------------iiŠȠӠҠ )}ɠ٠ -----------------------iiɭ٠ )} 젠 A p A@-6-@6-@-AR@`6-P:I:)},$?,`;,;@ ,;@$@8,;@$@8,;@ ,# 6. 67,.#67@,.##@)}@K: A(--(%}=source directory =copy2B6.DX:*.*6-@667@<@)},.=:,B6-@<4 @@4-@@8Ff@B7@<@,4 F)7@)}<@,4+FP6-&@\6-@8f A@K36.7@(#䬠K)@U @@Z-@@";(Error #F:A, h)}as ocurredE A@P@Z A0 A G -)67<,.>:@:7<,,%A(,- ;-%@D(7<,G$)}G -)67<,.>:@:7<,,&A(,- ;-%@D(7<,G$0 -)67<,.>:@:7<,,%A(,- 0$0 )}-)67<,.>:@:7<,,&A(,- 0$b%2@`@@9-@@= _2)}b$%"@ A %6-_6.DX:X.X*67@<@,.=:,G@@T)}@_@B-@@?(A:, Destination sectors remaining.B$))(!} ֱ)} &&( î̠ͮ..(&Choose Source and destination drives--(%with and . Use j)}oystick ,,($to move through list of files. Press--(%trigger to select (or deselect) files((( to copy. Press )} to copy. Or++(#press for a new Source disk.!@6-@!@6-@B-@@)}B(Source drive - D: to change3(3(Target drive - D: to change>-@@">()}$Insert disk press when ready.! -@@"!(sBF:B2y,"@&6-%@8B2y)}B AVBF:B2y,"@&6-%@8B2yB AV"%F:B2y,"@" A@%$, Ae)}#Ah%@H#Ai'Ap@'Aq@HAsP:'AV,HArP:+'AV)}&P:'AV,,$AV,'Ay'Ax@!6-?:A6,!6-F:Aq,"AD A0 )}$%-A6A@"!%  104,32,83,228,96*$ @-@@3(Format destination disk?@)@)} &@:Y,( NO''& A0 3 ( YES6.DX:X.X367@<@,.=:, 3(AT@)}3@ $D:MULTI(+P_uXRECAPSB%pp>p AAp %%** ATARI PROGRAM LIBRARY S-}ORT** AP6-I:,&AE ;,;@b,;@,36. D:PROGLIB.DBE( LOADING FILE6 A0-}*@@66-(= @`@$ B=7@b,4D@@2>6-%@467-}$@b&@a<$@b,.> @@<5@5( RECORDS LOADED=  , BEGIN SORTF%!@%6-?:A6( 1=BLACK 2=BLUE 3=GREEN 4=RED2}B 46.0 @5 '01*02*03*04' @0!6-A:,&@6.=:,# (}$(7@<2}@,40(6-@%(7@<@,41(6-@@' A (##@@P:2(@2}<(@F6-P 6.D:ZM(ENTER FILE NAME:5( FOR DIRECTORYI( 'END' TO STOPM2}d 4END A`n 4(} Apx=37@<@,4:)7@<@,4:= A@67@2},.6. A @@27@<@,4:(6-@2 Au6-@ 2}4S6-A:,,,(@C*P FILE = 7,I7@<@,410(@M0,-19?(@II 2 }A%(@M0,-9%(@I 4S A)6-%@"@)6-6-@2 })@$"AU*B:,"$6. "AU A )67<,.>:,6-%@) A(6-B:2 },'P:,(6-P:%@,-@ 6-$!B:,6-B:,..(@C*P7$&+&@,<,I2 }7@<@,410(@M0,-19?(@II Ap%(@M0,-9%(@I  4S2 } A)6-%@"@)6-" 6. A,6-F:A,6="Ap"(FILE NOT FOUND%(2}((3@= @@JA6G(ERROR # ON LINE F:A,$AV%F:A,JJ@@T2}(}PRINT COMPLETE^ @@h@@r&&@@D:*.*| A@2}( A@(( @6-F:A,%%6-F:A,$AV%F:A,7A84(2}ERROR # OCCURRED ON LINE 7/+("TURN ON PLOTTER AND PRESS /@(} @9 D2}:RAINBOW.BAS0 |} LN1LN2VV1V1V10V25VVVOIVBESTARINADLELNUCNUCOUNLOMLLINOPPONMCHNPNUMBESADNUMBE6}RADDDIDIGA!5aSAYA2Y@@@AAV @ @ @ @ @6}A6} !"#$%&'ijjҠͬ٠Π 6} ٠ĠΠά ƠӻٛiFFΠҠŠŠƠ ɠҠ6}ӛ2ihh͠ԠŠENTERED Š͠ϠŠŭ ĠӠΠ٬} END POINT FOR FILL 4 H-@AZB2y^ d6-j6-p6. AU$;-@B::?},4%&@@:7<,,&@28 ;$XC +AR@1A@HCA@Hb1(( :@}ĠԠƠ+(.(1(lg$( L - SETS PEN SIZE TO LARGEF( M - SETS PEN SIZE TO MEDIUMg( S - SETS PEN SIZ:A}E TO SMALLvh$( E - SETS PEN TO ERASE MODED( D - SETS PEN TO DRAW MODEh( H - HELP...LISTS THE COMMANDSi%( 1:B} - STARTING POINT FOR FILLE( 2 - ENDING POINT FOR FILLi( F - FILLS THE AREA WITH COLORM&( C - CHANGES BACKGROUN:C}D COLORM(" I - CHANGES BACKGROUND INTENSITY'$( B - CHANGES PEN BRIGHTNESS'(J#( CLEAR< - CLEARS THE SCREENJ(":D} CTRL-L - LOADS PICTURES FROM DISKk'( CTRL-S - SAVES PICTURE TO DISKC( CTRL-X - EXITS PROGRAMF(_( PRESS KE:E}Y...kAUF:,"AUA A 0$ 6. AP@Y6.LOADING PICTURE....." M:F}@@ D:PICTURE.DATYAU*-%AxP )@&* K6.PICTURE LOADED.....:G}! 5-@@PGB2yK F:,"AUA@1@ B6." (6-.6-1$  :H}6. AP@*Y6.SAVING PICTURE......" M@@ D:PICTURE.DATYAU4--:I}%AxP6-F:,)*@- >L6.PICTURE SAVED......." 6-@@PHB2yL HF:,"A:J}UA@R%@ B6." %$V ,-@+Ae@S@@:K}S:V$GG0,0,0,0,0,0,0,0,1,1,1,-1,1,0,0,0,-1,1,-1,-1,-1,0,0,0,0,1,0,-1,0,0J19@,9@,;@ ,;@ :L},J67@ <@ ,. 5-@@"$68,-("168,-5 36-A6-A'6-@36:M}-@6-Ad-A'6-A36-A?-AK-AW6-A c6-@o6-@{6-:N} $a +@$A@25A $@%KA$@%aA$@%u-6-F:A`:O},%F:Aa,$AV%@K6-F:,%F:%@,$AVa6-%A$@@u%A@=6-@6-@:P},6-P:'@,=6-P:'@, %6.ERASE MODE MEDIUM" %$ D:SKETCH.BAS8a & 'P0P1P2P3MXYLXMYMLMVTAATAXNNDDD0D1D2D3BREMOVDMDMDMPMBASBYTDM0DMDM1DM2>R}DM3OFFSEVVMOVEDMAAA5AMA eA } >S} A>T} !"#$%&'()*+>U},-./01@2~~;@,;@,;@,;@,;@,9@>V},9@,9@,9@,9@,9@,} +@-@@=(@A SELF-MODIFYINGO-@>W}@k(@PLAYER-MISSILE}-@@ b!(@GRAPHICS UTILITY3-@@J(@ ke>X}n grace^-@A b p +(p([THIS UTILITY ASKS SEVERAL QUESTIONS ABOUT THE P-M GRAPHICS SITUATION YO>Y}U WANT TO SET UP.e(:(/IT THEN MODIFIES ITSELF INTO A PROGRAMSKELETON.=(e(#SUBROUTINES FOR PLAYER AND MISSILE q(>Z}MOTION ARE INCLUDED.(D( YOU ADD THE REST OF THE PROGRAM.G(q(%ANIMATION IS POSSIBLE BY COPYING NEW `&(SHAPE STRI>[}NGS INTO THE STRINGS@(DEFINING THE PLAYERS.C(F(`(PRESS TO BEGIN. &6-F:B2y,&@@  L>(>:>\}A%,+ENTER THE GRAPHICS MODE FOR PLAYFIELDH(GR. L ' @( 9000 GR. ' @ ['(RESOLUTION >]}DESIRED FOR PLAYERS:;(0 = DOUBLE-LINEW(1 = SINGLE-LINE (FINER)[H6-P:'@,$6-&@$0@H6->^}@$+@%,%"@%6-@%@$%"@%6-@%@$%"@%6-@$%@>_}$%"@%6-@6%@$G @%( 9010 RES=:S=/ @G6-A($+@%,3 @>`}!-@@%() 3 @,((NUMBER OF PLAYERS TO BE DEFINED,] @ @'-@;(>a}A%@P$O(A%@P$S ] @I @ @'-@;(A%@$? I @>b}h-&@&(>:A%,)(b(1COLOR (0 - 15) AND INTENSITY (0 - 15) FOR PLAYER hF @<(AP>c}% POKE A%,@$%F @`(WIDTH OF PLAYER :-( 0 = NORMALB(1 = TWICE NORMAL\(3 = FO>d}UR TIMES NORMAL`< @2(A`% POKE B2V%,< @gc(?INITIAL HORIZONTAL POSITION (0 - 255) >e}FOR LEFT EDGE OF PLAYER  (45 TO 210ON SCREEN)gW @M(A%@P$X()=:REM HORIZ POS OF >f}PLAYER W @ A-("VERTICAL LENGTH (BYTES) OF PLAYER 1>(>:A%,A(!QM(4INITIAL VERTICAL POSITION OF TOP >g}OF PLAYER (1 TO &&@)Q"k @a(A%@P$Y()=:L()=%@:REM VERT PO>h}S AND LENGTHk @#( USE LINES A%@P$ TO A %@P$# TO ENTER DATA STATEMENTS WITH THE >i} BYTES DEFINING PLAYER $)(&(TYPE TO WHEN FINISHED.)&%7  @%-@@6)(- 7 @&>j}8(4((HOW MANY MISSILES TO BE DEFINED (0 TO 4)8'G" @--@9(AP%= G @>k}(] @ @'-@;(A%@P$O(A%@P$S ] @)&"(>:A%,& @>l}R*q6-%-&@2(>:A%,5(M(WIDTH OF MISSILE \( 0 = NORMALq(1 = TWICE NORMAL+i(>m}3 = FOUR TIMES NORMAL!>6-P:@#%?,$%H @_(9064 POKE 53260,i @,u1(&INITIAL HORIZONTAL >n}POSITION OF MISSILE5? @u(A%@P$XM()= :REM MISSILE -V( HORIZ POS @E(#VER>o}TICAL LENGTH (BYTES) OF MISSILE IV(>:A%,.e(a(4INITIAL VERTICAL POSITION OF TOP OF MISSILE (1 TO A($+>p}@%,&&@)e/n @d(A%@P$ YM()=:LM()=%@:REM VERT POS AND LENG>q}THn @0zz( USE LINE A%@P$ (TO A %@P$$) TO ENTER DATA STATEMENTS WITH THE  'BYTES'>r} DEFINING1o(MISSILE +6-P:@#%?,.(l(ALLOWED VALUES ARE 0, , @$, OR @$o(2$!>s}(ENTER WHEN FINISHED.$&3 43 @!-@7@Q%() 3 @5I @ @'-@>t};(AP%@$? I @6O" @--@A(A%@$E O @7s(P>u}RIORITY SCHEDULE :(G($1 - PLAYERS 0-3,PLAYFLDS 0-3,BACKGNDJ(s($2 - PLAYERS 0-1,PLAYFLDS 0-3,PLAYERS8o( 2-3,BACK>v}GND(B($4 - PLAYFLDS 0-3,PLAYERS 0-3,BACKGNDE(o(%8 - PLAYFLDS 0-1,PLAYERS 0-3,PLAYFLDS9s( 2-3,BACKGND(s(UALS>w}O, THE NUMERICAL SUMS OF THE ABOVE CHOICES ARE ALLOWED, GIVING BLACK FOR OVERLAPS.:h(,(!ABOVE +32 GIVES COLOR IN OVERLAP>x}S/(;(CHOICE?I @^(9045 POKE 623,h @;I(1(&WHEN YOU SEE YOU MAY LIST OR RUNE-@A>y} I <3 @!-@R@Y%() 3 @=o( ((60(61(90%(91,(92H(POKE 842,12:? CH>z}R$(125)Z-lAB@o&Z00@@ @*(>:A%,-(0$[9( ((CONT$->{}6AB@9&\BAB@"(>:A%,%(?0@@ @B$c AdllMOTION OF PLAY>|}ER P. X(P) AND Y(P) ARE X,Y POSITIONS. DX AND DY ARE CHANGES. USE FOR DY=-2,-1,0,1 OR 2.e! A!"Af/>}}/%@AAAAg678,%,. Ah678,%,. Ai678,%,. A>~}j678,%,.kMB2H%8,%$68,-8,%268,-8,%>6-J6-M$l%6-6-% A>}n88MOTION OF PLAYER P. USE FOR DY >2 OR <-2 (OR 0).o9 A9%@AAAAp2 6>}.B2H8,%(678,%,.2 Aq2 6.B2I8,%(678,%,.2 Ar2 6.B2P8,%(67>}8,%,.2 As( 6.B2Q8,%(678,%,.t:68,-8,%68,-8,%+6-76-:$u%6->}6-% AddMOTION OF MISSILE P. XM(P),YM(P) ARE X,Y COORDS. DX,DY ARE CHANGES.USE FOR DY=-2,-1,0,1 OR>} 2.L AX68,% @)8,%%8,!)"B6-L AW//%@ASATAUAV>}4*6-?:<%8,%<<8,<AR,4 AW4*6-?:<%8,%<<8@,<AC,4 AW4*6-?:<%8,%>}<<8@,<A,4 AW**6-?:<%8,%<<8@,<@c,MB2R%8,%$68,-8,%268,-8,%>}>6-J6-M$/6-6-,B2R%8,/$88MOTION OF MISSILE P. USE FOR DY>2 OR <-2 (OR>} 0).B Ah68,% @)8,%%8,!)"B6-//%@AcAdAeAf^"6->}?:<%8,<<8,<AR,3B2R8,%T6-?:<%8,%<<8,<AR,^ Ag^"6-?:<%8,<<8,<AC,3B>}2S8,%T6-?:<%8,%<<8,<AC,^ Ag^"6-?:<%8,<<8,<A,3B2T8,%T6-?:<%8,%<>}<8,<A,^ AgT"6-?:<%8,<<8,<@c,3B2U8,%T6-?:<%8,%<<8,<@c,:68,-8,%>}68,-8,%+6-76-:$%6-6-% Aa A7#AY@F%@$<#>}.6-F:A,& BBy.6-$AVF#9B2w@!6-A(-"@96-AUn#L ;,6-C:,+67>}@,.>:,=67,.>:,L67@,.}#B;8,,-6.7@<8,,BB2H8,#B #A>},-@8,&@0">67<,.>:,B #B;8@,,-6.7@<8@,,BB2I8@,>}#B #AP,-@8@,&@0">67<,.>:,B #B;8@,,-6.7@<8@,,BB2P8@>},#B #A,-@8@,&@0">67<,.>:,B $B;8@,,-6.7@<8@,,BB2Q>}8@,$B #AP,-@8@,&@0">67<,.>:,B E$B;8,,-6.7@<8,,>}BB2R8,J$K #A,-@8,&@0">67<,.>:,B K6-C:,w$B;8@,,-6.7@>}<8@,,BB2S8@,|$K #AP,-@8@,&@0">67<,.>:,B K6-C:,$B;8@>},,-6.7@<8@,,BB2T8@,$K #A,-@8@,&@0">67<,.>:,B K6-C:>},$B;8@,,-6.7@<8@,,BB2U8@,$K #AP,-@8@,&@0">67<,>}.>:,B K6-C:,%G%6-F:A4,%AV$F:A5,G6-F:A@,%AV$F:AA,!%6-%A$+@%,&&%>}-@0%$6-P:'AV,$6-&AV$:%%@%@D%1#%@A($+@&,1%>}@N%1#%@A($+@&,1%@X%+6-%@+6-%A($+@%,b%+"@+6-%A>}$+@%,&l% % 6.678,,.% 6.678@,,.% 6.678@,,.% 6.678@>},,.%8 6.678,,.8678,%8,,.%W-@8@,36-8@,%&@S67<,>}.>:@:7<,,%@:7<,,,W %W-@8@,36-8@,%&@S67<,.>:@:7<,,%@:7<,,,W %W-@>}8@,36-8@,%&@S67<,.>:@:7<,,%@:7<,,,W %*;@8,6-C:,*6-C:,&@% #>}A % #A0%--@@7")67<,.>:,- &YY104,104,133,204,104,133,203,104,133,206,104,133,205,104>},104,133,207,104,104,133,208 &AA160,0,177,203,37,208,113,205,145,203,200,196,207,208,243,96' AD:SLFMODPM.>}BAS<DOS 3.0 to DOS 2.0/2.5 file converter.The idea for this program came from a plea put out on our club BBS. It seems that quiB}te a few recent Atari 1050 owners have recieved only DOS 3.0 with their drives. After collecting a few disks worth of files tB}hey suddenly wish they could transfer them to good old DOS 2.0/2.5. After a couple of hours of playing with DOS 3.0 I found oB}ne solution. I realize that another solution was printed in ANTIC before but it could only convert BASIC files and was a bit B}awkward to use. DOS 3.0 converter will transfer any type of file you may have.How DOS 3.0 saves files.With the idea of thB}is program in mind I started delving into the workings of DOS 3.0. Using a short program that reads raw sector data and a disB}k that I filled with files, I was able to determine the following. DOS 3.0 is organized into blocks of 8 sectors rather than B}individual sectors. This wastes a lot of disk space. The first three blocks (sectors 1-24) are reserved by the file managemenB}t system. The disk directory is on sectors 16-23. Filenames are followed by four values, the first represents the number of bB}locks long the file is. The second gives the block number. Blocks are numbered from zero, with block zero being sectors 25-32B}. The third and fourth values represent the file length in bytes. This is presented in low byte, high byte format. How to uB}se the program.Copy this program onto a DOS 2.0/2.5 disk. When run it will prompt you to insert your DOS 3.0 disk into drivB}e one. Enter the filename, but do not use the device specifier D:. Your file will be read into the computer. If it is too lonB}g you will be told. You can convert a 27K file on a 48K machine. You will then be prompted to insert your DOS 2.0/2.5 destinaB}tion disk and provide a filename. This time a device specifier is required. (That was for those of you with multiple drives).B} That is all there is to it. There are however a couple of potential problems. The first is that on an enhanced density DOS 3B}.0 disk there are more than the usual 720 sectors. DOS 2.0 can not read past sector 720. The program checks for this and willB} provide instructions. All that you have do to is transfer the file onto a DOS 3.0 disk with fewer files on it and rerun the B}conversion program. The other problem is handled much the same way. The conversion program will have problems with a disk thaB}t has had files deleted from it and new programs saved. The conversion program does not check to see if a file is stored in cB}ontinious blocks, it assumes it is. If you convert a program and find that it does not run in DOS 2.0/2.5 format, copy the orB}iginal file onto a freshly formatted DOS 3.0 disk. The conversion should then operate properly.Program description.Line 5B}0 pokes the initialization for the read sector routine into page six.Lines 140 to 170 is the input of the DOS 3.0 filename. B}The filename is converted to the same format as it is stored on the disk sectors in the subroutine at lines 570 to 690.LinesB} 180 to 280 checks the DOS 3.0 disk for your file. If it is found it determines where it is on the disk and how many bytes loB}ng it is.Line 290 checks to make sure the file will fit in the buffer.Line 300 checks to see if any part of the file resideB}s on a sector greater than 720.Lines 300 to 350 reads the actual file into memory.Lines 360 to 380 get the destination fileB}name.Lines 390 to 460 use a CIO routine to write the DOS 2.0/2.5 file.Lines 500 to 560 is the subroutine to read in the rawB} sector data. It is used for all input from the DOS 3.0 disk.Lines 570 to 690 is the filename formatting subroutine.The remB}ainder of the program is a help screen for dealing with enhanced density disks.I hope that this program will help you bridgB}e the incompatability gap between the two operating systems. Those of you with modems can save a bit of typing,this program iB}s available for download on the MACC BBS 209-527-1205. If you have any questions leave me a message.@eH) !"`3!3