#@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`  `8  ɐ     `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.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8: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 ALLOWED228 FREE SECTORS COPYING---D1:DISKFIX.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- 160ɛ+,' 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 D8u8<<  B JKIHiDiELV`L8 8 BLV`LxT}8t8l Lu8hihiHHȱȱL8c !#3`Lu8JJJJ`H 8h`HU}ȩh Q8L8 Z8L8 8L8 8L8 8L8S:@9E:E9H '9 H9I9 8 '9h)0ICV}9D9L8 L :::: :Lr:::IEL[::i:iIIL[:`:i::iX}::L:`L{:w:w: C`L:L: D8:MEM.SAV: 8| 9 '9`L:L: D:DUP.SYS:̩ 8Y} x:ɀL: '9`88 |9Y:X: '9L); D8:DUP.SYS; 8::88 9 '98? :`;WL`; 9Z}Ln; ` :Y;Y;L;L;)} Setting Up ATARI 130XE Ram Disk; 9L; ; -9  [} L;D8:; :9 :Y;L-@m}@ $( SELECTION >0@@ @] Ap-@$@ +( =-@$@ OAdAn}UY A], 4DOS@e@) A ,.S27@<@,4P*+"@)"@,=@o}I6-@S AL7@<@,4P(6-@B0@L AG7@<@,4Dp}(6-@2 A =@G A$$7@<@,4SA: 6-A:,& @)!&@&0 Aq}: A_ B(}@;@@G6-S"@_6-@4$-@%r} @$ +67@<@,.7@<@,S67@<@,.7@<@,l67@<@,.s}.67@<@,.7@<@,Y 6.-@@,6-@:7<,,B"@F)"@XY67B:,%@,t}.>:,H1+!@G* @X,)+!@d* @,H67B:,%@,.>:,G @@+@e@=Au}RG Apr +@-@@4(@LOADINGF-@@d(@7@<@,nv} A@r%h A(@4(@FILE NOT FOUNDT(@OR NOT A LOAD FILE^ A`h AXC Bw}AR@1@C@@9b1 }ATARI SYSTEM STATUS1  ...WORKING...glhh;Ax},;@@,;@@,;A,;@,;@,;@@,;@@,;A#,v8 AP-@@y}P:8@,@,6.P: G A@<@@D2:*z}.*G@LL6.BD1: ˠŠD2: ˠŠ A--6.#D1: ˠ{}Š C A @8@@R:C@aa6.WR1: ӭԠ|}R2: ӭԠR3: ӭԠOO67B:,%@,.7R4: Р}}1@1@@D:*.*-@@@''7@<@~},4SECTA-@!   ''7@<@,4SECTA@ A $@ -}@"@!$ *. A .7@5<@5,42A04 A>''@@D2:*.*H}@R''7@<@,4SECTAp\ A@f-@"@# p--@ @"- }IJz8@ -@ @ 8 ı7-7 ATARI SYSTEM STATUS UP TIME:i-}@B 'DEVICES PRESENT SYSTEM DRIVE FILES:T-@#@i EXT U-@$  E:} 3  S: D  K: U  C: *-@*  -@ }( 4(6.P: D7@4<@4,4 D6.!D2: ˠŠW 4W6}.FR1: ӭԠR2: ӭԠf 4f67B:,%@,.GR3: ӭԠ}R4: РXX ODEVICES NOT PRESENT } h-@ . ź?  BASICh #٠ź})6-AP!%I:,)  Bytes/=6-+'A$,46-P:$@%?,'@= K.-@} |.-@33 *$E-@E *}.--@@#-@) |- 8.-@ @##-@* |. B F:Ad},AUA`LaE6-P:+F:@,$BU6%F:@,$AV%F:@ ,,'@Y'C@,S!%@Ya6-%@`V6-}P:'@`,6-&`D 6.=:,"67B:,%@,.:. @D67B:,%@,.0j67B:,%@,.=:,t-@1}  ~ A"F:Ad,"@1" A"F:Ad,"@0" A04F:Ad,"@}*AdAU4 APF:Ad,"@(*@@4+FAdAUP A66POKE 82,2:PO}KE 83,39:GRAPHICS 0:POKE 764,255:NEW!6.D:*.*!AdAU AP"6.D2:*.*"AdAU A}P6.SYSTEM DRIVE FILES:67@<@,4266.DISK DRIVE 2 FILES:-@ @ 5 A}@5@@ -@@@''7@<@,4SECTA`(-}@! 2 <''7@<@,4SECTA`F@ A@P"@AZ8-@}-@!4  8 d-@"@!n9@'7@<@,429-@"@#x }%- % A@% D:D!n9@'7@<@,429-@"@#x 8  5RhABCLIIN''*********************************''**** } Reprinted from ****''**** ****''**** JUNE 1981 ****''**** 3662 VI}NE MAPLE DR ****''**** EUGENE, OR 97405 ****''**** **** ''************************}********* ''** MATT LOVELESS **** %%*** FOUNTAIN VALLEY, CA ****';A,;A,'6-}a @(}((8(STARTING LINE (100-32000)<a A)!B )P:,@U @ ((,(INCRE}MENT BY (1-20)0U @)!@ )P:,@  B(' 6.=:,'67B:,%@,. DATA -a3(>:@),}>:@),>:@),>:@1,a(>:@(,>:@(,>:@(,>:@(,2( LINE NUMBER (<##B:,%B:,!}A@F-67B:,%@,.-67B:,%@,.,K @`PWAB@"67B:,,.((}+(.(1(4(}8(B(CONTT-@W&UGAB@6-%)!B D(LINE NUMBER TOO HIGH!!GZ @@}D:DATAMAKE.BAS@W&UGAB@6-%)!B D(LINE NUMBER TOO HIGH!!GZ @@ij*?AFILEOLDFILETRANFILENEWOLDRECTRANSRECNEWRECPSSSERRSTRANUOLNWRECNWRETRANRECTRANNUMREC} } ppЬҠΠ ͬ٠٠ƬƠ Š}ŠŧӮB+@%@ (@B(@ LOOK, UP IN THE SKY/-@@/(@ }IT'S A BIRD!/-@@/(@ IT'S A PLANE-@A --@@F(@ Ϭԧ}ӮZ-@A~2'@@ P +@'0@9-@@P(}@ SUPRCOMP!0-@@0(@ by stacy goff 99(@(for the eugene ataricomputer enthusiasts}"SS(KSUPRCOMP COMPARES TWO LIST-FILE VER- SIONS OF THE SAME PROGRAM, AND GENER-$,,(#ATES A LIST FILE OF DIFFERENCES }&-@AE2A@&+'A,a0'@@e 2}2' +'0@dX (}X;@ ,;@,;@,;@,;A(,;A(},;A(,n3#(ENTER Ġ PROGRAM NAME- A36.x5%(ENTER Ӡ PROGRAM NAME/ A56.3#(}ENTER נ PROGRAM NAME- A36.( OLD FILE = ( TRANS FILE = ( NEW FILE = !!Ԡ}Š̠Ԡ!-@A !(}mb(TYPE Р TO PRINT ONLY, Ġ TO DISPLAY ONLY,#  TO PRINT }AND DISPLAY DIFFERENCEmTRAP 180A4P)4B5@@P:A6-@4B)4D6-@}#"@)"@# A0 A##נΠӠ* A 0*@@}* A @*@@* A P*@@"@ AEND+""}ŠŠ, AGO GET OLDREC6 AGO GET TRANREC; " A@-!Ap-M}UST ADD RECORD FROM TRANE!A0G&J$$ΠĬԠΠ׻ŠśT: 6.=:,(@# A:WRIT}E RECORD & PRINT^F A A! AFGO CLEAR NWREC, GET ANOTHER OLDRECr##ΠάԠΠĻԛ| } 6..(@ A$ A. AHHΠȠӬˠϠŠ Š٠Š̠} 4 AP A6.$(@ A$ A! A A! AW!!ŠĠ}ӠXN A `@167@<@,.; A A6-K BN$N A p@167@}<@,.; A A6-K BN$ CLEAR NWREC*(-@B:,!67<,. % ($РӠ}Ӡ4(ERROR--CAN'T OPEN *6-@4 A@4(ERROR--CAN'T OPEN *6-@4 AP4(ERRO}R--CAN'T OPEN *6-@4 A`##ҠΠĠŭˠƠ"F:A,A6" A%6-B }"B % A$##ҠΠӠŭˠƠ"F:A,A6" A%6-B "B % }A$:6-#-@@07<,4 : A 6-%@ 6-A:7@<,,$HH}ԠŠӠĠΠ ͠РȠĺӠ46. *B:, @4 A'7}@<@,4D:' A Y-B:,@6@;67%@<%@,.7,? Y67@<@,.D:$}L ԠĠ٠ԠV"@(@`"@(@j$̠ŬŠӠ}?@@$@<(ĠƠŠ?ĠҠ9( (6( ĠȠ}Ҡ=:F:A,,9 D:COMPARE.BASĠƠŠ?ĠҠ9( (6( ĠȠ*%&N4I@} @ @} !"#$ (} RR9@,;}A ,;@ ,;@0,9A,9A,;A ,E-@A&68,-568,-9 E6-}%%( ***Š***mm(eWill prevent your 'BASIC' program from being read or changed,by writi}ng over the basic statementsRR(Jwith Control Characters.MAKE SURE YOU HAVE A BACKUP COPY OF YOUR ORIGIONALjj(bPROGRAM}! There is no need to enter a 'D:' at FILE NAME prompt. **********************#(ENTER INPUT FILE NAME#} 6.D: 67B:,%@,.( @@2#(ENTER OUTPUT FILE NAME#< 6.D: 67B:,%@},.F @@P1-@@$)@-68,-1 Z//6-8@,%AV$+8@},&@,d//6-8@,%AV$+8@,&@,n//6-8@ ,%AV$+8@,&@,x//6-8@,%A}V$+8@,&@,//6-8@,%AV$+8@,&@,-@')@'67B:,%@,.}>:,1A(*AV'6-%@1 B   ( A$ ( ENTER CHARACTER NUMBER$-@} 68,-   6-1 6-&6-&6-&#6-&+6-&16-(''68@,-&P:'AV,}$AV%%68@,-P:'AV,%@''68@,-&P:'AV,$AV%%68@,-P:'AV,%@'}'68@ ,-&P:'AV,$AV%%68@,-P:'AV,%@"''68@,-&P:'AV,$AV,%%68@},-P:'AV,%@6''68@,-&P:'AV,$AV@%%68@,-P:'AV,%@J-@@T} 6-8,*@^ h-@r 6-8,*@|  B )@*@ } A3/(&FILL TABLE WITH SPECIAL CHARACTER(Y/N)3 4Y A7#(CHANGE VARIABLES ONE BY ONE'74}YBm#!@&)!)!U6-+%,$@%+&@&&&,$@%@&a6-@m6-@}-@ &8,"@ AP& A&8,"@ A`& A!@&Ar$*68,-@d}%%A(*6-%@. A076-%@!@&)6-@76-%@368,-%@e86-%}@B68,-%@d%A(L6-%@ ( A   8,"@ 6-%@}B6-%@"68,-@d%06-%@?68,-AdB$pB6-%@"68,-@d%06-%@?68,-Ah}B$'6--@'6-%@$'Q)@:7<,,A*@:7<,,AG67<,.>:@:7<,,&A(,Q }BP)'Q)@:7<,,Av*@:7<,,AG67<,.>:@:7<,,&A(,Q BP.'Q)@:7<,,"Ad)@:7<,,"Ah}G67<,.>:@:7<,,&A(,Q BP8' *9 6-B:,-@+68,-@:7<,,/ 9 A :+(+( OLD VA}R NAME: 7&%@<,:( ENTER NEW NAME: :MB:,"%(7&%@<,C67<,.>:@:7<,,%A(,M }BP5:--67B:,:@:7B:, L>!"8`  x xL myzZANAMESSTRTLENGFILELINEFILEBUFINDEINFILOUTFILININBUFLENAMEOUTOUTINAPPNTMPCIOXISTAINDOU$}LOCKRETR@@ $} @@COPYRIGHT $}1981 - HOUSTON ATARI COMPUTER ENTHUSIASTSd%%DISK DUPLICATE PROGRAM 12/22/80nDUPLICATES D1 TO D19;@$},6.h V`9PLA/LDX #$10/JSR CIO/RTS;@,+FF(>This program will duplicate all programs ot$}her than DOS.XR(JIt can be used under DOS 2.0S to copy DOS I disks to DOS 2.0S format disksU(X(,,($Have you formatt$}ed and written a DOS!(file on the new disk! 0YL(Enter source diskV&&@@$}D:*.*`ee;@($@,;@(,9@(,9@(,;@0,;@,;@,;B@,ab-@$}A^67B:,%@,.2 b e6-B@j6-t A$}~@(..7@<@,4 DOS SYSAP..7@<@,4 DUP SYSAP..7$}@<@,4 MEM SAVAP>+7@<@,4BAD AP>IGNORE BAD FILES6-%@7767$}$@&@<$@,.7@<@,67,.7@<@, APSTART UP COPY6-&@$}@$-@ 68,-$ 6-@6-@6-77SET UP BUFFER FOR COPY FROM$} SOURCE TO DESTINATION6-@x!!A !NO MORE FILES&&6.7$@&@<$@,;;(INPUT: $}7@<@, 7@ <@, BFIX FILE NAME @@;8,!$}@-6-@;6-&@ 68,-68,-COPY FILE TO MEMORY6-) B)READ $}CHARACTERS INTO BUF$"A6A#!%@ ( READ ERROR#&@A; @6-%@$}1( ERROR - ; A/,($ERROR AFTER 5 RETRIES, COPY ABORTED./&@END-OF-FILEE (8,T@^$}6-%@h!!%@&A%Ar< A <BUFFER DOES NOT HAVE ROOM FOR ANOTHER SECTORBUFFER FULL$}(8,*@@%%COPY BUFFER TO DESTINATION DISK6-@&"@A0&B$}UFFER EMPTY#(Enter destination disk#&&6.7$@&@<$@,::(OUTPUT: 7@<@, $}7@ <@, BFIX FILE NAMEA! OPEN FILE FIRST TIME @@$}  A"4RE-OPEN FILE(APPEND)> @@ COPY FILES6- B WRITE$} OUT FILE@6-%@  A 0 CHECK IF FINISHED !A@ (Enter source disk$} A!!FINISHED, NOW PROTECT FILES4-@&7<,4*A@ * 4 AP/"@+(Enter$} destination disk/-@7<,4 AA&&6.7$@&@<$@,(LOCK:  $}BFIX FILE NAME((@5@  DONE(Copy complete.&'FIX FILE NA$}ME' 6.$' 6.D:.'-@@8'7<,4 BB'67B:,%@,.7<,L' t'67B:,%@$},..~'((67B:,%@,.7@ <@,'$*READ INTO BUF$+'AP@'READ CHARACTERS +6-C:7,,$}+;$AR&AV$P:'AV,;ASP:'AV, +6-%@&%+S6-A%$P:'A%,SDON'T READ A PAR$}TIAL SECTOR AT THE END OF THE BUFFER*+;$AV&AV$P:'AV,;AWP:'AV,4+6-?:C:,,>+%%6-F:AV$},%AV$F:AW,C++6-F:AQ,(!@*A6+$H+68,-8,%R+ 6-%f+$.WRITE FROM BUF$.($}AP@(WRITE CHARACTERS.6-C:7,,.;$AR&AV$P:'AV,;ASP:'AV,/ 6-8,/;%}$AV&AV$P:'AV,;AWP:'AV,/6-?:C:,,&/.F:AQ,!@+( WRITE ERROR:.&0/6-%}%8,:/$ D:DISCDUP,;AWP:'AV,/6-?:C:,,&/.F:AQ,!@+( WRITE ERROR:.&0/6-$~ANAMESSTRTLENGFILELINEFILEBUFINDEINFILOUTFILININBUFLENAMEOUTOUTINAPPNTMPCIOXISTAINDOU)}LOCKRETRDRV2USEDUSEDNXTFILFILENFILESCIO2@@ )} )}@ !"d%%DISK DUPLICATE PROGRAM 06/25/81n%%DUP)}LICATES D1 TO D1 OR D1 TO D2xALPHABETIZES FILES9;@,6.h V`9PLA/LDX #$10/JSR CIO/RTS9;@,)}6.h V`9PLA/LDX #$20/JSR CIO/RTS;@,;@,,,($Have you formatted and written a DOS!(file )}on the new disk! 0Y( Use 2 drivesL'#(Enter source disk(DRIVE 1)'Q4 4Y0(Enter desti) }nation disk(DRIVE 2)4V&&@@D:*.*`ee;@($@,;@(,9@(,9@(,;@) }0,;@,;@,9@(,a6/6-@P$P:+I:,&AV,'@P,6;,dd-@@P`67B:) },%@,.2 d e""(Enter Y to duplicate file:j6-t A) }~@(**7@<@,4SECTORSA3&7@<@,4 DOS SYS)(3 AP) }3&7@<@,4 DUP SYS)(3 AP3&7@<@,4 MEM SAV)(3 AP>+7@<@,4)}BAD AP>IGNORE BAD FILES( dupl(Y/N)? U#@@K:0)@;@B(>:,)}U@:Y,AP6-%@7767$@&@<$@,.7@<@,67,.7@<@, )}APSTART UP COPY6-&@@ B(3-@ 68,-/68,-3 )}6-@6-@6-77SET UP BUFFER FOR COPY FROM SOURCE TO DESTINATION6-@x!!A )}!NO MORE FILES}38,!A3CONTINUE PREVIOUS FILE4 B4FILENO IS SMALLEST(ALPHA) FILE INDEX 6)}8,-&&6.7$@&@<$@,;;(INPUT: 7@<@, 7@ <@, BFIX FI)}LE NAME @@;8,!@-6-@;6-&@ 68,-68,-)}COPY FILE TO MEMORY6-) B)READ CHARACTERS INTO BUF$"A6A#!%@ ()} READ ERROR#&@A; @6-%@1( ERROR - ; A/,($ERROR AFTER 5 RETRIES)}, COPY ABORTED./&@END-OF-FILEE (8,T@^6-%@h!!%@&A%Ar< A <)}BUFFER DOES NOT HAVE ROOM FOR ANOTHER SECTORBUFFER FULL(8,*@@%%COPY BUFFER )}TO DESTINATION DISK6-@&"@A0&BUFFER EMPTY+ 0Y'(Enter destination disk+ -@)}8," 6- FIND FILE IN LIST&&6.7$@&@<$@,::(OUTPUT: 7@<@,)} 7@ <@, BFIX FILE NAMEE 4Y6.7@,$6.D2:367@,.ED2:XXXXXXXX.XXX)}A! OPEN FILE FIRST TIME @@  A"4RE-OPEN FILE(APPEND)>C 0Y)}(@@ CAPPEND WHEN ONLY 1 DRIVECOPY FILES6- B WRITE OUT FILEV)})0Y@VCLOSE ONLY IF FILE FINISHED, LEAVE OPEN FOR APPEND(2 DRV)6-%@  A 0 CHECK IF)} FINISHED !A@ & 0Y"(Enter source disk& A!!FINISHED, NOW PROTECT FILES4-@) }&7<,4*A@ * 4 AP/"@+(Enter destination disk/-@7<,4 AA)!}&&6.7$@&@<$@,(LOCK:  BFIX FILE NAME= 4Y6.7@,$6.D2:36)"}7@,.=USE D2:((@5@  DONE(Copy complete.&'FIX FILE NAME)#}' 6.$' 6.D:.'-@@8'7<,4 BB'67B:,%@,.7<,L' t'67B:,%@,.)$}.~'((67B:,%@,.7@ <@,'$*READ INTO BUF$+'AP@'READ CHARACTERS +6-C:7,,)%}+;$AR&AV$P:'AV,;ASP:'AV, +6-%@&%+S6-A%$P:'A%,SDON'T READ A PARTI)&}AL SECTOR AT THE END OF THE BUFFER*+;$AV&AV$P:'AV,;AWP:'AV,4+6-?:C:,,>+%%6-F:AV)'},%AV$F:AW,C++6-F:AQ,(!@*A6+$H+68,-8,%R+ 6-%f+$.WRITE FROM BUF$.()(}Af@(WRITE CHARACTERS.6-C:7,,.;$Ah&AV$P:'AV,;AiP:'AV,/ 6-8,/;$))}Ar&AV$P:'AV,;AsP:'AV,/6-?:C:,,&/.F:Ag,!@+( WRITE ERROR:.&0/6-%)*}8,:/$ NGET NEXT(ALPHA) FILE NAME*N##FILENO = INDEX OF LOWEST NAME4N#6-6@#6. ||||||||||||>N-@)+}HN8,B RN..27$@&@<$@,B \N&&6.7$@&@<$@,fN 6-Q),} Q$D:DUPL2DRN..27$@&@<$@,B \N&&6.7$@&@<$@,fN 6-Q(8(8DSKINVBUFDCDCOMNHSECTODUMMDSTATDBYPATPATPAT1PAT2ISECTOANSBUFHBUFLDVSTAOLDCMOUTPUDFORADO-.}UDIISISECMEMLOIISECTTOIMEMLIAMEMLORETRIERLIELIERRETRBUFIBUFIIREADYWSECTOVPOnA-/}h@A!BQ@ A @rAv-0}AF@@B`A !"AuR-1}#@$%&'()B*+A ,@D@'@@9DCO-2}PY. 1981 - DAVID B. MANNf;@,+C($ This program will COPY ANY disk.UARfTURN ON CURSO-3}RX0((ԠӠ̠Ϡ٠Ԡ<6-@X? "DESTINATION DISK(1,2,3((INPUT DOUT:REM OUTPUT DRIVE NU-4}MBER=%(FORMAT DESTINATION DISK(Y/N)/ BP=6-&@ @+('(HOW MANY RETRIES ON ERRORS +d/-5};@,6.h S`/PLA,JSR E453,RTSe6-I:,&APf06-P:'A(,"6-$A(06-&@n ;-6},x%6-@$@$@%768!%@@!DRIVE 1*6-P:C:,'AV,*6-C:,&$AV%@-7}%@776-@$@$@%@$@%@," A0 +/ B-8}6-%6-/+*-@A *READ ALL SECTORS"6-F:@,$-@-9}$( RSECTOR =  OAR@!"3ARK(INSERT SOURCE DISKO1 B1SET MEMOR-:}Y LOCATIONS TO READ INTO# A`#READ ANOTHER SECTOR A%ERROR HANDLING&R 6@& A-;}RON THE FIRST ERROR IN A SEQUENCE DUMP MEM0! A S:'A( A:OVERFLOW OF AVAILABLE ME-<}MORYT"A  AU6-%A(W AX 6-6-[6-6-F:@,]EAR-=}!-@$(A(INSERT DESTINATION DISKElDAR@!-@/6-%@D( WSECTOR =   B->}6-&@ AP WRITE THE SECTOR!  6-%A(! A 6- 5((!-?}AR$5RESTORE CURSORMAKE DISK HANDLER CALL INPUT: OUTPUT:DSTATS=STATUS`6-P:'AV-@},j"%@&$AV"AUX1t%@AUX 2~6-?:C:,,6-F:%@,$ HANDLE ERRORS -A})@)(SECTOR=STATUS= +"@ A&+NO ERROR RETURN 6-%@ 1 MORE ERROR 9  6-B}-@ A'9NOT YET TOO MANY ERRORS 6-6@ A'( &6-6-&NO ERROR $ D-C}ISK FORMAT $ (INSERT DESTINATION DISK$ (FORMATTING DISK !%@@3! A "@*"-D}$ ,,(STATUS= BAD SECTORS='@ $PUT SECTOR WITH VERIFY<%@@<87=WRITE/VERIFY -E}80=WRITE/NO VERIFY 6- A $pGET SECTORz%@@ 6- A$* SET LO-F}CATIONS TO READ INTO*6-+%C:,,*$6-P:'AV,$6-&$AV+%@ +%@+$:( TEST -G}COMPLETE:a5#@@K:5AdAUa"F:Ad,"AU" BPa)@@-H}$D:DUPANY@K:5AdAUa"F:Ad,"AU" BPa)@@,MLPAPEKSSSSDD@@@A6AB@@@5AC @ 1J} @ @ ;@d,;@,JJ6.@hhh S䩀mmm  m  8Х̥`11K}-@@d-%A5@:7<,,1 ((}SOURCE DRIVE #?6-P:I:,'A(&@,V6-F:AE,%@1L}b6-@n6-Ax@Ay- (DESTINATION DRIVE # 2_-@A ;61M}-F:Ax,%AV$F:Ay,I!A &_6-A &%@7u6-F:Ax,!6-F:Ay,-Ax9Ay1N}EAiWAp@iAruAs<4 "0("}INSERT SOURCE DISK, PRESS RETURN4=6-?:A61O}<,Au6-F:Ax,!6-F:Ay,-Ax9AyEAiWAp@iAruAsF1P}9 "5('}INSERT DESTINATION DISK, PRESS RETURN9G6-?:A6<,P( %(} (& D:1Q}FASTCOPY('}INSERT DESTINATION DISK, PRESS RETURN9G6-?:A6<,P( %(} (& D:0 oSTRINGSCREENINZTEMPN 5S} $$CARTCOPY BY DAVID YOUNG 070581&&;@p,;@ ,;@,(2$$****** MOVE SCREEN DATA ******<5T}F+-@@ "'67,.>:,+ P''104,104,104,133,106,32,246,243,96Z"F:A,A(" APd65U}-?:C:,<A(,nx!!****** LOAD SPECIAL *****!!****** DISK INTERFACE *****7(}WAIT... A@%#5V}A`7@@L" }DO YOU NEED INSTRUCTIONS&5B:,"B >:A%,L A37@<@,05W}Y) >:A%,3 A%%  ٠٠Ġ- - "THIS PROGRAM IS USED TO COPY CART-((  RIDGES TO5X} DISK. THE PROGRAM THAT((  WAS IN THE CARTRIDGE CAN THEN BE++ #RUN WITHOUT THE CARTRIDGE. THE ONLY++ #REQUIREMENT5Y} IS THAT YOU HAVE 48K OF.. &RAM IN YOUR MACHINE. IF YOU DON'T HAVE++ #48K, RUN DOWN TO THE COMPUTER STORE++ #AND 5Z}GET IT. THIS PROGRAM ALONE WILL MAKE IT WORTHWHILE!0 0 %NOW, ΧԠϠ UNTIL DIRECTED"-- %TO. YOU WIL5[}L OPEN THE LID OF YOUR 800,.. &AS IF YOU WERE GOING TO CHANGE A CART-6++ #RIDGE (YOU WILL USE THE 'PULL OPEN'@,, $LA5\}TCH RIGHT ABOVE THE KEYBOARD). YOUJ-- %WILL THEN LOCATE THE INTERLOCK SWITCHT.. &LOCATED IN THE LOWER RIGHT-HAND CORNER5]}^,, $OF THE SLOT AREA. TO POWER THE UNIT,h.. &YOU MUST USE SOMETHING POINTED TO HOLDr-- %THE SWITCH DEPRESSED. A PEN5^}CIL WEDGED|?. &IN THE HOLE WORKS FINE. ԠΩ2? >:A%,(%  ٠٠Ġ( ** "AFTE5_}R YOU HAVE SOMETHING TO.. &HOLD THE SWITCH DOWN, RERUN THIS PROG-++ #RAM AND PROCEED WITH THE NEXT PARA-** 5`}"GRAPH. IF YOU FULLY UNDERSTAND THE,, $PRECEDING INSTRUCTIONS, EXECUTE THEM'' NOW. DON'T WORRY! ITS ALL SAFE!1 5a}1 &NOW THAT YOU HAVE THE UNIT POWERED AND++ #CARTRIDGE SLOTS EXPOSED YOU CAN USE++ #THE LEFT SLOT TO COPY BASIC AND5b} THE-- %RIGHT SLOT (AND ONLY THE RIGHT SLOT!)-- %TO COPY ANY OTHER CARTRIDGE. YOU WILL-- %SIMPLY CAREFULLY INSERT5c} THE CARTRIDGE** "WHEN TOLD TO DO SO BY THIS PROGRAM,, $(BUT NOT BEFORE!) AND GIVE IT A NAME-- %WHEN PROMPTED. AF5d}TER THE CARTRIDGE IS&** "COPIED TO DISK YOU CAN USE THE 'L'0-- %OPTION OF DOS TO RUN IT. MORE ON THIS:_+ #LATER. 5e} ԠΩ/< >:A%,_  ٠٠ĠD- - "IF YOU WANT THE PROGRAM TO BOOT UPN5f}.. &AUTOMATICALLY FROM DISK WHEN YOU POWERX.. &UP, GIVE IT THE NAME 'D1:AUTORUN.SYS'.b-- %THE ASSEMBLER/EDITOR AND BAS5g}IC ARE ANl.. &ESPECIALLY USEFUL PAIR TO HAVE ON DISKv++ #BECAUSE YOU CAN FLIP BACK AND FORTH.. &BETWEEN THEM WITHOU5q}B%DOS SYSB*)DUP SYSB SRAMDISK COMB\AUTORUN SYSB7^MENU BASB DATAMAKEBASB COMPARE BASBPROTECT BASBAUTONUM OBJB#DISCDUP BASB+DISKDUP2DRVB-DUPANY BASB IFASTCOPYBASB6RCARTCOPYBASBLOCKPIK BASBPCOPY BASBFILECOPYCOMB,PIRATE BASB FILEMAKEBASBFILEMAKEDOCB"COPYDISKDOCB &COPYDISKOBJB;1CRACKINGDOClDISKSCANBAS$UNBOOT BAS3BOOTOFF OBJ#EMAKEBOOT  hQKMENU SYS sFILEBOOT QUIKCOPY PASSWORD UTILITY DOCPASSWORDDOCT POWERING THE UNIT-- %DOWN, THUS PRESERVING THE CONTENTS OF++ #RAM. TO DO SO, SIMPLY GO TO DOS AND** "USE THE 'L5r}' OPTION TO RUN WHATEVER,, $'CARTRIDGE' YOU DESIRE. IT IS RECOM-,, $MENDED THAT YOU USE MY MODIFIED VER-.. &SION 5s}OF DOS (MY NAME IS IN THE HEADER).. &BECAUSE THE 'RUN CARTRIDGE' OPTION (B)** "HAS BEEN MODIFIED TO BE COMPATIBLE,5t}, $WITH THE PROGRAMS THAT DID RESIDE IN.. &THE CARTRIDGE ROMS BUT ARE NOW RUNNING?. &OUT OF RAM. 5u}2? >:A%,+ (  ٠٠Ġ+ ** "IF YOU ARE GOING TO COPY THE BASIC ,, $CARTRIDG5v}E, IT IS ALREADY IN THE LEFT** "SLOT. IF YOU ARE GOING TO COPY ANY ,, $OTHER CARTRIDGE, CAREFULLY INSERT IT*,, $INT5w}O THE RIGHT SLOT NOW. IF THE KEY-4-- %BOARD WILL NOT RESPOND AFTER YOU HAVE>&& DONE THIS, THE SYSTEM HAS BEENH** "G5x}LITCHED. REMOVE THE CARTRIDGE ANDR-- %TURN THE POWER OFF AND BACK ON AGAIN.\((  RERUN CARTCOPY TO THIS POINT ANDf-* 5y}"TRY INSERTING THE CARTRIDGE AGAIN.- p?. & Ԡ2? >:A%,z%%  ٠5z}٠Ġ1(1(&INSERT FORMATTED DISKETTE IN DRIVE #1.5 1 &SUPPLY NAME(D1:BASIC,D1:STARRAID,ETC.)51B:,5{}"' נӡ1 A R37@<@,0:*7@<@,0:H נӡR A L5|}-+7@<@,0D,)+B:,!@,B נӡL A  67B:,%@,.>:AU,****** OP5}}EN FILE ******* @@+-@@"'67,.>:,+ ##***** WRITE FILE 5~}HEADER *****255,255,0,96,255,127$$6-?:A8:,+ $$6-?:A85}:A%,2  ٠٠Ġ, , !NOW TURN THE POWER OFF AND REM5}OVE** "ALL CARTRIDGES. TURN POWER BACK ON,, $AND USE THE 'L' OPTION OF DOS TO RUN,, $THE PROGRAM YOU JUST COPIED 5}TO DISK.++ #FOR EXAMPLE, IF YOU HAVE JUST SAVED** "BASIC UNDER THE NAME OF 'D1:BASIC' .. &THEN, BECAUSE NO CARTRID5}GE IS PRESENT,,) !THE DOS MENU APPEARS ON POWER UP:, ++ #DOS: SELECT ITEM OR FOR MENU( YOU: L (RETURN)5}2!! DOS: LOAD FROM WHAT FILE?< YOU: BASIC (RETURN)F, , !IN SHORT, YOU CAN USE CARTCOPY TOP,, $TRANSFER A PRO5}GRAM FROM CARTRIDGE TOZ** "DISK. YOU THEN USE DOS TO LOAD THEd** "PROGRAM FROM DISK TO RAM. DOS WILLn-- %EXECUTE IT 5}AUTOMATICALLY UPON COMPLE-x&& TION OF THE LOAD. Mach Spass! A00,6,51,6$$165,106,201,144,144,425},169,144!!133,106,32,246,243,173,0,96238,14,6,208,3,238,15,6 141,0,160,238,25,6,208,237238,26,6,169,192,5}77,26,6!!208,227,32,49,6,108,250,19196,108,254,191224,2,225,2,0,6 #AP" "-" 5}"$1536,1661"0,0,104,169,11,141,82,3, 169,128,141,84,3,169,6,1416""85,3,104,133,213,104,133,212@""56,1045},170,104,229,212,141,0J6,138,229,213,141,1,6,162T 125,173,0,6,56,233,125,141^0,6,173,1,6,233,0,141h1,6,1765},7,24,173,0,6r""105,125,170,138,168,136,48,8|""177,212,153,128,6,24,144,245##138,101,212,133,212,169,0,101""2135},133,213,138,141,88,3,1690,141,89,3,162,16,32,86 228,16,10,173,83,3,133,212!!169,0,133,213,96,169,255,775}1,6,208,171,240,237 D:CARTCOPY9,3,162,16,32,86 228,16,10,173,83,3,133,212!!169,0,133,213,96,169,255,774&@AA 9} 9} !"#$9}%&'()*+,-./012349}56789:;<=>?6-6-@'6-@9}36-@?6-@K6-@W6-@c6-@o6-@{6-@ 6-A6-@6-@9}6-@6-@6-@6-@06-@p6-@6-@6-A(6-A'6-AU369}-AV?6-B2yK6-A`W6-Ac6-Ao6-A`{6-A6-A6-A 6-Aic6-9}Ap6-Aq'6-Ar36-As?6-AxK6-AyW6-A c6-A PK  6-6-6-6-&9};,26.h S`D6-P:I:,',$&K;,< 6-'  AF -6-'P3 +&P:,,$'9}P:,-3.6-?:C:,,6-%!6-$%'-.(B F:,-&(ERROR #F:,>( AT SECTOR #9}B '"P:',   "    6-6-%  -6-'3 +&P:,,$'P9}:,-3.6-?:C:,,6-%!6-$%'-.(,B F:,-&(ERROR #F:,>( AT SECTOR #B9} 6#'"P:',6-%  #$@"AJ  6-6-% h<67<,.67<,.'67,.7,06-C:9},96-C:,<$;  - ( the lockpik&-;( by c.c.i. - -#(copyright c - AT -9}%(DOS 2 IS RECOMMENDED+-F(INPUT 1 OR 2 DRIVESTK:7  -(?)3 @I)!@P9}7 C BEg-*-6-&@H5-9 ?"C @w" -  -(INSER9}T!--(DISK% F:,"-%( ORIGINATING% F:,"-%( DESTINATION   ! -F:,"9}!(READING F:,"(WRITING -( SECTOR # $M  -(INSERT3( ORIGINATING9}M( DISK IN DRIVE #1O(( INSERT5( DESTINATIONO( DISK IN DRIVE #2:    9}X( +@00%0($8  -#( DO NOT USE 8( LOCKPIK TOT(( PRODUCE 9}9( ILLICIT COPIES OF T( COPYRITED SOFTWARE3( ((( HAPPY PROGRAMMING!, 0 3% M --A9}AP)2;2%@`C0M0%>2  22'0/02$9 -6-9}-!0+296-%@ $ -   !2$$& -2 #2&$ F:,"9}$ F:,"+ D:GOOD   !2$$& -2 #2&$ F:,"8/WXH7JKBUFIKDSYEMAOSPLIHAPNADDYROOKDSNTOFSEBYTXSIZCIKKXK1COERAS=} =}@ Au&+& POLYCOPY-=}ATARI version 2.06,  (Space for P:'A%, sectors)/ 66-6 AP"@@!   AU!"=}@%# A5(< 6-&! Type 'Y' if o.k.+ A5. <A5-% 6-6-6-6-% @U2=}  A%7 6-C:,6-<% !6-& AE% A@A, 6- A0 @(, F"  L=}oading" AK; @  6-1  Contin'g ; AP/ 6-F:A,/ApA=}U@   not found,@ "..do you want to try another disk?Z? AP "+ Insert new disk5 A0? @e=}_ 68<,-6-% @`d68<,-iG6-?:<<@<<,)6-F:AQ,G A()"A6An=}  Ap @s0  size=68<,-0"A6A%x /6-}   + 6-%6-=}&!!6-%+ @`) AE6-%)!@` @P " $&  Insert 'to' disk& =}A0'6-8<,6-8<,'"A - 6- A06-@%"-6-%; A ""=}1  Append'g ; Au Writing   size=6-?:<<@<<,6-F:Ag,* A =}* A(A #Ab Ap# A G/ &Disk full, try another? 9 A5GA5=} A @36  " Insert new disk, A06 AU" 6-6-6-'" @P=}  6-% AU$, 6.D:"67,.7$%<$%,, A`  䡡 AU"@=}  a A%)@D:*.*/ 56-<6.a  íѭ! !B:, =}@A 4 6.-@$"@467B:,%,.. 7<,4 Au67B:,%,.7<, 4=}DOS.SYSAU) B:, )67B:,%<,. - 6- A-6-A:7@<@,,"M  %@=} +@"0 <@(C ?M A@'*"@g >:@0,C* A, >:,"@A =}1 AU6'67B:,%,.6-%'"A ; AU@  $E Insert 'from' diskJ , press any=} key!O A@ >:,$T# )"@''# A5Y$^ A@ $c%  Any more files?% A5=}h46-F:Ad, Ad&4"@(A5m$rC () I/O error on = ...skipping to next file!@ =}C$w""塛|*+-@@*  ŠS6-6-@#6-%+6-%36=}-%;6-$G6-AVS6-B16-@-AV#6-&1K:,6-@,;@,;$,9&=}<,B6-A `-@B!")%- BA F:A,!!104,104,104,10,10,10,10,170!!104,104,157,66,3=},104,157,693,104,157,68,3,104,157,733,104,157,72,3,32,86,228189,72,3,133,212,189,73,3133,213,966=}-AB6-@5R6-Au6-APR堧䠧易󡠛5 A`5=}F >:A%, #-@' + 4 CONT:-F@&- 6-I:,=}&;,#6-&- @ D:PCOPY.BAS #-@' + 4 CONT:-F@&- 6-I:,</-- %WHEN PROMPTED. AFTER THE CARTRIDGE IS&** "COPIED TO DISK YOU CAN USE THE 'L'0-- %OPTION OF DOS TO RUN IT. MORE ONA} THIS:_+ #LATER. ԠΩ/< >:A%,_  ٠٠ĠD- - "IF YOU WANT THA}E PROGRAM TO BOOT UPN.. &AUTOMATICALLY FROM DISK WHEN YOU POWERX.. &UP, GIVE IT THE NAME 'D1:AUTORUN.SYS'.b-- %THE AA}SSEMBLER/EDITOR AND BASIC ARE ANl.. &ESPECIALLY USEFUL PAIR TO HAVE ON DISKv++ #BECAUSE YOU CAN FLIP BACK AND FORTH.A}. &BETWEEN THEM WITHOUT POWERING THE UNIT-- %DOWN, THUS PRESERVING THE CONTENTS OF++ #RAM. TO DO SO, SIMPLY GO TO DOA}S AND** "USE THE 'L' OPTION TO RUN WHATEVER,, $'CARTRIDGE' YOU DESIRE. IT IS RECOM-,, $MENDED THAT YOU USE MY MODA}IFIED VER-.. &SION OF DOS (MY NAME IS IN THE HEADER).. &BECAUSE THE 'RUN CARTRIDGE' OPTION (B)** "HAS BEEN MODIFIA}ED TO BE COMPATIBLE,, $WITH THE PROGRAMS THAT DID RESIDE IN.. &THE CARTRIDGE ROMS BUT ARE NOW RUNNING?. &OUT OF RA}AM. Ԡ2? >:A%,+ (  ٠٠Ġ+ ** "IF YOU ARE GOING TO COPY THA}E BASIC ,, $CARTRIDGE, IT IS ALREADY IN THE LEFT** "SLOT. IF YOU ARE GOING TO COPY ANY ,, $OTHER CARTRIDGE, CAREFULA}LY INSERT IT*,, $INTO THE RIGHT SLOT NOW. IF THE KEY-4-- %BOARD WILL NOT RESPOND AFTER YOU HAVE>&& DONE THIS, THE SA}YSTEM HAS BEENH** "GLITCHED. REMOVE THE CARTRIDGE ANDR-- %TURN THE POWER OFF AND BACK ON AGAIN.\((  RERUN CARTCOPY TA}O THIS POINT ANDf-* "TRY INSERTING THE CARTRIDGE AGAIN.- p?. & Ԡ2? >:A%,A}z%%  ٠٠Ġ1(1(&INSERT FORMATTED DISKETTE IN DRIVE #1.5 1 &SUPPLY NAME(D1:BASIC,D1:STARRA}AID,ETC.)51B:,"' נӡ1 A R37@<@,0:*7@<@,0:H נA}ӡR A L-+7@<@,0D,)+B:,!@,B נӡL A  67B:,%@,.>:AUA},****** OPEN FILE ******* @@+-@@"'67,.>:,+ A}##***** WRITE FILE HEADER *****255,255,0,96,255,127$$6-?:A8A}:,+ $$6-?:A8:A%,2  ٠٠Ġ, , !NOW TURA}N THE POWER OFF AND REMOVE** "ALL CARTRIDGES. TURN POWER BACK ON,, $AND USE THE 'L' OPTION OF DOS TO RUN,, $THE PA}ROGRAM YOU JUST COPIED TO DISK.++ #FOR EXAMPLE, IF YOU HAVE JUST SAVED** "BASIC UNDER THE NAME OF 'D1:BASIC' .. &TA}HEN, BECAUSE NO CARTRIDGE IS PRESENT,,) !THE DOS MENU APPEARS ON POWER UP:, ++ #DOS: SELECT ITEM OR FOR MENUA}( YOU: L (RETURN)2!! DOS: LOAD FROM WHAT FILE?< YOU: BASIC (RETURN)F, , !IN SHORT, YOU CAN USE CARTCOPY TA}OP,, $TRANSFER A PROGRAM FROM CARTRIDGE TOZ** "DISK. YOU THEN USE DOS TO LOAD THEd** "PROGRAM FROM DISK TO RAM. DOS A}WILLn-- %EXECUTE IT AUTOMATICALLY UPON COMPLE-x&& TION OF THE LOAD. Mach Spass! A00,6,51,6$$A}165,106,201,1ECUTE IT AUTOMATICALLY UPON COMPLE-x&& TION OF THE LOAD. Mach Spass! A00,6,51,6$$@Q4HBABBADCNNBUBUFASELSEFSEWAIN12BUFLIMENPN25NYENBNN1LODECHEXSNBYN25CBLNNN1NE}4SCANSECGETSECPUTBLKAVAIBUFWWWWWSECNAe@B9c E} B B7UA(BA B7AV@BU6@E}@^B74 AU!AU"Ad#B85$@%@&@'@H(cE})x##*--+,A-He./0123 A  * -68,-E} 6-$6-*6- B A P-"!6-$(>(INSERT SOURCE DISK, B (6-?:<<,"6-%( @E}*(CAN'T READ SEC !6-%*68,- ! @  6-& @  "((INSERT DEST DISK, " E}@ 6--"8,"6-%6( SKIPPING SEC @ @@06-?:<<,0(CAN'T WRITE TO SEC # 6-%(E}  6-$2Z(#(INSERT DISK TO FORMAT, ' G6-?:C:h! Sԩ`,,M"V(DONEZ 7O 6-%6-F:ArE},%F:As,$5-@cO6-F:%$,%F:%$%,$9"BU5@e< 6-%68,- &A0!@b,E}(MORE THAN 62 BAD SECTORS0 FS0(% BAD SECTORS -- LIST SECTOR NUMBERS? =)@H@:Y,O(NOS K5 (YESE}"-@6@*(8,. 1(5 Z6 @("( WHICH SECTOR, A 6 @[+((SECTOR  IS E}!(+(NOT \(A DOUBLE ], &-6-?:<<,,@^. -$  6-?:<<%,.@E}_*-%A'!F:,F:%,'6-*$`  6-$b' ' ((ERROR  d 6-%! n\ 6-6-E}?:<<,!(@w.6-8 AR(ERROR  AT SEC \ As$x36-?:<<8,,!A') AE}3 A / -6-%"A() A/6-#F:%,8,6-%# A 7 @w6-!6-&E}' /6-%76-&T A$(GOT ONE AT SEC *6-4 AB(, BYTE J6-%T A ,C A("(E} WHICH SECTOR, A 6 @C(@@ -%%F:, h!((INSERT DEST DISK, ! |8 6-F:,E} $"@('(4(QUITTING8 76-?:<%<%%,)6-?:<%<%%,7"A$6-?:<%<%%,$"E}A& @(("(CAN'T DO& H A(.(WHICH SECTOR TO MAKE BAD8 A >6-H Br(,(E}!ATTACH A PIECE OF TAPE TO DISK SOT(#THAT IT HANGS OUT AFTER THE DOOR ISr(CLOSED. THEN INSERT DISK;( AND HIT8(E}#'RETURN' TO BEGIN OR 'ESC' TO ABORT;(/ )"@'((ABORTED+(/ AUAD(*(NOW PE}ULL AND RELEASE TAPE UNTILD(SECTOR IS WRITTEN BAD: 6-F:, $"@('(3(ABORTED6(: 16-?:< &6-6-&(:(INSERT DISK TO BE SCANNED, > 0( (( SCANNING...(& F }A0 A  6.$ )!$9 6-6-A@6-#--"* 36-96-:6-P:',6-&$ 6F}-%,!@W:6-%@&67,.>:,6-%6-'# &$%6-B:,""6-A%$"7<,0$6F}-O:P:A:,,,"$    '6-'4X 6-6- -6@06-@:7<,,&@!* @#N6-&@X A"fF} )!@'6-' 6-%$6-$ $6y  6-6-$}( HIT 'RETURN'} )"AUF}$ }!"@'''''! %} B  D:PIRATE.BAS D:PIRATE.BAS0IT 'RETURN'} )"AUDW56SNUNSEDCCDSKINBUFADKSECHDFILELOCLOCJ} @  +bbCOPY NSEC SECTORS FRJ}OM SECTOR # SNUM ON ANY DISK ONTO DOS2 FILE WITH BINARY LOAD FILE HEADER :4(,}ENTER STARTING SECTOR # & NUMBER OF SECTORSJ}:!! @)!A@## @)%!A @(6-@$AV26-C: Sh`,<M;AJ}($,%67A($,. >67@<@,.M67@,.F'Ai@'Ap@P 6-C:,U:;J}@,6(! INSERT SOURCE DISK, PRESS :Z-%&@d* 6-6-P:'AV,*6-&AV$nArJ}Asx* 6-6-P:'AV,*6-&AV$AxAy 6-?:,6-%A( &&J};@,9@,;@,+'(ENTER LOAD POINT (4 HEX DIGITS)+-@@A6-@:7,,&@HAJ} )+!@ * @,A1!@6-&@1!@A 68,- (ENTER DOS FILJ}E NAME@<(4INSERT DESTINATION DISK (DOS 2 FORMAT), PRESS @ @@)*@AUJ})*@AU"q%6-@$8@,%8@,2*@T6-@$8@,%8@,a*@q6-J}%AV$,\6-%A($&@!6-26-P:'AV,B6-&AV$O*@\*@6(@@J}@J( COPY COMPLETE D:FILEMAKEAV,B6-&AV$O*@\*@6(@@H4 FILEMAKE ======== A very useful utility for making binary files from whole disks or any N }number of sectors. To use, input starting sector and the range of sectors to be copied onto a DOS disk. This may be N!}a little advanced for the new user, but some day you may find a use for this program. onto a DOS disk. This may be LZ COPYDISK ======== This binary programs will copy a disk that is protected by "bad sectorinR#}g" that DOS or many other sector copiers will not. If the disk does not copy using COPYDISK, then you can assume that aR$}nother protection method is being used. IMPORTANT: Remove basic and use the "L" option from DOS to load this programR%}.ther protection method is being used. IMPORTANT: Remove basic and use the "L" option from DOS to load this programP59 **/ * ``L -IN/OUT ERROR,STATUS: PROGRAM TERMINATED.h*h*h BhIhHhEhD V V'}*H*H`)jjjji0*)i0*hhH*HPHHH *L.h*h*hBhIhHhEhD VЬ*H*H` B VЗ`ERROR,V(}SECTOR # i+ +}+~+h+ +++nH+HPHHH *`)jjjji0 ++)i0 ++`:`i`h+ i+ j+k+l+V)}m+R@L,1 Y`L+L*DISK,TYPE}BAD SECTOR DISK COPIER NUMBER OF DRIVES?ILLEGAL VV*}ALUEPUT SOURCE IN DRIVE 1,DEST IN DRIVE 2THEN PRESS RETURN TO STARTINSERT SOURCE DISK,HIT RETURNINSERT DEST. DISK,HIT RETV+}URNDONE WITH COPY,ANOTHER COPY?.H,HPHHH *0H,HPHHH *RH,HPHHH *#H,H HHH ,+#,80",#,1O2V,}eH,HPHHH *L0-sH,HPHHH *H,HPHHH *#H,H HHH ,+h+i+j+/k+8i+L.8h+L.",V-}$H,HPHHH *#H,H HHH ,+-,-,85l+Rm+ +j+ij+k+ik+h+ih+i+ii+-,L.",8$H,HPHHV.}H *#H,H HHH ,+j+/k+h+8h+i+i+",l+-,-,80Pm+ +j+ij+k+ik+h+ih+i+ii+-,L.j+/V/}k+L-H,HPHHH *#H,H HHH ,+#,YLL -INATION CANT BE DOS.SYS0 0H{ $22Δ $2V0}8/L /) $2;;5* ; ;L*;YS0 0H{ $22Δ $2TL ********************** *THE ATARI KING'S CRAC* **********************K*********** *ING CORNER* Z2} *********** INSTRUCTIONS ------------ To make your cracked copy of any Z3} of these commercial titles, just sector copy the original to another formatted disk ignoring bad sectors. Then load uZ4}p a disk editor (eg. Disk Wizard II or Diskey) and load the sector(s) for that program, then go to the hex byte speciZ5}fied in the info below and simply change it to the value next to "Fixx:". Then write the revised sector back and it wilZ6}l work! NOTE: Please don't be a software pirate! Use the following info to make a handy backup copy of your best lZ7}iked programs for your own use only. Please be responsible. DATA INFO --------- [1] Name:Z8}Cosmic Balance Comp:SSI Sect:527 Byte:$45-$47 Fixx:$4C,$30,$34 [2] Name:Cosmic Balance II Z9} Comp:SSI Sect:122 Byte:$34 Fixx:$60 [3] Name:Broadsides Comp:SSI Sect:685 BZ:}yte:$2E-$30 Fixx:$EA,$EA,$EA [4] Name:MMG Basic Compiler Comp:MMG Sect:209 Byte:$2A FiZ;}xx:$D0 [5] Name:Schematic Designer Comp:Alpha Systems Sect:57 Byte:$71 Fixx:$F0 [6] Name:Z<}Imperium Galacticum Comp:SSI Sect:43 Byte:$60 Fixx:$60 [7] Name:Kampgruffe Comp:SSI Z=} Sect:249 Byte:$53 Fixx:$60 [8] Name:Adventure Writer Comp:? Sect:199 Byte:$69-$6EZ>} Fixx:$A9,$90,$8D,$03,$03,$60 Sect:233 Byte:$68-$6A Fixx:$4C,$C8,$2A [9] Name:Ultima II Z?} Comp:Origin Systems Sect:2 Byte:$54-$58 Fixx:$EA,$EA,$EA,$EA,$EA [10] Name:Ultima III Comp:OZ@}rigin Systems Sect:211 Byte:$70 Fixx:$60 [11] Name:C.O.S. Comp:Alpha Systems Sect:51 ZA} Byte:$0B Fixx:$F0 [12] Name:Colonial Conquest Comp:SSI Sect:371 Byte:$60 Fixx:$60ZB} [13] Name:War in Russia Comp:SSI Sect:462 Byte:$40 Fixx:$60 [14] Name:MicroLeague BaseballZC} Comp:? Sect:275 Byte:$43-$45 Fixx:$EA,$EA,$EA [15] Name:NAM Comp:SSI Sect:5 ZD} Byte:$6A Fixx:$B0 [16] Name:Great American Road Race Comp:Activision Sect:2 Byte:$6D ZE} Fixx:$30 [17] Name:Field of Fire Comp:SSI Sect:9 Byte:$45 Fixx:$60 [18] Name:Galactic AdveZF}ntures Comp:SSI Sect:623 Byte:$48-$4A Fixx:$EA,$EA,$EA [19] Name:Breakthrough in the ZG} Ardanes Comp:SSI Sect:318 Byte:$3A Fixx:$F0 [20] Name:Fortress Comp:SSI Sect:ZH}45 Byte:$60-$62 Fixx:$8D,$03,$03 [21] Name:Knights of the Desert Comp:SSI Sect:163 ByteZI}:$54-$56 Fixx:$8D,$03,$03 [22] Name:T.A.C. Comp:Avalon Hill Sect:25 Byte:$16-$17 Fixx:$ZJ}EA,$EA [23] Name:Print Wiz Comp:Allen Macroware Sect:105 Byte:$3E Fixx:$40 [24] Name:FinancZK}ial Wizard Comp:Computari Fixx:Make "OLDCHECK" listable. Change line 2220 to: ZL} IF VA<>1 THEN RUN [25] Name:Home Accountant Comp:Continental Software Fixx:Load main file, change ZM} line 22500 to: X=USR(AB): IF PEEK( QRT)<>1 THEN X=USR(AD): GOSUB 381ZN}0: SL=49: POP: RETURN [26] Name:Tigers in the Snow Comp:SSI Fixx:Make "OZO}PENING" listable Change line 2 to: IF PEEK(771)=1 THEN 99 [27] Name:Wayout Comp:Sirius SofZP}tware Sect:1 Byte:$11-$16 Fixx:$13,$8D,$0B,$03,$A9,$00 [28] Name:Battle of Shiloh Comp:SSI ZQ} Fixx:Make "DRAPEAU" listable Change line 62 to: IF A=1 THEN 70 Also delete line 63ZR} [29] Name:Prisoner Comp:Edu-Ware Sect:124 Byte:$38 Fixx:$D0 Sect:129(Side 2) BytZS}e:$41 Fixx:$D0 Sect:256(Side 2) Byte:$47 Fixx:$D0 [30] Name:Snooper Troops Comp:SpinnakZT}er Software Sect:610 Byte:$54-$59 Fixx:$00,$8D,$0A,$03,$A9,$5A [31] Name:Snooper Troops II ComZU}p:Spinnaker Software Sect:639 Byte:$15-$1A Fixx:$00,$8D,$0A,$03,$A9,$5A [32] Name:Sands of Eygpt ZV} Comp:Datasoft Sect:17 Byte:$00-$03 Fixx:$60,$03,$42 [33] Name:Golf Classic/Compubar Comp:EdZW}ufun Sect:146 Byte:$2E-$33 Fixx:$00,$8D,$0A,$03,$A9,$40 Sect:243 Byte:$6C-$71 Fixx:ZX}$00,$8D,$0A,$03,$A9,$40 Sect:306 Byte:$04-$09 Fixx:$00,$8D,$0A,$03,$A9,$40 [34] Name:Bookkeeper ZY} Comp:Atari Sect:140 Byte:$33 Fixx:$0B [35] Name:Indus Albert E. Spreadsheet CompZZ}:Indus Sect:4 Byte:$60-$61 Fixx:$01,$F0 [36] Name:Crisis Mountain Comp:Synergistic Software Z[} Sect:109 Byte:$05-$0A Fixx:$1C,$9C,$29,$44,$27,$99 [37] Name:Blade of Blackpool Comp:Sirius SoftZ\}ware Sect:707 Byte:$30-$33 Fixx:$30,$03,$EA,$EA Sect:708 Byte:$06 Fixx:$40 SZ]}ect:703 Byte:$0F Fixx:$01 [38] Name:Run for the Money Comp:Scarborough Sect:519 Byte:$5Z^}E-$5F Fixx:$01,$F0 [39] Name:Hodge Podge Comp:Artworx Sect:567 Byte:$67-$6A Fixx:$03,$0Z_}3,$03,$03 [40] Name:Strip Poker Comp:Artworx Sect:714 Byte:$3C-$3F Fixx:$03,$03,$03,$03 [41Z`}] Name:Word Race Comp:Don't Ask Sect:708 Byte:$50 Fixx:$00 Byte:$55 Fixx:$40 [42Za}] Name:Computer Ambush Comp:? Sect:1 Byte:$7C-$7D Fixx:$18,$60 [43] Name:Six Gun Shootout Zb} Comp:SSI Sect:43 Byte:$16-$17 Fixx:$18,$60 [44] Name:Baseball's Best Comp:? Sect:128Zc} Byte:$3D Fixx:$10 [45] Name:Atari Music II Comp:Atari Sect:1(Both sides) Byte:$1A Zd} Fixx:$01 [46] Name:Dragon Mix Comp:? Sect:315 Byte:$13 Fixx:$00 [47] Name:Nazz CoZe}mp:? Fixx:Copy sector 281 to sector 361 and copy file Nazz to another disk then RuZf}n the file to play the game [48] Name:Word Processor 1.0 Comp:Atari Sect:42 Byte:$12 Zg} Fixx:$60 [49] Name:Ultima IV Comp:Origin Systems Sect:244 Byte:$32 Fixx:$03 [50] Name:MiZh}nd Shadow Comp:Activision Sect:414 Byte:$15 Fixx:$EA [51] Name:Rails West Comp:SSI Zi} Sect:492 Byte:$3C-$3E Fixx:$8D,$03,$03 -------------------------------- Well, That's it folks!!! I Zj}did all these myself and take full credit for all of them. The tools used were:Omnimon Xl and Disk Wizard II More coZk}ming soon on... The Sleepy Hollow BBS (505)266-9509 300/1200 + over 1 Meg. The Sandman's Databaseard II More coXlNOOOCCCCCCCCCCC1C1C1C1C1C2C12C15C25C25C40C42C49C116C166C193C75C104PAGEC182C223C380C^m}123ABCDEFGHNUMBESECTOMMNNPPQQRRSSTTUUVVWWXXYYZZJKXXXXXXXLXXMNPXXXXXXXC13C14X^n} 98 DEC. BYTES AVAILABLEIN THIS SECTOR FOR LONGER VARIABLE NAMES @@^o}@@@@@@ @ @ @ @ @@@ A(AUAU^p}AVAA AA`AdA0ARA@A6A A"0A8 A0!"^q}#gq$DD%&'()AD*+,-AU.@"/01^r}2345678zz9Gzz:;<=>?@AA^s}ABCDEFGHIJKLMNA8OADP =^t}=*** DISKSCAN Copyright 1982 by David Young 02/21/82 ***6-6-@'6-@36-@?6-@K6-^u}@W6-@c6-@o6-@{6-@ 6-@6-@6-@6-@6-@6-@ ^v}6-A(6-AU6-AU6-AV'6-A36-A ?6-AK6-A`W6-Adc6-A0^w}o6-AR{6-A@6-A6K6-A 6-AD'6-A"036-A8?6-A8K6-A0(^x}E0 0(0# (}#(WAIT A FEW SECONDS...(99;,;,;A,;@h,;,;,;,;,-&6^y}.hhhԩ`&6-?:C:,<,2! A#` A"P! A$</ AP A% A(`%$/#@pF01234567^z}89ABCDEFP"KZ 6.H6.Ld- (}-( Πnf((COMMAND SUMMARY:(B(^{} Assemble into sector = Af( Binary load file = Bxo'( Change current sector = CK( Direct^|}ory of the disk = Do( Goto binary address = Go'( Hex conversion = HK( Image sectors ^}} = Io( Menu & format changes = Mo'( Print screen contents = PK( Read a certain sector = Ro( ^~} Scan for 1 or 2 bytes = So'( Toggle display format = TK( Write current sector = Wo( Disassemble ^}sector = XN(.(#Display sectors in HEX or CHARACTERD(format? (H or C)K)N("@g6.C"@r^}6.H`-(%Do you want to scan sectors sequen-V(#tially or using the links? (S or L)])`("@^}6.S"@v6.L[,($In which drive is the disk beingA(scanned? (same)H)K(Q"[ A#^} @I)!@R# A6-&@H67<,.>:, 6.R6-6-jA@d'A-^}-V(#A,B,C,D,G,H,I,P,R,S,T,W,X or M?])f6.>:,j(i_"@r)"@)"@e)"@)"@g)"@^}h)"@q)"@w)"@i Ap((SECTOR #B:,"( A`%  )!A  % A ^} 6- Ap?0S*+4)", "%-5( END OF FILE? A  6.? 4S A0-^}AA?AA" 4C Ap, 4R " 6 4M A@ 4W AJ ^}4D A T 4B A`U 4H A'X 4X A0Y! 4I6. AP!6.Z^} 4A A4[ 4T A%\ 4P A&] 4G AE^ B A hr|^}% -"(NOT LEGAL NUMBER!%$ Ae $& 6-6-P:',%&67^}<,.7<,.6-+&+&,$,%%67<,.7<,+6-.$$ A 7<,0$$ A 6.7,^}E B:,"67,.7,(67<,.7<,867<,.7<,E67<,.06 B:,"67,.7,(67<,.7<,667<,.00'^} B:,"67,.7,'67<,.000&5@:7<,,!@d567<,.>:@:7<,,&@,0/@:7<,,!@d/67<,.>:@:^}7<,,&,:/@:7<,,!@d/67<,.>:@:7<,,&,D/@:7<,,!@d/67<,.>:@:7<,,&,Ncc6-+@:7<,,&@^}H,%$+@:7<,,&@H,%$+@:7<,,&@H,%A@$+@:7<,,&@H,X B$b A 6-A:, A^}l 6-6 AvGosub #4 belowQQ67,.DhhhSRWHHHHHHHhhhhhhhh h ^} Sԩ`6-&A%E$Gosub #5 belowvv67@,.chh7h*hZhYhhZ YL@^} E PL PۮYZԄ`YZYYZ`H67A,.H` 6-+-B:,$A5%@:7^}<,,( +$1  6-6-A$%4S16-A'  4H A0; -+(Fir^}st character of search/8B:,";$ 6-@:7<,,*b)( Second char (hit RETURN if none)-6B:,"HAA(^}ZAA(b6.046-@:7<,, Ap>6 -&(First byte of search*3B:,"6$H%  6-^}!)  % A0Rb)( Second byte (hit RETURN if none)-6B:,"HAA(ZAA(b6.0\%^}  6-!)  % APf` 6-/(  Search seq = $3 96-= @(`(Hit RETURN to abort sea^}rchp% 6-%$6-6-%6-z" -( Sector =  " 6-?:<<<%,'F:Ad,"@$Ad^}'$Ad" A! "6- !6-%Ae  B 6--0(Sequence found at^} byte $>6-&AeB $6-P:',%$6-$+&$+&,,% "6-&N(+(Is this the right one? (Y or N)1-^}8(<?)K"@N$S ( -@!;(Hit RETURN to abort searchI6-Ae%S A 6-A^}c"6-> 6-AcF:%, $"5( END OF DISK;6->$, "-#(END OF FILE)6-,$^} A$. 4L A8 6-%"A!6-B APL6-F:%AS,V6-+@d^}$,'`6-&P:,j6-P:$,t6-$%F:%AT,~$E6-P:',(}-( SECTOR # = ^} ($1 ;6-&$? E() 4H A 6-?:C:,<%,$6-?:C:,<%,$6-?:<@:^}R,<,0 --(CANNOT READ SECTOR !0$ 6- $ ( 2E 6--6(Write this^} sector to sector :B0YE$<26-?:C:,<@:W,<,"*"(6-2 A@F1 -1(CANNOT WRITE TO SEC^}TOR !P$Zdnx AP)S:0!0)0# -6-Aa%# ^}X (}-5(Filename Ext Start Size inX( Sector SectorsC -F:%$,"-@(T^}here are no more entries.C$F:%$," A ''6-F:Ae%$,%$F:Af%$,''6-F:Ag%$,%$F:Ah^}%$,0 -,67%<%,.>:F:Ai%$%,,0 . -%.(7<, 7<@, 1 ( A^}!( ' 1( (  M -7((Did you find what you need? (Y or N)>)J"@^}M$3  -0(There are no more entries.3$< -/(!THE PRINTER IS NOT RESPONDING!9 B<$"^},6o A0 A`C6-F:AD,%AV$+F:AE,,%Ao6-P:+I:,&A,'A(,&@@k-@^}@ B((You have room to create a binary loadk(file of  sectors. Starting withJb,($the current sector^}, how many sectorsE(do you want to saveIXB:,"b APT; A` A' )!1 A; ^}A^#6-A%4S#6-A(hT6-&@-J6-?:C:,%@(<%$<@<@:R,<,T A0^}r3 A@#")"@)6-3 Ap| k-@@ C()INSERT A DOS 2.0S FORMATTED DISK INTO^}k(#DRIVE 1 (CURRENT DISK CAN BE USED).(What is load address B:," AP11()Output fil^}espec is D1:DISKSCAN.LOD.9 A`9@@D:DISKSCAN.LODq A)6-$+%@,%&@<^}*@AUO*@AUq*@&AV$P:'AV,i*@P:'AV,=*@&AV$P:'A^}V,U*@P:'AV,i6-%$+%@,/$6-?:C:,<@<@:W,<<&,/@ A`$9-@^}@+(ERROR F:A,6@9$b  -6($To change byte, position cursor withb('^}. Type change. Hit ESC whenE(you are finished.-'(66-F:@,E6-F:@, )"@'^}$& 4H Ap0"@0   :"@()"@) D6-@1   N"@0^}  AX"@()"@) b )"@'$l "@0 v#"@()"@)# A^}6-@1  #!@'* @2# A - 6- @2#6-%@d- A ^}' @6-&@2' A  )!A# A ' A`6-%@d' A 6-&@2^}@6-@1+ 4C!+&,$%+&,'%+ A 6-&@H!6-&7 )!@@^}-(>:AS,7 A  %6-+&,$%P:+&,',%%6-F:,;P:+&,',"+&,''6-&$P:',1%$; A ^} 6-$P:',%*@1 A!@4 6-% @0 > 6-6-%H   R 6- \^}@0 A!f 6-&! p6-@)6-&z ! 6-@ @( A"^} 6-& A!p@)  6-% A! &@@#(&$Gosub #2^};A",67,.hhhHhH67,.>:, 67,. \h` 67@#,.>:, 6- aa67@$,.N \^}hHJJJJ 0ii0 \hH) 0ii0 \ \ \hHJJJJ 0ii0 \hH) 0i$ ((67A,.i0 \ \hiH). $8 ^}B Gosub #1L V ;A",[  &A` 67,.hhhHhHj 67,.>:,t 67,. \h`~ 67^}@#,.>:, KK67@$,.8 \hHJJJJ 0ii0 \hH) 0ii0 \ \ \hH 67@,.>:, ((67@,.^} ۅ] \ \ ((67A,. \hiH) $ ^;@e,[67,.Ahhh i@ԩhhS ^}hhh h Vԅԩ`^$  Gosub #3 above.   4C6.H A%0 6.C   $( ^}) * 2 ( A& -@"!-(4 0-B:,6-@:7<,,(!A'06-&6 %"A') @2^}%6-@E8 '67<,.>:, 3 ' A&0< , -,(THE PRINTER IS NOT RESPONDING!F $    4^}$(What is # for conversion(1B:,"4$   )!BU5 $ @ -( = $ 6-+6-P:',/ ^}96-&$= @$ H '@#6-%A),6-C:,0 66-<!H &A . 6-C:,6-%@ %(^}+6-.$    "@A00 2&;A0,;Ah,;A2,26-@ A1 Q A`^}6-Ad%6-16-=6-A%E4SQ6-A( Z-@@ =("Start disassembling at which^} byteAH(WB:,"Z$ - A- )!&@A05  6-6-% ] 6-P:+%,'@,%@^}P6-@$++%,&@$+&@,,%@V-](< 5-@)AR@56-@ $-^}@0$6-@$+F:%,, W!6-@:7%@<%@,,-"?( ???M6-%@W A1 !!6-@^}:7%@<%@,, K&6.7$@&@<$@,7( K"A0 !!6-@:7%@<%@^},, ooA2A2 A2A2%A20A25A2@A2EA2PA2`A2eA2uA2U -^}@3( 6-%  %!6-%& A15!  %"6-% A15&  + ] 6-P:+%,'@^},%@P6-@$++%,&@$+&@,,%@V-](<0 FAR'-@@ F(Is that ^}enough? (Y or N)5 &)@(#"@&$: A0U?  "6-%@D 3-@-@0/( ^}3 I lAR'-@@ P(#End of sector. Stop here? (Y or N)])@i"@l$^}N I A@#")"@5-@@F( END OF FILE!I$S B 6-&#-+%@,@>Ab%F:A^}b%%,B X 9 A@ A`#6-Ad/6-9 A0U] b II6.?ADCANDASLBCCBCSBEQBITBMIBNEBPLBRKBVCBV^}SCLCCLDCLICLVCMPCPXCPYDECg ff67B:,%@,.NDEXDEYEORINCINXINYJMPJSRLDALDXLDYLSRNOPORAPHAPHPPLAPLPROLRORRTIRTSSBCSECSEDS^}EIl 3367B:,%@,.STASTXSTYTAXTAYTSXTXATXSTYAq $v LOAD TABLES{ A1e A2 $ (# #6^}-F:%%@, A #$ *6-F:%%@, A * A2 (A $ 36-F:%%@,((' A ^}0(,X)3$ 36-F:%%@,((' A 0(),Y3$ +6-F:%%@, A ((,X+$ *6-F:%%@^}, A * A2E +6-F:%%@, A ((,Y+$ *6-F:%%@, A * A2U @6-F:%%@^},6.+*!A'26.-@6-AV& ( $ N ((6-F:%%@,' A :6-F:%%@,D A ^}K()N$ nn67@,.[ ##% #  #  ##^} @@67@,.-# #   ! 67A7,.>:@4, @@67A8,.-#$%&(^}'(')*(+,- nn67A,.[.(/0 123456(78-9 :;<= >( ?@*^}ABCD nn67At,.[EF!GH$IJ!KLMN!OP  QRSTUV!WXY Z^} nn67Ae,.[[\] ^! _`+abcdef)gh&ij)kl mn)op  q nn67AV,.^}[rstuv)wx/y z{|} ~) 0201 ]]67AG,.J6^}201 0201 80 7 67A!,.>:AU, ##67A",.0 ^} nn67A8,.[  43    nn67A),.^}[  5     nn67A ,.[^}     , ..67A ,.,,^} 67A 8,.>:@4, RR67A 9,.?, ,,., % ,,67A,.^},  4 oo67@,.\hhhh \h Mh >hhhheԅ^}ԩeՅՠ9 <<67@,.) hHhԅԩ`hhhhhhhԅ`> $H A 6-@:,6.H!6-6@-6-@^}A"@A40R 2&;A0,;Ah,;A2,26-@\ A1f A@p 1  -.(DISKSCAN.DIS^} IS NOT ON DISK!1$    1-@B:,&@17<,0 A5@ 6.7@,  B:, @^}6.$ L6.7@<@,)B:,"@56-@B6-6@L A8 D6.7@,#-@B:,D^}7@<@,0 A5p 6.7@,  +7@<@,4$+6.7@, $$7@<@,0#^}A5 H67@<@,.$(6-@2 A>!AUE6.H$ A8 ;;7@<@,0+*7@^}<@,0-A5 U6-@&6.7@<@,56.7@,? AK!A'R6.U$ 4-6^}-AV& A8$$7@<@,0(A6 +7@<@,4$+6.7@,Y67@<@^},.$>-B:,&@@6@Y6.7%@<%@, ..7<,0)*7<,0X*7<,0,A6  4Y^}6-@  4X6-@ 26.7@<,&4)*@26-@ A A8$|Y7@^}<@,4A*B:,"@*+7@<@,4R)7@<@,4S,e6-@r6-6@| A8.%%7B:,,^}4Y)7B:,,4XA6@0*6-@B:,!@*6-@1(7@<@,4J(6-@3: A7&67^}@<@,.$0 A: A88X6.7B:,,+6.7@6-@2 AU*7@<@,4X>^}6-@Q A8D-B:,@6@=67%@<%@,.7<,A D$mm6-?:C:,6-P:'AV,H AeW67@,.$2 A`-@ @2(Š^}A&(Start assembling at what byte*AB:,"AB- A6-A$!4S-6-A''!)^}  A' A@d6-P:'@,%@H6-@$+&@$+&@,,%@O( ]-&@d(^}>hB-@@ '( INSTRUCTION+BB:,ABm' 6.>:,-@@$('$r- A5 B^}:,"#(- AB|( (-&@( -@B:,@Y6-@:7<,, A096-@:7%^}@<%@,,C A0O6-@1Y A0uu+&@,$@%P:+&@,'@,%@*+&@,$@^}%P:+&@,'@,AB9-@@ ?(%End of sector. Write this sector out^(and go on to n^}ext sector?k)@@ABb6-?:C:,<@:W,<,$@6-@@X(CANNOT WRITE TO SECTO^}R !b AB1 6- A@1")"@A N A0 A`)-@@0( ?6-F:@^},N6-F:@, 3 (>6-F:@,)6-F:@,3 AB A@6-C:,&%%$_}p-@@ <("What is base address (if same asU(before, hit RETURN)YpB:,"AE 0 A_}# )!BU5- A0$^ 6-2(#In which sector is base address6@ A^!* A!_}AE A$T 6-0(In which byte of sector  isF(the base addressJT A!! )_}!A'AE 6-"AEM6-P:'AV,)(Base addr=$3 A C6-&AV$M A _}1( in Sec  ,Byte $$6-. A 1(:$(What is destination address(7B:,":$+ A+_} )!BU5AEE 6-& )-@@B(CAN'T GO BACKWARDS!E$1 6-6-%6-A%_}%4S16-A(6-P:',[- A0% A@5 @*G-@@X( END OF FILE[$_} P A`6-&$)-@@F(Address found at byte $P A X6-P:'@,%@H6-@_}$+&@$+&@,,%@N-U(<X$w 6.S A0 A`K6-F:AD,%AV$+F:_ }AE,,%Aw6-P:+I:,&A,'A(,&@h-@@ A(%You have room to make an image of _ }h("sectors. Starting with the currenta+(#sector, how many sequential sectorsD(do you want to saveHWB:,"_ }a AQ; A` A' )!1 A; AP@6-A(6-X6-&@-X_ }6-?:C:,%@(<%$<@:7@<@,,<@:R,<,) A@"@6-) AQ d-@@ _ }>($Insert the destination disk intod(!drive 1 (formatted with DOS 2.0S)$(and hit RETURN.$)@ P 6-_}-B6-?:C:,%@(<%$<@<@:W,<,L A@P F A`$ D:DISKSCAN@ P 6-\hopx\qABUFML1BIGSEDRIVBFILEERBUFAFLAMAXSEMEMLMEMLMEMLINITINITINISPTEAMLEHLDDSKINLBIGc} c}c}@ SAVE "D1:UNBOOT.DSK" BP BP #"@ B# B#"@ Bc}# B2A A A A*** READ 1st SECTOR & STORE BOOT RECORD267<%A(,.$6-%A(26-%@c}&&@A0X$ A$*** READ NEXT SECTOR A* READ SECTOR ROUTINE *2 (}-@c}@ 2(Reading sector #?""*** CAN I JUMP ARROUND THIS?@Ai@DUNITJAp@:R,DCOMNDT c} 6-C:,^-$Ar&P:'AV,$AV-DBUFLOh#AsP:'AV,#DBUFHIr,$Ax&P:'AV,$AVc},DAUX1|"AyP:'AV,"DAUX26-C:hLS, 6-?:,]F:Aq,@*-@@S( ERROR c}F:Aq, AT SECTOR# ] BP $a6-@:7@<@,,)I( ERROR : FLAG IS NON-ZERO!W( Fc}LAG=a BP e6-@:7@<@,,3 @)!Ae( ERROR : NUMBER OF SECTORS ( ) IS WRONG!# c}@)!A# BP G6-@:7@<@,,76-@:7@<@,,G6-%AV$P!BRF(0 ERRORc} : LOAD ADDRESS IS TO HIGH! LOADS AT P BP 4G6-@:7@<@,,76-@:7@<@,,G6-%AV$c}HQ!BRG(1 ERROR : INITATE ADDRESS IS TO HIGH! STARTS AT Q BP  $ ""READING DONE *************** =c}67@<@,.567@<@,.=FF FF0 66-%$A(6?????? INCLUDES 0'S IN LAST SEC.: $6-P:'Ac}V,$6-&AV$ L67@<@,.>:,767@<@,.>:,Lem oad nd ddr. 6-B:,)7,4>:c},67,.) A@ (}f67B:,%@,.:67%@<%@,.>:,X67%@<%@,.>:,f6c }-%@fA@AY&gAAFOR X=9 TO 0 STEP -1:? ASC(BIG$(LG-X,LG-X));",";:NEXT X:ENDp#"@ Bc!}# B @@7 (}-@@7( Writting  to disk. (@@c"}S (}-@@4(Your auto-boot disk7(S(is now an object file! F-@@ 6(Thank you for c#}'play-testing'F( my program. K()(Please feel free to call me atK((316)-945-8813; arround noon. 2( (Offer expc$}ires 1-1-85.2ARl S-@@=("Do you want to UNBOOT another diskAI0YS BP v %:T c%}BP(T( ERROR #F:A, AT LINE #F:A,%AV$F:A,:(( PROGRAM STOPPED.:.@c&}@+AR.a| +@'0@9-@@M(@unboot_-@@|c'}(@BY GUY K. CLARKa=AR@3(Press to continue.= Bae +@@1@c(}@7K0@@e0@@eGG;@ ,;@ ,;@ ,;A(,;I:c)},&A H,e,6-@ 67A(,. ,6-@xi??(7} Hit after answering each question.}iU-@c*}@B('How many drives are you useing FM4U6.1i 6-A:,i!!"@)"@Bqic+} BpiQ-@@Q(6What Filename do you want to use for this program iA4!6. D:UNBOOT.OBJc,}-"@A6. D2:UNBOOT.OBJi2B:, @((USE LONGER NAME .2 BqjVV+7@<@,4D:*"@,)+c-}7@<@,4D2:*"@,Bu@jK"@6./67@<@,.D:K67@}: C} INSERT SYSTEM DISK THEN PRESS Λ=} ENTER FILE NAME g?}FOR SAVING AS ?} ERROR - FILENAME TOO LONG PRESS TO RE-ENTER OR SYSTEM RESET TO STAg@}RT OVER PRESS Λj} INSERT DISK YOU WOULD LIKE THE PROGRAM BINARY SAVED ON. gA}THEN PRESS Λ} THE PROGRAM HAS BEEN SAVED TO DISKETTE SUCCESSFULLY. WOULD YOU LIKE TO: 1) SgB}AVE ANOTHER COPY 2) RE-RUN THIS PROGRAM 3) QUIT ENTER ?I} INSERT BOOT-LOAD DISK INgC} DRIVE #1 PRESS Λi} IS THE BOOT-LOAD PROGRAM ON: 1) CASSETTE 2) DISKETTE gD}ENTER ?0  Dl lTTE 2) DISKETTE d]^L\  B JKIHiDiELV`LvL vL BLV`LLLkF}l LL &` Fj`8冨凪` MEӅӥ M`ʆǪƩ ƐekG}e` MƦʆǢ &Ɛeǐ =M =MLM M'&&&8儨児祂*LM&&*ńkH}8&&LM M`hihiHHȱȱLLc !#3`LLJJJJ`H LhkI}`Hȩh LL*N LL*N ^LL*N fLL*N lLH8` BHI V䅠LkJ}*N LN vLL*NԆ ؠPIPP`S:OE:OH N O O NN Nh)0IOOLNN[\ZUVkK}T` AOOO`ȱ`` tOȥ`HhƣĢ`kL}ƥĤ`L  ʎD 3|iop34;<X]1wkM}sv    k G H%G  GH q rq8GorHpop GGHo8opkN}po L}llssv )  L HLlst ) u sw`R@  YkO}8`LlOkP}kQ} 123456789ABCDEFGHIJKLMNOPQRSTUVW\@L~RzRzRqR`LRRRaLRz͈RLR8R RRkR}`LRLR`LR MRRR@R RRRR R  Y`LS MSSSL7kS}SPL?Wi N NcVcVI1ck\}VI2 cVI3LWcVI2LWwRvRLWwRvR} N N SpRLW NLWNo Files On This Disk!W xN` N NL XWhich File Dk]}o You Want To BeX xNLCXLoaded At Bootup Time ?X* NeV NcVcV R)cVdVpR|X|XdVLXcVdV]KRLXk^}eV8dV mlR*(mmRyRxRLXdVLqXeVLOX N NLX ߢX xNLY k_}򮮠X xNiVsRhVrR ULAY ߢY' xNLeY 䡠YK xNLY k`}Yo xN R`LY} NLY%Y xNLY%|򠠠|Y xNL%Z%ka}Y xNLUZ%| If you are using this along with |Z/ xNLZ%| my QKMENU.SYS file, don't forgekb}t |Z_ xNLZ%| that [1] Any file with an extender|Z xNLZ%| of .SYS will not show up on the |Z xNL[%| menu, and [2kc}] Any place that a 0 |Z xNLE[%| (zero) appears in a file name, the|[ xNLu[%| zero will be replaced by a space. |[O xkd}NL[%| Ie: 'RETRO0FI.RE' will show up as |[ xNL[%| 'RETRO FIRE' on the menu, and |[ xNL\%| [3] QKMENU automaticalke}ly disables |[ xNL5\%| BASIC. If you have an XL, you |\ xNLe\%| DON'T have to hold down OPTION! |\? xNL\%kf}\o xN N`L\LuRLtR}RL|RL O NL\K:\ȩ NN Y jVL\uRLtRLkg} N``\\o xN N`L\LuRLtR}RL|RL O NL\K:\ȩ NN Y jVL\uRLtRLh /  - ӢjCDCCDD c H(i  F  oi} L  Ed0W ESȱEYȱESAECE0& 0i    Лoj}ІȌ 0x01"/! L:ݣ L:  ok}  F c= FC ȱC L`ii`CD`CiCDiol}D`FEF`EiEFiF`R@ Y8`LYiii`om}H`pp`B0G0B0Ax4(%5,4)-!4%!4!2)02%on}33.5-"%24/,/!$0!'%/&"9+%)4(,%$"%44%2'2!30 oo}!" P !`||8x88|p ||||:,"67<,.>:P:,,*6sz}-&56-P:',?6-&$<67<,.>:,67<,.>:,'6-%26-P:',<6-&$)67<,.>:,67<,.>:,%6-) s{} 6-%) 67<,.>:, A00,($}٠ϠˠҠŠ(D OR C)0 0C A@<#@s|}@A(C:1 @<@6 @ AJ0 0-(ERROR F:, TRY AGAIN!0%TXs}}&(} ǠϠˠ.0<6-C:hLS,L-@:7<,,XAi|`Ap@:W,%6-C:,%+&,$:Ars~}&P:',$KAsP:',`Ax&P:',$PAyP:',6-?:,,F:Aq,E( } ERROR--F:,M0s}P%   NOTE -- THIS DOES NOT WORK!!ON MOST COPIED CARTIRIDGES! D:FILEBOOT ERROR--F:,M0pi2< }   膀 } DLt  S8`i ƀ急   Sw}0`,   U I IB01 hH(&%8*!/B`ppw}ppF`F`B`B 00000000A2350?:*8@ "2%!+!"/2%22/2!%22/2/w}&/2-!4%22/).3%24$)3+3/52#$%34).!4)/2%!$).&/2-!44).72)4).6%2)&9).9%./#/09#/-0,%4%3%#4/2#/0)%w}2 01!/ O O  M l     l x Św}  ŗŖ * L ȄȄ   * LȄ8倅偅8嘅w}   Ɯ   P  P  I P  v v6D Fw} vD F[ = L  )  ) ) ȥŌ印L0 b [ з ) w}L  @Ȋ " L Ɇ  гL v#O )Ltw}膘 , F<8d !@F  S0L[( FLdq 5  ) -  P ްϠw} "  饟Ltz 5 L ) + S  0౎W /09 " 𹅔 w}L  ƢL#膝 9L= , Lc 9  LLO )?ҥM0 ҅w}~ML R@   ,  Y0`Lƣ΢  , ʠ , O w} O 8` L)?`S S0`Ӣ  ,  , L`Ō ȱ)?ō`  )8` Fw} 0 )@ "  L)`)?`8吅呅`8逅` e` `u`҅ w}` ЭJf`˅ `  ` u ȑ * c 0혠& L %Lw} %Ŕ啐Ř噐ȩ_Ќ Ԉ` L Ff*` D HJJJJ D h)w} iؑ` c#+ L Ę߄ ͢)(`3/52#%w}$2)6%$%34).!4)/.$2)6%34!24).'2%!$3%#4/2%.$).'2%!$3%#4/234!24).'72)w}4%3%#4/2.5-"%2/&#/0)%36%2)&972)4%3&/2-!4$%34).!4)/.372)4%",w}!.+3%#4/23RSr2عyzz:[;w}y۹[[[y۹ZYy[YrSӑS 2 2<<<0⠀}  L w}<۹[[[y۹ZYy[YrSӑS 2 2<<<0⠀}  L tWPASSWORDCHACHMLADDHIGLOAAUAAA@2A <;@e,FKK6.{}A.H5H2HD 0˭1̠˅ȱ˅΢Rh lP 6-C:,Z6-P:'AV,d6-&$AVn@{}@;@%,##@@K:' +'0@!-@@{}!(LOGON::@@d'B7t@d:DIABLE BREAK KEY)@&"AU)B:,!@%& A{}67B:,%@,.>:," A`,4SECRET A`6 6.@ Ah6@@d'@{}@!6RESET VECTORr:@A'B7tA:ENABLE BREAK KEY| +HHREBOOT AFTER USE BECAUSE{} YOUR DISK DRIVE HAS BEEN DISABLED TOO D:PASSWORD:ENABLE BREAK KEY| +HHREBOOT AFTER USE BECAUSEx: Backup-Pirate & Protection UTILITIES (1) ============================= PIRATE1.BAS---}-------Scans for double sectors,write bad sectors,copies sectors,inspects disk,printout sectors & formates. FIL}EMAKE--------Copy disk sectors to make binary files COPYDISK.OBJ------------Copy any disk protected by bad se}ctors CRACKING.DOC------------The cracker jack sector documentation to make your own backup copies of commercia}l software DISKSCAN--------David Young's best disk-sector editor for sleuthing thru sectors byte by byte disass}embling,tracing.This does it all. It has more features than most. Requires Translator to run properly FILEBOOT--}------Create autoboot disk from binary file UNBOOT.BAS----------Create binary load files from some autoboot di}sks BOOTOFF.OBJ-----------Boot load file converter for unprotected disks.Works on more disks than Unboot.bas R}equires translator MAKEBOOT--------Create autoload boot disks from binary files.No need to rename dos files to }"AUTORUN.SYS".Also companion program for QKMENU. Boot without basic QKMENU------Nice binary file loader for ATA}RI games ,requires Dos on disk,turns off basic for you XL/XE users.--My favorite--Copy to game disk and run the program Make}boot to autoload this menu QUIKCOPY--------This sector copier gives sector # in hex while displaying it's data }on screen.A real aid to any hacker . LOCKPIK-------This copier is still making working copies of some protected} disks . PASSWORD--------Copy this program to any disk you like and it is protected from running with a passwor}d of your choice. Run this file from a Autorun.sys file maker ******NOTICE*****If you like these utiliti}es programs then be on the lookout for Backup Pirate Utility (2) for more great programs for all you hackers , to aid in maki}ng your own backups and protect- ing your files or disks (comming soon) Then there's the Picture Pirate ,a great new ut}ility disk that will capture graphic screens from all your disks even commercial disks and save them in micro-paint format. } that will capture graphic screens from all your disks even commercial disks and save them in micro-paint format. | Password ************This program will protect your disk with a password. " (SECRET) " is the word used }here but should be changed to your own in line #300System Reset and Break key are Disabled until the correct Logon passwor}d is typed inAutorun this program from a autorun.sys file on your disk and it is protectedThe ML$ routine that makes th}is work should be listed to disk eg:LIST"D:RESET.LST"60,110These lines can be added to any Basic program following the sampl}e setout in this program to trap Reset and Break which will rerun the program in memory when Reset is pressedowing the samplnJ