@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ꭝ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- 164ɛ+,' 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 D8u05  15 2 2151^116115ύ011$r2ԭ5 3)5)5ԭx GT}@@L00)+& 2 L0=ɛ -L!1LV1L1 /3 3ȹ441L-4 v3 25 2H 2h͔5U}L3L3 2 k3U hh`DOC`QL3P1Lk0S1H /3h0B k3@ VL0LU!#$53 1181118V}1111Ε5 1Lk0552 1Ȍ1i111i11115Lk0pppB4f5&&&&&&&&^6f^6&&&&&W}&&A1@BJ D2ELVK@BHILV^Щ6 2BD2EJ VBD5EHI0 V0%5X}5 2iХiL[2 25 25`D:*.*` i@`8 ``@i `8@`0 BLV525<4Y}5`HH i ԍΗ552 ԍhh@ Lح1Э1Ѣ 24.4 24Z}4`D4E` 2BJ k3LVRH` 2BD4EhK)I JLV333 BASIC languag i}e OBJ > MACHINE language DOC > DOCumentation PIC|MIC|FNT|MVM > Graphics AMS|MUS|MBD > Music LST j} > BASIC LISTing -Some MACHINE language programs can only be run by booting the disk MENU "without" BASIC! -For s k}ome programs, XL/XE models may require a "TRANSLATOR" program to be booted first! [Also available from BELLCOM] - l}Most programs are relatively self-explanatory; however, some have separate DOCumentation files available. Some BASIC m} programs may contain instructions in their program listings. -To use this great MENU program on your own disks, n}simply copy the file "AUTORUN.SYS" onto your disk. * MENU written by DAVID CASTELL * program on your own disks, ^ #00000llllllll~`~~fl0fF68of;00000000f< 800000 0 ~~`0 q}0`0xff|ff||ffffff`x`ff`x``||~ZZ~ xs6<8<6sx00006~r}||fff|`|vff|xl|||<xx0f<8pp8?t}ww<~~~<x`x`~<~u}~<0~0 ~ <~~<<>f>p`|ff|<```<>ff><>ff>|p`|ffw8<  xp`lxlf8v}<fkc|ffffff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<w}~x|nf8x8&l;==7lLJ&&K&L&ʩ * d5I&&&© 1 -L*I&˜ 'x} 4&0& 1&& *L*& & 1 -& & 1 - - *`RUNTIME ERROR AT LINE &&Lr*y}+ +L&` '& &L&PROGRAM STOPPED&&Ńł ȱ`iL'HH 1*Lz}/ r* . 1 + '. . . 1 . ' 1 + . 'hhL.ʥ`HHhh`8{}L'u`Huh` Lr*L' Lr*L' ) . (|} . ' r* .Lo* ) . ' , ( . ' + ' r* ' + 1 , . o*Lr* ) ' ' , (}} . ' + ' r* ' + 1 , . (( . o*Lo* ' 1* '.L/` ) r* .L. ) . . + ' . ~}' ,L' ) ' , ' . + 'L'J&K&L& ) 1 1,L&eJ&iK&`L&}8LM& . '.L&`ʔȱȱȱ 1*Șe惠 惨6,*6-* L*HH}hh```Lo*ʱ` ** &JL&J *HHl JLw} TO BOOT FOR DOS TO RERUNp B V8+` +ȱLr*&&8558凅刐SJj)e}e`ффiiL#+8L#+ LM&uuuLr*8` +Lr*}iLr*豂Hȱh`p +Lr*+H+ BHI+ 4 -h`8` ,L, ,}#` ,0 ,0L, ,0` ,0L,L,`޵` `Ȕ`ʔ}惥u`+ BHI DEH 4 -HyhLo* + -`+JJJJ`d-+e- +}- c-0 c-Lr* J-Lr*` f-H J-h 0 c-`L+8 0ƅ`66&Ln-HH` B VhH)Kh)0 IJ}D-EB 4hLr*S:+Lr*TUVLo* -`++L+ -8ɰɅ +`ʱȱȱ`ȵȵLr*}Lr* '. . .ʥ . . '. .L3 '. . . . 1*uȱuȱu W* 1* .0 @,}L3 ȱLr* T,L.ʵ`eeLM&HHhh`ؐHH 1*L/ r*}HH . .6 +i i .i i .hh . . 'hh .`HH 1*% r*HH 1L}'/ 1* '. LM& .6 + . +` 1* '.ޠ . 1 +L/  o*Lr*H+ B Vh` ҵ  o*Lo*H}+BHI 4+h+L1 g0+KJBD0EH 4h o*Lr* r* '.0Ɔ򩛙0`} -H`B 4h`00L1Lr*Lr* +`H o*hL11HH eHHƆeiH }'.lꦆ 1Օ`0  L,`8`|1rd-1e- (- 10|1L1|10|1`1 r* '.1 1}`+6-1L1801LM& + 1 . 1 1 ++ 1 +Ɔʭ1 +`ʕ`66`HHH}66666uuuhhhLr* +愵 ' + 'I 1 28}0/66&&&`uuu` 2 2Ј 2 o* +`@32@2 .2222}2 LM&ȥ2i223`L*32 3`LM&2@82ƅ3 ȱ222` w}3L?33L?3H3 2h`1+ %  88L3 o* o*` o* o*` } o* o*` 3$' 3"0 30 !4L, 4L, 4L,L1L14 1 '. .4444`H+? ++HI}4D44E4B 4H4h` VLM&4` D44 14α44 1L4 D44LM&44, α44}4 148e44α4 11L1  'Lr*hh iLr* (5L2 (5L*42&&ȱ0 }5Lw5 555&& L5&&`i`J&&K&L&` +ȱ&&%8}e慱HȱhױL&iJ&iK&Lr*+ BH Vh 1LW*+&BH 4hN 1 W*L 1MLW*+%BN}LMH 4hLo*)}*1*N*W*v*11+,J2+,a,s,@,/,T,9,H,),**++++,,-------6.c./x///2:3}10000)/}//0090.444(4!4440&D'@(f(()))V)4440T5\5A1+1d5355&(6@6j6S1;=ZU=d=n=o=p=s=u.>\>\>>>}>(?^???@@@j@@@ AA A|AAA,A6A8B:"B<LB>zB?BJCKCOMCQxCTCYC^ChC}rD| D}RD~DDDDEZEnEEEE F FaF&F0FX)Gb)GcDGdtGgGhHikHvH{HH&IgII}IIIIIJ,J0J^J^JJJKaKKLDL[LqLqLLLPLZLdMn[MwsMtMtMMM}NBNSNpNNpNzNO&O@O'AOt'AOy'GO~'MO'O'O'O'O'O'P'0P'RP'P'P'P'P(P(Q (:Q(>Q(IQ(}Q(Q(Q(R(R#(&R((?R-(TR<(mRF(mRK(RM(RP(=SU(SSZ(S[(S\(S](S^(T_(LT(YT(YT(pT(zT(T NTNTNTNTNTNTNU}NUN>UNZUNUNUNUNVN!VN!VNJVO]VOwVOV$OVKOVLOVVOVO&WO&WOP*R } "}  Insert disk with   file for repairs }  into drive # ONE   then press  } <<@R<}&}&٠ƠӠ&P*'*<<<(*}} The file for repairs is ]%L-Lx%Lo(L(L(L(L8)L6)L%L%L%L%L%LY,Ld,L(L)L!,L(L+L$(L*.L,L(L'L'L'Lm'Lv'L,L,L'L(L'L'L.L.Ls }.L.L.L.L.L.L.L'*L2*L&L&L.&L=&LF&LQ&Lk&Lr&L{&L&L&L&L)L)L)L)L4.L)L:'L'L&LL'L['LR'L*L*L.L&L&L&La'LB(LR(L }.L(L&/LA/L>/L/L/L/L/L 0L0L30LK0L/L^(Lj(L)'L@'Lw/Lz/LW/L%L'L%L% -膚 ɩҍD҅ 2 22 }2 a(2222 ` -Lq -l ԤՄԅ`ȱ`ȱ`ȥ` }ԑȥՑ`ԤՄ`ԤԅդՅ` '0=D '04.5 '0.( '0 ' ' 8`ԅ`} & & & &ѐ & &ʥ %аЪ %Зьɛ &0 &0 `}ԥ`Ɠƒ` % &LW* %LW* %օ0֥0 W*` %eԥe` %Le* % % s*L% %Ls* % &L* %L* %}L% % Ʌ` BLV䅆L' %ԅ`TU HH 'hhL, B VԩL%p v'P}KJBDEL, &fLA) %ԅ`Ę eĘ +L4( % & %` %Ԅԅ`}-``&eԅԥeՅ`L% o(ԨL%Ԅ & %eԥe` Ԅ &ɛ +0 ` h) ذ}I ( 8ԅԩՅL%L,ȹɛ꩛` h)f & 8fԆՅɛ摥0}LC)$0`2 2L,(,ɛM(M( )ɛ )򩀅` %ԍ`ԄL%}ԄL%ɛԆL% &󅐩f A) ؐL(L8,ԅԥՅL%82ԭ 2L%ԤՄԅե}`8ե`eեe` F* O+fL% F* +fL%8ԨՄԅL% & F*ԥՄԩՅօפԥFf K+}ԥ O+ԅՅԥզЦ`ԅՅʩ0F+A+ F+ 08f$˹ `' d} +1ԦԄզՄFԐ eਊe&Ll+Ԇ`hh L, +Ff&֐ݥ ԆՅԠ&&&8થ}օԈ`քע +Ե 8`晄 ,L,`GHFH` Y,0ɛȄ ؐL,HI h }8ԅԩՅL%?W, ,򦅩DEBHIL,ɛ +` +` %HI B}L,՝HIB VL,L%B Vú.hh-l. -0dd-8/ i - 0-}- ,@. ,... + x' $(.Ԏ.8ե *.LW-- , d,ɛD(C` ذ -L- -L 2 }-. ,L- - -L-l lp '8`ERROR- ?Run address> BASIC exitTrace:S8Յթԅ` 4.L,} .-ȘH *h00,)` & ҅ԭ ) *օեׅ` L,0թԅթᨊ}```Յ`8Յթԅ`0 ԩ`ԅ`` ' %`BԝK)I J"D/ELVS:.)H)h  } y` & % & %TԅUՅV`&B ,NLսM` & %ԝL՝MN%BL, & /` BHIL, !}& /`B JKL, %ԅUՅV & %ԅT`)ҩҊ H) hҘ` %)xԩL% %))Lc"}&LZ& %)pԩL% %)|LZ&Lc& ^0L-à. (`$2~2@@)DIDJL 2 $@ !$ $#} $R@@L3 Z$@ H$ ?$@ !$)D '$@ !$+D '$@ !$-D '$@ !$/D '$22@ !$1D '$@ !$3$}D '$ >@ !$/D '$@ !$1D '$@ !$3D '$ >)D $@ $LU2` Z$@ H$ ?$@ !$)D '$2|3@ !$+D '$@%} !$-D '$@ !$/D '$@ !$1D '$@ !$3D '$ >@ !$/D '$@ !$1D '$@ !$3D '$ >)D $5D}33 $L2&}`Dž@D $0 Z$ T$0 Z$Ҡ@ f$ Q$/@ !$)D '$)D $$ؠD $=D '$ׅ@=D>D $3{'}4)D $à@ $L3"/ۅ@ЅD $L< Z$ ?$ Z$@ H$ ?$@ !$7D '$ Z$ ?$ Z$ A H$ Z$A H$ ?(}$0|44 Z$ `$9D '$9D !$ $D $ԩթ2AD $=D '$ԩթ4AD)} $=D $4{5L 5hhhhL?ԩթ6AD $=D '$ԩթ8AD $=D $L*}5@ !$7|55D '$L7ԩթ>AD $=D '$ԩթ@AD $=D $+}L5 ?L69D !$BA5{6 $=D '$9D !$DA $=D $L'6Lz4FAD $MA !$ $D,} $MA !$ $D $|66DD $ BC H$ ?$ Z$C H$ ?$ Z$C H$ ?$L-41D !$Р@ $ $@ $L@>hhhhL?1=}D !$C $=D '$٠D $C $ o$=D $$m>> $1D !$@ $=D '$٠D $CD '$٠D $C $ o$C $CD $=D $$>} $1D !$@ $ *$+D !$ $1D !$C $ *$-D>j? !$ $1D !$@ $ *$3D !$ $РD $ $ԤՆ?HGH$HH=D ?}'$/D !$ $HHHl;D '$1D !$@ $ $+D '$1Dk?? !$C $ $-D '$C !$C $$ $ Z$C H$)D !@}$C $ E$ ?$` Z$ T$ Z$ T$ҠR Z$C H$ ?$?g@ Z$ ?$L$@ !$5D '$5@ % Z$ ?$ Z$C A}H$ ?$ Z$ -$ 9$5D '$5D !$%D $LZ@'D !$5D '$5D !$'D $h@@L@'D !$5D '$5D !$C $ o$5D B}'$`L$R@}P ` D1:*.*K:/@"hhhLV@NA(1) (2) (3) (4) (5) (6) (7) (8)&C} E(x)it (S)plit or (J)oin a file XxJjSs08D1: . *OAASOURCE -> D#:FILENAME DESTINATION -> D#:FILENAMED} PART1 -> D#FILENAME PART2 -> D#FILENAME PART3 -> D#FILENAME A2BPART4 -> D#FILENAME PART5 -> D#FILENAME PART6 -> DE}#FILENAME PART7 -> D#FILENAME PART8 -> D#FILENAME 3BB   F}   Split version #4 BC  Written by Night Owl    TOOLBOX BBG}S (300/1200) 24Hr. (313) 792-8357 CzC FILE SPLITTER UTILITY!   YoH}u may use DOS function C !{CC with the /A (append option) to recombine these files or use the (J)oin opI}tion here. SECTOR C(DDONE What file size would you like 50/ %2$!!!!!!!!!!!!!!!!!!!!!!!!!!!!J}!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!ou like 50/ %2$!!!!!!!!!!!!!!!!!!!!!!!!!!!!C$0L 2L>%L-Lx%Lo(L(L(L(L8)L6)L%L%L%L%L%LY,Ld,L(L)L!,L(L+L$(L*.L,L(L'L'L'Lm'Lv'L,L,L'L(L'L'L.L.LsL}.L.L.L.L.L.L.L'*L2*L&L&L.&L=&LF&LQ&Lk&Lr&L{&L&L&L&L)L)L)L)L4.L)L:'L'L&LL'L['LR'L*L*L.L&L&L&La'LB(LR(LM}.L(L&/LA/L>/L/L/L/L/L 0L0L30LK0L/L^(Lj(L)'L@'Lw/Lz/LW/L%L'L%L% -膚 ɩҍD҅ 2 22N}2 a(2222 ` -Lq -l ԤՄԅ`ȱ`ȱ`ȥ`O}ԑȥՑ`ԤՄ`ԤԅդՅ` '0=D '04.5 '0.( '0 ' ' 8`ԅ`P} & & & &ѐ & &ʥ %аЪ %Зьɛ &0 &0 `Q}ԥ`Ɠƒ` % &LW* %LW* %օ0֥0 W*` %eԥe` %Le* % % s*L% %Ls* % &L* %L* %R}L% % Ʌ` BLV䅆L' %ԅ`TU HH 'hhL, B VԩL%p v'PS}KJBDEL, &fLA) %ԅ`Ę eĘ +L4( % & %` %Ԅԅ`T}-``&eԅԥeՅ`L% o(ԨL%Ԅ & %eԥe` Ԅ &ɛ +0 ` h) ذU}I ( 8ԅԩՅL%L,ȹɛ꩛` h)f & 8fԆՅɛ摥0V}LC)$0`2 2L,(,ɛM(M( )ɛ )򩀅` %ԍ`ԄL%W}ԄL%ɛԆL% &󅐩f A) ؐL(L8,ԅԥՅL%82ԭ 2L%ԤՄԅեX}`8ե`eեe` F* O+fL% F* +fL%8ԨՄԅL% & F*ԥՄԩՅօפԥFf K+Y}ԥ O+ԅՅԥզЦ`ԅՅʩ0F+A+ F+ 08f$˹ `' dZ} +1ԦԄզՄFԐ eਊe&Ll+Ԇ`hh L, +Ff&֐ݥ ԆՅԠ&&&8થ[}օԈ`քע +Ե 8`晄 ,L,`GHFH` Y,0ɛȄ ؐL,HI h \}8ԅԩՅL%?W, ,򦅩DEBHIL,ɛ +` +` %HI B]}L,՝HIB VL,L%B Vú.hh-l. -0dd-8/ i - 0-^}- ,@. ,... + x' $(.Ԏ.8ե *.LW-- , d,ɛD(C` ذ -L- -L 2 _}-. ,L- - -L-l lp '8`ERROR- ?Run address> BASIC exitTrace:S8Յթԅ` 4.L,`} .-ȘH *h00,)` & ҅ԭ ) *օեׅ` L,0թԅթᨊa}```Յ`8Յթԅ`0 ԩ`ԅ`` ' %`BԝK)I J"D/ELVS:.)H)h b} y` & % & %TԅUՅV`&B ,NLսM` & %ԝL՝MN%BL, & /` BHIL, c}& /`B JKL, %ԅUՅV & %ԅT`)ҩҊ H) hҘ` %)xԩL% %))Lcd}&LZ& %)pԩL% %)|LZ&Lc& ^0L-à. (`$22AALLQML 2 $A !$ $e} $R@@ = iA > iA n? iA @ iA P: _2 4 x2 4LV2 Z$ȠA H$ ?$A22;M $ Z$ -$f};M <$Q3 %0 Z$ T$0 Z$;M f$ Q$Q3 %AL $A !$L '$0 Z$ `$33L '$L $$g}L $L '$L !$ $LL $L $A $L2`é r$L '$ Z$ ?$L !$A $L '$L33 !$q}b%DOS SYSb*)DUP SYSb SAUTORUN SYSb_HELP DOCboRSTATIONOBJbB SPLIT4 OBJbTKCHECK5 OBJb-ERRCODE BASbeDETECT30OBJbI:DETECT20BASbCOMFIND DOCbCOMFIND LSTb1AUTOBOOTBASA $L $L3 Z$A H$ ?$L !$B $L $L3 Z$B H$ ?$L !$8B $L '$L !$:B $L $r}44L4 Z$4 Z$OB H$ ?$L !$wB $Ld4 Z$yB H$ ?$L !$B $L '$s}L !$44B $L $L4 Z$B H$ ?$L !$B $L4 Z$B H$ ?$ Z$ ?$hhhhhhLM2 ԩթ ˅t}B#M $5~5L5 Z$ڠB H$ ?$` ԩթ BL $L_5 Z$B H$ΠL $ E$ ?$`ԩu}CL55 $L5 Z$C H$ ?$`ԩթ'CL $L5 Z$+C H$ ?$`ԩv}թ8CL $L5{6 '$ԩթ;CąL $L $LD6 Z$=C H$ ?$`ԩթw}NCL $L6 Z$PC H$|66 ?$`ԩթ\CL $L6 Z$`C H$ ?$`ԩթx}qCL $L6 Z$tC H$ ?$`6{7թCL $L47 Z$C H$ ?$`ԩթy}CL $Lp7 Z$C H$ ?$`ԩթ|77CL $L7 Z$C H$ ?$`ԩթz}˅CL $L7 Z$͠C H$ ?$`ԩթ腌7{8CL $L$8 Z$C H$ ?$` ԩթ {}CL $L`8 Z$D H$ ?$` ԩթ D|88L $L '$ˠL $"D $L $L '$|}L $$D $L $L8 Z$&D H$ ?$`ԩթADL $8y9L9 Z$CD H$ ?$`ԩթ}}VDL $LL9 Z$YD H$ ?$`ԩթmDL $L '$z99թoDąL~} $L $L9 Z$uD H$ ?$`ԩթDL $L9 Z$D H$ ?$`9x:թD}L $L1: Z$D H$ ?$` Z$D H$ ?$ Z$D H$ ?$`A !$L '$ Z$E H$ ?$ Z$,y::E H$ ?$ }Z$ ?$A;M $ r$L '$L !$ɠC $L: Z$ ?$L$L !$B $L;:w;Q}E;M $L !$KE $L:;ZE;M $L !$C $Lf;aE;M $L !$6B $}x;;L;hE;M $L !$oE $L;qE;M $L !$D $L;xE;M $L }!$E $;w<LE H$ ?$ Z$9F H$ ?$ Z$YF H$ ?$ Z$E H$ ?$ Z$yF H$ ?$ Z$F} H$ ?$ Z$F H$ ?$ Z$٠F H$ ?$ Z$E H$ ?$u>> Z$F H$ ?$` Z$ ?$ Z$G H$ ?$ Z$ ?$ Z$3G H$ ?$ Z$}\G H$ ?$ Z$G H$ Z$G H$ ?$ Z$ ?$ Z$G H$ ?$>r? Z$ΠG H$ ?$ Z$G H$ ?$ Z$H H$ ?$ Z$@H H$ ?$} Z$ ?$ Z$VH H$ ?$ Z$ ?$ Z$uH H$ ?$ Z$H H$ ?$` Z$s??E H$ ?$ Z$ ?$ Z$H H$ ?$ Z$H H$ ?$ Z}$I H$ ?$ Z$.I H$ ?$ Z$ ?$ Z$TI H$ ?$ Z${I H$ ?$ Z$I H$?r@ ?$ Z$ ?$ Z$I H$ ?$ Z$ԠI H$ ?$} Z$I H$ ?$ Z$J H$ ?$ Z$?J H$ ?$ Z$bJ H$ ?$ Z$J H$ ?$ Z$J H$s@@ ?$ Z$ѠJ H$ ?$` Z$ ?$ Z$}J H$ ?$ Z$ K H$ ?$ Z$ ?$ Z$$K H$ ?$ Z$@K H$ ?$ Z$gK H$ ?$ Z$K H$ ?$@oA Z$K H$ ?$ Z$ŠK H$ }?$ Z$K H$ ?$ Z$K H$ ?$ Z$L H$ ?$ Z$7L H$ ?$ Z$UL H$ ?$ Z$vL H$ ?$`pAA Z$ ?$ Z$L H$} Z$ -$xL <$ Z$E H$ ?$`L$R@xyEnter filename ... ıŮ #ANBS}CRAMBLED DIRECTORY OR BAD DISKEND OF FILE - TOO SHORT.FILE NOT THEREOBBYOU FORGOT THE DRIVE (D:) IN FILEN}AME%YOU PUSHED THE BREAK KEYYOUR DRIVE WON'T RESPOND BAD DRIVE NUMBERcn B$ DASH : First Star.ULLLORDS OF CONQUEST : EON SoftwareLODERUNNER : Broderbund. Press :@4, D:ERROR.LST>:@4,n+(#This file is only three lines long.}.(V(#Make sure that your error reportingn(disk is in drive 1.SS(KWhenever an error occurs, the program you are worki}ng with will be stopped,N(( the error line will be displayedN(!along with a clear error message.0(#(Hit any key }to continue.0)@_ A -(When your work is finished,_( type: ENTER >:@4,D:CANCEL>:@4,V}(0(%When you do this, the Error reportingV(!utility will be cancelled, and an..(&appropriate message will be displaye}d.0(#(Hit any key to continue.0)@C A -(Insert your disk to drive 1C(and press"$)}@$AUA,g()(What disk drive are you using?,(B(1. ATARI 810/1050O(2. OTHERR(g(Your choic}e >6@A")@@ @I)!@PA@* (>:,*6-+&@H,$A(&@J[ ;,6}.>:AU,"67,.167@,.4([("Please wait...writing 256 sectors.Tw(@@D:ERROR<-@}AVN@@S(a(@e p@w(^^'(Okay, writing error messages...*(O@}@D:ERROR^@hz@n(@NCLR:A=PEEK(195):DIMA$(1000):NOTE#7,C,B:C=C+A:B=0:POI}NT#7,C,B:I.#7;A$:?A$:CL.#7z6-rU "A '(..../6-%>@K(@U Ap|}r@(>@@ D:ERROR.LSTR-@@V"c(@g r@n)@}@D:CANCEL=-@@A"N(@R V"c(@n@ D:ERRCODE.BASg*(}"Okay, your error-reporting disk isR(#ready for work...happy programming.dARgh (}1(#Meaningful Erro}r messages - Ver 1.3O( h(By Yuval Rabinovich. ( ( $X A /6-F:A,%F:A},$AVT(Error #F:A, at line X[AR*#F:A,%A`0"?F:A,B(X(Unex}pected error.[ ( ( 2,Insufficient memory3,Value error4,Too many variables5,String length er}ror6,Out of data7,Line # out of range8,INPUT statement error!!9,Array or string DIM error 10,Argum}ent stack overflow**11,Floating point overflow/underflow12,Line not found13,No matching FOR14,Line too }long""15,GOSUB or FOR line deleted16,RETURN error17,Garbage error!!18,Invalid string character19,LO}AD program too long20,Device number error21,LOAD file errorL128,BREAK abortM129,IOCB already openN}130,Nonexistent deviceO131,IOCB write onlyP132,Invalid commandQ133,Device/file not openR134,Bad IOCB numb}erS135,IOCB read onlyT136,End of fileU137,Truncated recordV138,Device timeoutW139,Device NAKX14}0,Serial frame errorY141,Cursor out of rangeZ142,Serial bus overrun[143,Checksum error\144,Device done er}ror] 145,Read-after-Write error^""146,Function not implemented_##147,Insufficient graphics RAMb150,Port alread}y openc))151,Concurrent mode I/O not enabledd&&152,Illegal user supplied buffere**153,Active concurrent mode I/O err}orf((154,Concurrent mode I/O not activel160,Drive number errorm161,Too many open filesn162,Disk fullo((1}63,Unrecoverable system I/O errorp164,File number mismatchq165,File name errorr!!166,POINT data length errors}167,File lockedt 168,Device command invalidu169,Directory fullv170,File not foundw171,POINT invalidx}172,Illegal appendy$$173,Bad sectors at format time 999,0 TRAP 32767CC32766 ? "You just bumped into":? "e}rror check routine.":STOPnn32767 TRAP 32767:A=PEEK(186)+PEEK(187)*256:? "Error #";PEEK(195);" in line ";A:LIST A:? :ENTER} "D:ERROR"22TRAP 32767:? "Error message display active!"0,32766,3276755TRAP 40000:? "Error message display canc}elled!"D2:ERRCODE.BASError message display active!"0,32766,3276755TRAP 40000:? "Error message display canc&W;6WC&&D&E&+ 5B&&&© 1 V-L*B&˜ ' h4&0& 1&& *L*!}& & 1 ,& & 1 , , *`RUNTIME ERROR AT LINE &&Lk*+ +L&` '& &L!}&PROGRAM STOPPED&&Ńł ȱ`iL'HH **La/ k* r. 1 {+ - . - 1 - !}' 1 {+ - 'hhL-ʥ`HHhh`8L'u`!}Huh` Lk*L' Lk*L' ( - ( - ' k* -Lh* ( - !} ' + ( - ' {+ ' k* ' {+ 1 + - h*Lk* ( ' ' + ( - ' {+ ' k* ' {+ 1 +!} - !( - h*Lh* ' ** -La/` ( k* -L- ( r. - {+ ' - ' +L' ( ' + !}' - {+ 'L'C&D&E& ) 1 1,E&eC&iD&`E&8LF& - -E&!}`ʔȱȱȱ **Șe惠 惨06%*16&* L*HHhh``!}`Lh*ʱ`p B V8+* &)L&l Lw TO BOOT FOR D!}OS TO RERUN *ȱLk*&&8c5d58凅刐SJj)ee`фф!}iiL+8L+ LF&uuuLk*8` +Lk*iLk*豂Hȱh`p !} +Lk*+H+ BHI+ [4h`8` +Lu, +#` +0 +0Lu, +0` +0L,L},!}`޵` `Ȕ`ʔ惥u`+ BHI!}DEH [4hLh*L+ލ1-+2- +- 0-0 0-Lk* -Lk*` 3-H -h 0 0-`L+8 0ƅ`!}66&L;-HH` B VhH)Kh)0 IJD-EB [4hLk*S:+Lk*TUVLh* -`++L+ L+ʱȱȱ!}`ȵȵLk*Lk* - - -ʥ - - - -LK3 - - r. r. **uȱuȱu P* *!}* -0 ,,LB3 ȱLk* @,LT.ʵ`eeLF&HHhh`ؐHH **!}La/ k*HH r. r.6 {+i i .i i -hh - - 'hh -`HH **% k*!}HH 1L. ** - LF& r.6 {+ - {+` ** -ޠ - 1 {+Lf/  h*Lk*H+ B Vh` ҵ!}  h*Lh*H+BHI [4+h+L1 0+KJB@D0EH+ [4h h*Lk* k* -@0Ɔ!}@0` -H`B [4h`w0w0L1Lk*Lk* +`H h*hL10HH eH!}HƆeiH -lꦆ 1Օ`0  L,`8`21(1-12- ,@ 1021L121@021`!}1 k* -1 1`+6-1L1801LF& + 1 r. 1 1 {++ 1 {+Ɔʭ1 +`ʕ`66!}`HHH66666uuuhhhLk* +愵 ' + 'I 1!} T280/66&&&`uuu` T2 a2Ј a2 h* +`@\32@2 .!}22222 LF&ȥΖ2i22\3`L*J32 J3`LF&2@82ƅJ3 ȱ!}222` -3L2J3L2H\3 2h`1+ %  88L]3 h* h*!}` h* h*`  h* h*` ]3$' ]3"0 ]30 3Lu, 3Lu, 3Lu,L1L1d4 1 - .c4d4g4g4`H!}+? ++HIc4De4d4Ef4B [4Hg4h` VLF&g4` 3e4 1f4g4g4 1Lh4 3g4LF&e4f4!}, g4g4e4 1f48ee4f4g4 11L81  'Lk*hhLk* 4L2 4L*d42&&ȱ0!} W5L5 W5c5d5&& L25&&`i`C&&D&E&` *ȱ&&%!}8e慱HȱhױE&iC&iD&Lk*+ BH Vh 1LP*+&BH [4hN 1 P*L 1MLP*+%B!}NLMH [4hLh*)v***G*P*o*11{++2+u,M,_,,,,@,%,4,,**++++,,,-,V-----..-/W/y/2231c0x0{00y)!}///0//333333Q0&='9(_(( )")O)n44h4045005B3e5s5&55 6 1d;n;x;;;;;;;;;;!};;;;;;;";,;6;@;J;|;;;;;;;;;;;;;;T<h<<&=0=:!}1=D1=NR=XZ=b^=l=v====> >4>A>V>Z>>>>>? ?? ?*?4R?>Z?H?R?\?f?p!}?z??@;@I@M@]@]@m@}@@@@@@@@$@.@8@B ALAV2A`6Aj:AtaA~oAsAwAxAxA!}AAAAAAAAB BBB(LB2^B<BFBPBZBd Cn CxC C5C\CCCCCDJD|D!}DDDDDD"D,D6 E@#EJAETAE^\EhErE|EEEEF.F=MHSMR!}M\MfMpMzMM NN-NSNqNNNNOYOOO O P P$ &P. ^P8 PB PL PV Q` "}& PRESS ANY KEY - ESC TO QUIT  PRESS ANY KEY?K;;6;W;Q;;Q;c"};>;W;Q;?X;D/i;?J` * New name:Z;N;c;`;"f;i;>d*u;~;DAx;" };DAx;;D/K;,Bx;;D/N;u;DBl;K;;K;?;i;f;K;` *l;K;?( *l;K;? *f;K;2" } ?T;`;W;i;i;x;D7( *;K;@;i;` *];N;`;N;" Press Any Key?K;;6 *;T;u;D" }Bl;K;m@` *l;K;}@ *f;K;2 ?W;];W;i;i;;D7` *( *];];`;`;" Press Any Key" }?K;;6 *l;K;@` *l;K; A *f;K;2 ?T;c;W;i;i;;D7` *( *];];`;`;" " }Press Any Keyt?K;;6 *+;;DAA;Q;;D/A$;;;F.=AA%;;D/K;.B;"};D/K;;DB;;K;;DB+u;;T;EA;K;f;i;>*+c;c;K;N;i; `;`;`;`;`;`;"}N;];T;i;3$The Compactor Detector Ver 3.0$ c;c;K;i;"}+N;Q;W;"  +;K;x?K;;6;T;`;5Cx;~;W;Z"}; ;K;\Cx;~;W;Z; C~;;K; x;;K;Cx;C;Q;c;"};D/i;Cf;K;;Q;c;;D/i;;K;;K;D;;DA;c;W;K;;Z;_ ;"}` JDx;c;W;N;;:;A;> |Dx;_Dx~;;;-B;-;;K;x+"?~;D,i"};~;D,c;D:*6?~;N;N;F:= Er;~;Q;EA~;D1:A~;T;r;DB+@?~;Q;Q;F:=#E+r;~;DA~;D1:A~;T;"}r;DB+*c;c;K;N;Enter name of file to check: 1-8 for disk directory "} N;];">d**;~;DA2 ?f;K; Checking file...N;4N;T;i;;D7K;W"};A$N;;6;;;;-CA%;Q;W;F=F;a file.A;CRSA;K;N;F=;T;T;F"}=F; a file.A;BASA;K;K;F= G;a file.A;SCRA;K;N;F=FG;a Ҩ"}ǩ file.A;MRSA;K;N;F=G;a Ҩ̩ file.A;MRDA;D=G;a file.A;"}SBTA;D =G;a file.A;SHRA;K;N;F=H; code.A;OBJA;N;T;F="}SH;a Ġ.A;PICA;K;N;F=H; an file.A;ALFA;K;N;F=;K;N;F"}= H;a ͨǩ file.A;DCSA;K;N;F=;K;N;F!= "I;a ̩ͨ file.A;DCDA"};K;N;F=;K;N;FA= pI;a ͨȩ file.A;DCEA;K;K;F=I;an file.A;"}ARCA;K;N;FSC=I;a Ġ file.A;SYNA;K;N;F=J;a Ġï file.A;M65A"};K;K;F =;K;K;F5 `J; a file.A;TXTA;K;K;FA:;K;K;FZ8J; a file.A;" }TXTA;K;N;F =J; a file.A;TXTA;K;K;F0:;K;K;F98K;a file.A;LST"!}A;unrecognizable.A;HUHA;K;*;;D/?aK;T;;UK$;;;F.=K;;K;;Q;""}FAUK%;];T;;Z;Z;E5W;c;K;Lr;;Z;N;];N;FA;c;T;r;DB;N;Z;Z;N;"#}.Cf;K;;D is ;Dc;c;K;N;;DHUH=\L *;D;D=pL N;Z;" Automatical"$}ly Rename to  ;T;E Rename This File Lock This File Unlock This File R"%}un The Compactor Detector Quit to BASIC Quit to DOSN;"! Use arrow keys to move pointer"&} Press [RETURN] to select 1-8 for disk directory;Z;;D;D=;DHUH= M;T;];;T"'};c;N;Z;"-->?K;;6;Z;`;;9SN~;;-AD;W;c;qN;;K; ;=N;;"(}K;;Z;NN;Z;" ;;;;NN;;" ;Z;;];;T;c;;W;c;")}O;Z;N;`;" ;];;T;c;;=YO;`;N;Z;" ;W;c;ON;;K;""*} N;;"-->;=ON;;K; " N;;"-->;O ;Q;c;P;;D"+}A;AJ;Z;;T;c;&P;Z;;];T;;`;;T;c; ^P;];;c;;",}T;c; P;`;;c;K;;T;c; P$;c;;];T;;c;T; P;;DA;AJ"-};W;W;;Z;Z; Qi; ;];T;;T;c; }@+ $$  $$$$$&?}$$$$$$$ &@} $$  Donations are appreciated.!!Send all correspondence to: &A}Roy Goldman"2440 S. Jasmine St.$Denver, CO 80222&(##*##|The Fishery (3&B}03) 756-3813|,##|Pro-Cyber (303) 722-2633|.##|Zap! (303) 367-4103|0##|The Vault (303) 796-0539|2##&C}46!!In following line, '1' will8!!ask for confirmation of DOS:!!commands. '0' will&D} execute<immediately:>A6-@CDFH##dAR@i&E}"@6-@n<<;@,;@,;@,;@0,;@,x]];@,;@%,;@ ,;&F}@,;@,;@,;@,;@%,##@@K: A9ٛ. 6.D&G}67@,..67@,.:*.*6- ALAR@$( Directory6@L( of&H} Drive :!"@!( Cont... ( (%"@6-% A A5+@+&I}@@ A@&@("@&(6-%@"@A5 A &J}>( (4(& PRESS ANY KEY - ESC TO QUIT > AP'( ('( PRESS ANY KEY AP)@&K}!!"@*"@'Ap"@AB:,"A A ś" A0&L}6F( New name:#-@@5AR<(>F AJ 6.O3 6.67B:,%@,.,367B:,%@&M},.PA"@*"@%6-7AR@A A0Q"@ A3R"@ A1S&N}AR@T2 A52@2@W A3X%"@6-% A0Y'-@&O}@'( Press Any Key[ AG)@\ A2`67@,. Ah ˛"@ &P}A0"@ A1AR@2 A52@5@ A0 A3&Q}'-@@'( Press Any Key A)@ A2 A ˛"@ &R}A0"@ A1AR@2 A52@6@ A0 A3&S}'-@@'( Press Any Key Ah)@ A2 A$ϭś 6&T}.-@B:,7<,4.AP -67B:,%@,..-67B:,%@,. AU&67%@&U},.+$06.7@,56-@:AR A5N$XԠРΛbC@@+&V}1@@dCB7t@dl0@@v,,($The Compactor Detector Ver 2.0{/,($ &W} /($ҠכC-@@)( @( C&X}$ Л6-@ A )@"@2A --+"A&)"@0,*"@A 8&Y}"A&)"@0 (~.6-&@8 A !!"AU*"@A $"AU A )8"@'*&Z}B:,!.AR@8 A+@0"@'*B:,"*"@*"@66.@ A.77 @F)+!@&[}* @,)"@A 877"@G)+!@X* @e*@b,A B!@A L67,.>:&\},(>:,V6-%@ A `$ ʛ A0)A:,!*A:, @ ) A` APG&]}7@<@,4:+6.7@,56.D1:D67@,.G$) A`&7@<@,4:)$% 6.6.D1&^}:"67@,.%$ Λ A$$(Enter name of file to check:( 1-8 for disk directoryB( (( &_} 1-@@8(>B A A 6.@ A5E<AR@(((<( &`} Checking file...J+@+@@T-@@^)@67<,.>:,h m&a}H7@<@,446.a file.>6.CRSH Ar\47@<@,4*7@<@,4H6&b}. a file.R6.BAS\ AF7@<@,426.a file.<6.SCRF AF7@<@&c},426.a file.<6.MSHF A84 $6.a file..6.SHR8 AD7@<&d}@,406. code.:6.OBJD AC7@<@,4/6. a .96.PICC AH&e}7@<@,446.an file.>6.ARCH AJ7@<@,466.a ˠ file.@6.&f}DCMJ A!6.unrecognizable.!6.X6-@ A  6-B:, A-@37<,4&g}.)6.7@<%@,3 A d%!@*@:7@,,@F<6.7@<@,K67@,.d67&h}@<@,..(AR@"( is %((( 4X A@! A#4A@&K-@&i}@6( Automatically Rename to K( 7@,0( Rename This File:( Lock This FileD( &j} Unlock This FileN&&( Run The Compactor DetectorX( Quit to BASICb( Quit to DOSl;-@@&k};(! Use arrow keys to move pointerv)&( Press [RETURN] to select)(%%( 1-8 for disk directory &l}ԛ6-@%4)4X6-@% A6-@-@@(--> A)@&m},!@H* @W"6.>:,, Ap"@E6-&@"@a6-%@/ @!-@&n}@)( /6-) !-@( )6-@I#"@*"@*"@E/6-@A-@@&o}I( I#"@*"@*"@a/6-@A-@@I(  I"@E#-@%@+(&p} 7-@?(-->I AI"@a#-@&@+( 7-@?(-->I A "AUA!&q}%&"@'6.6.& A* A4.!"@*"@A`.ś>B9+"@*"@&r},)+"@*"@,ABśH4-"@)+"@ *"@,A`4˛R6-"@)+"@*"@&s},A 6˛\F%"@ )+"@*"@,+6.26.< AFΠěf/"@)"@#+&t}&/Ûp-"@)"@#+&.-ӛ ЭРכ -@@ $$( &u} $$( | | $$( | | $$(  &v}-@@ $ Λ& JAR'-@@8( Sure (Y/N):JAR@0  A1 &w})@: >:,4Y(Y$D A2N A -@@ ##(  ,,&x}($  ,,($  ,,($ &y}  $ V-@@+( =-@@S( V$ A /AR@&z}/( I/O ERROR -@@`  B:,"A A<] +'0@@&{}9@@dKB7t@d]AYFAR@##( ##(&|} ##(The Compactor Detector##( ##( Version 2&}}.0 ##( ##( By Roy Goldman ##( ##(&~} April 1987 ##(##(AY@4 -&}-@@ (" ,-@@(3 5h-@@?(%Identifies &}Scrunch, Shrink, Archiver,h($ Disk Communicator, Masher, Crusher,6++(# Basic, Object, and Picture files.9'-@&}@!'( PRESS @ F:B2y,@AA`J A D:TCD20.BAS  D&}onations are appreciated.!!Send all correspondence to: Roy Goldman"2  D$X COMMAND FINDER --------------NOTE: THIS IS A LISTED BASIC FILE.----------------------------------*}TO USE THIS UTILITY, LOAD THE BASICPROGRAM YOU WANT TO SEARCH FOR SPECIFIC BASIC COMMANDS. THEN"ENTER" COMMAND FINDER WITH *}YOUR PROGRAM STILL IN MEMORY. e.g. ENTER"D:COMMFIND.LST"NOW TYPE "GO 30000" TO OBTAIN THECOMMAND FINDER MENU.R WITH (vOR UPDATES,ASSISTANCE & $5 OR LESS DONATIONS, SEND TO J.C.PETTY,4116 CARTWELL DR.#201,VA.BCH.,VA 2345230010 STP=PEEK(144)+25.}6*PEEK(145):GOSUB 3110030020 ? "HOW MANY COMMANDS TO LOOK FOR";:INPUT NC:DIM CM(1,NC):FOR CMD=1 TO NC:? "ENTER COMMAND NO.";.}CMD;30025 TRAP 30200:INPUT COM:IF COM<0 OR COM>50 THEN 3020030030 CM(1,CMD)=COM:NEXT CMD:DIM LIN(60,1):K=1:POKE 752,130035.} ? "ONE MOMENT WHILE SEARCHING PROGRAM":FOR W=1 TO 60:LIN(W,0)=0:LIN(W,1)=0:NEXT W:K=130040 FOR LOOP=STRT TO STP:LINENO=PEEK.}(STRT)+256*PEEK(STRT+1):IF LINENO>29999 THEN POP :GOTO 3100030050 LINOFF=PEEK(STRT+2):STMOFF=PEEK(STRT+3):POKE 752,1:POSITIO.}N 6,23:? "CHECKING LINE NO. ";LINENO;" ";30055 TRAP 30099:FOR J=1 TO NC30060 IF PEEK(STRT+4)=CM(1,J) THEN LIN(K,0)=LINENO.}:LIN(K,1)=CM(1,J):K=K+1:POP :GOTO 3009030062 NEXT J:IF STMOFF=LINOFF THEN 3009030064 FOR J=1 TO NC30070 IF PEEK(STRT+STMOF.}F+1)=CM(1,J) THEN LIN(K,0)=LINENO:LIN(K,1)=CM(1,J):K=K+1:POP :GOTO 3009030072 NEXT J:IF STMOFF=LINOFF THEN 3009030074 STMOF.}F=PEEK(STRT+STMOFF)30080 IF STMOFF<>LINOFF THEN 3006430090 STRT=STRT+LINOFF:IF STRT>STP-1 THEN 3100030092 NEXT LOOP30099 .}POP :POP :OVR=1:GOTO 3100030200 TRAP 40000:? "";:FOR W=0 TO 500:NEXT W:POKE 85,130210 ? " .} ":POKE 84,PEEK(84)-2:POKE 85,2030220 ? "";:GOTO 3002531000 OPEN #6,4,0,"S:.}"31005 POKE 82,1:K=K-1:? "}":? " ĠӠ":? :? "壠 壠 壠 壠"31010 FOR I=675.} TO 689:POKE I,0:NEXT I:POKE 675,129:POKE 676,16:POKE 677,68:POKE 678,17:POKE 679,431015 IF K=0 THEN 3105031020 FOR L=1 TO .}K:? LIN(L,0);"";LIN(L,1);"";:FOR W=0 TO 50:NEXT W:NEXT L31025 IF OVR=1 THEN POSITION 2,22:? "ȠĭӠCϠ.}Ŭ";31030 POSITION 2,23:OPEN #1,4,0,"K:":? "PRESS TO PRINT OR OTHER KEY TO END";:GET #1,X:IF X=80 THEN 3106031035 I.}F X=67 THEN 3108031040 CLOSE #1:POKE 752,0:END 31050 ? :? "ŠƠĠӠŠġ"31055 POSITION 2,23:OPEN.} #1,4,0,"K:":? " PRESS ANY KEY TO CLEAR SCREEN ";:GET #1,X:? "}":CLOSE #1:POKE 752,0:END 31060 OPEN #4,8,0,"P:":PRINT #.}4;CHR$(27);CHR$(64);CHR$(27);CHR$(77);CHR$(20)31065 FOR Y=0 TO 23:FOR X=1 TO 39:LOCATE X,Y,CH:IF CH>127 THEN CH=CH-12831070.} PRT$(X,X)=CHR$(CH):NEXT X:PRINT #4;PRT$:NEXT Y:CLOSE #4:CLOSE #1:CLOSE #6:IF OVR=0 THEN 3105531080 OVR=0:? "}":CLOSE #1:CLO.}SE #4:CLOSE #6:GOTO 3003531100 TB=64:FOR I=675 TO 689:POKE I,0:NEXT I:FOR I=675 TO 678:TB=TB/2:POKE I,TB:NEXT I31110 ? "}":.}? " 򠴮ʮî"31115 ? " Command Directory":? :? "REMGOSUBXIOGETDATATRAP.}ONPUT"31120 ? "INPUTCLOSEPOKEGRPHCSCOLORCLRPRINTPLOTIFDIMREADPOS."31130 ? "FOROP.}ENRESTRDRAWTONEXTSTATSRETRNSETCOLGOTONOTEPOPLOCATE"31140 ? "GO TOPOINT?SOUND":? "--.}----------------------------------":RETURN SETCOLGOTONOTEPOPLOCATE"31140 ? "GO TOPOINT?SOUND":? "--,,ij:BUFFERJSRDHANSMESSAGEPART1PART2PART3FNBAUTORUNADDBUFHBUFLDCCOLOUCHOICLUASCCOLUM2} 2}$$##############################$$# D2}ESCRIPTIVE AUTOBOOT #$$# by #$$# Peter Kirton #$$# ---------------------2}----- #$$# NEW ATARI USER - APRIL '91 #$$############################## 11;A(,;@,;@,2};@6, GG;@P,;@!,;@x,;@,;@,;AP,467@,. %67A(,. 467@2},. AAR@#@@--@@")67<,.>:,- (104,32,83,228,96- 2}AP A/))󠱭Ԡ10 (} (0(Changing pointers in Sector #1.2/ 6-C:,6-P:2}'AV,/6-&+$AV,<S6-Ah#%@@7%@@E%@S%@FI%@2}@+%@@?%@I APKW#67@<@,.>:,C67@ <@ ,.>:@,2}W%@@P/(%(Writing the new Sector #1./ APU467@,. %67A(,. 467@,.Z+2}%@@+%@_$($(Creating a new Sector #3.d5 #A!-@@p%"167,.>:,5 2}i467B:,%@,.467B:,%@,.>:AU,n 67@$<@$,.>:B:,,p?6-@@&B:,%6-P:'@,?62}7@8<@8,.>:,s67@)<@),.>:,x%(%(Writing the new Sector #3. AP Ap6-?:C:2},,$AR@4 (} (((4( Modification complete+( (+( Disk will boot with 2}A'-@&+P:B:,'@,,@ A(>:@4,>:@4,"("( displayed( (AR2}"@'AR@'AdAU7-@@#7(宮 F:Ad2},"AUAAdAU Aήӛ,( (,(Generating AUTORUN.SYS file..., 2} #A1--@@P")67<,.>:,- 6%%67@<@,.>:@2%,@B67@,.>:,367@2}!,.>:,B67@,.EC#67@<@,.>:@6,C67@<@,.>:@&,JF-@B:,B672}@%<@%,.>:@:7<,,&@2,F O--@@x")67<,.>:,- T-@B:,Y6-@:7<,2},^[[67@2%<@2%,.>:&+@2$++!@1,*+ @,,,%+@d$+ @2,,,c h67@<@,.>2}:,1 6.67B:,%@,.167B:,%@,.((((Writing the AUTORUN.SYS file.9@9@@2} D:AUTORUN.SYS-@B:,6-@:7<,,*@ @, (} (,( Your dis2}k now contains an((( AUTORUN.SYS file which will boot( and will display ( 4 6. no message(6-@2}-@("("(while  is loading.&1 (} (1( This program will allow2} you to((( display a message such as a disk++(#title while the disk is booting. It$$(gives you the opportunity t2}o(personalise your disks.*(*( An extra option allows you to$--(%AUTOBOOT a BASIC program, and to have.&&(2}a second message, for example,8--(%'Loading Program Name....', displayedB%%(while the program is loading.L"( ("2}( Your choices are:-V+(+( 1. Message on boot-up only`''( 2. Autoboot BASIC programj.-@@!2}*(Enter choice.. .t0 )!@&(>:AS,0 A0~$Ԡ0 (}-@2}@0(ԠM-@@;(!Enter your message (36 chars max)MAN-@@2}>($____________________________________N36 underlines+-@@+A@dG-@B:,!72}<,4_$'=6.7@<&@,G A  ;-@@7(Enter screen colour [0 to 15];0 2})!@&(>:AS,0 A =-@@9(Enter screen luminance [0 to 4]=0 )!@&(>2}:AS,0 A06-$@%$KAR@(}(!($(K(" INSERT F2}ORMATTED DISK IN DRIVE 1)()( Press when ready... F:B2y,@AeAR$$2}$Ԡ> (}-@@>(Ԡ.-@@.(2},( (,(Enter name of BASIC program to#,( AUTOBOOT.... (AR,(A-@@2}$7<,4::6.7%@< if no message7A<?(/($____________________________________?36 underlinesA+2}-@@+A@dC.7@<@,4_$6. . A`FG-@B:,!7<,4_$'=62}.7@<&@,G A`K P' 6-B:,'6-P:+@@&,'@,U6-A %Z$wԠx2}@@162,0,169,11,157,66,3,169,70,157,68,3,169,8,157,69,3,169,0<<157,73,3,169,31,157,72,3,169,0,141,198,2,169,10,133,84P2}P169,5,133,85,169,1,141,240,2,32,86,228,169,0,133,84,169,0,141,240,2,169,20##141,7,7,169,7,141,8,7,76,20,7ή2}Ӡ??255,255,0,6,136,6,160,158,162,32,142,197,2,142,23,208,142==240,2,189,28,6,145,88,136,202,16,247,169,13,141,2}74,3,962256,29,53,51,50,8,17,22,16,17,9,26,50,53,46,277104,141,65,0,168,170,145,88,200,192,129,144,4,189BB97,6,232}2,192,158,208,241,169,12,141,74,3,169,10,141,197,2,96CC0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0''2}0,0,0,0,0,0,0,0,0,226,2,227,2,0,6D:AUTOBOOT.BASC0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0''09