@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@P1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD`707 FREE SECTORSGC +w cCK C6 f{Bc&3  &VÄf7  D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` ) } `A! d߰")-݆ "  $G@LLLI $j") $G% }H 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆  LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L}  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?0{ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} HE |||DDOS DOSDOS SYS }}}}d}BPACEAPRL83 CDOS SYS} 0`BDELV !B  }`LVUQ   ]   TU J ]L!T  #      TU !} L ? .  t`GBJ V~DEHI B V0dV"}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh#}DEL8HI   0 HI,0 0  9 .G VLO$},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI%} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI&} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO '}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -(}LLu DEHILV 9 .l 9 .l  `` s$B VBH)}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL*}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e+}1i1232435ޥ<<8} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D-}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F.}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟/}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i0}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 01}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE2}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH3}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 4} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:5}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B6} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#7}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%8} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}Y EXISTSu( <0 2 0 0(( (( 1 ~0Yr( 1BʝD(EJ 1 B 1 .{(} 1 ?}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 2.@}D2:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1A} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUB}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,C}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0D}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L E}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭF}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNG}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rH}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtI}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. J} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VK},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭL}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT M}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξN}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-O}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L P}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥQ}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{R}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1S} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uU} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4u500 REM ***************************501 REM * COURTESY G.R.A.S.S. BBS *502 REM * PHONE (616) 241-1971 *503 REM ********* W}******************600 REM THE PROGRAM TO CREATE THE OBJECT FILE610 DIM A$(100)620 TRAP 900630 RESTORE 640 REM OPEN THE F X}ILE FOR OUT-PUT OR APPEND650 OPEN #1,8,0,"D:HARVEY.OBJ"660 READ A$:FOR X=1 TO 50670 A=ASC(A$((X*2)-1)):B=ASC(A$(X*2))680 Y}HI=(A-48)-(A>64)*7:LO=(B-48)-(B>64)*7:BYTE=LO+HI*16690 PUT #1,BYTE:NEXT X700 GOTO 660900 CLOSE #1:END 1000 DATA FFFF0034D Z}8394C47347070707047073A0707070707070707077070461B34410334F2E1E2E2E9F4F3DAD3C0F3E3EFF2E5DAD01010 DATA D0D0D067616D6500006F766 [}5728070726573730000737461727480D82065E4A9D38D2334A9038DF539A9D08D2B348D2C348D1020 DATA 2D348D2E34A93C8DE4398D1A0220DC38A0022 \}0E7388810FAA9038D3002A9348D3102A9048D6F02A9288DDB39A9C48DDC39A91030 DATA 3C8DDD398D02D0A9B88DDE398D03D0A97A8DD939A9378DDA39A ]}92E8D2F02A9038D1DD0A9308D07D4A9968DC602A9488DC7021040 DATA A9188DC002A9988DC102A9348DC202A9C48DC302A9018DE939A235A0CCA907205 ^}CE4A9898D2602A9358D2702A9998D2802A91050 DATA 358D2902A9018D1902A9008D1ED08DF6398DE3398DDF398DE0398D0ED2A2039DE5399DF7399DFB3 _}99DFF399D033ACA10EEAA1060 DATA 9D80319D0032E8D0F7A9FF9D0033E8D0FAE88A2901AABDDB394A08CD0BD4D0FB8D0AD42890038D0AD4AD0AD229F68 `}D1AD0A01070 DATA 0AA9009D0FD08D0AD4AD0AD229F68D1AD088D0EDADC8028D1AD0ADF539F008ADF63910034C6334AD1FD02901D0B14C4734AD1080 D a}ATA E439C902F003CEE439A9018D190260ADE4398D1A02EEDB39CEDC39EEDD39ADDD398D02D0CEDE39ADDE398D03D0EEE339ADE31090 DATA 392901AABD b}CF398D00D2A9088DDF3960ADF639D03CADF539D03720DC38A2008E01D28E03D28E05D28E07D28E18028E19028E1100 DATA 1A02BD2F3430079D5C3AE84C c}F035A200BD3A3430079D973AE84CFE354CBD38AD0CD08DEC39AD04D08DED39ADE2393009CEE21110 DATA 394A09A08D07D2ADDF393008CEDF3909C08D01 d}D2ADE0393008CEE03909808D03D2ADE139EEE139EEE139EEE1398D04D2ADF61120 DATA 39F01AEEF639EEC002EEC002ADC0020A0A0A8D02D2A9888D03D2 e}4CBD38ADE539F00DCEE539ADDB39C91CF003CEDB39ADE6391130 DATA F00DCEE639ADDC39C9CCF003EEDC39ADE739F010CEE739ADDD398D02D0C927F003 f}CEDD39ADE839F010CEE839ADDE398D03D01140 DATA C9D0F003EEDE39A900854D8DEA398DEB39AD7802C90FF010A5142907D00AA9108D02D2A9048DE039 g}AD780238E9050AAAA5141150 DATA 6A6A6A6ABDA0399003BDB6398580BDA1399003BDB7398581A2034E7802B010BDD139F0038DEA39BDD539F0038DEB39 h}CA10E81160 DATA ADEC39C90CD009CE2334CEF539EEF6392904F008EED939A9008DEA39ADEC392908F008CED939A9008DEA3918ADDB3969044A1170 DA i}TA CDDA399009CE2334CEF539EEF639ADDA39690A0ACDDC399009CE2334CEF539EEF63918ADD9396DEA398DD9398D00D018ADDA1180 DATA 396DEB398DD j}A39AAA000B1809D0032E8C8C00ED0F5AD8402CDE9398DE939B03FADEA390DEB39D005EEE939D032A9408DE1391190 DATA A9048D05D2EEF439ADF439290 k}3AAADEA390A9DFF39ADEB390A9D033A18ADD93969039DF739ADDA3969089DFB39A900AA9D801200 DATA 31E810FAA203BDFF391D033AF07FBDFB39187D0 l}33A9DFB39A80A6902CDDC39900C20D0386DE6398DE6394C1F38E90CCDDB391210 DATA B00920D0386DE5398DE539B980311D2239998031B981311D22399 m}98131BD00D0A0006A90034CC338C8C004D0F518BDF7397D1220 DATA FF399DF7399D04D0CDDE39900C20D0386DE8398DE8394C6F38E906CDDD39B00920D n}0386DE7398DE739CA30034CE837A203A91230 DATA 001DFF391D033ACA10F7C900D0038D05D2A0004EED399028200A39B9EE394820E73868A8F017A203F o}E2B34BD2B34C9DAD0081240 DATA A9D09D2B34CA10EE88D0E94CBD38C8C003D0CE8D1ED04C62E48A48200A3920E73868AA4C6F38A9009DFF399D033A18A p}908601250 DATA A2C8A9009D063ACAD0FA60AE0AD2E0C8B0F9BD073AD0F4AD0AD2290FC90AB0F799EE3919CC399D073A8A99F13960A900BEF11260 DAT q}A 399D073AAD0AD2291F09108D06D2A91E8DE23960030C30C00000120A3C743C1C1E3E3F7E00000B0A3C743C1C1E3E3EF700001270 DATA 48503C2E3C38 r}787CFC7E0000D0503C2E3C38787C7CEF000042243C143C183C7E7EE7000042243C283C183C7E7EE7000044241280 DATA 3C143C183C7EFE07000022243C s}283C183C7E7FE0000044243C3C3C183C66FE07000022243C3C3C183C667FE000003E393E391290 DATA 3E39000026392639263900006E39863956394A39 t}4A394A39000032393239323900007A3992396239105090262901FF0000001300 DATA 0001FFE202E302003400000000000071 *503 REM ********* ffVSCREENPMHLPMBASPYXPLEFTCENTERRIGHTCURRCRASHERASEDIRCHSESCSLEFRIGHLOLSTUDOWPOPWHIv}CHITCLPTDLISTLINCOLOHILPEESCRBASCHBASVVTSTARTTTOPLINELFELFLERTLELASSKESRLP0Pw} @x} !y}"#$%&'()*+,-./0z}123456789:;<=>d%;@{},;@,% A0nɠoŠ§px'6-P:'AV,$6|}-&$AV'$}f@f@)-@@;B2yMB2y@Q c@ff$ }}APLAYER ROUTINE!AY@b!BBy7B2w@7A@$@%@'6-~}A$6-A'6-A(C67,.>:,/67%AT,.>:,C67%@,.7,RR;@ ,;@ ,};@ ,;@ ,;@ ,;@ ,9@,96.>:,*67@ ,.>:,967@,. 6.6}.6.6.-@..67%@<%@,.>:F:%A%,,..67%@<%@,.>:F:%A$}%,,..67%@<%@,.>:F:%A%,,..67%@<%@,.>:F:%A@%,, 68,-}-68@,-@ B68@,-@W68@,-@!l68@,-@-@68%@,-68}, " 6.,67%<%%@ ,.66-%@&F:,@(-@((@ J F:@,}"A@T6-R:,^36-(S:@,#6-(S:,36-%@$h 6.B2Hr+ 6.}6-@+6-@|+ 6.6-@+6-@3!6-&@32=}"12=6- 6-%&6-K'6-+"@)"@)"@,K6-+"@})"@ )"@,56-&@$%@$)!A56-A @@6-@@))+&@H},'@H%@F:,"A7%6-P:K:F:,,'K:@,%?,767%<%%@ ,.}##@A  POINTS++6-@:7@,,%AV$@:7@ ,,&&6-P:+&@9,'@,%@}&&6-P:+&@I,'@,%@76-%$@ %72&%-@%6-}F:%8,,0!! A()!AA:%8,DK16-%+"A9,$@P%+"A4,$A=6-@A} K AN  AX@ -@6@<2@ @@ b AlȠv}%%267%<%%@ ,.?-AAP@;2@@? }67%<%%@ ,.6-A67%<%%@ ,.7@721}%6-P:@r%@$H:,,1B2H(F:,( A56-&@P) }56- A,-@,(@ GAME OVER%%2((67A&<A}6,. press(,) F:B2y,@Ap % = +@6-A +B2H}=*k0@@70@@@Q0@@ @k0@@}4'6-B2R6-B2x'>(6-F:A,&@(4K BOUNDARYH06-&@02K BOUNDARY, DOUBLE-LINE R}ESR* 6-*Fill up offset with characters\<%6-F:A4,%AV$F:A5,<Variable Value Tablef%%6-F:A@,%A}V$F:AA,p36-$AV& %%@3%@z9%@@+%@@9LENGTH=4097}+%@@+%@@36-$AV& %%@3%@9%@@+%@}@9LENGTH=2049+%@@+%@@<6-$AV(F:%@ ,@2 A< A@}#6-?:A8,#DISABLE VBLANKAV#A &&;@ ,;@@,;@ ,( 6-C:, Aa}(A` 112,112,112,70,0,0,102,0,0+-@@ "'67,.>:,+ U-@@ 967%@ },.>:@%@2,= U67@0,.>:@,Q67@1,.>:@e,667@2,.>:F:A`,,Q67@3,.>:F:A}a,,U67@,.>:,367A@,.>:,B67@,.UCLEAR OUT SCREEN 6. 6-C:, $767}@<@,.>:,767@<@,.>:,.@@8(-@((@ɡB!!67A}<A,.L6-$AVV-@$A`G6-%@  6.>:,067@,.>:,G67@<@} ,.j'6-$@ %@'6-%@t%%6-P:@$H:,%@,~%%6-P:@$H:,%@,}-@6-P:@$H:,,%%67,.>:+@r%,$+ @,, 67<%,.7@<,-@}6-P:@$H:,,%%67,.>:+@r%,$+ @,, 67&<,.7@<, }H:@,!?Ap& @Ap  6-16-@$H:,!?P16-6@%%6-P:@}$H:,%@,(67%<%,.>:A4,2-@<9!6-%$@@%$+%@,96-%@ &$@}F367%<%,.>:A,367%<%,.>:A,P  A`Z H:@,!?Ad''6-%P:@$H}:,%@,n!67<,.>:@,! A`x H:@,!?A0''6-%P:@$H:,%@,}!67<,.>:@,! A` H:@,!?A`''6-%P:@$H:,%@,!67<,.>:A9,}! A` 6-%A 5 6.>:,67@,.>:,567@<@ ,." A%"T:,A}((6-?:A67:%(@ A  D2:SUPRMENU]GHAFILEOLDFILETRANFILENEWOLDRECTRANRECNWRECPSSSERRSOLTRANU }  ooSUPRCOMP, A SUPER COMPARISON P }ROGRAM, BY STACY A GOFF, OF THE EUGENE ACE'S. 3/81 B+@%@ (@B(@ LOOK, UP IN }THE SKY/-@@/(@ IT'S A BIRD!/-@@/(@ IT'S A PLANE-@@P } --@@F(@ NO, IT'S...Z-@@P~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 22' +'0@dX (]X;@ ,;@, };@,;@,;A(,;A(,;A(,n1!(ENTER OLD PROGRAM NAME+ A16.x3#(ENTER TRANS } PROGRAM NAME- A36.1!(ENTER NEW PROGRAM NAME+ A16.( OLD FILE = ( TRANS FILE =  }( NEW FILE =  NEXT DECIDE VISUAL OUTPUT !-@A !(]la(TYPE P TO PRINT ONLY, D } TO DISPLAY ONLY,# B TO PRINT AND DISPLAY DIFFERENCElTRAP 180A4P)4B5@@P:A6- }@4B)4D6-@#"@)"@# A0 ANOW OPEN FILES * A 0 }*@@* A @*@@* A P*@@"@!} AEND+MAINLINE ROUTINE , AGO GET OLDREC6 AGO GET TRANREC; " A!}@-!Ap-MUST ADD RECORD FROM TRANE!A0G&J##ON OLD, NOT ON NEW; WE DELETET: 6.=:,(@!}# A:WRITE RECORD & PRINT^F A A! AFGO CLEAR NWREC, GET ANOTHER OLDRECr""ON TRAN, NOT !}ON OLD; WRITEIT| 6..(@ A$ A. AGGON BOTH FILES, CHECK TO MAKE SURE THEY A!}RE IDENTICAL  4 AP A6.$(@ A$ A! A A! AW!}FILE READ SUBROUTINES XN A `@167@<@,.; A A6-K BN$N A p@!}167@<@,.; A A6-K BN$ CLEAR NWREC*(-@B:,!67<,. % ($TRA!}P ROUTINES FOR OPENS 2(ERROR--CAN'T OPEN (6-@2 A@2(ERROR--CAN'T OPEN (6-@2 AP2!}(ERROR--CAN'T OPEN (6-@2 A`!!ERROR ON OLD FILE--CHK EOF "F:A,A6" A%6-B ! }"B % A$""ERROR ON TRANS FILE--CK EOF "F:A,A6" A%6-B "B ! }% A$:6-#-@@07<,4 : A 6-%@ 6-A:7@<,,$! }GGINPUT FILE NAMES AND CLEAN THEM UP WITH D:'S 46. *B:, @4 A'! }7@<@,4D:' A Y-B:,@6@;67%@<%@,.7,? Y67@<@,.D:! }$LPRINT AND DISPLAY OUTPUT V"@(@`"@(@j$ALL DONE, CLOSE FILES !}=@@$@:( END OF FILE =UNDETERMINED ERROR 9( (6( JOB ABORTED WITH ERROR !} =:F:A,,9D2:SUPRCOMP.AREOLDRECTRANRECNWRECPSSSERRSOLTRANU *G%CODINIOPCODHIGLOd%%. MAKE YOUR KEYBOARD FRIENDLIERn%}. BASIC Program versionx.$$. COMPUTE! => 12/81, p.113-115. Ric Mears 8/15/81##If you still want to %}use your cassette, switch these two""values: (but you'll lose useof Page 6 RAM)6-A6-A6%}""Poke the new code into place-%A0 "  ""Poke the new code into place%}",-%@6 " @ JT&&Fix the absolute address in case^%%the user has selected different%}hlocations for the code.r|6-P:'AV,6-&$AV%@%@$$Now r%}eset the keyboard vector: 6-?:,  ALL DONE""here's the assembled programas data:%}!!165,66,208,81,138,72,152,72 160,15,173,9,210,205,242,2 208,5,173,241,2,208,55,173""9,210,201,159,208,10,173,%}255&2,73,255,141,255,2,176,380##201,116,240,43,201,118,240,39:!!201,182,240,35,41,63,201,39D 240,29,201,60,240%},25,173,9N!!210,141,252,2,141,242,2,169X3,141,241,2,133,77,140,43b""2,104,168,104,170,104,64,160l5,32,216,252%},162,8,142,31v##208,162,75,173,11,212,208,251%%202,208,248,136,208,235,160,255$$173,11,212,208,251,136,208,248 %} 160,40,173,15,210,41,4,240189,208,203Here's the initializationcode as data:104,169,253,%}141,8,2,169,3141,9,2,96""End of BASIC program listing D:KBD.BAS%%. MAKE YOUR KEYBOARD FRIENDLIERn$WquQQQQQQQQ1Q1Q1Q1Q1Q1Q1Q1Q2Q2Q2Q4Q4Q8Q8Q10Q17Q25Q25Q27Q98DATFNAMLASSSCOPACO)}PHCOPLBEEPABEEPHBEEPLCENTACENTHCENTLMLPANSAMADFFFPFEFCFM)} ) } !"#$%)!}&'()*+,-./012345)"}66-6-@'6-@36-@?6-@K6-@W6-@ c6-@o6-@)#}{6-@6-@6-@6-@6-@6-@6-@ 6-@"6-@'{6-A@6)$}-@H'6-@36-A?6-AK6-ApW6-AUc6-AVo6-B2y{6-A    R+ ()%}6("ALL FILES COPIED TO CASSETTE;(@(R@w f(4($ SELECT 9()&}b(! start f G(( PRESS Ԡ TO SILENCE ALARMG( PRESS TO CONTINUE/-)'}@%62'F:,"+ /  2F:, $H 6-6.7<,"67<,.D:.-&>67<)(}%,.D:H-##7%<%,/7%<%,@&N-6*67%<@3%,.7<%,. B67<%,.7<%,J6-))}%N  6-%67,.7<%,  6.$3E6-A76-P:',$6-&$06-Au;6-P:',E6-&$4)*}I6-A96-P:',$6-&$2-A7E%F:B`%,I 5G-@c$%F:B(%,( 0-C%)+}F:B2%,G 6) &%%)%@(71%@%%A1A8$ %%@$),}!%$$dm6;@0,;A,;,;I:,&@,[6.hhEhDBHI V`d6-C:,m6-C:)-},jI @Q A! A '9@@8= I@ex$ A@D:*.*$6-% 67).},.6-%% A06-&" ! 6-6-"6-!6-  ! A p, -&6)/}. ,6.@6.7<%,67,..-67,.7%<%,<7<,4SYS@ j"(: 7@,.6)0}-@?-@B:,L7<,0 \67<,.7<,j6-%@ 6 %%%&16-?:<,)1}6^ %%F:AV,-%F:AW,9AdS@A(C:^6-?:<,(( $)2}"*&(   "  A u13DISK DIRECTORY13--------------( -(7%<)3}%,4SYSA t??3 7%<%,.7%<%, 7%@<%,   $2(( РҠɠΠԠŠ ŠҠ)4}ҠϠ2 A p4+000+AR1(}4$[+ (((( -([(&)5} , Z(K(; RETURN -- R)WZ$)6}?+ ( CASSETTE BACKUP:( program options:?(nn(c1 2 ,3 )7} 4 5 L.(#6 X 3(L( )8}5K:6-6-#6-)6-56- )"@$#*+"@P)"@Q,# )!@T)9} Y 2- #2Y&A`ApAAAA$ 6- . 6- 8):} 6- =' 2- #2' B 6- L 6- V 6-  D:DSKTOCASLASSSCOPACO(lmK [ ESPGFDENT -<}66PROGRAM TO DELETE VARIOUS FILES ON A SINGLE DISKMODIFIED BY JRB B -@@K:q;@-=},;A,;@,;@,;@,;@,}6-@6-@([ +'0@@@A->}0@@@[0@@@2(WHAT DRIVE TO PURGE?))@66.D :*.*X67@<@,-?}.=:&@H,z67@<@,.=:&@H, A@<]( }TO PURGE5(AFTER EACH FILE DISPLAY PRESS](#CONTROL-P -@}TO DELETE OR PRESS RETURNF0( TO CONTINUE0@@Pe@"-@@F7@<@-A},0 FREE SECTORSJ(M([(Še AZ A@d)@@.-@@;( CHOICE X-B}-@6? t2@ @x  @nF67@<@,.D :F67@<@,.7@-C}<@,xl+67@<@,.7@<@,D67@<@,..l67@<@,.7@<@,q-D}67<,.6-%@*6-%@G-@6? c2@@@g q @w-@@-E},(ӠРϠŠ@-@A RAdAUV c)@w"@A` A'6-@-F}6-@'6-y A6.7<,,-@@:6-%@G7<,4 k67<@,.7%@-G}<@,y6-&@ ( DELETING FILE B@6@g@3@-H}u6-%@6-%@6- Ap@CLOSE#4@@Š򭭭š-I}𮱸))ĠĠĠ٠ΠΠ A@ A0 @@[ +-J}'0@@@A0@@@[0@@@M@ A"(M(&-K}ˠ٠@( @( Ap"N@(<(%Ԡ-L}Ӡ٠٠ԠN@@,F#( DO YOU WANT A HARD COPY?0)@<"@F AP6$-M}@N@(<(%ԠӠ٠٠ԠN@@JN@(<(%ԠӠ٠٠-N}ԠN@@T)@%^5 A@5@@h' A('3 -O}DISK DIRECTORY r@3 |@3 Ap@3$3(}TURN ON PRINTER!-P}))@3 APD2:PURGE ,(100 REM Ϡ101 REM š젧砱102 REM 103 REM 1R}104 REM 栳105 REM ЮîŮ⮠106 REM 1S}ʮ󠠠107 REM 㮠108 REM 箬筠109 REM 1T}䮠110 REM 򠠠120 GRAPHICS 0:? "Checking DATA lines...":? :DIM CORRECT(27),F$(20):SETCOLOR 2,1,41U}130 FOR I=1 TO 27:READ A:CORRECT(I)=A:NEXT I140 FOR I=1 TO 27:CHECKSUM=0150 FOR J=1 TO 60-42*(I=27)160 READ A:CHECKSUM=CH1V}ECKSUM+A:POKE 712,A170 NEXT J180 IF CHECKSUM<>CORRECT(I) THEN ? "Error somewhere in lines ";7936+(I-1)*60;"-";7990+(I-1)*601W}:ERRFLG=1190 NEXT I:POKE 712,0200 IF ERRFLG THEN ? :? "Can't continue until":? "DATA lines are .":SETCOLOR 2,4,4:END1X} 210 REM Checksum values220 REM These at must be typed in perfectly!!!230 DATA 4556,4216,7888,4777,7684,8789,6732,361Y}55,3808,3587,6205,6086,5406,5712,6731,7528,7758,7120,6184,5743,6210240 DATA 6677,5602,7418,7558,7271,1354250 GRAPHICS 0:SET1Z}COLOR 2,12,4:? "Congratulations. ˡ":? 260 ? "Enter output filename below.":? "Use AUTORUN.SYS for easiest use."270 1[}? "autorun.sys will boot up on a":? "disk containing DOS."280 ? :? "If you use another name, you must":? "use MEM.SAV and DO1\}S selection L":? "to load the program."290 ? :? "Use the D: prefix.":? 300 ? "Filename";:INPUT F$310 ? :? "Writing file":S1]}ETCOLOR 2,7,4320 TRAP 500:OPEN #1,8,0,F$330 PUT #1,255:PUT #1,255340 PUT #1,0:PUT #1,31:PUT #1,42:PUT #1,37:RESTORE 793631^}50 FOR I=7936 TO 9514:READ A:PUT #1,A:NEXT I351 PUT #1,224:PUT #1,2:PUT #1,225:PUT #1,2:PUT #1,53:PUT #1,35360 CLOSE #1:TRA1_}P 40000:SETCOLOR 2,9,4370 ? :? "File saved OK. Have fun!"380 END 500 CLOSE #1:SETCOLOR 2,4,4:? :? "-";PEEK(195);" tr1`}ying to save ";F$510 END 7900 REM 7910 REM Machine language equivalent7920 REM of VIDEO 80. Must be typed7930 REM accur1a}ately to function.7931 REM 7936 DATA 0,0,0,0,0,07942 DATA 0,68,68,68,68,07948 DATA 68,0,170,170,170,07954 DATA 0,0,0,0,11b}70,2387960 DATA 170,238,170,0,68,1027966 DATA 136,68,34,204,68,07972 DATA 136,34,68,136,34,07978 DATA 204,102,238,102,2041c},687984 DATA 0,68,68,68,0,07990 DATA 0,0,102,136,136,1367996 DATA 136,136,102,204,34,348002 DATA 34,34,34,204,0,1708008 1d}DATA 68,238,68,170,0,688014 DATA 68,238,68,68,0,08020 DATA 0,0,0,0,68,688026 DATA 136,0,0,238,0,08032 DATA 0,0,0,0,0,0801e}38 DATA 0,68,0,0,0,348044 DATA 68,136,0,0,238,1708050 DATA 170,170,170,238,0,688056 DATA 204,68,68,68,238,08062 DATA 238,1f}34,34,238,136,2388068 DATA 0,238,34,34,238,348074 DATA 238,0,170,170,170,2388080 DATA 34,34,0,238,136,2388086 DATA 34,34,1g}238,0,238,1368092 DATA 238,170,170,238,0,2388098 DATA 34,34,68,68,68,08104 DATA 238,170,238,170,170,2388110 DATA 0,238,171q}bPACEAPRL83 b'DOS SYSb*,DUP SYSbVHARVEY LSTb=uSKI bSYSTMSTATUSbSPEAKER bSUPRMENU bSUPRCOMPAREb KBD BASbDSKTOCAS b;PURGE bOQVIDEO80 b V80PROG2 b V80PROG3 bBASINACTIONb/HORSE20 BASbAUTORUN SYSb MENU BSKI BAS0,170,238,348116 DATA 238,0,0,0,68,08122 DATA 68,0,0,0,0,688128 DATA 0,68,68,136,34,688134 DATA 136,68,34,0,0,08140 DATA1r} 238,0,238,0,0,08146 DATA 136,68,34,68,136,08152 DATA 0,204,34,34,68,08158 DATA 68,0,102,153,187,1878164 DATA 136,102,0,21s}38,170,1708170 DATA 238,170,170,0,204,1708176 DATA 204,170,170,204,0,1028182 DATA 136,136,136,136,102,08188 DATA 204,170,1t}170,170,170,2048194 DATA 0,238,136,204,136,1368200 DATA 238,0,238,136,204,1368206 DATA 136,136,0,102,136,1368212 DATA 1701u},170,102,0,170,1708218 DATA 238,170,170,170,0,2388224 DATA 68,68,68,68,238,08230 DATA 34,34,34,34,34,2048236 DATA 0,170,11v}70,204,170,1708242 DATA 170,0,136,136,136,1368248 DATA 136,238,0,170,238,2388254 DATA 170,170,170,0,204,1708260 DATA 170,1w}170,170,170,0,688266 DATA 170,170,170,170,68,08272 DATA 238,170,238,136,136,1368278 DATA 0,238,170,170,170,1708284 DATA 21x}38,51,204,170,170,2048290 DATA 170,170,0,102,136,2048296 DATA 34,34,204,0,238,688302 DATA 68,68,68,68,0,1708308 DATA 170,1y}170,170,170,238,08314 DATA 170,170,170,170,170,688320 DATA 0,170,170,170,238,2388326 DATA 170,0,170,68,68,688332 DATA 68,1z}170,0,170,170,2388338 DATA 68,68,68,0,238,348344 DATA 68,136,136,238,0,348350 DATA 68,68,136,68,68,348356 DATA 0,136,68,31{}4,0,08362 DATA 0,136,68,68,34,688368 DATA 68,136,0,68,170,08374 DATA 0,0,0,0,0,08380 DATA 0,0,0,255,0,1538386 DATA 255,21|}55,102,0,0,688392 DATA 68,68,119,68,68,688398 DATA 34,34,34,34,34,348404 DATA 34,68,68,68,204,08410 DATA 0,0,68,68,68,2041}}8416 DATA 68,68,68,0,0,08422 DATA 204,68,68,68,0,08428 DATA 0,17,34,68,136,08434 DATA 0,0,136,68,34,178440 DATA 0,0,0,171~},51,1198446 DATA 255,0,0,0,0,518452 DATA 51,51,0,0,0,1368458 DATA 204,238,255,51,51,518464 DATA 51,0,0,0,204,2048470 DAT1}A 204,204,0,0,0,2388476 DATA 0,0,0,0,0,08482 DATA 0,0,0,0,0,08488 DATA 255,0,0,0,0,2048494 DATA 204,204,0,0,68,1708500 D1}ATA 68,238,0,0,0,08506 DATA 119,68,68,68,0,08512 DATA 0,238,0,0,0,688518 DATA 68,68,255,68,68,688524 DATA 0,0,0,238,238,21}388530 DATA 0,0,0,0,0,2388536 DATA 238,238,136,136,136,1368542 DATA 136,136,136,0,0,08548 DATA 255,68,68,68,68,688554 DA1}TA 68,255,0,0,0,2048560 DATA 204,204,204,204,204,2048566 DATA 68,68,68,119,0,08572 DATA 0,204,136,204,136,2048578 DATA 101}2,0,68,238,68,688584 DATA 68,0,0,68,68,688590 DATA 238,68,0,0,34,688596 DATA 238,68,34,0,0,1368602 DATA 68,238,68,136,0,01}8608 DATA 0,102,255,255,102,08614 DATA 0,0,0,102,34,2388620 DATA 238,0,136,136,204,1708626 DATA 170,204,0,0,0,1028632 DA1}TA 136,136,102,0,34,348638 DATA 102,170,170,102,0,08644 DATA 0,238,238,136,238,08650 DATA 0,204,136,204,136,1368656 DATA 1}0,0,0,102,170,2388662 DATA 34,204,136,136,136,2048668 DATA 170,170,0,0,68,08674 DATA 68,68,68,0,0,348680 DATA 0,34,34,34,1}204,1368686 DATA 136,170,204,170,170,08692 DATA 68,68,68,68,68,688698 DATA 0,0,0,170,238,1708704 DATA 170,0,0,0,204,17081}710 DATA 170,170,0,0,0,2388716 DATA 170,170,238,0,0,08722 DATA 204,170,204,136,136,08728 DATA 0,102,170,102,34,348734 DAT1}A 0,0,102,136,136,1368740 DATA 0,0,0,238,136,1028746 DATA 238,0,0,68,238,688752 DATA 68,102,0,0,0,1708758 DATA 170,170,231}8,0,0,08764 DATA 170,170,170,68,0,08770 DATA 0,170,170,238,170,08776 DATA 0,0,170,68,170,1708782 DATA 0,0,0,170,170,10281}788 DATA 34,204,0,0,238,688794 DATA 136,238,0,0,68,2388800 DATA 238,68,238,0,68,688806 DATA 68,68,68,68,68,2558812 DATA 11}53,153,153,153,153,2558818 DATA 34,102,238,102,34,08824 DATA 0,136,204,238,204,1368830 DATA 0,0,133,203,173,2558836 DATA 1}2,208,251,169,0,1338842 DATA 207,165,203,16,8,418848 DATA 127,133,203,169,255,1338854 DATA 207,32,4,35,165,858860 DATA 741},24,101,205,133,2058866 DATA 144,2,230,206,169,08872 DATA 133,209,165,203,10,388878 DATA 209,10,38,209,10,388884 DATA 2091},56,229,203,133,2088890 DATA 176,2,198,209,24,1658896 DATA 208,105,0,133,208,1658902 DATA 209,105,31,133,209,1608908 DATA1} 0,165,85,74,176,178914 DATA 177,208,69,207,41,2408920 DATA 133,204,177,205,41,158926 DATA 5,204,76,241,34,1778932 DATA 21}08,69,207,41,15,1338938 DATA 204,177,205,41,240,58944 DATA 204,145,205,24,165,2058950 DATA 105,39,133,205,144,28956 DATA 1}230,206,200,192,7,2088962 DATA 202,96,24,169,0,1338968 DATA 205,133,206,165,84,108974 DATA 10,10,133,204,38,2068980 DATA 1}10,38,206,10,38,2068986 DATA 101,204,144,2,230,2068992 DATA 10,38,206,10,38,2068998 DATA 10,38,206,24,101,889004 DATA 1331},205,165,206,101,899010 DATA 133,206,96,160,0,1859016 DATA 26,3,201,0,240,109022 DATA 200,200,192,34,208,2439028 DATA 56,1}160,147,96,169,869034 DATA 153,26,3,200,169,1009040 DATA 153,26,3,200,169,359046 DATA 153,26,3,169,43,1419052 DATA 231,2,1}169,37,141,2329058 DATA 2,96,117,35,114,359064 DATA 1,36,170,35,116,359070 DATA 116,35,76,115,35,1609076 DATA 1,96,169,0,1}133,849082 DATA 133,85,133,107,133,09088 DATA 133,3,133,1,169,799094 DATA 133,4,169,23,133,29100 DATA 169,128,133,5,169,81}9106 DATA 133,43,169,12,133,429112 DATA 32,246,243,162,0,1429118 DATA 197,2,162,10,142,1989124 DATA 2,142,200,2,76,115911}30 DATA 35,32,177,35,76,1159136 DATA 35,201,125,208,3,769142 DATA 16,37,166,3,228,859148 DATA 48,2,134,85,166,49154 DATA 1}228,85,176,2,134,859160 DATA 166,1,228,84,48,29166 DATA 134,84,166,2,228,849172 DATA 176,2,134,84,201,1559178 DATA 208,7,1}165,3,133,859184 DATA 76,243,35,32,203,369190 DATA 32,128,34,166,85,2289196 DATA 4,208,16,166,3,1349202 DATA 85,166,84,221}8,2,2089208 DATA 3,76,96,36,230,849214 DATA 96,230,85,96,166,1079220 DATA 240,12,166,0,189,1289226 DATA 5,198,107,230,0,71}69232 DATA 115,35,162,0,134,09238 DATA 134,107,165,5,32,1289244 DATA 34,32,226,246,192,1279250 DATA 176,35,201,155,240,361}9256 DATA 201,126,208,6,32,2189262 DATA 36,76,24,36,166,1079268 DATA 16,6,32,253,36,769274 DATA 24,36,157,128,5,329280 D1}ATA 177,35,230,107,76,249286 DATA 36,169,155,76,117,359292 DATA 169,0,32,128,34,1699298 DATA 155,166,107,157,128,59304 DA1}TA 230,107,32,177,35,769310 DATA 2,36,165,1,133,849316 DATA 32,4,35,165,2,1339322 DATA 84,166,204,165,2,109328 DATA 10,101},133,100,24,1659334 DATA 205,105,64,133,176,1659340 DATA 206,105,1,133,177,1659346 DATA 3,74,168,177,176,1459352 DATA 2051},200,152,10,197,49358 DATA 144,245,24,165,205,1059364 DATA 40,133,205,144,2,2309370 DATA 206,232,228,100,208,2129376 DATA1} 56,165,205,233,40,1339382 DATA 205,176,2,198,206,1629388 DATA 8,165,3,74,168,1699394 DATA 0,145,205,200,152,109400 DATA 1}197,4,144,245,24,1659406 DATA 205,105,40,133,205,1449412 DATA 2,230,206,202,208,2279418 DATA 96,168,42,42,42,429424 DATA 1}41,3,170,152,41,1599430 DATA 29,246,254,96,169,09436 DATA 32,128,34,165,107,2409442 DATA 25,165,85,197,3,2409448 DATA 5,11}98,85,76,250,369454 DATA 165,4,133,85,165,849460 DATA 197,1,240,2,198,849466 DATA 198,107,96,162,175,1429472 DATA 0,210,11}42,1,210,1609478 DATA 0,136,208,253,202,2249484 DATA 159,208,243,96,165,19490 DATA 133,84,32,4,35,569496 DATA 165,2,229,11},24,1059502 DATA 1,10,10,10,170,329508 DATA 173,36,165,3,133,859514 DATA 96,0,0,0,0,0103 REM 0Y100 REM ϠҠֺנ101 REM š째102 REM 103 REM 5}104 REM ʠ105 REM ЮîŮ106 REM 5}107 REM 䮠108 REM 箬栛109 REM 󮠛110 G5}RAPHICS 8+16:REM Only need to use if you use graphics120 OPEN #1,12,0,"V:":REM Open V: device130 DIM A$(127)140 REM Draw w5}indow outline150 COLOR 1:PLOT 0,88:DRAWTO 319,88160 PLOT 38,31:DRAWTO 38,191:PLOT 128,31:DRAWTO 128,191:PLOT 0,31:DRAWTO 315}9,31170 POSITION 2,0180 ? #1;"All this and WINDOWS too! 80 columns sure is neat, huh?":? #1190 REM LABEL COLUMNS:200 FOR 5}I=1 TO 8:FOR J=0 TO 9:PUT #1,48+J:NEXT J:NEXT I:FOR I=1 TO 7:POSITION 10*I,1:PUT #1,48+I:NEXT I210 REM draw character set225}0 FOR I=0 TO 3:FOR J=0 TO 31:POSITION J+40,5+I:A=I*32+J:IF A=125 THEN A=0230 PUT #1,A:NEXT J:NEXT I:? #1240 POKE 1,4:POKE 25},10:POKE 3,10:POKE 4,31:REM SET WINDOW250 POSITION 0,0260 ? #1;"Enter some text:"270 INPUT #1;A$280 IF A$="QUIT" THEN 3005}290 GOTO 270300 END נ101 REM š째102 REM 103 REM 4100 REM έΠֺŠ101 REM š򮧸Ϡ102 REM 103 REM 9}104 REM 栳105 REM 106 REM Ůʮ9}107 REM 堠ЮîŮ108 REM 䠛109 REM 110 REM 120 FO9}R I=1536 TO 1568:READ A:POKE I,A:NEXT I130 GRAPHICS 0:? " OPEN Routine"140 ? :? "Now loaded. Use PRINT USR(1536)9}"150 ? "to re-OPEN Editor device to V:":? "(Video 80 must be activated)"160 ? :? "To SAVE to disk, enter DOS,"170 ? "Menu 9}selection K. BINARY SAVE"180 ? "then enter:"190 ? "VOPEN.OBJ,0600,0620"200 ? :? "To LOAD VOPEN, enter L. BINARY LOAD"210 9}? "and answer prompt with VOPEN.OBJ"220 ? :? "Enter B. RUN CARTRIDGE to exit DOS"230 ? :? "Good luck !":? :END 240 DATA 109}4,162,0,169,12,141,66250 DATA 3,32,86,228,162,0260 DATA 169,3,141,66,3,169270 DATA 32,141,68,3,169,6280 DATA 141,69,3,32,9}86,228,96,86έΠֺŠ101 REM š򮧸Ϡ102 REM 103 REM 8 j  LTOFAZ 9=}@A'B7tA9A@@@ 5 +-@5(àΠΠ=} 9@A'B7tA9A@AR@##@@K:(%;@@=},;@ ,% A2CLICK/PAUSE SUBROUTINE<0B2y)-@@- 0$dB-@@?(=}%B(n""( 10 DIM A(6),A$(3*5),T$(3)x( 20 RESTORE--(% 30 FOR I=1 TO 3:READ =}T:A(I)=T:NEXT I--(% 40 FOR I=4 TO 6:READ T:A(I)=T:NEXT III(A 50 FOR I=1 TO 5:READ T$: A$(I*3-2,I*3)=T=}$:NEXT I""( 60 DATA 76,40,67,29,14,33$$( 70 DATA SUE,ANN,JOE,KIM,JIM( 80 ENDSTART THE DISPLAY-=}@@##-@@%%+!@, -@AP GGA`AAA=}AAAA]-@@)-@@8(A()=?]2F:B7p,@@=} A-@@P  A2y&(A$=>:@4,>:@4,:-@@=}A(]2@@q-@@0u y |()(T$=>:@4,>:@4,=-@@=}D(`2@@t-@@0x | /%2/ A"-@=}@)-@@!7(Y2@P@@m-@@ q 2=}(DATA ' A,6-6-@@"@G-@@ ((I=%@$<-@=}@%G(ĠJ3+-@%@$+%$@,@!/(3"T-@@(T=YG-@AP=} C-@%@$+%$@,@!G(^A-@@%"(READ T6-@&@%A(ɩhQ-@=}@+-@ %@4( > @PB Q(  rR-@%$@/-@$@&4(> @=}PN(  R |e-@$%$@(4-@%$@H-@@O(aB2ye =}:-@AP /-@&@%:(A(I)=T6 -@@ ,(I=%$@6 A6-@=} A2-@@)-@@ 2(I=E-@@!(ĠԤ%"A-@%$@@"=}E(5"-@@(1-@A5 h-@@!(READ T$3-@@ H(ɪ=}ɪԤd-@%$@@"h(S -@6@O2@%@ $H:@,@S =}#-@%$@@#(k-@A --@@ B(A$(I*3-2,I*3)=T$F X-@@ a(=}I=k AX*#-@@%%+!@,*( b l6-@@'AR6% D:ATARI400))=},76,,40,,67,,29,,14,,33--,SUE,,ANN,,JOE,,KIM,,JIMD:BASINACT.ION 9<esCHBAHORSE1HORSE2HORSE3HORSE4HORSE5HNAMEHFILEIHHHHHCSLOCHORSE1HORSE2HORSE3HORSE4HORSE5A}H1H2H3H4H5QCTUMEHRSNAMDECADICCC1KDLISQSTARCADDAV@@@@@A}@ A6 @H@AA} !@"#$%AA}X&'(B6)@*+@,-./0B@12BC3@T4A}5A6B6 HORSE OF A DIFFERENT COLORBY GUS MAKREASV1.0 3/1/81!!PADDLE CONTROLLERA} IN JACK 0CHANGES HORSE SPEED 9@,  3+@%@'AR@36-AV'6-F:A}AB,'68,-A$(JJSET 5 CHAR BASE ADDRS TO CYCLE THRU CHAR SETS. 2 PAGES PER CHAR SET.)6-@* -A}@@6@+(68,-&$@$6-%@( ,-STARTUP MESSAGES.##@@A}K:/-@@)(@HoE4(@?(@b(@OF A DIFFERENT COLORm(@x(@(A}@08"(@ BY G mAEa-(@8(@1##(@ PRESS return...2&)@AUA}& @G3@4D(@}$-@D(@ ONE MOMENT PLEASEEF##CLEAR 5 512-BYTE CHA}AR BUFFERSGH(-@@(6-8,$AVI/-A'+%,+ / UV$$STUFF 24 HA}ORSE CHARS PER FRAMEWFOR 120 CHAR TOTALXY(-@@(5 HORSE FRAMESZ6-8,$AV[-@$A}AA(\&-@G&READ 6 CHARS]"%%^   _""DLI PROCESSING,CLEAR SCREENA},AND CYCLE 5 HORSE FRAMES+@%@9%6-F:A`,%AV$F:Aa,9FIND DISPLAY LIST,6-%A}@,FIRST MODE BYTE WITH LMSP%@A5+%@ A5PSET DLI BIT FOR MODE LINES 4 AND 82-A}@S2POKE DLI SERVICE ROUTINE"A6% :A'A@:INTERRUPT VECTORA}"BBA"ENABLE DLI$$PRINT 1 FRAME HORSES AND CYCLE8@,+-@+-$@A}fb(@P#$%&'( 345678 CDEFGH cdefghSTUVWX stuvwxf -@@A}.-@Q:,2 T2@@@@v2@8,  A@A}REDEFINED HORSE CHARS##8 BYTES PER 6 HORSE CHARS PER##4 LINES PER 5 FRAMES=960 BYTS"' FRAME 1)A},550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,06GG0,0,0,0,1,1,6,15,0,0,6,118,155,127,247,231,0,0,0,0,128,192,32,136@A}EE0,0,0,3,14,29,5,0,0,0,3,252,188,14,11,11,0,0,255,31,0,24,31,157JJJ59,15,254,192,0,0,0,240,135,14,60,124,12,8,8,56,196,A}204,48,0,0,0,0,0TOO0,0,0,0,0,0,0,0,15,5,126,127,97,99,103,99,207,223,243,224,192,192,128,128^MM252,191,223,127,3,3,1,1,A}112,248,254,142,252,248,128,128,0,0,0,0,0,0,0,0hAA1,1,0,0,0,0,0,0,193,128,0,0,0,0,0,0,192,224,112,24,28,0,0,0r==1,1,1,0A},0,0,0,0,128,192,224,48,56,0,0,0,0,0,0,0,0,0,0,0| FRAME 2550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,A}0GG0,0,0,1,5,8,59,87,0,8,12,190,121,248,252,191,0,0,0,0,0,128,32,208LL0,0,3,7,15,29,0,0,0,7,252,208,151,31,31,15,0,25A}5,32,32,108,255,255,255KK255,1,0,0,4,28,252,184,187,184,48,16,16,16,48,240,144,192,0,0,0,0,0,0DD0,0,0,0,0,0,0,0,15,15A},62,60,56,236,204,198,255,143,0,0,0,0,0,0GG248,255,31,60,48,112,96,192,28,254,6,12,56,48,0,0,0,0,0,0,0,0,0,0>>0,0,0,0A},0,0,0,0,220,216,192,96,112,0,0,0,1,1,1,0,0,0,0,0550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 FRAME 3A}550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0CC0,0,0,0,0,1,0,63,0,0,2,3,62,239,223,127,0,0,0,0,128,192,32,16A}HH0,0,0,3,15,63,10,0,0,0,3,252,200,12,31,31,0,0,255,24,48,124,56,255&NN23,255,128,0,0,56,126,255,247,238,252,20,8,24,16,1A}6,196,108,48,0,0,0,0,00KK0,0,0,0,0,1,3,6,31,31,61,121,243,195,1,0,191,224,224,192,128,0,128,96:OO254,254,7,7,14,12,24,1A}12,56,7,255,0,0,0,0,0,0,128,192,192,192,192,192,128D<<12,24,24,56,24,0,0,0,0,0,0,0,0,0,0,0,51,62,0,0,0,0,0,0N77192,0,0,A}0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0Xb FRAME 4lv550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0BBA}0,0,0,0,0,0,0,1,0,0,6,118,155,127,247,231,0,0,0,0,0,0,128,32HH0,0,0,3,7,10,0,0,0,0,3,255,204,141,15,14,0,0,252,127,16,239A},63,111NN1,11,29,224,0,12,142,220,127,255,254,122,30,12,4,68,8,252,204,32,0,0,0,0JJ0,0,0,0,0,0,1,3,13,15,15,63,248,22A}4,128,0,159,127,248,56,24,24,56,28UU252,255,63,1,1,0,112,63,124,196,243,255,199,192,192,192,0,0,0,128,192,192,96,4888A}118,60,0,0,0,0,0,0,0,0,0,0,0,0,0,0,6,1,0,0,0,0,0,0<<0,128,192,192,0,0,0,0,0,0,0,0,0,0,0,0,24,0,0,0,0,0,0,0 FRAA}ME 5550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0NN0,0,0,6,15,30,28,61,48,56,254,231,227,255,253,255,0,0,0,A}0,128,32,144,232LL0,1,3,7,13,0,0,0,3,255,232,78,142,15,7,15,255,124,80,24,60,247,239,159II255,63,12,0,0,0,241,4,252,2A}8,56,56,24,16,208,112,216,64,0,0,0,0,0,0 II0,0,1,1,3,3,118,60,60,255,240,128,0,0,0,0,112,240,112,48,56,24,12,6DD255,1,B}12,6,3,1,0,0,48,240,120,56,124,198,3,1,0,0,0,0,0,0,0,128 550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,1,0,0,0,0,0,0*>>0,192,224,B}0,0,0,0,0,0,0,0,0,0,0,0,0,192,112,56,0,0,0,0,04>DLI ASSEMBLY CODEHRee72,138,72,152,72,169,0,205,53,6,208,12B},162,52,160,88,169,26,141,53,6,76,35,6,169,0,141,53,6,162\^^102,160,18,169,138,141,10,212,142,22,208,140,23,208,141,24,208B},104,168,104,170,104,64,00 D:HORSE20.BASORSE5HNAMEHFILEIHHHHHCSLOCHORSE1HORSE2HORSE3HORSE4HORSE5@0EiͩkΩ͙kCop j`j {j`Hi͝Νh`F}L"UNEM:D" NURͩkΩ͙kCop j`j {j`Hi͝Νh`D-.nARRAYFILENAMEDISKFILECOUNCHOICLOOPAUS$ 8@J}@@COPYRIGHT 1981 - HOUSTON ATARI COMPUTER ENTHUSIASTS &&;A(,;@ ,;@ , ;@,'@J}@'@@9m +AR@90@@@S0@@@m0@J }@@2 6.D1:< 6.F67B:,%@,.*.*d @@n6-s AxJ }@}&&7@<@,4SYSA B:, @A$$7@<@,0 A6-%J }@3"@#!@@ 3-@ %!@D6-@D% A 6. . 77J }@<@,4 767@ <@ ,. ++67@<@,.7@<@,++67@<@,.7@<J }@,, @  6 )@ 67B:,%@,. A  A:-@@!:( USJ}E DOS 'L' FOR SUFFIX FILES@'AR'-@@"  RUN NUMBER  @@J} 6-P:,& @)!AX 6.b&&6.7$@&@<$@,l-@@v)7J}<,0 )67B:,%@,.7<,  A &-@@"&  LOADING % BEg(-@@"J}(  CAN'T RUN -@A  ?-@@"?(%  AJ}D:MENURAYFILENAMEDISKFILECOUNCHOICLOOPAUS$ 8@HL