@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr hESPG@@(@@ %%++}+++++++++++++++++++++++++++++%%+ҮîŮ͠٠+%%+ +%%+ PURGE } +%%+ USE WHEN YOU NEED TO +%%+ REMOVE SEVERAL PROGRAMS +%%+ FROM YOUR DISK }+%%+ .RHETT BRYSON. + %%+++++++++++++++++++++++++++++++ *** COMPUTE #30h A-@}@K:P;@,;A,;@,\6-@h6-@(j +( TO PURGE@( AFTER EACH F }ILE DISPLAYED PRESSj(%CONTROL-P TO DELETE OR PRESS RETURN26( TO CONTINUE6@@D:*.*<d@ }"-@@F7@<@,0 FREE SECTORSJ(M(Z(d @F AP)@ }@.-@@<( CHOICE Y-@6? u2@ @y  @`Z67@< }@,.D:E67@<@,.7@<@,^67@<@,..67@<@,.7@<@,dq6 }7<,.6-%@*6-%@G-@6? c2@@@g q @`nv-@@}+(ӠРϠ?-@A QAdAUU b)@v"@A0x Ap'6-@}6-@'6-y Ap6.7<,,-@@:6-%@G7<,4 k67<@,.7%@<}@,y6-&@ (@6@M@3@[6-%@i6-}%@u6- A@@@D3:PURGE@ %%++I1 REM +++++++++++++++++++++++++++++++2 REM +ҮîŮ͠٠+3 REM +BLKCUR.LST-ENTER THIS TO ANY +4 REM +PROG}RAM-GOTO 30000 TO CAUSE +5 REM +THE CURSOR TO BLINK. +6 REM + +7 REM + RHETT }BRYSON +8 REM + +9 REM +++++++++++++++++++++++++++++++30000 RESTORE 3004030010 ? "}}ŠԮ":? :? :REM ***REMOVE THIS LINE IF DESIRED***30015 FOR I=1536 TO 1567:READ A30020 POKE I,A:NEXT I30030 I=USR(15}36):RETURN 30040 DATA 104,162,6,160,11,169,6,3230050 DATA 92,228,96,165,20,110,243,230055 GOTO 3002530060 DATA 110,243,2,}106,106,106,10630070 DATA 46,243,2,46,243,2,76,95,228DATA 92,228,96,165,20,110,243,230055 GOTO 3002530060 DATA 110,243,2,7;!4CKSUERdWEDGE BASIC LOADERill** IT MAY(?) BE NECESSARY TO USE A TRA }NSLATOR WITH THE WEDGE (e.g..the AUTORUN.SYS FILE) WITH XL/XE'sn, +,(Insert a DOS 2.0S diskettex (with DOS.S }YS in drive 1.0(0(%Press when you have done this. F:Ad,@A@AdAU1(1( }&Now writing the Wedge AUTORUN.SYS file AB.@@ D:AUTORUN.SYS8 BB A: }@(7(!Can't open AUTORUN]SYS for write.:)*@AU)*@AU)*@)*@ }@1)*@@t)*@@3-Ay6A"%@(" A*@( B }6-% ?B53(Bad number in DATA statements.?6-@@"*( (*(DATA ok, write succ }essful.,104,165,12,141,37,31165,13,141,38,31,169 36,133,12,169,31,13313,32,43,31,32,9231,16 }9,75,141,231,2169,33,141,232,2,96$32,64,21,32,11,31*96,169,80,141,68,30169,31,141,69,3,16960,141,73 !},3,169,12<141,72,3,169,11,141B66,3,162,0,32,86H228,152,48,1,96,76N55,33,65,116,97,114T105,32,87,101, "}100,103Z101,155,160,0,185,26`3,201,69,240,7,200f200,192,34,208,243,96l200,169,165,153,26,3r200,169,3 #}1,153,26,3x162,0,189,0,228,157~165,31,232,224,16,208245,169,184,141,169,31169,31,141,170,31,24173 $},4,228,105,1,141186,31,173,5,228,1050,141,187,31,169,0133,203,96,251,243,51246,184,31,163,246,51 %}246,60,246,76,228,24356,1,1,125,32,3262,246,8,201,155,2404,230,203,40,96,140181,31,142,182,31,165 &}203,240,86,169,51,133205,169,32,133,206,1600,177,205,217,128,5208,12,200,177,205,24040,196,203,208 '},240,7637,32,201,255,240,53160,0,177,205,240,9230,205,144,2,230,20676,242,31,24,165,205 105,3,13 }@--IFNNDSASAFUNALOGIRAPMBASCHRORCHSEPPPJJFSCCMRCANTICOLFCOLFCOLFCOLFKCE)}DICOLUCLCHRDDR@ *} +} !"#$%&'()*+,},-./01234 A6 AT@@-}'-@/-M( Q T$d*** SUPERFONT + ***iCharacter Set Editorjorigi.}naln11/10/81 Charles Brannons""ANTIC,COLOR, AND PRINT MODESxBY John Slaby 8/22/82&&9@,;@,;/}@,"F:A6,"" A +AR@70@@@70@@@0}--6-F:A`,%AV$F:Aa,%@K56-F:@,%AV$F:@,%@$@@K6-%@$@@1}36-A06-A1'6-A236-A((6-F:A,&@(6-$AV6-BsD!AY@F2}!BBy'B2w@'B2V@6-+&@,$AV+%@#@+%@$@+3}%@A0+%@A'A'A@"BBA,=AI&@+4}Ar&@=A866-?:AU<,@{6-%A%@ /6-%A@%@ E6-%Ah%@ [5}6-%A%@ g6-@q A0{ APJq-@+-@96-AU&Q%$@%6}c%$@%q6-AU&T.%$@% '6-AU&+ .$^9B2H@d'B2I@d7}9B2P@dh9AA'AA@9A@hrKB2V@'B2W@9B2X8}@KA#@|K( '-@@7( | |; K(  A A9}'@@'-@( Edit Restore( Copy From Switch( Copy To Cle:}ar( Overlay Invert!!( Save Font Load Font ( Delete  Insert##( Scroll Left  Sc;}roll RT ( Reverse Graphics!!( Print mode ANTIC 4&5!!( Color change:ANTIC MODE( Write Data<} Quit$~-@+-@1O%%$@@%@$@2%s%%$@@%@$@2%=}w { ~(##@@K:&6-F:Ad,&"AUA  '@@'->}"@`A !"@9!AdAh&)@0@:E,A: APDZ-@?},6-F:%$@%,@-@R%$@%V Z N7%Ai%+$@,7%A%+$@0,@}X6-6-b-%@%@l-(>:@2%A($,-6-@&v T:,"AA}P)F:Ad, AU( ) A &6-R:,&"@ATT:,,-A@ B}P2A&@@T  -%@%@ ( !!6-%+"@,&+"@,!!6-%+"@C},&+"@, 6-@!@6- 6-@!@6-D} AEF:%$@%,0@#+@&,<@sE6-?:,?%$@%)-@;E}%$@%? a-@;2$@@@? a2  AF}P@:F,A0  6- AP*B-@,6-F:%$@%,>%$@%B 4 6- AG}>@:T,ApH 6- APRB-@,6-F:%$@%,>%$@%B \ 6- H}Af@:O,A p 6- APzV-@,F:%$@%,AF:%$@%,M@ I}V6-?:,%$@%  6- A@:R,A @F-@8%$@%F:%$@J}%,< F A@:C,A `=-@/%$@%3 = A@:,A K}N-@@%$@%AU&F:%$@%,D N A@:X,A 6- APmL}-@,6-F:%$@%,M%$@%F:%$@%,_%$@%c m A@:I,A0M}r-@/68,-F:%$@%,3 G-@d%$@%8@&,h r A@:N},*@:,APf-@:%$@%F:%$@%%@,> \%$@%@f AO}@:,*@:,Ap$i-@6@C%$@%F:%$@%&@,G _%$@%i P}A.@:,A8N-@46-F:%$@%,$@@!AUN6-&AVB#%$@%Q} # AL@:,A0V7-@76-P:F:%$@%,'@,`#%$@% # AR}j@:Q,APtXB2H'B2I9B2PKB2wU+X~@:S}S,A AA* A*@@6-?:A<,-@ BT}-F:A,A`)BBA A) A@:L,A AA* U}AP*@@6-?:A<,5@ B5F:A,"A2-@V}2( *ERROR -F:A,*LF:Ad, AU*-@B( L A Ap W}@:W,Apj6-6-@% @ /6. ;6-B:=:,,O67@<,.=:,X6-B:,j-@X}3-@)(>:@:7<,,%A(,- 3(>(f6-#-@C-@%+!,X6-F:Y}%$@%,f6-%@2;;2+$@%,$@%@P@@<; (, (~ ;2Z}F F:Ad,"AUAPP! @  A! A Z@:G,A d/6-@&[}/AI&@%@$n A xZ+@%@/0@@@A-@@Z(@ SUP\}ER +-@@.(@ patience@-@@X(@ j-@@(@]} ORIGINAL W-@@2(@CHARLES BRANNOND-@@W(@+ M-A6A^}"!-A I2@@M (%2($72,169,100,141,10,212_}141,24,208,141,26,208169,6,141,9,212,10464,104,104,133,204,104133,203,169,0,133,205169,224,133,206,1`}62,4160,0,177,205,145,203200,208,249,230,204,230206,202,208,240,96,104162,16,169,9,157,663,104,a}157,69,3,104157,68,3,169,0,15772,3,169,4,157,73"3,32,86,228,96,104,162,16,169,5,76,5866,9,104,169,b}0,9,0,133@212,169,0,133,213,96A((72,138,72,152,72,169,0,162,0,160,0B141,10,212,141,26,208C142,24,208,140,25c},208DRR169,0,141,22,208,141,10,210,169,6,141,9,212,169,0,141,23,208,169,156,141,0,2E]]104,168,104,170,104,64,72,169,0,1d}41,10,212,141,26,208,169,104,141,10,210,141,0,2,104,64J$-@$( Filename?T 6.6-^@ e}hFFF:Ad, AU*F:Ad,@9*F:Ad,@`Apr F:@ , @A@|7(>:@!f}%@$,-6-@&7 A0)@="AU( /-@B:,%@6(~: =$N"g}A&*B:,!@86.7@:,N A0."A&*B:,"@$(>:,. A MM"h}@X)+!@H* @W,)+!@e*@,)"@FA  A01B:, @)67B:,%@,.>:,1(i}>:, A0GET CHOICE OF CHARACTER$6-P:'@2,$6-&@2$6-%$@2%%%%$@@j}%@%A(%%%%$@@%@%A(;+T:,")F:Ad, AU16-; A&6-Rk}:,&"@AB2y& A0?!6-&+"@,%+"@,?6-&+"@,%+"@l},:) 6-@1)6-&@D)!@16-)6-%@N 6-@X!@m}6-b Apl%%$@@%@v%%$@@%@$@:A,A"BBn}C#%Ai%+$@,C%A%+$@0,"@A!%@$@=o}-@@#%%@) =%@"A2!AA!6-@;6-@$@%@;6-p}@$@%@ ;6-@$@%@;6-@$@%@AdAH APq}Aw*+BBA!6-@Q+ A!'476-#%@#@7%@$@>;Ar})-@@"7%@; H!BBA!6-@OK A0'%Ai%+$@,A%As}%+$@0,K A @:P,A0%6-6-@% @ !-@!6-(t} !(!( Press to return( to menu!(!( Press to clear( typing areau}26-F:B2y,"@( A2 A "@A&&6-F:Ad,&"AUA"p)@v}E-* @2)A(* A`;6-%@dE A# ;-@2* @)A`* A$;6-&@2w} ##!+%@,$@A#  G%Aa%/%A%+$@ ,%=6-%@G A"p u#-x}@$+%@,@%Aa%F:%Ab%,u%A%+$@ ,%F:%A%+$@ ,%, ) 6-@$+%y}@,) A#( o#-@$+%@,9%Aa%U%A%+$@ ,%Y e6-o A"z}p @:K,A  16-6-@% @ 16- =@@'-@=(COLOR {}CHANGE MODE ( PRESS K TO RETURN ( TO MENU ( PLAYFIELD 0 ( PLAYFIELD 1 ( PLAYFIELD 2|} ( PLAYFIELD 3 )( BACKGROUND)( READ REGISTER 3)@6-'"@:0,36-@! $"@:R}},6-@$ A1& "@:1,6-@10 "@:2,6-@: "@:3,6-@D "@:B,6-@H~}N ""@:K, A" A S "@A4X "A1b %6-@6-@% @ l '}@@'-@v ( GREY GOLD ORANGE ( RED PINK PURPLE !!( BLUE BLUE LT}.BLUE !!( TURQOUISE GREENBLUE !!( GREEN YELLOW/GR !!( ORANGE/GR LI.ORANGE A4 }( Luninosity ( input(0-14)  6-$@% AF% A0H B-@@}-( TRY AGAINA-@AE W-@@e( w-@@ A2ER h6- 6-F:AF}%,2-@@ ^(COLOR REGISTER >:,= h A1D:SUPRFONT.BAS@ A2E-F:AFt3,205,144,2 230,206,76,215,31,200 132,204,177,205,141,183 31,200,177,205,141,184 31,108,183,31,160,0  }169,46,153,128,5,169& 0,133,203,169,155,172, 181,31,174,182,31,402 96,68,73,82,0,1258 32,83,67,82,65,84>  }67,72,0,22,33,76D 79,67,75,0,27,33J 85,78,76,79,67,75P 0,32,33,82,69,78V 65,77,69,0,37,33\ 75,73,76,76,0 },42b 33,255,155,50,54,32h 70,82,69,69,32,83n 69,67,84,79,82,83t 155,155,0,0,68,58z 42,46,42,162,80,169 }12,157,66,3,32,86 228,162,80,169,3,157 66,3,169,6,157,74 3,169,120,157,68,3 169,32,157,69,3,32 86 },228,152,16,3,76 55,33,162,80,169,5 157,66,3,169,100,157 68,3,141,68,3,169 32,157,69,3,141,69 3,169, }20,157,72,3 141,72,3,32,86,228 152,48,13,169,9,141 66,3,162,0,32,86 228,76,166,32,162,80 169,12,157, }66,3,32 86,228,76,30,32,162 80,157,66,3,169,0 157,73,3,164,203,153 128,5,56,152,229,204 157,72,3,24, }169,128 101,204,157,68,3,169!5,105,0,157,69,3 !32,86,228,152,16,3!76,55,33,76,30,32!169,33,76,229,32, }169!35,76,229,32,169,36"!76,229,32,169,32,76(!229,32,173,37,31,133.!12,173,38,31,133,134!76,116,228,72,1 }62,80:!169,12,157,66,3,32@!86,228,104,162,255,154F!133,185,76,64,185(#2#224,2,225,2,1,31 D:WEDGE.B }AS  `* 57,66,3,32@!86,228,104,162,255,154F!133,185,76,64,185(#2#224,2,225,2,1,31 D:WEDGE.B 32000 CLR :? CHR$(125);" RENUMBER UTILITY"32015 DIM OPCODE(10),REFNAME$(7)32025 REFNAME$="REFLIN"32030 REFADR=PEEK,}(130)+256*PEEK(131)32035 REFCOUNT=032045 FOR I=1 TO 732050 IF PEEK(REFADR+I-1)<>ASC(REFNAME$(I,I)) THEN 3209032055 NEXT I,}32070 REFADR=PEEK(134)+256*PEEK(135)+8*REFCOUNT32080 GOTO 3212032090 REFCOUNT=REFCOUNT+132095 IF REFCOUNT>127 THEN PRINT ,}"FATAL PROGRAM ERROR":END 32100 REFADR=REFADR+132105 IF PEEK(REFADR-1)>127 THEN 3204532110 GOTO 3210032120 RESTORE 32125,}32125 DATA 10,12,23,24,13,4,35,27,1832130 FOR I=1 TO 932135 READ X32140 OPCODE(I)=X32145 NEXT I32150 STARTADR=PEEK(136)+,}256*PEEK(137)32160 LINEADR=STARTADR:REFLINE=032165 OLDLINE=-1:LINECOUNT=032170 NULINE=PEEK(LINEADR)+256*PEEK(LINEADR+1)32,}175 IF NULINE>31999 THEN 3222032180 IF OLDLINE31999 THEN 3247032270 LINEEND=LINEADR+P,}EEK(LINEADR+2)32275 STMTSTART=LINEADR+432280 STMTEND=LINEADR+PEEK(LINEADR+3)32285 FOR I=STMTSTART TO STMTEND-132290 IF PE,}EK(I)<>14 THEN 3243032300 FOR J=1 TO 932305 IF PEEK(I-1)=OPCODE(J) THEN 3232532310 NEXT J32315 GOTO 3243032325 FOR K=1 T,}O 632330 POKE REFADR+K+1,PEEK(I+K)32335 NEXT K32340 PRINT "LINE ";NULINE;" REFERENCES LINE ";REFLINE32345 IF REFLINE<3200,}0 AND REFLINE>-1 AND REFLINE=INT(REFLINE) THEN 3235532350 PRINT "GARBAGE LINE NUMBER":GOTO 3243032355 OLDADR=STARTADR:REFCO-r}%&NAMEFILEYLOOXLOOCHARACTE @"@@ @@} A %%*******************************%%*** DISK DIRECTORY BY ***%%*** AL TO}MPKINS ***%%*** THIS PROGRAM LISTS ***%%*** DISK CONTENTS TO SCREEN ***%%*** IN TWO COLUMNS AND *}**%%*** WILL PRINT TO PRINTER ***%%*** LIMIT IS 42 FILENAMES ***%%*******************************   }>:A%,;@,36-@"6-'6-@36-f&@@D:*.*F@}@K:f@@S:(;@%,2 AAR@<-@@!F}@P -Z d6-%@n x-@@!@ - 6-%@}  A.-@@". Рrint or Šnd ?:)@#"@ B# A0"}@i B+-@@"=ARH@S@Z l-@@!~@@ } A A##@@P:-@@" **** DELETE LINE)-@@"}%  DISK NAME )''3 *******  DISK *******"36 ** SCREEN PRINT ROUTINE **@!-@ !}21 ROWSJ!-@9!40 COL.T -^)@h!*@!PUT CHR TO PTRr | !AR}333!3   -@@-@"@" TURN PRINTER ON-@A} -@"@" ΠҠ-@A  -@"@"  } @ A0 D3:DISKDIR @"@@ @@0d 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}>}BPURGE BBLKCUR LSTB\(SUPRFONT BWEDGE BDISKDIR CDOS SYSBMODEM B)CASDISK} C C*(> 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 !BD$}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.$}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC$}COPY--FROM, TO?OPTION NOT ALLOWED697 FREE SECTORS COPYING---D8:COPY32.COMl# 0|D .L/%#$}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY$}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E $}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A$}LLOWED IN DESTINATION 0 <.|Kɛ(`V;ͩ Πـ ȱ(L- 5 ͐a}Li͐LȄ̱͍ȱ͍l.˩(`DIR /DIR DPRINT /DPRINT DESTROY!LOCK!UNLOCK!RENAME!/FOa}RMAT1/!/FORMAT2/!/HELP!"SPRINT#KILL# #D0:*.* !L !2 L 1 P B VPBJĝD E VLl$Pa}BDD EEHH V0 B V䭯  !L !P B V "L& PBI˙8̝He̝DiE VLl$L& !LU!a}#LU!$LU! LU!1 L!2 BĝD E V0L Ll$ "@BD#EJ VLl$ `@D E BHI a}VLl$` @ B V`J#䍱䍲\D"EHI B V0L#L#}COMMANDS: DIR (D1:)/DIR (D2:)DPRINaF}n AFULFILEFS(B2@B5   }ooˠĠՠͬ٠ ٠ڬΠӬ ̮Ġ٠ĠppԠƠ}ŠΠϠР Ġ٠ŧӠ ҠӠΩ A  &&;@ ,};@ ,;@ ,  6.D:##@@K: AP76-C:,%@  6-@76-}I:,&A(##@@R:-++@@@R:2^@F:AG,}*)@6!@1>(>:,F%T6-%@^ @P7NF:Ad,AU%)@2*@DAd}AUN @P<$$F:B2y,"@)!AF1F:B2y,"@(%(START16-@d @PL@}@~"("(SAVING MESSAGES TO DISK4 AP*@@ 4 A? Au@}5@@? AK@(-(UNABLE TO SAVE MESSAGES0(K(PLEASE CHECK DRIVE 1??$$(TR }Y ANOTHER FORMATTED DISK?? (HIT RETURN TO TRY AGAIN! E#@@K:0)@;@E AP!}T-@&@$6-F:%,,(>:,9*@= H@T6-@x(((RETURNING TO MODEM ( @"}'$(}850 INTERFACE NOT BOOTED...' (}AR@++(#Be sure you have a disk in DRIVE 1,P+(+( To s#}tart saving text into memoryZ''(hit . Each time START isd""(pressed-memory is CLEARED."("(To save memor$}y to disk ++(#hit