@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr +, LOADHIADLOADDHIADDLHPEEKA} GGŧӠɠҠ }Ӡ͠Š $$****************************** $$* * $$* DECIMAL DUMP TO SCREE}N * $$* *$$* *$$* John C. Allen *$$* } EVERETT WASH *$$* As of Nov 6, 1980 *$$* *$$* ŠŠҠ }Р *$$******************************<;@,"AR@<0@@@9 (}0(" LIST M }EMORY LOCATIONS IN DECIMAL3(6(9(&&( This program returns the ''( contents of memory in two"((( } column, separated odd-even$&&( format, with each memory&""( location identified.26( ( ((2( }Want instructions (Y/N)6< (} (A<4NA1(}(<( INSTRUCTIONAL MATTERF$!( INSTRUCTIONA }L MATTER$(Z((( Enter the starting address,d$$( then the ending addressn$!( when I ask for them.$(x}N(( I will list the memory loc-K( ations and their contentsN(y&&( The same number of digitsz&&( } MUST be entered to obtain{'!( the data in columns.$('(|""( Example: 00 99~""( 1}01 196""( 1234 1267""( 35246 35692%"( NOT 1 1500%(''( } Enter the number of digits((( you will use(1,2,3,4, or 5)  (5#( Ready to go on? (Y/N)5AR} (4YA+(Do not pass GO,+-@@4-@A 4(Do not collect $20}0,-@A /(Go directly toAAR@U-@@\(.p-@@Pt AR}@(  ( (AR%(}(" (}"Now for the program...$$(STARTING ADDRESS IN DECIMAL.}""(ENDING ADDRESS IN DECIMAL.AR@ -,."@( (=F:,.( 6-}"@( (=F:,-( @,"@( (=F:,,( J+"@( (=F:,+( }T*"@( (=F:,*( ^ ARh D:LISTMEM.SAV` } 6-@ 6-@+%6-@=;A(,;@,I6-@[@g6}-@m(}0@0@@0@@;6-@;('} -->}ŠŠ<--66-@6(" --><--6-@( %6-@,(}86-@@(L6-@S(_6-@f(m(y6-@(6-@(6-@(}(6-@(>6-@(>('The best 'AUTORUN.SYS' file maker ever!p6-@((Select:8(1}. Boot 850 interfaceK(2. Fast cursord(3. Run BASIC programp(4. Exit=6-@(=(&Choose some or all, then s}elect 'EXIT'16-@!-@@1( Selections: /6-@/@@K:"F6-@! }-@-6-@9(---> F)@$O6-@"@:1,,-@ C(O6-!}@%<"@:2, -@!0( <6-@&N6-@"@:3,,-@"B("}N6-@'"6-@""@:4,@`(6-@ @4<k6-@!-@<(#}@k(&Enter your BASIC to load file w/o 'D:'>"6-@((->"@h6-@(=(& Inser$}t disk to make 'AUTORUN.SYS' onh(& in serial drive #1 and press RETURN!B6-@)@D:6-@:@%}@ D:AUTORUN.SYSF6-@ A H6-@ A0J6-@ AL&} 6-@( All done! Y&d6-@-67@<@,.RUN D:M67@<@,.>:@4,i67@<'}@%B:,,.67@%B:,,.>:@4,iG6-@!-@G(!àx"6-@(}"*@AU"6-@"*@AU"6-@"*@"6-@"*@@)}6-A#%B:,&@6-@*@"6-@"*@@-6-@#Ap--@*}A#/6-@"%-@#/( =6-@"@d3*@B:,&@= A06+}-@*@6-@ )6-@)-B:,@6@$6-@$*@@:7<,,6,}-@ "6-@"*@AU*@AU"*@A&,"6-@"*@@-}6"6-@"*@A'@"6-@"*@@J"6-@"*@T"6-@"*@.}@^6-@$r%%162,0,189,26,3,201,69,240,5,232|**232,232,208,244,232,142,105,6,189,26((3,133,205,16/}9,107,157,26,3,232,189%%26,3,133,206,169,6,157,26,3,160((0,162,16,177,205,153,107,6,200,202((208,247,169,67,141,10}11,6,169,6,141''112,6,169,10,141,106,6,96,172,106%%6,240,9,185,123,6,206,106,6,160''1,96,138,72,174,105,6,165,2051},157''26,3,232,165,206,157,26,3,104,170 169,155,160,1,96,0,0,0,0,00,0,0,0,0,0,0,0,0,76 0,0,0J6-2}!-@ J($砸 #A K-@"(*@:-3}@"D( H K$DD255,255,0,56,75,56,169,80,141,0,3,169,1,141,1,3,169,63,141,2,3@@169,64,141,3,3,169,5,141,6,4}3,141,5,3,169,0,141,4,3,141,9,3EE141,10,3,141,11,3,169,12,141,8,3,32,89,228,16,1,96,162,11,189,0BB5,157,0,3,202,16,245}7,32,89,228,48,6,32,6,5,108,12,0,96,226,2227,2,0,56 C6-!-@C(6} #A0 K-@"(*@:-@#D( H K$ II255,255,32,5,100,5,173,34,2,141,7}101,5,173,35,2,141,102,5,120,169,86 HH141,34,2,169,5,141,35,2,88,165,12,133,0,165,13,133,1,169,73,133,12 EE169,5,133,138},96,169,86,141,34,2,169,5,141,35,2,108,0,0,8,72,173 ::43,2,201,2,144,3,206,43,2,104,40,76,224,2,225,2,32,5D:BESTAU9}TO.SAV RS 1 FIPIISSULINECOUNICRSRANGLINCOUNCHECKSUNUMBEPRODUCITETOTADATU;}@ @ <}d88 DEBUGGING AID BY ISTVAN MOHOSi""VERSION 2 MODS BY TOM HUDSONn[ +=}([(FThis run will LIST data statements with the name: , to the disk.xi(f([The DATA is created by evaluatin>}g each character of a user program, LISTed to disk.i(};@,&@"(ENTER FILENAME&*6-F:A?}Y,6-*,((ENTER ISSUE NUMBER( A@,* A0*@@A@}0A0f (},(DISABLING SCREEN...STAND BY...@-@AD PAYfdebug before poking 6-A};A&,( A@(6-%@ AK@6-P:'@,69,9,;@,K+"B})4,A`II@:7@<@,, @H)@:7@<@,,!@WA`6-@ AP4 6-6C}-#-@@067<,. 4  6-*@6-@*6-%@87<,0  67<,.7<,.D}6-%@8 A` 6-A:, 68,-6-%@" A @,%6-%@%"@A@6E} A@$@6-@$ APJ-@6-TF)@6-$ 6-%.6-%@:"@F}F6-@Y"AUA`^ A@h?6-&A$P:'A,'68,-3!@ ?6-@m r@G}@1@@D:BUG:6-8,@6-|'6-@6-! @'6- @ DATA H}B-@$6-8@$%,6 @,>6-%B  @36-%@6-&@3 @I}AP 6-8, A@AYUU(M}To check data against printed data statements, tJ}ype NEW. Then type:\\(ENTER >:@4,@D:BUG Type LIST after the READY prompt.U(U(JTheK} line number of each data statementcoincides with the first line of the88(0user program which the data statement evaluateL}s.aa(YNumbers within each data statement represent consecutive lines of the user program.%%(The last number isM} the total.R(R(GCheck the number of each state- ment against the printed version;PP(Honly in case of a discreN}pancy check each number in the data statement.]](7Make note of the lines containing the bugs. Then ENTER >:@4,O}D:yourprog&# (to make the corrections.#0PAY(}P(5Your typed-in program was not properlyLISTed toP} disk.:e(_(*Please LIST your program to disk, thenRUN >:@4,D:CHECK>:@4, again.be D:DCHECK2.Q}SAVRS 1 FIPIISSULINECOUNICRSRANGLINCOUNCHECKSUNUMBEPRODUCITETOTADATU[H ^ NAMENDRIV%%.**------------ S}--------------** $$** **$$** READFIL3 **$$** ** T}$$** GARY CAMPBELL DEC.1983 **$$** **#$$**--------------------------**(-R;@0 U},;@0,-@?@@9I+R6.2j0@@@70@ V}=(}g(% ******* ĭŠ *******j(7**(" FOR READING TERMINAL PROGRAM<**(" BUFFERS WHICH HAVE W}BEEN SAVEDA( TO DISK.(FFF( Use a prefix such as >:@4,D2:>:@4, forK,,($ files whi X}ch are not in driveP,,($ number one. Use a question markU,,($ to get the disk directory. PressV,,($ RET Y}URN , (without giving a fileW,,($ name) to run ԭŠ. TheZ,,($ screen clear character CHR$(125)_-*( Z}" is ignored while reading files.-(d(i,( %-@A) ,(n+ A('( READ WHICH FIL [}E+p 4% D:PRNTFIL3s4?AxB:, @A5}%%7@<@,4D:A@;;7@ \}<@,4D*7@<@,4:A@! 6.D:67@,.!6.,( ((( PRESS TO READ , ]}*@ @*+^ @@:0@T0@ ^}^ Ae$)@$"A%AU (>:, AU)( ( (()0@@@$$( _} $$( ĠƠŠ.$( . A9F:A,"Ap `}/6. CAN'T FIND IT9 @PCF:A,"A896. DEVICE DOES NOT RESPONDC @P@F:A,"A` a}66. DRIVE NUMBER UNKNOWN@ @P9F:A,"Ae/6. BAD FILE NAME9 @P&( ERROR- F:A, b}& A$$*** DISK DIRECTORY ROUTINE *** A'0@@@A0@@@`(} c} WHICH DRIVEdl6.D~67@,.=:,67@,.:*.*7@+@@76-@ d}6-%@ A'@ AE'@#-@(-@ #( A%-@ e}( AD:READFIL3.SAV%%.**------------ % #00000llllllll~`~~fl0fF68of;00000000f< 800000 0 ~~`0 0xff|ff||ffffff`x`ff`x``||~ZZ~ xs6<8<6sx00006~8pp8?f>p`|ff|<```<>ff><>ff>|p`|ffw8<  xp`lxlf8ff>|f```>`<|~ffff>fff<ck>6f< x~ 0~<~~<=}hPPHX @ Py9o}AU,$-AU368,-7 K-@O"^68,-@u68%A(,-@y Z 27,28,p}29,30,31,125,126,127d2;A ,;@2,26.0123456789ABCDEFnG@@'@@9G@@q}E:x%(( Page (HEX): %@''B:,"@)B:,"@A`z,($ What? r} @-@b2@@@@v-@ z m%2@ @@s}9-@ = A c2m A WB:,"@*67@,.7@,C67@t}<@,.0W( R 6-@:, A$6-@$66-@:7@,,@ AR6-AV$+%, ( u}( 0123456789ABCDEFJ-@! A5-@? AC F(J '( 0123456789ABCDv}EF' A ,'$(7%@<%@,0 '$06-F:%@$%,$"AU06-@2 8,( (>:w},$:- @H)!@p)!@W* @e0': A@+6-&@H!@ +6-&@$D:ALPx}HDUMP.SAVPPHX @ Py9 YZTjNNNNNNNNN1N3CFFNCMDFNDROFAZZZMLRIRDOFZTAQNTYz} {} !|}"#$%&'()*+,!!MENUPLUS BY PAUL MARENTETTEK}}KVERSION 5.0 COMPILATIONS AND MODIFICATIONS BY MARK WEBER F:AR,"@ F:AR,~}@AR@ @ AR @  -@A  o6-6-}@#6-%+6-%36-%;6-%C6-%K6-%S6-%[6-$g6-AUo6-% 6-%7';,;,;@},;@d$,-6-7 @`(L(>:A%,0@-0@0(L( ֵ)0F:A,"}@0(ԠŠŠ*0F:A,"@0(נŠŠ+ ( $2*-%@-#(>:%,}' *$<FH@!@@9-6.D:*.*8B @@H6-PS A0B:, %'6-&}I( 7<, FREE SECTORSS A0ZB6.7<,67,.7,267$%<$%,.7<,8 B( d5 >} &'P:',+(5 A nQF:@,"@(C("PRESS FOR REST OF DIRECTORYGQ @@x 6}-% @@( 6.6---(%ނ@(,( } PRESS TO RUN AGAIN/(@6-F:@,&C A(!K:()-5(>:,C"@p!"@p}!A@"@p@"@fA"@rA"@gA"@}A"@A5!"@!A@"@@"@A qq@}*@u*@h*@v*@*@x*@i*@*@*@wA"@+}"@"@wA -"@6-#P:- @pg @P A>(!FILE NUMBE}R (ENTER 0 TO ABORT) =>BK6-A:,U A g )!A"%G6.7$%<$%,&67B:,%,..G6}7B:,%,.7$%@<$%,7<,4 6.7<,, 6.D:-B:,,7<,4 A`67B:,%,.7<,}& "@#4 D:DOS.SYS&."@%"@v"@gA3""@iAP'}"@fAP,="@h6-@3)6.DELETE ,(=(? (Y/N)69"@h A@%@/ @P}9 A@@"@u6-@5J"@6-@6T\"@x6-@2(,(NEW NAME0@67B:,%,.},N67B:,%,.\6.RENAME ^$ A`$ @ph F:A,AgA r] @P;(>:AS,}FILE IS LOCKED; DO YOU WANT TOS(IT ANYWAY? (Y/N)] A@|#@ @P# A@6 A "@3},@66 API@6#,67,.?@5I @p2((>:AS, *} INVALID COMMAND *2 A0; @P;(>:AS,* ERROR IN PROCESSING  *)-A  @P) A}@ K:) $b @P(.( ...JUST PRESS RETURNQ(ENTER >:@4,>:@4,_-%}@b U (};@,(@R(% MENUPLUS VERSION 5.0U(!(B - LOAD BINARY FILE"}WW(OC - COPY FILE FROM ONE DISK TO ANOTHER JUST ENTER THE FILE NUMBER YOU WANT#(D - DELETE FILE$(E - ENTER }FILE%**("F - FAST WRITE MODE WITHOUT VERIFY&(H - PRINTS THIS LIST'( K - LOCK FILE(( L - LOAD FILE)!!(M} - MAKE AUTORUN.SYS FILE*(N - RENAME FILE+&&(P - HARDCOPY OF DISK DIRECTORY,(Q - QUIT-( R - RUN FILE.&}&(S - SAVES THIS PROGRAM TO DISK/!!(T - TOGGLES CURSOR ON/OFF0(U - UNLOCK FILE1>'(V - SLOW WRITE MODE WITH VE}RIFY;(^ - FORMAT DISK>(25.(&PRESS TO GO BACK TO THE PROGRAM25% F:AR,"A  F:AR},A AR@%AR%;@,(}e*("PRESS TO SAVE MENUPLU}S V5.0E(TO DISK AS FILE D:MENUe(PRESS A AND TO ABORT 4A%Y (}(SAVING TO DISK'D:MENU}>(ΠR-@AV Y%D 67B:,%@,.>:AU,2AU4DAU5AP 6}-C:,6-P:'AV,)AS?AR&AV$P6-?:C:hL,, F:A,AgA (;A },"@((},)(!PRESS TO WRITE AUTORUN.SYS,(2#(PRESS A AND TO ABORT'/4A2%..}@@ D:AUTORUN.SYS\Y(Q}ŠŠàĠŠĠŠԠ}\((,-@@"(*@, *@AU *@AU*@} *@@*6-@a%B:,&@4*@>*@@H-@@aR"}\)"@*@B:,) A!`f*@p z-B:,@6@*@@:7<,, }*@AR*@@*@AT*@@*@AU*@}@*@AU*@A#@%ii255,255,0,56,75,56,169,80,141,0,3,169,1,141,1,3,1}69,63,141,2,3,169,64,141,3,3,169,5,141,6,3,141,5,3 ii169,0,141,4,3,141,9,3,141,10,3,141,11,3,169,12,141,8,3,32,89,228,16,1},96,162,11,189,0,5,157,0,3,202 ??16,247,32,89,228,48,6,32,6,5,108,12,0,96,226,2,227,2,0,56 $$169,18,141,33,3,169,6,141,}34,3 ))169,10,141,128,6,76,105,243,251,243$ ''51,246,33,6,163,246,51,246,60,246. &&76,228,243,0,172,128,6,240,9,1858 }$$60,6,206,128,6,160,1,96,140,33B &&3,169,228,141,34,3,169,155,160,1L 96 C (} (( CANNOT BE@( LARGER THAN }I:, RAMC( K&;@0,;@,;@,K6.hhEhDBHI V` d(PRESS TO READ }!(6(FROM SOURCE DISK9(d(PRESS A AND TO ABORT>:AS, & A36-C:,&6- I 6-C:,#}@@.6-?:<,:6-I6-F:AQ, #@*A6# A3 r@C(%INSERT DESTIN}ATION DISK PRESS >:AS,G[%@@r%@F:AV, S%@"F:AW,1@@}<6-?:<,E(DONEP@S%  4A% $ l;@,%AR@+(}7(K-@}@ X(>:AS,\ b(}l A5 i.(&INSERT DISK TO BE FORMATTED IN DRIVE 1I(PRESS TO FORMATi(PRESS} A AND TO ABORT   4A% _+AT@D1C(FORMATTING COMPLETE[(FORMAT ANO}THER DISK_ 4YA5   4N% o((,(ՠŠԠ/(C-@A%G b(}Ǡšo(>:AS, 0-@AP -AR0$ # (} ;@,# A5  %}  +D:MAXIMENU.SAVFFNCMDFNDROFAZZZMLRIRDOFZTAQNTY&_` PAMPAVISMASTETOTAHUDSOPENNECREDIRENOTHEINGAFOOOTHERCASTOBALANCZWTOFUDGCAAA}@@@u?u@u?P@u @% @% @% ?u @%?u@1@}7PAbP@7P? WEEKLY-MONTHLY BUDGETBY WALLACE E DUVALL;@,;@, }' +'0@4"(ENTER YOUR WEEKLY NET PAY&46-$@(??(7PLEASE ENTER MONTHLY CO}ST OF THE FOLLOWING:v-@@(VISA!(0( MASTERCARD3(A( TOTAL GASD(Q(HUDSON'ST(b( JC P}ENNEYe(v( CREDIT UNION((APT RENT#-@@ A( A) A* A}+ A, A- A.2=9(0ENTER ANY OTHER OUTSTANDING BILL FOR THIS MONTH=3($}(PLEASE NAME THIS OTHER COST(6 (}7;7(.HOW MUCH IS YOUR CAR INSURANCE FOR 6 MONTHS;<)(%(HOW MUCH GA}S FOR ONE WEEK)A.(*(HOW MUCH FOR FOOD FOR ONE WEEK.F0(,( ENTER UTILITY COST FOR THE MONTH0K0(,( H}OW MUCH CASH DO YOU NEED A WEEK0P#( (#(ONE MOMENT PLEASE...U-@AZ _AYd} (} ( MONTHLY BUDGETe(ic( TAKE HOME PAY(VISA-( MASTERCARD7(TOTALD(HUDSON'SR( JC PENNEYc( CRE}DIT UNIONnU (RENT(( INSURANCE.( GAS FOR CAR7(FOODE( UTILITIESU( LIVING CASHs-AY@4)-@}A- x-@@ Ay( Az( A{( A|( A}( A}~( A( A( A( A('@ A($@ A}($@ A( A($@ AII6-%%%%%%%%+'@,%+$@,%+$@,%}%+$@,"? A0((MONTHLY PAY = $ 6-&(MONTHLY COST= $(BALANCE = $}%(!(HIT RETURN FOR WEEKLY% 6-6-'@6-'@6-'@6-'@6-'}@6-'@6-'@6-'@6-'@;6-'@6-'@-6-'@;6-}'@6-'@(A-@@=(! A  (((}WEEKLY PAY = $ 6-&(WEEKLY COST = $(BALANCE = $>-@@>($ WEEKLY} BUDGET 6-?  A (@@$X@@%( G2}@0@@[-@@0_ 2$D:BUDGETUDGCAAAf<=5dxNSATTNNNHMZCCNUDIQTOTOTOTOTOTA0 A~ @@ }@A  }̠ˠ + 99CHANGE L }OOP IN LINE 330 TO ADJUST TIME SPEED +#V&9@,9@,;@ ,26-@>6-@J6-A }V6-( (} ((( TIMER(2( DIGITAL CLOCK/CALENDAR<U( ( (( OPTIONS((1( 1 - SET D }ATEC( 2 - SET TIMEU( 3 - SET TICKA+( 4 - SET ALARM+( 5 - START CLOCKFF( ( (( WHICH OPTION"((}F } @)!@@pP//AApA@AZm(ALARM TIME (H, M, S)$m!6@* } @$*!6@* @`*!6@* @`@`d0&(ILLEGAL TIME (24 HOUR FORMAT)!0 @n&(CURRENT DAT }E (M, D, Y)&x A6-A%68@,-@1-68@,-@)B68@,-@1W68@ },-@0l68@,-@168@,-@068@,-@168@,-@168@ ,-@068@ },-@168@,-@068@,-@1&&!* 8,%@AP> A 4( ONLY HAS A MA }X OF8, DAYS!> A!!@)@)A`$$"P:'@,$@A`H>(THE NEXT LEAP YEAR I }S@%P:'@,$@!H A @`&(CURRENT TIME (H, M, S)&LL!6@* @$*!6 }@* @`*!6@* @`@`0&(ILLEGAL TIME (24 HOUR FORMAT)!0 ApC+(#DO YOU WANT SOUND OF TI }CK? (Y OR N)/74YC6-@ @`_ +@@),@'@;,@'@"M,@H@ }_,@H@"+6-@!AR@+ A `6-@6- A6-@26- A }6-@R6- A%6-%@% @`A6-%6-%@% @`A6 }-6-%@" @$A,6- A 6k"@12@E@@E- }@I k2@--))& @)&!@A0Ec)2@+@$, }@@=-@5A c2@J-@` O0@@^ }A@hA0r A |DIGIT OUTPUT*-@@&68,-@*  A%@ $ }68@,- A$l68@,--68@,-B68@,-W68@,- }l68@,- A$-68@,--68@,- A$-68@,--6 }8@,- A$B68@,--68@,-B68@,- A$-68 }@,--68@,- A$-68@,--68@,- A$&W68@ },--68@,-B68@,-W68@,-0 A$: A$D768@,- }-68@,-7 ApN AX b-@@l (8, Av -@ }@(8,A @ A $ A%@$*,%@ '/%@% }@ *$2,%@%@//%@%@ 2$*,%@'/%@%@*$ ,/%@ }$ ,/%@$",%@/%@ "$*,%@'/%@%@*$ 6-P:'@, } A6-%@ 6-&@$ A*$4 A %@$>6.JANUARY A PH6.FEB }RUARY A PR6.MARCH A P\6.APRIL A Pf 6.MAY A Pp6.JUNE A Pz6.JUL }Y A P6.AUGUST A P6. SEPTEMBER A P6.OCTOBER A P6.NOVEMBER A P }6.DECEMBER A P$X A (}1(  , 4(U(ALARM SET FOR ::X$E6 }-%@E!8,)+"@)*P:'@,$@,A A `$16-%@6-@1 @A }'6-@6-%@' A l++(# PROGRAMMA D2:CLOCK.DIG@ od 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 CARTRIDGM}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESM}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N'M}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx M}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECTM} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DLM}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BDM}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.M}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPECM}COPY--FROM, TO?OPTION NOT ALLOWED697 FREE SECTORS COPYING---D8:COPY32.COMl# 0|D .L/%#M}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SYM}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E M}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT AM }LLOWED IN DESTINATION 0 <.|K}HECK -- JUST CLEARED  6. A 6-& $""OLD DEPOSIT -- JUST CREDITED 6. A 6-%)?}$33NEW CHECK (OR SERVICE CHARGE) -- JUST CLEARED 6. A 6-&+'(IS NEW CHECK STILL OUTSTANDING+)@} ( B:,"AP0$$7@<@,0NAP` 6-&3CHECK HAS CLEARED.$$$)A}7@<@,0YAP0 6-%''3CHECK IS STILL OUTSTANDING.$p00NEW DEPOSIT (OR INTEREST) -- JUST )B}CREDITEDz 6. A 6-%/+("HAS YOUR NEW DEPOSIT BEEN CREDITED/B:,"A`0$$7@)C}<@,0YA`` 6-%&&3DEPOSIT HAS BEEN CREDITED.$$$7@<@,0NA`0 6-&)D}**3DEPOSIT HAS NOT BEEN CREDITED.$X DONEbgg(_BANK'S BALANCE (MINUS OUTSTANDING CHECKS-DEPOSITS) SHOUL)E}D NOW EQUAL YOUR CHECKBOOK BALANCE.c ( l6-&+&,vAp@{@<(IS $* THE ENDING BALANCE ON YOU)F}R BANK STATEMENT@|B:,"Ap5}S7@<@,4YP(/CONGRATULATIONS: YOUR CHECKBOOK BALANCE)G}S!S~ Ap`T!J(YOUR CHECKBOOK TOTAL IS $ OVER YOUR BANKS TOTAL. T Ap`??(YOUR CHECKBOOK )H}TOTAL IS $6 UNDER YOUR BANKS TOTAL.++(#WOULD YOU LIKE TO MAKE CORRECTIONS?PP(HREMEMBER, YOU CAN ENTER A NEGATIVE)I} DOLLAR VALUE TO MAKE A CORRECTION.( ENTER Y OR NB:,"7@<@,4Y$?)J}MSG PRINTING ROUTINE@( $J"@3 $T$MSG PRINT & INPUT ROUTINE* A&(ENTER AM)K}OUNT FOR * (  B"@3 $$ D:CHECKBALDI(Fd(YWXHCVYEERASCOKKDSDSNXK1XKCIMAAPNIOBUFYKKHTOFSESPLIADDROOBYTSIZ@AV@-M}@@ @A  @ A ` @C @IAB@5APB-N}G(`@@AVB@ Au(+( POLYCOPY -O}- ATARI version 2.06,  (Space for P:'A%, sectors)/ 66-6 AP"@@!   AU!"-P}@%# A5(< 6-&! Type 'Y' if o.k.+ A5. <A5-% 6-6-6-6-% @U2-Q}  A%7 6-C:,6-<% !6-& AE% A@A, 6- A0 @(, F#  -R}Loading # AK; @  6-1  Contin'g ; AP/ 6-F:A,/ApA-S}U@   not found,@ "..do you want to try another disk?Z? AP "+ Insert new disk5 A0? @-T}e_ 68<,-6-% @`d68<,-iG6-?:<<@<<,)6-F:AQ,G A()"A6An-U}  Ap @s0  size=68<,-0"A6A%x /6-}   + 6-%-V}6-&!!6-%+ @`) AE6-%)!@` @P " $&  Insert 'to' disk-W}& A0'6-8<,6-8<,'"A - 6- A06-@%"-6-%; A "-X}"1  Append'g ; Au Writing   size=6-?:<<@<<,6-F:Ag,* A-Y} * A(A #Ab Ap# A G/ &Disk full, try another? 9 A5GA-Z}5 A @36  " Insert new disk, A06 AU" 6-6-6-'" @P-[}  6-% AU$, 6.D:"67,.7$%<$%,, A`  䡡 AU"@-\}  b A%)@D:*.*/ 56-<6.b !íѭ! !-]}B:, @A 4 6.-@$"@467B:,%,.. 7<,4 Au67B:,%,.7<, -^}4DOS.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-a} any key!O A@ >:,$T# )"@''# A5Y$^ A@ $c%  Any more files?% -b}A5h46-F:Ad, Ad&4"@(A5m$rC [] I/O error on = ...skipping to next file!-c}@ C$w""ŠӠǠš|2 +-@@2  ŠԡS6-6-@#6-%-d}+6-%36-%;6-$G6-AVS6-B16-@-AV#6-&1K:,6-@,;@,-e};$,9&<,B6-A `-@B!")%- BA F:A,!!104,104,104,10,10,10,10,170!!104,-f}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,-g}213,966-AB6-@5R6-Au6-APR堧䠧易󡠛5 A`-q}bLISTMEM SAVb"BESTAUTOSAVb:DCHECK2 SAVbRREADFIL3SAVCfREPAIR15OBJb nALPHDUMPSAVb;yMAXIMENUSAVbBUDGET SAVb$DIGCLOCKSAVb%DOS SYSb/CHECKBALSAVbLPOLYCOPYSAVbsMENU bAUTORUN SYSbMFONT SAVbfREPAIR15OBJb;gPLAYMISLSAVCNEATLIST bNEATLISTSAVb*DUP SYS5"F >:A%, #-@' + 4 CONT:-F@&- -r}6-I:,&;,#6-&- @ D2:POLYCOPYOBUFYKKHTOFSESPLIADDROOBYTSIZ@AV@,;#$|AXLPB0NZ<( ((@&@d8"( 1t} +AdAUcAA'A @9@@K@@7Q(}cAR@1u}++(#++(#| BRAD ROLTGEN ENTERPRISES |++(#| DISK #26 - UTILITIES 1v} |++(#++(# @ -@A1w} $ GG;@@,;@ ,;@@,;A,;@,;@@, "D1:MENU" &&@@1x}D:*.* 6,6." 6 @0i6-%@(6.7@<@,A67@ <@ ,.1y}.i67@<@,.7@<@,3 6.|67B:,%@,.367B:,%@,.G67@<@,.(-1z}-@B:,:7<,4 G67<,..] 6.=:, @D67@<@,.7@<@,]67@<@1{},.0$@(''7@<@,4FREE@- @ 2() <@F''7@1|}<@,4FREE@K @ P(7@<@,)|U @0W'!-@6+'@,%@' |Z1}}++(#| |[ ( |  |\++(#xAR1~}[@@9'-@@"C( SELECTIONM A0Q[ BP:,A01}0"@&6.7@<@,0 AELB6.7+&@,$@%@<+&@,$@%@,L B31}7@<@,4 36.7@<@,!7@<@,4DOS!.0 6.-@B:,07<,4 AH1}67B:,%@,.7<,   6.! 6.D1:!67B:,%@,.?AR@'-@@"?  1} LOADING ? A@@91@@5%? BK-@@"-  CANNOT RUN 71} @A BK A0D:MENULABELPNT.SAVB5%? BK-@@"-  CANNOT RUN 70;EiͩkΩ͙kCop j`j {j`Hi͝Νh`5}L"UNEM:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh`4%&3&FNEORCAXFRCLEARBCAUESCCLFDNCCCCC10CPC25C55C1C6C75CHBAC25CC1DC56C56CC1C19}2ACONSOXYCC1CC1XCHACCSASAORIC2C12LI@9}@@ 9} !"#$%&9}'()*+,-./01234569}789:;<=>?@A ""CREATE-A-FONT by Vince Erceg9}PROGRAM WRITTEN: 8/2/83(2o Ao;@,;@,;@,;@%,;@2,;@B,9,9}9,9,;,;,;,7n6.>:@0,!6.>:@),)6. 267,.;67,.L67@%,. U67,.n6.ERDICSLF9}T-=+*UKQ:AFB6.>:@',+ A .-@2">67,.>:,B K%-@2"!67,.>:,% P' -9}#68&,-P:#%?P,' Z26-F:,&6-+%,$&A#2BBy_/B2w6-&/6-?:C:,<BsD<$,9}d1+ A8AU%1B7tnW 6-$'6-?:C:,<&$<$,9AAHEAWA9}AHxQB2HAh'B2PAh9B2QAhEAQA}'AB2V'B29}XKAR-%-@1/-%%C(>:$@2%,G K =B2Y!-&A&'+ =9}B2SA`36-F:,%F:,$%$%&@-&3S-%A%A%-3%@C%%9}ApS%%ApQ%%A2@ ! +6-%$5 A;6-G@FQ A02 -(dit9}(everse'(ata2(nvert9 (lear( ave Font)( oad Font9( rom (Copy)K@@!-@/(9} o (Copy)K(>:AV, Scroll UPY(>:AW, Scroll DN=(>:AX, Scroll LeftY(>:AY, Scroll 9}RT\ (ndo( olor change&(uit2@>-@Y(ntic 4/5 Atari\$2 6-A!A9}2F:,"A F:,"A/-%@0%()-%@0%/(  R:,"*T:,*F:,"A(9}T:,A  6-R:,F:, A06-%+!* ,&+!* ,336-%+",%+",%+",&+",&+",&+"@,9}  6-" !6-,  6-6 !6-@8 -%@0% (*-$. 8 AJF:,"@9}9@fTFK:)96-$+!@A* @,F(A^--@7<,0>:,# - 9}AhA A@APAAA APAAA0APApAA09}A@A`AAPr^ A6-@&0-A`@@6<B2SD-%H(P6-&^ A9}| *-A`B2S! '-*$(T:,A A A1 6-%$-#68,-9}F:%,' 1 A P6-%@1&F:,(2, 6 A p= ApA8!-/-@#%9(F9}:%,=  - ( PRESS JOYSTICK ;(BUTTON TO CONTINUE'1%%1-%%;(>:, --5 9}-%%(>:,!-%%-(>:%,1 5 T:,A3A8AU Ap) A3 AH -9}68,-F:%$, '-/-@%$%8&,D H  A p1-%@2#2' 1 A p9}H Ap((5(FILE (dev:filename.ext)9C A H -A#86-F:%,%9}%**F:%,. 8 ApU (>:AS, SAVE COMPLETE.-A2 < ApAK AU A&H A9}p((5(FILE (dev:filename.ext)9C ApH+-A#0( )%% ( 9}Ap52 (>:AS, LOAD COMPLETE.-A2 :& Ap A& A0Dj 6-6- Ap6(9}LOCATE CHARACTER TO COPYT(AND PRESS JOYSTICK BUTTON^ Ad6-j6-N4 -%F:%$%, * Ap4 A9}X: --(%$%F:%$%,, 0 : Abl 6-6- Ap2(LOCATE CHARACTER TO H(REPLACE A9}ND PRESS\(JOYSTICK BUTTONf Al6-lF 6--$%$%F:%$,( 2 Ap< AF AvS -9}68,-F:%$, (6-8,0->68&,-8,B K68,-S-K-6%$%8,92A&$&@9}= A K A pN -68,-F:%$, (6-8,3-6A68,-8&,E N68,-C-6-%9}%$%8,12$5 9 C A p) -68,-F:%$,)68,-8,$$ 8,!68,-8,&$ AB 9}--&%$%8,024 8 B A pB -68,-F:%$,&6-8,'/"P:,868,-B A 9}68,-P:,%D --&%$%8,22&6 : D A p$ -%8, $ A P9}W Ap A@+(COLOR REGISTER/2(=(COLORAD(S( LUMINANCEW?6-%A? A)!A)9} )!) )!A@C $%"AF:A,, Ap6 AC(A  A`Y Ap+(PRESS9} 'Y' TO EXIT PROGRAM0>K:E)Y"@A! Ap A! A ;-@1-%F:9}BsD%&%P:',,1 ; A p6+@4B2w''3A86 1%%6-*9 6-6-9}1%%%-%%9(>:%&$+",,4' -R:,"*T:, ' A>(T:,A H -%%(>:,RV9} 6-R:,&6-%+!* ,&+!* ,V6-%+",%+",%+",&+",&+",&+"@,\  6-@1f!@16-9}p  6-z !6- -  A !6-& A C++!* @,)+!@1* @e9},96-&@2C A @!6* @26-% -%%(>:,$B 2-%@1'-:9}%F:%+&,',> B  A> 2-%@(0%+&,'F:,4 > AG6-?:C:,:,@-%@ $+",@"&+",J(>:9},N e A`jN -%-@!,(>:AV,0 : ApD AN At+ --@!$(>:9}AV,( +$~D6-A6-@Q,F:%,"A86-@D6-ApK-%%A-'%19}%%;%%K%%A2E  -&&7$+"@,%$+"A,; E AJJ104,104,133,204,19}04,133,205,104,69,204,133,213,104,69,205,133,212,96ii104,104,133,213,104,133,212,104,133,215,104,133,214,162,4,160,0,177,9}212,145,214,200,208,249,230,213230,215,202,208,240,96ALMOST DONE!!- 6-F:,%F:,$%A-%9}, - (>:AA,,AR#(>:AA,#%=-@8-%(>:AA,+-9(>:9}AA,= ] -1(#'THE ULTIMATE CHARACTER SET EDITOR'4(7(](! Created 8/2/83 by Vince Erceg]-@@"9}/(PRESS TO BEGIN=%@4Q%@!@P]BBw; #A0!-A6AT%"+/ ;9}@4.6-?:A6,-@.( PLEASE WAITB-6BBw&BBv.-:2$> B  9}2[ARA!AS';-ApA?"EI W-@B[" 67,.>:, #$9}EE104,173,31,208,201,6,240,10,232,142,10,212,142,25,208,76,1,6,96]]0,0,0,48,50,37,51,51,0,179,180,161,178,180,0,52,47,9}0,35,40,33,46,39,37,0,36,41,51,48,44([[33,57,0,44,41,51,52,0,0,0,0,0,0,0,48,50,37,51,51,0,175,176,180,169,175,174,0,38,47,9}502bb0,36,41,51,43,0,36,41,50,37,35,52,47,50,57,0,0,165,88,133,203,165,89,133,204,160,0,166,0,240<jj13,185,34,6,145,2039},200,192,38,208,246,76,148,6,185,73,6,145,203,200,192,38,208,246,169,155,141,26,2FEE165,0,73,1,133,0,96,104,104,133,204,109}4,133,203,104,133,206,104ZRR133,205,166,206,160,0,169,0,145,203,136,208,251,230,204,202,48,6,208,244,164n**205,208,240,9}198,204,160,0,145,203,96x- Ap A`-D:*.*?-@!6.7,?7<,4 FREE SECTO9}A`+'"P:',-+%,'!(+ A@-+%,'( ;( ('(PRESS ANY KEY TO CONTINUE1 Ap9}; A>( ( (END..PRESS ANY KEY* Ap4 A> A  F:,  Ap A9}K6-6-@#6-%+6-%36-%;6-%C6-%K6-%3 6-%6-%6-%#6-%+6-%36-%9}; 6-%6-%6-$'6-A36-A';6-%S6-AU6-%#6-AY+6-%36-%?6-AVG69}-%S6-B2y$D:FONTCAUESCCLFDNCCCCC10CPC25C55C1C6C75CHBAC25CC1DC56C56CC1C18%~x|nf8x8&l;==7lLJ&&K&L&ʩ * d5I&&&© 1 -L*I&˜ '=} 4&0& 1&& *L*& & 1 -& & 1 - - *`RUNTIME ERROR AT LINE &&Lr*=}+ +L&` '& &L&PROGRAM STOPPED&&Ńł ȱ`iL'HH 1*L=}/ 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&WO}]P]P]P^P^P?^Ph^P^P^P^Q _Q5_QX_Q\_Q_Q_Q_Q`Q-` QV` Q` Q` Q` Q`Q`Q'aQPaQyaQaQaQaQ>}aQbQFbQobQbQbQbQcQ5cQ9cQfc Qc!Qc"Qc#Q d$Q3d%Q\d&Q|d'Qd(Qd)Qe*QKe+Qe,Qe-Q&f.Qpf/Qf0Qf1Qf2Qg3Qgg4Qg>}5Qg6Qh7Qph8Qh9Q=i:Q[i?Qii@QxiEQxiGQiHQiIQiJQ2jTQ}>}T< T<>}*p*@Q*0u? T<O0u?* ]<@`<@ c<@f<@i<@l<@o<@r<@ u<&p*x>}<@@{<@W<A~<@f<D:A<<<<<<<<<<<<<<<<o}< <<< }<<"$ DO YOU WANT INSTRUCTIONS? (Y or N)(*<Y>P*R } ">}  Insert disk with   file for repairs > }  into drive # ONE   then press  > } <<@R<}&> }&٠ƠӠ&P*'*<<<(*> }} The file for repairs is ] }]} <A<0u<<Z}<<Z}RS ARE UNDERWAY!{<A<<<< "{}<u<( u<( MC<LO*<< u<(u<( u<(u<(  <<C<<u<(u<( u<(>}u<( <<C<<N*<<C<<N*<<D<<N*<<<<<<P*>}<<< ;A$W<<<-Ai<i}W}<<<<<< ZEW<Al<l}u<(u<(<<u<(u<(<<<<<<<<<<<<FO*<<<`}<<}<< P*<o}<<<<<P*<<tG LOOKS FINE SO FAR.<<G" THE >}HEADER BYTES WERE DAMAGED." REPAIRS MAY NOT BE SUCCESSFUL. THERE ARE < VARIABLES.<>}<<<<kH THE ORIGINAL VARIABLE- NAME TABLE IS INTACT.<<<<<H>} THE VARIABLE-NAME TABLE HAS BEEN REPLACED.< u<(< u<(i}<< <<< <&I<<<<<<< P**<<gI<<< <<<<P*<>}<I<<<<<< ;A$<<<<<<P*<<<<I*< I**>}<<J<<< <<<<P*;A%<<^J<<< <<<<<<<<< <> }<< <<< <<<<4<4 u<(<<  u<(<<<  <<<<  u<(<<>!}  u<(<<< < <<<`"}$ A PORTION OF THE FILE WAS INVALID. YOUR NEW FILE IS SHORTER. REPAIRED FILE: `<<E>#} GO CHECK IT OUT.<<<" REPAIRS ARE DONE! <<<"<<>$}"Z<@W<@RL6149,159,139,153,65,143,165,139,139,157,133,139,165,143j;A$<1,<<  W<<-AZ<Z>%}&}<J+<<<<M<< < ;A$o'}< <<<N<<< +<<<<<BN<<<< +<SN<+<<>(}pN<<+<<< <<<N<<< +<<o)}<Z<<<F5==<;A%=Z<FZ<F= &O Z<FZ<F9@O +<4}<<>*} "!THIS IS NOT A BASIC SAVE FILE!!<<<<"PRESS START TO CONTINUEO'}<4+R>+}<S&<{,}<<<<<FAW-}<<FB].}} There are more files. CHOOSE: 1) Repair one of these 2) View more directory<<>/}<<K:7<=6=1=2R(=1R<4+<4}5R=)R$R<<>0}")R%<<<"o<A+} Press to choose file Press to repair file =<=<<>1} =="<]<AR<S'<<<;A$]<<<o<<< << F5-C;A%]2}SSP(S]<o<< << <<FA =="]3}<FA =="]4}< =< =="M(<<<K:7<<6<N<YT(<4+<<T<<<<>5}<<P*<<TN*N*<<;A$~<<WAr<<<F=UNr<<<F=UNi<i6}~7}B;A%+<<< <;A$<<<<<<<<< V<<<< < P*;A%+<<6<<>8}<<<<P*<<< ;A$<<wVW<A<<<< VW<A<<>9}@<<A VW<Ar<r:} i;}u<(<<< < +u<(u<(i<}AIx<<<<FFREE=YX<x<<<F,wP==x<E,{<{=}<<X<<<"VTOC shows NO free sectors=<<'Y<<<"There are NO free sec>>}tors<<=< xY<<<"!There is VTOC or DIRECTORY damage<<=<Y<<<>?}"There is NOT enough free space<< "on this disk.<<" Please copy ]@}parate disk,< "or delete other files,<"BEFORE attempting repairs.<"Press ٠ to exit.>A}<<<<K:7<<6<4+}RWelcome to THE REPAIR STATION.You are here >B} because you havea BASIC-SAVED file that RUNSbut will NOT LIST. As long asyour program is>C} in a file thatis accessible with normal DOS,THE REPAIR STATION will alwayssucceed in making>D} it listable!P*P<<} Press to read more. Press to exit.<>E}\}P+\P}+If your file once ran, but nowhas FMS or dis>F}k damage, youwill get an error (164 or 144)from DOS,and will be unable toCOPY,LOAD,or RUN yo>G}ur program.Often, but not always, you maysucceed in recovering the partbefore the invalid se>H}ctor.P*Basically, THE REPAIR STATIONworks by reading the file youfeed it,searching f>I}or whatevermay cause unlistability. A newSAVE file is then written tothe same disk, correc>J}ted so asto now be listable. LOAD thisnew file from BASIC to LIST.P*THE REPAIR STATION re>K}ads, thenwrites back to the same diskto speed operation and providea failsafe against inad>L}vertentdisk damage from human error.Nonetheless,to be safe, ALWAYSFEED THE REPAIR STATION A>M} BACKUP COPY, NOT YOUR ORIGINAL!P*Unlike other programs for thispurpose, THE REPAIR >N}STATIONdoes NOT automatically replacethe variable name table withnew characters! If need b>O}e, itdoes, but it will save a validtable upon finding one, makingthe listing more readable!>P}P*Not all programs will RUN oncerepaired. Most will, but thereare programs, that while unde>Q}rrun, access the very structurethat causes unlistability. Bycareful modification of the>R}now listable code, you shouldbe able to get around this.P*If a program SAVES its string>S}and array table, you will losethis data. This is quite rare!THE REPAIR STATION's greatest>T}power is repairing those filesthat have been made unlistableINTENTIONALLY upon programming>U}or when SAVED originally.P*Though THE REPAIR STATION mayoperate with some other DOSes,to be sure>V} of error-free use,load it using unmodified ATARI DOS II 2.0.THE REPAIR STATION was writtenin BAS>W}IC and machine language.It was then compiled using theABC compiler. It will run withor without BASIC ins>X}talled.Sincere thanks to MONARCH DATASYSTEMS, Cochituate, MA 01778for having granted license to>Y}use their copyrighted productsin the production of softwareintended for release in thepublic domain.>Z}P*This program is intended toenable the user to examine ormodify legally owned softwarefor>[} purposes of self-teaching,maintaining compatibility, andother strictly legal purposes.Please show resp>\}ect for thelegal rights of others whileusing THE REPAIR STATION.Feel free to address inquiries>]}or suggestions to the author: Z^}1607<<}Press to run program.Press to abort anytime.Press to read again.>_}<[i}Pii9Q}+ T<" " >`}" 0101" Za}rQR =@Qj= Ej$=1,====-CEj%==D.J+jc104,169,253,133,19,162,0,173,11,21>b}2,201,32,208,249,141,10,212,142,24,208,232,232,208,246,142,24,208jk165,19,208,232,96} <" ͠>c}<zk<<<"$THE REPAIR STATION HAS BEEN ALTERED!$w # /=/=/= /= /= >d}/= k$w5=u5=/=<<<<"INVALID DIRECTORY!$w<<<<"INVALID DIRECTORY!>e}$w<<<<" BREAK ABORT!$w<<<<"CHECK YOUR DRIVE!$w<<<<"CHECK YOU>f}R DISK!$w<"&REAK ABORT!$w<<<<"CHECK YOUR DRIVE!$w<<<<"CHECK YOU<RhTRAKKKKKKK1K1K1K1K1K2K2K2K25K51ATRACSDMCTPCOLRCRSINHPOSPSIZEPGRACTPMADPMBASBISALBh}CSWMPQTOCCSCRPWWXYYYYXXXWPMSAZPMSAVBi} Bj} !"#$%&Bk}'()*+,-./012345Bl}6789:;<=>?&6-F:A,&@&A o+Bm}@%@/0@@ @:(@E(@d(@ PLAYER/MISSILEo(@ (@ Bn} DESIGN AID6-6-@'6-@36-@?6-@K6-@W6-@c6-@o6-@{6Bo}-@6-@6-@"6-@#6-@'6-AV6-A(c6-@w6-AY'6-A36-Bp}AR?6-B2HK6-B2VW6-B2wc6-BByF 6-$%P-%Ah Z 6-%@4dGBq};@,;@,;@,;@,;@,;@,O6.+W6.d6.Shift o6.All {6.Line 6.Br}Blank n'6-B6-'6-@FxP&;@,;@,;@,:6. Push FIRE to P6.Pos Cursor for Bs} -$ $+00$( ' @'A A!@#6-Bt}@#"@$6-@#' 1%6-A('6-%@ -%(>:,6-6"6-%*-. 76-RBu}:,@6-T:,"*A -%(>:,A  "A 6-@:,"6-@:,V -%Bv}(>:,6-%$6-F:,;6-P:#+&,%?P,D"@:,L6-%V A` 6-& 6- AABw} 6-R:,(T:,Ap,* 6-6-!*  6-6* A 6!@* 6-@."@)")"@Bx}$6-6. A5J")"@ )"6-O "**6-T 6-%6-%W  Y *Ae^"By}Ac3"@!)"6-6-) A3 Ae(T:,AWh# 6-6- AP# Am !6Bz}- Ar  6-w A|(T:,A  6- A !6- A 6-&B{}AA A0A@APA`ApAAAAA#A"AA AB|}AA) A6-6-6-) A* A6-6- 6-6* A6 A6-B}}6-6-%6-,6-66 AP5 A6-6-6-%6-+6-5 AP+ 6- A6-&!6-+ AB~}$ 6-6-6 A$ A0 6-6-6-6 A&6-0 AP/ 6-6-6- A%6-B}/ AP+ A% A! A+ A A AP@ 6-6-6.7<,$ A`*6-66-AB}@ A 6-(A0 !6- A   6- A$ A$6-P:#+&,%?PB},& -1%&"@:,AP& 6-%6-F:,6-&& A& -%( :# 6-" AP# B}A? A AD6.7<, AN6.7<,XB 6-6--(& A,6-86-AB}B Ab 6-Ael 6- A$ --( + 6-%6-6-! A+ Ap5B}-&-#1%%--%%5(>:,8 -%(>:, 6-%*6-F:%,4 A8  AP B}--&51%%-%%!(>:,)-%1(>:,5 = -%(6-%!6-F:,("636-P:',= AB} 6-$6-&  A  Ap " -@( "$; A (Color" AB}; )!)P:,A 6-$@I A ( Luminance& AI )!@)P:',$A  6-%B} A P Ap4 6-F:,-@(@!1(COLOR= 4$, -#( )-,B}$/ --(-&-%+(/ % 6-%6-6-! A%  -( COMMANDS:- -(B}!-@-(--@(!--(--@(!--($- -B}(!-@ -(%-@(&-@('-@(Column0 -( ChB}ange Mode35-@!( Change Width'-5(Poke P/M8:-@( Set Color*-@:( Poke ColorBWB}-@( Save Data*-@9( Load DataC A$M A"PW A PG  $L6.Change  A`~B}6.Select  A` -( A 2$E -( Processing!-((., B2AP@B}E$22@P@!-% /22$xF 6-6-/@@K:9 A?F(B}?$)@$"AUA-"A&6-P:',#( - A?!@G* @X-6-$%+&@HB},5(>:,? A (} A@( $+ -#(Enter Poke Values +-' -B} A'"A A )A 6- A! -(   Ap68 6-%6-F:, AB}$-+( .'8 Ap@V A -#( Poke Color- AV ))P:'@,$@AJ6-B} A 0!-6!F:%,A =  -'(No P/M Data to Save /-3 = Ap ' A%B} A 6-h#@@C:+6-%46.=:,> AK6. DATA U A^6.=:,h A,B} 6.=:, A"6.=:F:,,, A) -6-F:%,6.=:,) AB 6.-1 A-*@AUB}8@B Ap& -#(Ready Tape Recorder &$*@@D*-B:,#*@@:7<,,' *$B}lO A% A6-' A-6-O2qF A-@@C:5B}-B)@F vQ A 6- A$' A -6-7 A"PA A GQ A P. - A B}!"@E$'. A 6- A! @ Ap= 6--@$)@0"@D3'=B} A "@E' A 6-$%A:>:,, *$4-6-A(--%- A! >(6-&B} A!0H(R$ 6-' 6-%! A$$ "6- A"0 "6-@ A"0 6- B} A"P Ap' -@$@!$(W='$/ A"@F%6-@b/ A#0 6-@F > B}A$- 6-F:%,(%0%4 > Ap` % -@!(M=%6-j %6-%@4%"@FAB}$0t 6-A$%@h~  6-$%$ (T:,A% J A -"(Confirm, A61%B6-AB}(J6-% @ -%(>:,6-6"6-%*-. 76-R:,@6-T:, "*A% % -%(>:,'% B}Ap $D:PLAYMISL.BAS6"6-%*-. 76-R:,@6-T:, "*A% % -%(>:,'% @$uvN"8RDERINBUFWIDTTVCODEOUTPUPRCOLINLPMAINLOONWPATITLTITLEPAGBLANKOUTBUFWRAFLAGFIEOFILERSPCNJ}DEV J}d BINITALIZEJ}x??MAINLOOP ================================================ @ BTURN OFF TRAP 6-J}6-@ OUTPUT TO TV 6-6-@ TO PRINTER&@ , @ T6-@J}h |??TITLE PRINTER============================================06-&B:,&@" @06-%@B:J},"6-@37@<,PAGE  3 3$??WRAP-AROUND LINE PRINTER============================J}===== 6.B:,!A0"@6-%@D  $X!@6- AlH-J}6@%6.7<,.6-@:,:!A'H6-&A(MM+ @H,)++!@W,*+ @e,,)++!@,*+ @,,J}A1 + Unable to break at word boundry16- 7@<,"@6-%@86.7%@,J}8SHIFT OUT CHARACTERS JUST PRINTED A@??PAGE SKIP SUBROUTINE===================================== +"J}3>:@,$+FORM FEED  -4 3 H*@w*RESET ATTRACT MODE\6-%@p$??FILJ}E ERROR SUBROUTINE ===================================AR@  CAN'T FIND FILE}@-J}@A AR A$>>INPUT READ ERROR========================================8F:J}A,"A6 L F:A,A7A@`% Input line too long% A`t Error F:A, ***#J} Stop or Continue (S/C)# 4C' >>EOF HANDLER=============================================$  J} $  *** END OF TEXT *** AR'>>===================INITALIZATION========================J}'SUBROUTINE ADDRESSES$'W6-A@6-A '6-A 36-A`?6-A`K6-AW6-A8'6-@J}VERT SPACINGL' 6-@f LINES PER PAGE`'06-@76-@0COLUMNS PER DEVICEt',6-@,LINES BETWJ}EEN PAGES, 0=>FF'&&;A,;A0,;A,'&&;@,;@,;@,'ZZ6.P J} '6-@PAGE NUMBER'6-@LINE NUMBER'@J}@S:(##@@P:(?0@@70@@?BROWN(("" J}} PROGRAM LISTER<(%%  by Marshall D. AbramsP(&AR&TURN CURSOR ONd(3 / #FILE/DEVICE NJ}AME (Default Casette) 3x(%B:,"6.C:% B(//DEFAULT TO casette IF NO DEVICE SPECIFIED(-@J}B:,(07<,4:&6.7%@