@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` 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@LLL&0") $G% }H0 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 ?A[ 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 }}}}-ccz}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 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:4}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//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) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rG}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uG!" Li3!3?@ABCDEFGHIJKLd ]}6-6-@*6-@66-@B6-@N6-@Z6-@f6-@r6-@~6-@ 6 ^}-@6-@6-@6-AU6-@w{6-@26-@4'6-@636-A ?6-A PK6- _}AW6-B2wc6-AYo6-@F{6-B2H6-@6-@'6-@36-@?6-@K6-@ `}W6-@c6-@ o6-@!{6-@"6-Ad6-ARQ6-A`6-A'6-A36-@# a}?6-@$K6-B2yQ,]]PLAYER MISSILE GRAPHICS PLAYER GENERATOR WRITTEN BY PAUL ABELL,OCT.,1981, REVISION 3.20 b}^d+ ((*( PLAYER MISSILE/(E( GRAPHICSJ(d( PLAYER GENERATORR /(!COPYRIGHT B c}Y PAUL ABELL,JUNE,19812(R( Press any key to begin F:," AP  &*9,;,;,;@ d},*6..SHPX& 6--68,-"6-%& 19<,9,9,9<,1A(1,1)=X,A(2,1)=Y% -68<,- e}!68<,-% $68<,-68<,-$68<,- '68<,-668<,-6'68<,-6RR68<,-68<,-6%68<,- f}168<,-6=68<,-6H68<,-R A%,2@P- )2,$#8<,(>:, 68<,-#$ g} (>:,68<,-$DRAW EACH LINE OF PLAYERL) -8<,")68,-8,%8&,~ %%%8, h}68,-$ ERASEF --x68<,- -(>:,  AP  6-6-@$rINVERSE i} ROUTINE --#8<,"68<,-# AP68<,-:% -8<,"(>:,% APl ( j}  AP  6-6-$GENERATE RANDOM DESIGN4 --f68<,-P:H:,$,8<,"68 k}<,-8<,"68<,-% -8<,"(>:,% A$. (`   AP   6-6-$ +0 l} ? ( INITIALIZING..?( ABOUT FIVE SECONDS( ! AX!LOAD MACHINE CODEZ & B m}&SET UP PM VALUES ( 6-&-68,-$6-'(  (}  --"  -(>:,DOTT 68<,- n}    -68,-   6-6-6-6- ; -( (B)ackgrd-)((C)olor/-;((E)rase  - o}( (I)nverseN D -( (L)uminance-1( (M)ove screen7-D((R)andom  -((S)ize * ! - (- p}(-!(  -(%6-6- F:A2, A@PH *F:AD,"-  * APz 6-F:, q} " ACP %"@7% AG " APB%"@B% r} At " AuP%"@b% Aw " AE %"@@ s}% A P< -( - n! -(>:8<,,-!   A3P/6-%8:8<,,) - 0$J1 1MOVE PLAYER BACK TO ORIGINAL POSITION| 6-&"$   AW6-?:<% |}%,6-& AUD6-?:<%%,6-%v AU ;,6-C:, ;,6-C:, hhTHIS 'USR' ROUTIN }}E FOR VERTICAL MOVEMENT IS USED BY PERMISSION OF COMPUTE! MAGAZINE, P.O. BOX 5406>GREENSBORO, NC. 27403p -% ~}"  %%MOVE PLAYER UP CODE8!!104,104,133,204,104,133,203j160,1,177,203,136,145,203200, }200,192,7,208,245,96 -% " 2 %%#$dMOVE PLAYER DOWN CODE!!104,104,133,204,104,133 },203160,6,177,203,200,145,203 136,136,192,255,208,245,96,  +^!A@d!A }AP AhP0( (*( PRESS ANY KEY WHEN READY0F:,"Ai& X. (}( SAVING AS $ B }P. B 4 ' B6 6.INTERPRET FILENAME-B:, 7<,4:AsPR  6.D: }67,.-B:,7<,4.6.$ L67B:,%,.6.$~CHANGE COLOR OF PLAYER 6-%! }6--A8,%-*(P:8,', -$# 6-%#CHANGE SIZE OF PLAYERF "6-x !6-B }2V -(%$GET FILENAME@. (}.CLEAR SCREEN,TURN OFF PLAYERr% -%((B)ack to design scree }n, -((E)nd-,((L)ist program= -!((P)rint player data'-=((R)etrieve design  -( (S)av }e design: 6-F:,l U "(} ) AT56-@`A6-@%K ATPU A0P ""@B }+" = " $6..LST. Ag=LIST PROGRAM!A " # BP- AGAPR }INT PLAYER DATA4!G"@@% AP/ AP9 AGGLOAD DESIGNf!M"@b% AP/ } A5? AGMSAVE DESIGN!  AP!O  (} AP(D:*.*OOPEN DIRECTORY, PRINT, GE }T FILE NAME!4-@d" AP&(* 4 A.", B"F:A,"A6, A`"%F:A," }(7<,% A"<+(#Disk not available, using cassette!096.C:<$"C-(NAME"-=( } C(}" 4 ' A(# ApP$Z#& AP&LOAD DESIGN# A#"F:A },"A6" AP#F B-4(Shape not found !B-AF "$2 -( ( A }P2 APT$2 -)$%%%. B2 $ ))))$*8,%B2V"0 }*0$2- ( Design loaded.-A2 %& -#( &$N%SAVE DESIGN%  }A% A%C B-+(Create error !9-A= C-&*(  Ay }P* AH& -( SAVING AS z& --&!8<,"!68,-8,%8&,& ' *8,68,-B' } t' ****'=-+(Design saved 9-A= ' -( $ } (: BP(}%6-A%16-@u:6.P:<($ BP$n(U(( Color=  Lumina }nce = -(U( Size = *% Background= (J(( Player data (J(8,,8,,8,,8, },(DD(8,,8,,8,,8,,8,,8,,8,)??(,8,,8,,8,,8,,8, },8,6)55(,8,,8,,8,,8,,8,h)O -68,- (@( Press any key to continue. }EO ATP)+ F:, 0(0+$) BP)% B6.E:% B0*REGENERATE }DESIGNb* -*5P:'8&,,"68<,-+6-&8&,5 B*68<,-* *+$\+SET UP PLAYER MISSLE D }ATA+16-@`6-@%1SET PLAYER POSITION+J6-F:A,& BBy.6-AV$JSET PLAYER MISSLE ADDRES }S+# #SET HORIZONTAL POSITION$,8-%%A@ 8CLEAR OUT PLAYER FIRSTV,+A@8+SET COLOR } TO ORANGE, ENABLE PM GRAPHICS,$, BP B-$ -68,-F:%%%,! $$P-6- }-//($10 REM PLAYER MISSLE GRAPHICS DEMO-XX(M30 GOSUB 120:GOSUB 320:REM LOAD MACHINE CODE, COURTESY OF COMPUTE }! MAGAZINE-55(*31 REM P.O. BOX 5406, GREENSBORO NC. 27403.>>(20 H= :POKE 752,1:?>:@4,}>:@4, }J.MM( 40 SE.2,,0:SE.4,&,0:X=120:Y=48:REM SET BACKGROUND COLOR|.%%(50 REM X,Y STICK ROUTINE.TT(I }60 X=X+POS(STICK(0),1):IF X<230 AND X>30 THEN POKE 53248,X:REM LOCATE X.&&(70 IF Y>120 THEN GOTO 100/PP(E80 } IF POS(STICK(0),2)=1 THEN D=USR(DOWN,PMBASE+511+Y):Y=Y+1:GOTO 60D/##(90 IF Y<1 THEN GOTO 60v/OO(D100 IF POS(S }TICK(0),2)=-1 THEN D=USR(UP,PMBASE+511+Y):Y=Y-1:GOTO 60/( 110 GOTO 60/00(%120 DIM POS(15,2):REM SET UP PM DAT }A 0::(/130 FOR I=1 TO 15:POS(I,1)=0:POS(I,2)=0:NEXT I>0VV(K140 POS(10,1)=-1:POS(11,1)=-1:POS(9,1)=-1:POS(6,1)=1:P }OS(7,1)=1:POS(5,1)=1p0WW(L150 POS(10,2)=-1:POS(14,2)=-1:POS(6,2)=-1:POS(9,2)=1:POS(13,2)=1:POS(5,2)=1033((160 X= }120:Y=48:REM SET BACKGROUND COLOR0UU(J170 A=PEEK(106)-8:POKE 54279,A:PMBASE=256*A:REM SET PLAYER MISSLE ADDRESS1XX( }M180 POKE 559,46:POKE 53277,3:REM ENABLE PM GRAPHICS WITH TWO LINE RESOLUTION81MM(B190 POKE 53248,X:POKE 53256,0:REM } SET HORIZONTAL POSITION AND SIZEj1XX(M200 FOR I=PMBASE+512 TO PMBASE+640:POKE I,0:NEXT I:REM CLEAR OUT PLAYER FIRST1/ }/($210 POKE 704,38:REM SET PLAYER COLOR1\\(Q220 FOR I=PMBASE+512+Y TO PMBASE+512+H-1+Y:READ A:POKE I,A:NEXT I:REM D }RAW PLAYER2( 230 DATA 22 -&(8,, d2 (8,2..(#240 DIM UPCODE$(22):UP=ADR(UPCODE$)2 } (250 FOR I=UP TO UP+202$$(260 READ BYTE:POKE I,BYTE,3++( 270 NEXT I:POKE UP+17,H+3:RETURN^3&&(280 RE }M MOVE PLAYER UP CODE3//($290 DATA 104,104,133,204,104,133,2033--("300 DATA 160,1,177,203,136,145,2033,,(!3 }10 DATA 200,200,192,7,208,245,96&444()320 DIM DOWNCODE$(22):DOWN=ADR(DOWNCODE$)X4$$(330 FOR I=DOWN TO DOWN+204$$ }(340 READ BYTE:POKE I,BYTE444()350 NEXT I:POKE DOWN+8,H+1:RESTORE:RETURN4(((360 REM MOVE PLAYER DOWN CODE }5//($370 DATA 104,104,133,204,104,133,203R5--("380 DATA 160,6,177,203,200,145,2035..(#390 DATA 136,136,192,255 },208,245,9656 +6(%Use 'ENTER' to load your new program.D:PMGEN4Q5324Q1Q1Q1Q1Q1Q1Q1Q2Q2Q2Q76Q7 Q>%Use 'ENTER' to load your new program.D:PMGEN4Q5324Q1Q1Q1Q1Q1Q1Q1Q2Q2Q2Q76Q7<%Use 'ENTER' to load your new program.D:PMGEN4Q5324Q1Q1Q1Q1Q1Q1Q1Q2Q2Q2Q76Q7>%Use 'ENTER' to load your new program.D:PMGEN4Q5324Q1Q1Q1Q1Q1Q1Q1Q2Q2Q2Q76Q7 8<8 %Use 'ENTER' to load your new program.D:PMGEN4Q5324Q1Q1Q1Q1Q1Q1Q1Q2Q2Q2Q76Q7APX-20117PLAYER GENERATOR 1.0PAUL ABELL06/01/8285ew program.D:PMGEN4Q5324Q1Q1Q1Q1Q1Q1Q1Q2Q2Q2Q76Q7 6B'DOS SYSB*+DUP SYSBUAUTORUN SYSBZVPMGEN BAST1 SHPBAST2 SHPBAST3 SHPBAST4 SHPBDISKNAMEDAT