@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( 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ꭝ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 !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- 138ɛ+,' 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 LANGUAGE OBJ > i}MACHINE LANGUAGE DOC > DOCUMENTATION PIC/MIC/FNT/MVM > GRAPHICS AMS/MUS/MBD > MUSIC LST > BASIC LISTING j}-SOME MACHINE LANGUAGE PROGRAMS CAN ONLY BE RUN BY BOOTING THE DISK MENU "WITHOUT" BASIC.-FOR SOME PROGRAMS, XL OR XE MOD k}ELS MAY REQUIRE A "TRANSLATOR" PROGRAM TO BE BOOTED FIRST. [AVAILABLE SEPARATELY FROM B E L L C O M.]-MOST PROGRAMS ARE l} RELATIVELY SELF-EXPLANATORY; HOWEVER, SOME HAVE SEPARATE DOCUMENTATION FILES AVAILABLE. BASIC PROGRAMS MAY CONTAIN INSTR m}UCTIONS IN THEIR PROGRAM LISTINGS.-TO WRITE THIS GREAT MENU PROGRAM ONTO ANOTHER DISK, (Q)UIT MENU, BOOT DOS, AND USE TH n}E "O" COMMAND TO COPY THE MENU FILE "AUTORUN.SYS" ONTO YOUR DISK. < MENU by DAVID CASTELL >U, BOOT DOS, AND USE TH etuXkYYREKXXHXXINYISYINZINDBKDARIFRAMTODLISADDRESNUMBEIOCADRHADRLNUMHNUMLQFp}CZ q}r} !"#$%&'()*+ Affs}ڭҠ ISSUE 30 ANALOG MAGAZINE MAY 198588-UPPER/LWR Z AND X/Y Lt}IMITS... SEE ARTICLE -6$+&,6- -$+&,6-O:,&O:, !) 6- @4 6u}-$ 6-$ 6-&$6-%$$ 6-%$6-A&&%6-%AY/% @4  ,6v}-"   $-$+&,6-&-6$+&,(6-O:,&O:,* !) 6- @`, 6-$. 6-w}$0 6-&$26-%$$4 6-%$66-A&&8%6-%AY/% @`: ,6-<  x} Ad 6-6- -6$+&,f-$+&,h6-O:,&O:,i !6-j  6-k   l y}!6-m  6-n$M2A@@--A1 ;2MAdAU26-F:B2y,z}"@( A2 A#"@ A# A#"@ A# A(F:Ad,"@({}(}( A A+*"49 SECOND SCREEN DUMP",(@(@@P:.8((@>:@',|}A>:@,8-%@90* 6.>:,67A,.*67@,.2C6-?:A6<:@',K>:A}},>:,@ C$QQ*400-432 IS 'AS IS' SUBROUTINE SUPPLIED BY TO SAVE A GR.24SCREEN%6-@6-%~}2*@$$-AA.*F:,2 6-F:A,$AV%%6-F:A`,%AV$F:Aa, } 6- 6-&%6-@$'6-A2%'%@%@6-P:'AV,6-&$AV%@}%@6-P:'AV,6-&AV$%@%@ 6-?:C:hhhLV,<,'@}$X 6-6-6. A Yo,AYA'/@ A9/AY@DK/AA]/AY}Ao/AYAGZi,@ A'/@ @s9,AY@DE/AYW,AAi/A@}s\E/AYAG'/@ @s3/AYE/A@s^u 6-6-@#6.- A 96-}@G6.Q A ]6-@k6.u A `X 6-6-@6.=:,( A 16.=:,B6-@9}&B:,N6-@X A bw6-@6-@#$6.=:,. A :6-@#C6.=:,M A Y6-@&_6-}m6.HIGH Z=w A c86-@36.=:,'B:,!@86.7<@,dr A 6-@&%6-@36.LO}W Z== A I6-@3R6.=:,aB:,!@r6.7<@,fb A 6-@%6-@26.Y-AXIS< A }H6-@0U6.X-AXIS_ A b$<6-?:C:,<<:,4 r@}+%AAHB(ŠҧӠҡe(ĠàҠ͠h(r A0q,($INPUT FORMULA AS }ڽΠӠƠئ٩R(!MAKE SURE THAT SYNTAX IS CORRECT!q((eg: PAIRS OF PARENTHESIS)E (}AY%-@}/(14 ;-@E(40 J-@(104 &-@!/(CONT5-GAB@J&UAY@4}'AB@U()}ҡӠ٠ΠMM(ENOTE: ALL THREE PRIMARY AXIS (X,Y,Z) BE IN }SPECIFIED DOMAINS!_( ( (Y(GAUTOMATIC BOUNDS SELECTION ENSURES FULL PLOTTING BUT TAKES MORE TIME..._6-g(U(JP}LEASE CHOOSE |1] AUTOMATIC SCALING Z-AXIS BOUNDS |2] MANUAL SETTINGS.Yg"A @((INPUT LOWER LIMIT#}<(INPUT UPPER LIMIT@&!)!) (WOOPS!& A%(( LOWER LIMIT%6-"( UPPER LI}MIT"6-&!)!) (WOOPS!& A N(.("DESIRED RESOLUTION (1=HIGH;10=LOW)2@6-%@N6-$>}Pc 6.D:(c(OINPUT TITLE OF SAVED SCREEN (IF SAVED) IN FORMAT (8 CHARACTERS MAX) 4 6. }D:SCREEN.MP67B:,%,. P(((Π ADD LABELS & BORDERSP(#Ԡ SAVE IN MAGNIPRINT FORMAT! ''(Ԡ }49 SECOND SCREEN DUMP!6($(PRESS ANY KEY TO BEGIN...6AdAU F:Ad,"AUA@> " (4(#} AUTO SCALING SEQUENCE IN ACTION!> AV6-A@'+&,'6-A@'+&,96-@C'+&,V6-O:$,%O:$$,%O:}$$,9 +@$AAV+A /9 @Lll104,104,141,21,6,104,141,20,6,104,141,27,6,104,141,26,6,}160,193,173,255,255,136,240,35,141,255,255,238Vcc26,6,240,21,173,20,6,56,233,40,141,20,6,144,4,24,76,19,6,206,21,6,76,19,6},238,27,6,76,33,6,96`bb104,201,4,240,9,170,240,5,104,104,202,208,251,96,104,133,215,104,133,214,104,104,168,104,133jii2}17,104,133,216,104,104,240,236,133,212,24,165,214,101,88,133,214,165,89,101,215,133,215,152,240,15tff165,214,105,64,133,21}4,165,215,105,1,133,215,136,208,241,132,221,160,0,132,220,177,216,160,0,170~XX16,1,136,132,213,138,41,96,208,4,169,64,16,1}4,201,32,208,4,169,0,16,6,201,64,208,2__169,32,133,218,138,41,31,5,218,133,218,169,0,162,3,6,218,42,202,208,250,109,244,2},133,219hh164,221,177,218,69,213,164,220,145,214,200,132,220,196,212,208,182,24,165,214,105,40,133,214,144,255230,215},230,221,169,8,197,221,208,159,96,207,96 SAMPLES (:( 4( Z=1+X*X-Y*Y1(AUTO=N | Z=0,6 | X/Y=-3,34(} N!(Z=LOG(ABS(X))+LOG(ABS(Y))K(%AUTO=Y | Z=-6.4377,1.38629 | X/Y=-2,2N( ?(Z=ABS(X)-ABS(Y)<( AUTO=Y | Z=-2.94,2.9}4 | X/Y=-3,3?( 2( Z=Y*Y+X*X/(AUTO=Y | Z=2,0 | X/Y=-1,12( 1(Z=SIN(X).(AUTO=Y | Z=-1,1 | X/Y=0,61($} D:ZPLOT.BAS 2( Z=Y*Y+X*X/(AUTO=Y | Z=2,0 | X/Y=-1,12( 1(Z=SIN(X).(AUTO=Y | Z=-1,1 | X/Y=0,61($CD<ZpYYREKXXHXXINYISYINZINDBKFLAQFCZDDUMP} }@ Ahh} 紶 -6$+&,6- -$}+&,6-O:E:,%E:,, !) 6- @4 6-$ 6-$ 6-&$6-%$$ 6-%$6-}A&&/6-%AY/% A / @4 ASETUP FOR PLOT  , A 6-! A}SETUP FOR DRAW"   $-$+&,6-&-6$+&,(6-O:E:,%E:,,* !) 6- @`,} 6-$. 6-$0 6-&$26-%$$4 6-%$66-A&&8/6-%AY/% A / @`}9 ASET UP FOR PLOT: , A 6-; ASTUP FOR DRAW<   Ad 6-6- }-6$+&,f-$+&,h6-O:E:,%E:,,i !6-j  6-k   l !6-m  6-}n$M2A@@--A1 ;2MAdAU26-F:B2y,"@( A02} A"@ #"@ A# A(F:Ad,"@((}( A AX+}6-@6-6-!6.+ A Yo,AYA'/@ A9/AY@DK/AA]/AY}Ao/AYAGZi,@ A'/@ @s9,AY@DE/AYW,AAi/A@}s\E/AYAG'/@ @s3/AYE/A@s^u 6-6-@#6.- A 96-}@G6.Q A ]6-@k6.u A `X 6-6-@6.=:,( A 16.=:,B6-@9}&B:,N6-@X A bw6-@6-@#$6.=:,. A :6-@#C6.=:,M A Y6-@&_6-}m6.HIGH Z=w A c86-@36.=:,'B:,!@86.7<@,dr A 6-@&%6-@36.LO}W Z== A I6-@3R6.=:,aB:,!@r6.7<@,fb A 6-@%6-@26.Y-AXIS< A }H6-@0U6.X-AXIS_ A b$<6-?:C:,<<:,4 e@+%AAHB(ŠҧӠ}ҡe(ĠàҠ͠a-(%ɠҭҠΠW(%렦頠}a A`q,($INPUT FORMULA AS ڽΠӠƠئ٩R(!MAKE SURE THAT SYNTAX IS CORRECT!q((eg: PAIRS OF PARENTHESIS})E (}AY%-@/(14 ;-@E(40 J-@(104 &-@!/(CONT5-G}AB@J&UAY@4'AB@U()}ҡӠ٠ΠMM(ENOTE: ALL THR}EE PRIMARY AXIS (X,Y,Z) BE IN SPECIFIED DOMAINS!_( ( (Y(GAUTOMATIC BOUNDS SELECTION ENSURES FULL PLOTTING BU}T TAKES MORE TIME..._6-g(U(JPLEASE CHOOSE |1] AUTOMATIC SCALING Z-AXIS BOUNDS |2] MANUAL SETTINGS.Yg"A} @((INPUT LOWER LIMIT#<(INPUT UPPER LIMIT@&!)!) (WOOPS!& A%(( LOWE}R LIMIT%6-"( UPPER LIMIT"6-&!)!) (WOOPS!& A N(.("DESIRED RESOLUTION (4=HI}GH;10=LOW)2@6-%@N6-$>P @(((Π ADD LABELS & BORDERS@(Ԡ START OVER --(%Ԡ P}LOT SURFACE TO 1020 PLOTTER6($(PRESS ANY KEY TO BEGIN...6AdAU F:Ad,"AUA@> " (}4(# AUTO SCALING SEQUENCE IN ACTION!> AV6-A@'+&,'6-A@'+&,96-@C'+&,V6-O:$,%O:$$},%O:$$,9 +@$AAV+A /9 @`bb104,201,4,240,9,170,240,5,104,104,202,208,251,96,10}4,133,215,104,133,214,104,104,168,104,133jii217,104,133,216,104,104,240,236,133,212,24,165,214,101,88,133,214,165,89,101,2}15,133,215,152,240,15tff165,214,105,64,133,214,165,215,105,1,133,215,136,208,241,132,221,160,0,132,220,177,216,160,0,170~}XX16,1,136,132,213,138,41,96,208,4,169,64,16,14,201,32,208,4,169,0,16,6,201,64,208,2__169,32,133,218,138,41,31,5,218,13}3,218,169,0,162,3,6,218,42,202,208,250,109,244,2,133,219hh164,221,177,218,69,213,164,220,145,214,200,132,220,196,212,208,}182,24,165,214,105,40,133,214,144,255230,215,230,221,169,8,197,221,208,159,96,207,96SHIFT TO DRAW COMMAND67B:},,.*D$@SWITCH TO PLOT COMMANDJ67B:,,.*MT$77PLOTTER SCALING AND DUMP STRING BUILDING SEQUENCE-}-67B:,%@,.=:P:@$'@,,67B:,%@,.,..67B:,%@,.=:P:6@$'@,,67B:,%}@,.;$ PRINT THE DUMP$ .@.@@P: (@ (@I }&&(@7@!6-A!DRAWS SKETCHPAD@&6-A&ACCEPTS USER DRAWINGB%6-A}P%CHECKS VALID DESIGND#6-A#MIRROR PARAMETERSF6-AINK BLOTH6-A PATTERN ROWSJ6}-A MAKES DESIGNSL$6-A$STORES DESIGN DISKN%6-A %GETS DESIGN FM DISKP6-A0INSTRUCTIO}NSR$6-A@$TERMINATES PROGRAMT#6-A#CHECKS VALID FILEV 6-A% FILE NOT FOUNDX"6-A"CO}NTINUATION KEYZ6- c$$ GET USER INPUT SUB dM@.@@K:;)@}MAdAUf8F:A,*A86-&A(g$i46-@:7<,,6-@:7<,,"$4X,Y C}OORDINATESj# 6-%6-%$#UPPER LEFTk.6-+@$&,%6-% $.UPPER RIGHTl- 6-%6-+@$&,% $-}LOWER LEFTm86-+@$&,%'6-+@$&,%*$8LOWER RIGHT## CHECK LEGAL FILE NAME ^ +@@})AR@;AdAUO-@@Z(@^ E$(@ ENTER NAME OF FILE/(@:(@}E(@C#(@ return C(@ ϠΠϠ ( B:," II@:7}@<@,,!@d*@:7@<@,, @A ? +@@)AR@4(@?(@}{ (@ FIRST LETTER<(@ OF FILENAME\(@ MUST BEGIN WITH{(@ A LETTER (A-Z)}/(@/(@ ŭҠŠ( ((}( AB:, @A$%%7@<@},4D:A%%%7@<@,4C:A%! 6.D:67@,.!6.$## PREPARE SKETCHPAD }) +@@)AR@AdAU,@S@3'/@S@9/@'@K-@'}@2]Ae@@@S:1 @,@'@31/@S@3 }@ ( s()+B:,",6.%6.16-@=6-@G@],%@(%@i6-@}s AP -@B:, ,%@(%@ / @#,%@(%@/6-}/,($ draw tart/Stop drawing/(&&(rase design uit drawing.@.@@}K:W## USER CREATES DESIGN X)@MOVE ROUTINEYPF:A,*A4 A}PDISABLE INVERSE VIDEO KEYZMF:A,"*A@d4 AMDISABLE LOWER CAPS KEY]((@}(,%@(%@^ " _" "*(6-@" A`Q *"6-!@7,%@(%@}D67B:,,.Q67B:,,.b "6- d/ "6-&@# /6-@$f/ "6-%@#!}@$/6-g/ "6-&@# /6-@$j/ "6-%@#!@$/6-kY67}B:,%@,.>:,567B:,%@,.>:,?U,%@(%@Y l# @#,%@(%@ ##} CHECK VALID DESIGN B:,!@ ) +@@)AdAU&-@@"(@}& ""(@ YOU DO NOT HAVE$$(@LARGE ENOUGH DESIGN##(@ TO MAKE A PATTERNj(@}(@9(@ DO YOU WANT MORED(@O(@j(@ (Y/N) "@ @x}Ap6-6- ## MAIN MENU ROUTINE M +@@)AR@;A}dAU>'MMENU ROUTINE (@ pattern maker""(@ by frank roberts6(@(@6(}@ 0 ;(@;(@ 1 +(@+(@ 2 }'(@'(@ 3 '(@'(@ 4 *(@*(@ 5 }*(@*(@ 6 +(@+(@ 7 7(@(@7(@ Y}OUR CHOICE ? AdAU!! @H)!@UA 6-&@HAdAU%@} SET UP MODE FACTORS /6-@`6-@ %+@/ A0*/6-@`6-@%+@}/ A04%6-@@6-@%+@>-6-6--AR@HB:, @ R--(}%ӠŠ٠ϠЯԠ\*(*COMMAND FOR SCREEN DUMP GOES HEREz--(%Ӡ٠Ҡ٠ϠΠϠ}## DRAW PATTERNS FM DESIGN0@-@@!!"@*!@A e}"@6-%@$-@B:,  %>F:Ad, AU*AdAU. :@'> } ,   @  =6-%@$6-&@$-6-%@9 @= G6-@@}6-%@H)6-76-%@C @G    STORE DESIGN B:," }  @@L @ @@: +@@+-@@}6(@: (P(@ IS FILED'(@2(@P(@ Ӡ٠٠2    FETCH D}ESIGN ; +@@)AR@;AdAU 6.6.   @@} A  @@ @*6-@  "" FILE NOT FOUND ERROR U  }+@@)AR@;AdAUUCHECK FOR NO FILE FOUND &-@@"(@&  !!( }@ FILE NOT FOUND /(@/(@ ϠՠԠϠ ##(@ ˠ٠ +(@+( }@ (Y/N)     1 +AR@1AdAU 1@1@@ }D:*.*( A'2 @< (F 6- A& @ +(+( ϠՠԠϠ٠ }ΠٯΩ   "  6-  "" GET INSTRUCTIONS 'AdAU'AR@} R)(!When you choose option you willR($see a sketch pad like the one above. --(%(PRESS ANY KEY FOR MORE INSTRUCTIONS}) # +#AR@ K+(#Use the keyborad arrow keys to plotK(a design on the sketch pad. O*("All bl}ack lines or points drawn onO( the pad will be stored in memory Q'(to be transformed into designs *(Q("Any line or p}oint color other than J"(black will not be plotted.J(#You may change the color at anytime (by pressing the '' ke}y. N(.(#Pressing '' will erase your designN(so that you may start again -(-("When you have the design you want,} J)(!press the '' key and the programJ(will return you to the menu  '('(--- Press for menu.  6-}  + +AR@+ %@## TERMINATES PROGRAM  + D:PATTERN}S  + +AR@+ %@## TERMINATES PROGRAM  + D:PATTERN\]m SCLINEFILEXMIXMAYMIFLACHOICDELARAMTODBYTEHLDUMMXYYMAZZZZZZAiAvi}P<BFVA@ABGc } !} SPIRAL GRAPHICS******##SOFTSIDE PUBLICATIONS (C)1982nAYx119A`,9A`,;@,};@ ,-@#"6-$? #6-$?A 68,-68A&,-/68A%,-6A68A`}&,-6M68Ap%,-&68@%,-6768@&,-I68Ap&,-6M  +@%%6-F:A`,%AV$}F:Aa,-%AfF:,"@y@xF:,"@@ 9$-%Ai%Ag6}@5%@$F:,9 +-%Ag%A'@+ E%A@e.%AF:A`,E%A}F:Aa,K6-A`6-@'6-@f36-AT?6-@K6-@AY@4MAIN DRA}WING ROUTINE A%,@@"S"@A >:A%,"Hit any key to pause after drawingSAdAU },c @'6-P:@$H:@,,;0@O0@@c0@@616-A$H:@!},16-A$H:@,@ ,-@AJ% 6-%!A`%6-&A`T% 6-%!A`%6-&A`"}^6-8,$?h6-8,$%A`r6-8,$%@| / }COMMAND INPUT ROUTINE&6-F:Ad,#}&AUA1"@#-@A' 1 AM AAdAUA UTO,RAW,AVE,OAD $}OR RINTM6-&6-F:Ad,&"AUA %"@c6-@% AB"@ >:A%,&%} A8AdAUB A5"@b Ap+AdAU5 A5" A@+Ad&}AU5 A, >:A%,"AdAU, A&&0,17,34,52,69,87,104,121,139,156--173,190,207,224,241,'}258,275,292,309,325--342,358,374,390,406,422,438,453,469,484--499,515,529,544,559,573,587,601,615,629--642,656,66(}9,681,694,707,719,731,743,754--766,777,788,798,809,819,829,838,848,857--866,874,882,891,898,906,913,920,927,933&--)}939,945,951,956,961,965,970,974,978,981022984,987,990,992,994,996,997,998,999,999,10001""SAVE SCREEN TO DISK OR CASS.:*}Q Ap@; >:A%,Save to which fileMAdAUQD @@N+-A+}A'*@F:,+ Xg6-F:A,$AV<6-F:A`,%F:Aa,$AVD6-&U6-P:'AV,g6-&+$,}AV,bWAP@*ARF:A`,?ASF:Aa,KAVWAWl*6-?:C:hhhLV,<@,-}*@v$w LOAD SCREEN DATA FROM FILEH A@2 >:A%,Load from which fileDAdAUH .} @@.-AA$)@*. cAP@*ARF:A`,?AS/}F:Aa,QAVAUcAWAU*6-?:C:hhhLV,<@,*@$""SCREEN DUMP TO MX 80 PR0}INTER&3>:@',0&AYYMAX-YMIN MUST BE <=80YMAX,YMIN=1/2 SCREEN Y-@1}-6@1%%@)@)@  1%)@)@ EE67%@&,2}.>:A`%%%%%%%%@$+%%%%%%,,*   34 AY@4$D:SPIRALGR.GRA7%@&,oZ[""JOYARDDIJOXXXPMSTARHELPDLSELDLHELPSCSELSCADRSETUPL2NCORECONSOCBASDMACTGRACTHPOSPPMBA!4}SSIZEPBEGIKGTINMIELOALTSC1BUFFRCOLFQFILELINEUNDERCURSOCURSORFLACURSORCOUNSELCOLOFLASHCOUNINCREMENSTFIL!5}LFLADELASWITCXTESTENDIRECTIORCOBUFSCREEMODEREMSMAXSECOLNSELECTIOCOLSACOLUSEHLSHSLBASDLIS@!6} !7} !8}!"#@$%&'()*+,-./0!9}123456789:;<=>?@!:}ABCDEFG *** MODE 10 PAINTER *** *** PROGRAM ***!;}*** DESIGNED BY ****** PAUL S SWANSON *****("} MODE 10 PAINTER PROGRAM$$( FOR ATARI COMP!<}UTERSZ(*( PROGRAM BY PAUL S SWANSON-(0(Z(%Ӡݠ٠ҠРΠI(&( Ҡ!=}8-@@"I( Initializing+++ INITIALIZING +++(!!--- JOYSTICK READ TABLE ---2##9@<@!>},;@,<B-@@+-@/":68<,-> B FGG0,0,0,0,0,0,0,0,1,1,1,-1,1,0,0,0,-1,1,-1,!?}-1,-1,0,0,0,0,1,0,-1,0,0P--- POSITION STRINGS ---Z---ON 1K BOUNDARY ---dY;@,6-C:,:6-P:'A$!@}%@,$A$K;&&@,Y6-'AVn--- DISPLAY LISTS ---x;@d,;@d,--- SCREEN AREAS !A}---;AV,;AV,--- INITIALIZE DL'S ---6.ppppppppBA6.ppppppppOA6-AP!B}$ 6-C:, $67B:,%@,.$ 6-C:, $67B:,%@,. --- INITIALIZE SCREENS ---+ 6.67!C}AV,.+67@,.6.-@AU@P-@@.67B:,%@,.>:,2 !D}6 P67@9<@@,.#67AV,. #67@A,.""--- PUT SCREEN ADDRESSES ---""--- INTO DISPLAY LIS!E}TS ---' 6-C:, '67@<@,."' 6-C:, '67@<@,., --- INITIALIZE PLAYER2 ---6!F};A(,@+ 6.67A(,.+67@,.J--- HELP SCREEN TEXT ---TCC67@<@@,.(!G}РΠ^CC67@A<@,.(νРscreenҽillrighthCC67@<A ,.(!H}Խolorelection̽illleftrCC67A!<A`,.(Խhangeenolorýancelfill|CC67Aa<A,.!I}(ncrementĽoadave@-@B:, 6-@:7,,06-+!@',@6-&$A(kY6-+&@2,!J}$+!@1* @,%+%@d,$+ @2,%$+!@,%$A(g67<,.>:,k ##--- SET-UP MODE 10 SCREEN ---!K} +@--- USE RANDOM COLORS ---#6-@%#-AA 6-%@% A!L}--- DEFINE CONSTANTS ---6-B2y6-A6-AY6-B2w6-B2I6-BBy!M}6-B2W6-A&6-Ad06-A#:6-BBX!!--- INSTALL DLI ROUTINE ---b #Ap6-A6!N}l1" AV'6-%@1 A v'A'A@--- ALTERNATE SCREENS ---!O};AV,;A,+ 6.67AV,.+67@,.C-@A@@@?67<%@#,.7<%@#!P},C --- OTHER DIMS ---<<9@ ,;@,;@@,;@,;@,&&--- INITIALIZE COUNTERS, E!Q}TC.---6-@96-@6-6-6-6-@6-6-@!R}*** ****** MAIN PROGRAM ****** ***""--- READ JOYSTICK/CONSOL ---46-R:!S}, 6-%@4 @A`"A@6-@&72@`@3-@@!T}7 %%216-@&6-%%!@16- ,6-$**!U}@)T:,"A. 6-F:, @A@0F:,AUA02 8@wV !V}T:," ` ,j!!--- MOVE CURSOR ROUTINE ---t-6-%8<,$-6-%8<@,$~96-&!W}P:'@,$@96-&P:'A,$A 1>6-6-@:")T:,"@> !X}--- FILL ROUTINE --- 6- ' 6-%$#!@y) '  1"  , A --- !Y}$$--- KEYBOARD INTERPRET ROUTINE --- 4 6-F:,AU$"@@06-@4  "6-6@ !Z} !!"@1)"@0A "@6-  @X  B . ++( ![} DISK TRANSFERS.( (<1> SAVE PICTURE ON DISK ""(<2> LOAD PICTURE FROM DISK (%(<3> RETURN TO CURRENT PICTURE((!\} $$(PRESS NUMBER OF SELECTION-- F@.@@K:;)@F@& /6-&@H/!]} @)!@A10  $A%A1 p%(} SAVE PICTURE ON DISK((46-@FA&P B!^}S(f(SAVING PICTUREp B +-@'(@8,+  =-@A`@9(@7!_}<%@y,=  *@ A&@* A0P X(( } LOADING PICTURE FROM DISK+(76-@A BD!`}(X(LOADING PICTURE 1-@$@-68,-1  C-@A`@,@?67<%@!a}y,.C  @ A0PH 0 +@!-@,%8,0 R 7-A`AV36-?:C:!b},<%<%,7 \  1   ---""--- FUNCTION KEY INTERPRETER ---7-@@ 6-F:,$ !c}. AP 76-F:,''AAABACD6-B:,2A`@:7&@,,DAa@:7,,!d}F:,@AA::R:,"@*F:,"AU*F:,"@AA  AP0 " , T:!e},"@AA 6 AA@h8 6-B:,&A`@:7&@,,8Aa@:7,,r- 6-C:, AP-67@6-F:%@,R%@!g}@1A6-A` '6-@1 AP@%@$@6-1@d6-A`0'6-@!q}b%DOS SYSb*)DUP SYSb SAUTORUN SYSb_HELP DOCb3oZPLOT BASb3ZPLT1020BASbAPATTERNSBASbSPIRALGRBASbD3GR10PNTRBASbFRACTILEBASbFUJI1 BASb5FUJI2 BASbJPMCREATEBASbN*PMSETUP BASb;xPMDESIGNBASb256COLORBAS1 AP@!%@!6-$@% % AA@8 6-B:,&A`@:7&@,,8Aa@:7,,!r}- 6-C:, AP-67@<@,.%6-A`6-@% AP@- 6-C:, AP-67@<@,.!s} 6- AA@~& +++--- SUBROUTINES --- +++!!--- CONV'T A TO ADDRESS ---!!--- IN A$ !t} ---&$6-P:'AV,$6-&$AV! 6.>:,67@,.>:,!$$6-F:Aa,!6-F:A`,$$!u}AaA`$ # "."67@P<@V,.*I.6-@X:-@B:,:6-+@:7,,&@2,!v}$@%BsD2-@.67%<%,.>:F:%,,2 6-%@ -A@B'@!w}-M6--A?A@M6-%@$@%@r96-R:!x},9"@*T:,"@AQ  ?T:,"$<67@u,.7@t,?$!!6-%+"@,!y}&+"@,(6-&P:',$($@%@r(_%2A5@@9-@@P= _2!z}2 AQ p COLRz CHGE HUE LUMXLL72,169,14,141,19,208,169,0,141,10,212,141,27,2!{}08,141,26,208,104,64,256@6-@2& 'L,($ENTER FILE NAME - MAX. 8 CHARCATERS.I( (NO EXTENTIONS PLEASE.)L('!|} ( $'B:, @B.' B8'4 6.D:67@,.467B:,%@,..PIXB'@!}}$*_ (} (((2( - NOT A VALID NAMEF-@AJ U@_ A0P N4#6.hhhhh!~}ȱΑ`467A,.*NT%6-F:A`,%AV$F:Aa,K6-F:%@,%AV$F:%@,T6-C:,4N7-!}AAV36-?:C:,<%<%,7 >N)-@%68,-F:%,) HN$D:GR10PNTR.BAS4N7- qPCSPCTTTLLAD@A ?Vuts AXGp8A`EP3?Ht( ?dB( %}?wH4P ?5`X @ @ nnA PROGRAM TO GENERATE FRACTALS. SIMILAR TO THOSE USED TO GENER- %} ATE COMPUTER SIMULATED LAND- AASCAPES, i.e. LUCASFILM... EXPERIMENT AND ENJOY! FROM TAPS VOL.3, NUM.10%} TRANSLATED BY SEAN KEELEYd A@n! A  A! AxPLOT X,Y9 6-&$!6-$+&?P,%-%}!A96-A!AY6-AY 6- 6- , $SQ.R%}T. OF X,Y8 6-6-M:$%$, 6-&, <86-66-M:+,'@,6-%* <66-)6%}-M:+,'@," )6-6$X,Y TIMES L* 6-6-6-$&$'6-$%$*$FUNCTION OF X,YH%} A6-@&% A@:H:@, ?PA6-6H6-606-@&6-'@-6-'@0$GET%} VALUES36-A`6-@'6-?P36-= +-@@3(ŠϠ= AP H %}Ae-@@8(ENTER LAMBDA (X,Y) >H A  Ap-@@1( ENTER SCALE 5A%}S-@@x( [SCALE MUST BE GREATER THAN '0'] Ap:((( B:6-+@$%}',"%-@@! A% ,S+@%@/0@I0@@S@%}6$@FOUR OVER LJ06-$%$6-@$'06-6@$'T$^g-@@>($EXPERIMENT WITH THE FOL%}LOWING INPUTSg($ cKK(C Ž PRODUCES 'THE DRAGON CU%}RVE'hAA(9 Ž PRODUCES A CIRCLEmFF(> Ž PRODUCES%} AN 'INK BLOT'r??(7 Ž PRODUCES A LINE|$ D:FRACTILE PRODUCES$f  FLALASXYZTCSYSNYTTPITCCSPSNPROLCSRSNRHVDEMODALTCXRATIYRATIZRATIYADIRECTIOTUR)}@1@0 A A A )}?ppA`@@ @@@@)} A1ŠӠś21 +@$'0@1@<6- A)}F-@P 6-8,6-8,6-8,Z&"6A 6-& APd46-$%$6-"6-$6%$(6)}-.6-46-n:6-$%$6(6-$%$.6-46-:6-x.6-$%$(6-$6%$.6-7)}"!,%$%%$%-6-@7 AP/%$%%$% _-@@92A!@)}@= _2**F:Ad,"AU*"@ApAdAU$#6-)} A# AP ԛ +@AR@W-@@1(@atari graphicsC-@@)}W(@IN 3-D);@,"")9,9,9,?6-?pp6-A`'6-@36-@?6-@)}*0@@@+ĠŠ,GAR@(/(One moment please.G(Reading data )}for @B- 68,-/68,->68,-B IRRӠנǠŮʮϠϠ)}ŠŠΠΠҠ֛J'6-@6-@'6-@T-@^ "h$68,-$68,-$$6)}8,-$r+"6A 68,-"68,-+68,-| 36-6-'6-36-@X(/($For au)}to-rotate routine, press X($For manual settings, press .F:B2y,"@$6-@. A  F:)}B2y,"@A AW==ϭŠź׬Ȭ̠ӠҠțX-@@b)}-@l'6-6-'6-v"@6-$@u"@6-$@`")}@6-$@`9 6-E:,6-G:,6-E:,'6-G:,06-E:,96-G:, @P FOR DEL=1 TO 1000:NEXT DEL)}  ))ĠƠϭŻנ̠ś6-@ A +0@@ )}\( (-(The last display used values of0(F(YAW = deg.\(PITCH= deg.!(ROLL = deg.*S A)}((0(Enter desired new angles3(P(of YAW, PITCH, and ROLL.S(40(YAW (PITCH!,(ROLL 0>9 )}6-E:,6-G:,6-E:,'6-G:,06-E:,96-G:,H +AR@I0@@RP( ( ()}*(After the image is drawn,-(P(press any key to draw another.\-@A fAdAU @P)}p AҠȠĠӛ3-D LETTER A,30::-12,15,0,0,-15,0,12,15,0,8,6,0,-8,6,0,-999,-999,-999)}AA-20,20,0,20,20,0,20,-20,0,-20,-20,0,-20,20,0,-999,-999,-999;;-50,0,0,50,0,0,40,10,0,50,0,0,40,-10,0,-999,-999,-999)}>>0,50,0,0,-50,0,-10,-40,0,0,-50,0,10,-40,0,-999,-999,-999;;0,0,-50,0,0,50,-10,0,40,0,0,50,10,0,40,-999,-999,-999)} D:FUJI.BAS3-D LETTER AAS,-999,-999,-999;;0,0,-50,0,0,50,-10,0,40,0,0,50,10,0,40,-999,-999,-999(,|}GZFLALASXYZTCSYSNYTTPITCCSPSNPROLCSRSNRHVDEMODALTCSHAPVODIRECTIOTURYACHXRATIYRA-}TIZRATIMOVAUAT A A A  1 ? yp ?G`2 C@Y 3aq-}@?h?s@ ?v5?d4FP?ppA`@A@@@@-}@@x !@"@#@$@@@BY JERRY O'NEILL,261 ROSLYN STREET,ROCHESTER,NY 14619,5/83-}''ANTIC MAGAZINE AUG.'83 VOL.2/NO.5 A21 +@$'0@1@<6- A-}F-@P 6-8,6-8,6-8,Z&"6A 6-& APd46-$%$6-"6-$6%$(6--}.6-46-n:6-$%$6(6-$%$.6-46-:6-x.6-$%$(6-$6%$.6-7"-}!,%$%%$%-6-@7 AP/%$%%$% _-@A92A!@@-}= _2**F:Ad,"AU*"@ApAdAU$#6--} A# AP +@AR@X-@@2(@ atari graphicsD-@@X(@-}IN 3D(ONE MOMENT, PLEASE...#"#9,9,9,;@,?6-?pp6-A`'6-@36-@-}?6-@i%2A!@@G2@@@@i2@@@@-}I-AC&68,-568,-E68,-6@I i%2AC@@G2@A-}@@i2@Ab@@"-@@, #A6-@@I@ "J-}!"@68,-!68,-TH"@ 68%@I,-168%@I,-H68%@I,-@^2"@!68%-}@,-6268%@,-hI"@!68%AG,-6268%AG,-I68%AG,-@r | --}@ #AP-@@ "\68A%%$@,-968A%%$@,-E"@-}\68A%,-@  -A AB@ "~ 68,-68%@,-568%@,-6-}A >68,-O68%@,-g68%@,-6A ~68%@,-@ -AEAx "$ 6-}8,-68,-$68,-@ x -@6?<2AC@X2@A@-}t2@Ab@x &N0@@@ (#(N(&FOR AUTO-ROTATE ROUTINE, PRESS Ԡ0++(#FOR MANU-}AL SETTINGS, PRESS Ԡ:.F:B2y,"@$6-@. AD.F:B2y,"@$6-@. AN -}ApX-@@b-@l'6-6-'6-v"@6-$@u-}"@6-$@`"@6-$@`9 6-E:,6-G:,6-E:,'6-G:,06-E:,96-G:, @P-}-@A   #6-@#"@A A""@A +-}J( (+(TO SEE AN ATARI LOGO, ENTER .(J( TO SEE A  , ENTER  "@A  + -}T( (-(THE LAST DISPLAY USED VALUES OF0(;(YAW=H(PITCH=T(ROLL=*R A((0(ENTER DESIRED NEW A-}NGLES3(O(OF , , AND R(40 (YAW=(PITCH=!,(ROLL=0>9 6-E:,6-G:,6-E:,'6-G:-},06-E:,96-G:,H +AR@Rj0@@@ (#(&(D(AFTER THE IMAGE IS DRAWN,G(j(-}PRESS ANY KEY TO DRAW ANOTHER.\-@A fAdAU @Pp A@5AR@-}((5(ONE MOMENT, PLEASE..."B- 68,-/68,->68,-B '6-@6-@-}'6-@-@ "$68,-$68,-$$68,-$+"6A 68,-"68,-+68,--} =6-6-'6-36-@= AP 278__-20,-56,-20,-10,-21,-8,-22,2,-24,4,-24,8,-2-}6,10,-26,12,-28,14,-28,16,-30,18,-32,20,-34,22YY-36,24,-38,26,-40,28,-42,30,-42,31,-50,34,-54,36,-60,38,-70,40,-70,56,-62-},56,-54,54YY-48,52,-44,50,-40,48,-38,46,-34,44,-32,42,-30,40,-28,38,-26,36,-24,34,-24,32,-22,30^^-20,28,-20,26,-18,24-},-18,22,-16,20,-16,18,-14,16,-13,12,-12,10,-12,-56,-20,-56,-999,-999..-8,-56,-8,56,8,56,8,-56,-8,-56,-999,-999$UU-20,--}56,-70,40,-70,56,-12,-56,-8,-56,-8,56,8,56,8,-56,12,-56,70,56,70,40,20,-56.--21,75,25,65,29,75,28,72,22,72,-999,-9998''-}31,65,39,65,35,65,35,75,-999,-999B--41,75,45,65,49,75,48,72,42,72,-999,-999LEE53,75,53,65,58,65,60,67,60,70,58,72,60,75-},58,72,53,72,-999,-999V3364,65,70,65,67,65,67,75,64,75,70,75,-999,-999BARN,154mm-25,21,-15,-25,21,15,-25,-9,15,--}25,-9,-15,-25,-17,-9,-25,-21,0,-25,-17,9,-25,-9,15,-999,-999,0,-25,5,-9nn-25,5,-5,-25,-1,-5,-25,-1,-9,-25,5,-9,-999,-999,-}-999,-25,2,-9,-25,2,-5,-999,-999,-999,-25,-1,-7,-25,5,-7ll-999,-999,-999,-25,5,5,-25,5,9,-25,-1,9,-25,-1,5,-25,5,5,-999,--}999,-999,-25,2,5,-25,2,9,-999,-999,-999hh-25,5,7,-25,-1,7,-999,-999,-999,15,-9,-15,15,21,-15,15,21,15,15,-9,15,15,-9,-15,-}15,-17,-9,15,-21,0gg15,-17,9,15,-9,15,-999,-999,-999,15,5,-9,15,5,-5,15,-1,-5,15,-1,-9,15,5,-9,-999,-999,-999,15,2,-9 a-}a15,2,-5,-999,-999,-999,15,-1,-7,15,5,-7,-999,-999,-999,15,5,5,15,5,9,15,-1,9,15,-1,5,15,5,5kk-999,-999,-999,15,2,5,15,2-},9,-999,-999,-999,15,5,7,15,-1,7,-999,-999,-999,-25,21,15,15,21,15,15,-9,15 mm-25,-9,15,-25,21,15,-999,-999,-999,-25,21,-1-}5,15,21,-15,15,-9,-15,-25,-9,-15,-25,21,-15,-999,-999,0,-11*ff21,15,1,21,15,1,13,15,-11,13,15,-11,21,15,-5,21,15,-5,13,15,-}-11,21,15,-11,13,15,-5,21,15,1,13,154kk1,21,15,-5,13,15,-999,-999,-999,-25,-9,-15,15,-9,-15,15,-17,-9,-25,-17,-9,-25,-21,0-},15,-21,0,15,-17,9>mm-25,-17,9,-25,-9,15,15,-9,15,15,-17,9,15,-21,0,15,-17,-9,15,-9,-15,-999,-999,-999,-25,-9,-15,-25,-17,-}-9Hnn-25,-21,0,-25,-17,9,-25,-9,15,-999,-999,-999,15,21,-12,15,-15,-12,20,-21,-10,15,-15,-8,15,21,-8,18,21,-5Rjj18,-15,-}-5,20,-21,-10,22,-15,-5,22,21,-5,25,21,-8,25,-15,-8,20,-21,-10,25,-15,-12,25,21,-12,22,21,-15\hh22,-15,-15,20,-21,-10,18,--}15,-15,18,21,-15,15,21,-12,15,21,-8,18,21,-5,22,21,-5,25,21,-8,25,21,-12fmm22,21,-15,18,21,-15,15,21,-12,-999,-999,0,15,-1-}5,-12,15,-15,-8,18,-15,-5,22,-15,-5,25,-15,-8,25,-15,-12p5522,-15,-15,18,-15,-15,15,-15,-12,-999,-999,-999 D:FUJI2.-}BAS2,15,-15,-8,18,-15,-5,22,-15,-5,25,-15,-8,25,-15,-12p5522,-15,-15,18,-15,-15,15,-15,-12,-999,-999,-999 D:FUJI2.,wx$$PLEDICCCCWIDTHCXC264NUROTPREC70M1M2M3M4M5M6M7C2COTEMORDJJCTTBITCHFILL1}PMBAS 1}@@1}@ !"#$%&'()*+,*1}************************ P/M CREATOR/ANIMATOR ** BY SCOTT SHECK ** ANALOG COMPUTING *******1}******************qqŪӠ͠ӠΠŠנح̠ǠͮƠՠŠǠŠĠ1} qqͬΠŠŠӠΠŠҠŠ٠ΠŠҠǠϠΡ kk1}堾 20012 DATA 208,2,169,160,32,164,246,198,4,208,239,198,84,208,221,96 B A!1} ԛ6-+%,$+ ,8 -B2H% )-@8( C A&5@ ',@%$C1}B2R@%$@ A&B6-@'6-9B2H%A%@:7%,,"9B2H%A$ 1}ͭԛ?6-@ ?(' right - TO SELECT button - TO DISPLAY @),: 6-#T:,"&6-+&@,1}'0 AS: AR:,@A" @2,"@ "$ 6-% A ț6-+ 1},$@:7%,,%67%<%,.>:,16-B2V%6-@' A1 A`$+ ̮, -68,-8,1} .#"@F B # A/ BP3-@@(6" -6-8,"-@";8,1}%F:%,%@   A&5X$] қ^ A&7_3 AV6-A%)6-@3 Ar$1} ΛP6-A%6-@.6-F:,'@;P:,)"F6-F:,%P A6-F:,&@( -@1}%$%( ($Ҩ©) A&7 AV) A$Ψ©66-F:,'@!1}P:,)",F:,%6 AF:,&@(-@@ %( F:,($&6-?:C:,,$INVERTX6-1}?:C:,,$RIGHT6-?:C:,,$LEFT6-?:C:,,$DOWN6-?:C:,,$UP 6-?:C:,,$INVERSER. 1}A&@ A&E#6-?:C:,,&$.ERASE ě= ( PRESS play,# A&E' =( LOADING DATA.....˺ 901}5 OPEN#C1,C4,CZ,"D:FILENAME.EXT"#Ad@c#C:! )! A% -) AQ1}%6-8, -)% 6-@:7%,, AU  6- AR$ śB 1}( PRESS play & rec,) A&E- B( SAVING DATA...JJ˺ 955 OPEN#C1,8,CZ,"D:FILENAME.EXT":?#C1;WIDTH$:PUT#C1,PEE1}K(704):Ad@c)@C:0 :*F:,& -*F:A%,&6-8, -*F:%,1}   $Š -4 A &( data ?0 A&F4$6-8,% A&$-1}@'46-A(-@# *(.4 A (6-& 6-'  A&D $1}ٛN ( READY PRINTER% A&E*4 APN@P: !(!( BGRND COLOR=F:,"( P1}OKE 559,$J -(!(PLAYER J(POKE %,F:%, :REM COLOR)55(POKE B2V%,@:7%,,1} :REM WIDTH+E(DATA !-8,8,%,(F:,78,%A(,E 3  (G$K śL2 1}2(&down-SLOW SEQ.-left up-FAST STOP-rt.Q 6-VB2H%8,AZ 6-R:,"@ 6-%\-"@1} A&6# A&A- A 1^"@ A@`"@6-+&,$+!,d0 -  B2H%8,06-+%1},$+ ,o At -u3 !( frame % (0-2)%3!AAv1 68,--@%$ ($ ''1 2}A˛# 6-6-1#6-A( 6-%(>:,6-6 F:B2y,@A `62}-F:A,0A+",$@2HB2Q+,$A`B2U+,$A/ 6-T:,R:,"@*%6-#2}/ A  *+)",A H 6-R:,*6-%+"@,&+"@,H6-%+"@,&+"@,$3 2}4E!@4) @'6-%6-16-@C; A&DE A&> "6-C"@#6-H A M(2} A%R A! ŠΠě 6-@:7@5&,,6- 1 6."@:,"&A($+ ,*6..16-2}6 , (6-8,%"6-%F:,, A& !!T:,"*R:,"@A%0 A  $' ŠԠ2}( ) -@7( $- ӛ.  A T:,"A&/ Q6-@  A&D# A 1G"2})"@)!@* @Q A&A2 / $@P%!@* @/ A&B4 A&66 < #6-@'%@2}$+ ,/6-@C9 A&D<$8  "6-: "@#6-; A&F ӛK ; 6-8,P:'A2 }V,8&AV$P:'AV,;$L # -@3 (PLYR #$M / ( COLOR(0-255)?( A&F,/$P > -2 }5(' ;->$Q -@($R 6-?:A,6-8,S O -)22 }@%@@46-F:%,> A&B L2O$T 5-@6$2@( 225$U  -2 }( PRESS any keyV AdAUW R:,@' A&X F:Ad,"AUA&GY $N ś Nc62 }-6-@'6-@36-@?6-@K6-@"W6-Ac6-A&@!N= +@/6-F:A`,%F:A2}a,$AV=%AR"NA#NjA@j(@ player creator & animator 2}  Ԡ$N ɛ%ND-A6AC"!% D72,165,208,141,27,208,104,64&N3A#@2}!A3A@'N̠ś(NN-ARA682%AP@@ @%D N22})N̠қ*N'-@A"#A%' +NVV104,160,22,132,84,162,27,134,85,164,84,177,0,133,2,162,8,2}134,4,38,2,176,4,169,46,N>>208,2,169,160,32,176,242,198,4,208,239,198,84,208,221,96-N9@,;@,;@,2}9@,9@,;@,;@,;@9,;@,;@,;@,;@,;@,.N`;@,2}$-@@9("467,.>:,8 L-@@P"\67,.>:,` /NS-@@"'67,.>:,+ ?2}-@@C"O67,.>:,S 0NS-@@"'67,.>:,+ ?-@@C"O67,.>:,S 1NS2}-@@"'67,.>:,+ ?-@@C"O67,.>:,S 2N+-@@"'67,.>:,+ 3N 2} ԛ4N)+)6-F:A`,%AV$F:Aa,9NK%@p%%@@9%@A0KBBA2}N Я͛N46-F:A,&@&BBy46-AV$N BPB2wNL -68,-"B2V%467%2}<%,.>:,HA%AL N-B2QA!A-B2YNM)6-?:C:,<%AF<@7<A,;2}B2UAMB2`AN))6-?:C:,<%A<@t<AU,N/6-?:C:,<%A<<,/B2R@P2}ΠԭЛPoA@$'AAD3A?ARQ@@c@@#o-@2}PVV(N P0 P1 P2 2 2 2 46 46 46 191 191 191P'@!@@ '-2}Pll(dӺEDIT M-EDIT WIDTH RESOL. COLOR LUMIN. COLOR[B]=LUMIN[B] INVERT SCROLL P[[(SSCROLL 2} SCROLL  SCROLL  INVERSE ERASE LOAD DATASAVE DATAPOKE DATAHARDCOPYP*@@9*(ANIMATE [0-1-2]P_ A2}I,@@1/@#@;@!M,@@ _/@$@ P A`,@%%/@%72 },@@I/@@ [,@$@ m/@$@,@@/@@ P,@@ 2!}',@#@1ASC,@#@U/@#@_A@q,@#@ { A A 1A2"}R A&6$RŠΛR^ 6-6-@b&68,-%Ad768,-%A H68,-%AvR B`^2#}SINGLE 62R;6-+AU,$A;6-?:C:,<%A<@t<,R>/6-?:C:,<%A2<@<$+"A,,;AY2$}>$Sd6-AU6-@F,68,-%A=68,-%AN68,-%A8X BAdDOUBLE-46 S-?:C:,<%A 2%}X<@7<,&$*S̠Š4SVV104,216,169,1,133,2,169,22,133,3,164,3,177,0,170,164,2,177,0,133,4,138,145,0,1642&}>SVV3,165,4,145,0,230,2,198,3,192,13,16,228,96,104,160,23,177,0,74,145,0,136,208,248HS[[96,104,160,23,177,0,10,145,0,136,2'}208,248,96,104,160,21,177,0,200,145,0,136,136,16,247RSZZ96,104,160,2,177,0,136,145,0,200,200,192,24,208,245,96,104,160,22,12(}69,255,81,0,145,0\S^^136,208,247,96,104,169,0,160,23,145,0,136,208,251,96,104,104,133,1,104,133,0,104,104,168fS66104,104,2)}145,0,136,16,251,96,1,2,4,8,16,32,64,128D:PMCREATE.BAS6,208,251,96,104,104,133,1,104,133,0,104,104,168fS66104,104,0? &'P0P1P2P3MXYLXMYMLMVTAATAXNNDDD0D1D2D3BREMOVDMDMDMPMBASBYTDM0DMDM1DM26+}DM3OFFSEVVMOVEDM@@@@@ @ 6,} 6-} !"#$%&'()*+6.},-./01@2~~;@,;@,;@,;@,;@,9@6/},9@,9@,9@,9@,9@,} +@-@@=(@A SELF-MODIFYINGO-@60}@k(@PLAYER-MISSILE}-@@ b!(@GRAPHICS UTILITY3-@@J(@ ke61}n grace^-@A b p +(p([THIS UTILITY ASKS SEVERAL QUESTIONS ABOUT THE P-M GRAPHICS SITUATION YO62}U WANT TO SET UP.e(:(/IT THEN MODIFIES ITSELF INTO A PROGRAMSKELETON.=(e(#SUBROUTINES FOR PLAYER AND MISSILE q(63}MOTION ARE INCLUDED.(D( YOU ADD THE REST OF THE PROGRAM.G(q(%ANIMATION IS POSSIBLE BY COPYING NEW `&(SHAPE STRI64}NGS INTO THE STRINGS@(DEFINING THE PLAYERS.C(F(`(PRESS TO BEGIN. &6-F:B2y,&@@  L>(>:65}A%,+ENTER THE GRAPHICS MODE FOR PLAYFIELDH(GR. L ' @( 9000 GR. ' @ ['(RESOLUTION 66}DESIRED FOR PLAYERS:;(0 = DOUBLE-LINEW(1 = SINGLE-LINE (FINER)[H6-P:'@,$6-&@$0@H6-67}@$+@%,%"@%6-@%@$%"@%6-@%@$%"@%6-@$%@68}$%"@%6-@6%@$G @%( 9010 RES=:S=/ @G6-A($+@%,3 @69}!-@@%() 3 @,((NUMBER OF PLAYERS TO BE DEFINED,] @ @'-@;(6:}A%@P$O(A%@P$S ] @I @ @'-@;(A%@$? I @6;}h-&@&(>:A%,)(b(1COLOR (0 - 15) AND INTENSITY (0 - 15) FOR PLAYER hF @<(AP6<}% POKE A%,@$%F @`(WIDTH OF PLAYER :-( 0 = NORMALB(1 = TWICE NORMAL\(3 = FO6=}UR TIMES NORMAL`< @2(A`% POKE B2V%,< @gc(?INITIAL HORIZONTAL POSITION (0 - 255) 6>}FOR LEFT EDGE OF PLAYER  (45 TO 210ON SCREEN)gW @M(A%@P$X()=:REM HORIZ POS OF 6?}PLAYER W @ A-("VERTICAL LENGTH (BYTES) OF PLAYER 1>(>:A%,A(!QM(4INITIAL VERTICAL POSITION OF TOP 6@}OF PLAYER (1 TO &&@)Q"k @a(A%@P$Y()=:L()=%@:REM VERT PO6A}S AND LENGTHk @#( USE LINES A%@P$ TO A %@P$# TO ENTER DATA STATEMENTS WITH THE 6B} BYTES DEFINING PLAYER $)(&(TYPE TO WHEN FINISHED.)&%7  @%-@@6)(- 7 @&6C}8(4((HOW MANY MISSILES TO BE DEFINED (0 TO 4)8'G" @--@9(AP%= G @6D}(] @ @'-@;(A%@P$O(A%@P$S ] @)&"(>:A%,& @6E}R*q6-%-&@2(>:A%,5(M(WIDTH OF MISSILE \( 0 = NORMALq(1 = TWICE NORMAL+i(6F}3 = FOUR TIMES NORMAL!>6-P:@#%?,$%H @_(9064 POKE 53260,i @,u1(&INITIAL HORIZONTAL 6G}POSITION OF MISSILE5? @u(A%@P$XM()= :REM MISSILE -V( HORIZ POS @E(#VER6H}TICAL LENGTH (BYTES) OF MISSILE IV(>:A%,.e(a(4INITIAL VERTICAL POSITION OF TOP OF MISSILE (1 TO A($+6I}@%,&&@)e/n @d(A%@P$ YM()=:LM()=%@:REM VERT POS AND LENG6J}THn @0zz( USE LINE A%@P$ (TO A %@P$$) TO ENTER DATA STATEMENTS WITH THE  'BYTES'6K} DEFINING1o(MISSILE +6-P:@#%?,.(l(ALLOWED VALUES ARE 0, , @$, OR @$o(2$!6L}(ENTER WHEN FINISHED.$&3 43 @!-@7@Q%() 3 @5I @ @'-@6M};(AP%@$? I @6O" @--@A(A%@$E O @7s(P6N}RIORITY SCHEDULE :(G($1 - PLAYERS 0-3,PLAYFLDS 0-3,BACKGNDJ(s($2 - PLAYERS 0-1,PLAYFLDS 0-3,PLAYERS8o( 2-3,BACK6O}GND(B($4 - PLAYFLDS 0-3,PLAYERS 0-3,BACKGNDE(o(%8 - PLAYFLDS 0-1,PLAYERS 0-3,PLAYFLDS9s( 2-3,BACKGND(s(UALS6P}O, THE NUMERICAL SUMS OF THE ABOVE CHOICES ARE ALLOWED, GIVING BLACK FOR OVERLAPS.:h(,(!ABOVE +32 GIVES COLOR IN OVERLAP6Q}S/(;(CHOICE?I @^(9045 POKE 623,h @;I(1(&WHEN YOU SEE YOU MAY LIST OR RUNE-@A6R} I <3 @!-@R@Y%() 3 @=o( ((60(61(90%(91,(92H(POKE 842,12:? CH6S}R$(125)Z-lAB@o&Z00@@ @*(>:A%,-(0$[9( ((CONT$-6T}6AB@9&\BAB@"(>:A%,%(?0@@ @B$c AdllMOTION OF PLAY6U}ER P. X(P) AND Y(P) ARE X,Y POSITIONS. DX AND DY ARE CHANGES. USE FOR DY=-2,-1,0,1 OR 2.e! A!"Af/6V}/%@AAAAg678,%,. Ah678,%,. Ai678,%,. A6W}j678,%,.kMB2H%8,%$68,-8,%268,-8,%>6-J6-M$l%6-6-% A6X}n88MOTION OF PLAYER P. USE FOR DY >2 OR <-2 (OR 0).o9 A9%@AAAAp2 66Y}.B2H8,%(678,%,.2 Aq2 6.B2I8,%(678,%,.2 Ar2 6.B2P8,%(676Z}8,%,.2 As( 6.B2Q8,%(678,%,.t:68,-8,%68,-8,%+6-76-:$u%6-6[}6-% AddMOTION OF MISSILE P. XM(P),YM(P) ARE X,Y COORDS. DX,DY ARE CHANGES.USE FOR DY=-2,-1,0,1 OR6\} 2.L AX68,% @)8,%%8,!)"B6-L AW//%@ASATAUAV6]}4*6-?:<%8,%<<8,<AR,4 AW4*6-?:<%8,%<<8@,<AC,4 AW4*6-?:<%8,%6^}<<8@,<A,4 AW**6-?:<%8,%<<8@,<@c,MB2R%8,%$68,-8,%268,-8,%6_}>6-J6-M$/6-6-,B2R%8,/$88MOTION OF MISSILE P. USE FOR DY>2 OR <-2 (OR6`} 0).B Ah68,% @)8,%%8,!)"B6-//%@AcAdAeAf^"6-6a}?:<%8,<<8,<AR,3B2R8,%T6-?:<%8,%<<8,<AR,^ Ag^"6-?:<%8,<<8,<AC,3B6b}2S8,%T6-?:<%8,%<<8,<AC,^ Ag^"6-?:<%8,<<8,<A,3B2T8,%T6-?:<%8,%<6c}<8,<A,^ AgT"6-?:<%8,<<8,<@c,3B2U8,%T6-?:<%8,%<<8,<@c,:68,-8,%6d}68,-8,%+6-76-:$%6-6-% Aa A7#AY@F%@$<#6e}.6-F:A,& BBy.6-$AVF#9B2w@!6-A(-"@96-AUn#L ;,6-C:,+676f}@,.>:,=67,.>:,L67@,.}#B;8,,-6.7@<8,,BB2H8,#B #A6g},-@8,&@0">67<,.>:,B #B;8@,,-6.7@<8@,,BB2I8@,6h}#B #AP,-@8@,&@0">67<,.>:,B #B;8@,,-6.7@<8@,,BB2P8@6i},#B #A,-@8@,&@0">67<,.>:,B $B;8@,,-6.7@<8@,,BB2Q6j}8@,$B #AP,-@8@,&@0">67<,.>:,B E$B;8,,-6.7@<8,,6k}BB2R8,J$K #A,-@8,&@0">67<,.>:,B K6-C:,w$B;8@,,-6.7@6l}<8@,,BB2S8@,|$K #AP,-@8@,&@0">67<,.>:,B K6-C:,$B;8@6m},,-6.7@<8@,,BB2T8@,$K #A,-@8@,&@0">67<,.>:,B K6-C:6n},$B;8@,,-6.7@<8@,,BB2U8@,$K #AP,-@8@,&@0">67<,6o}.>:,B K6-C:,%G%6-F:A4,%AV$F:A5,G6-F:A@,%AV$F:AA,!%6-%A$+@%,&&%6p}-@0%$6-P:'AV,$6-&AV$:%%@%@D%1#%@A($+@&,1%6q}@N%1#%@A($+@&,1%@X%+6-%@+6-%A($+@%,b%+"@+6-%A6r}$+@%,&l% % 6.678,,.% 6.678@,,.% 6.678@,,.% 6.678@6s},,.%8 6.678,,.8678,%8,,.%W-@8@,36-8@,%&@S67<,6t}.>:@:7<,,%@:7<,,,W %W-@8@,36-8@,%&@S67<,.>:@:7<,,%@:7<,,,W %W-@6u}8@,36-8@,%&@S67<,.>:@:7<,,%@:7<,,,W %*;@8,6-C:,*6-C:,&@% #6v}A % #A0%--@@7")67<,.>:,- &YY104,104,133,204,104,133,203,104,133,206,104,133,205,1046w},104,133,207,104,104,133,208 &AA160,0,177,203,37,208,113,205,145,203,200,196,207,208,243,96' A D:PMDESGNR4}|TRAKKKKKKK1K1K1K1K1K2K2K2K25K51ATRACSDMCTPCOLRCRSINHPOSPSIZEPGRACTPMADPMBASBISAL:y}CCSWMPQTPWKCSPMSAVWOCCRWXYYYYTXXXAR@@@@@:z}@@ @ @ @ @" @#@'AVA@wAYAARB2HB:{}2VB2wBByBX @ !"B#$@F%:|}& '$(3)@*@+,@#-./0BX1AF2@C3A(4Aq5@:}}6@789:;<=>?@AB&6-F:A,&:~}@&A g +@'0@@ @2(@=(@\(@ PLAYER/MISSILEg(@w:} (@ DESIGN AID+(@6(@P(@ -BY-[(@w(@ TOM GURAKe6-:}6-@#6-%-6-%%56-%=6-%E6-%M6-%U6-%]6-%e6-%#1 6-%%6-%6-%)6-:}AV16-$(c6-@w6-AY'6-A36-AR?6-B2HK6-B2VW6-B2wc6-BByF 6-$:}%P-%Ah Z 6-%@4dG;@,;@,;@,;@,;@,;@,:}O6.+W6.d6.Shift o6.All {6.Line 6.Blank n'6-B6-'6-@FxP&;@,;@:},;@,:6. Push FIRE to P6.Pos cursor for  -$ $+00$( ' :}@'A A' 1%6-A('6-%@ -%(>:,6-6"6-%*-. :}76-R:,@6-T:,"*A -%(>:,A  "A 6-@:,"6-@:,:}V -%(>:,6-%$6-F:,;6-P:#+&,%?P,D"@:,L6-%V A` 6-& 6- AA:} 6-R:,(T:,Ap,* 6-6-!*  6-6* A 6!@* 6-@."@)")"@:}$6-6. A5J")"@ )"6-O "**6-T 6-%6-%W  Y *Ae^:}"Ac3"@!)"6-6-) A3 Ae(T:,AWh# 6-6- AP# Am !:}6- Ar  6-w A|(T:,A  6- A !6- A 6-:}&AA A0A@APA`ApAAAAA#A"AA :}AAA) A6-6-6-) A* A6-6- 6-6* A6 A6:}-6-6-%6-,6-66 AP5 A6-6-6-%6-+6-5 AP+ 6- A6-&!6-:}+ A$ 6-6-6 A$ A0 6-6-6-6 A&6-0 AP/ 6-6-6- A:}%6-/ AP+ A% A! A+ A A AP@ 6-6-6.7<,$ A`*6-6:}6-A@ A 6-(A0 !6- A   6- AG A$6-P:#+&,%?:}P,,-61%G"@:,AP& 6-%6-F:,6-&& A& -%( :) 6-"@" A:}P) A? A AD6.7<, AN6.7<,XB 6-6--(& A,6-86-:}AB Ab 6-Ael 6- A$ --( + 6-%6-6-! A+ A:}p5-&-#1%%--%%5(>:,8 -%(>:, 6-%*6-F:%,4 A8  AP:} --&51%%-%%!(>:,)-%1(>:,5 = -%(6-%!6-F:,("636-P::}',= A 6-$!AV6-&  A  Ap # -@ ( #$; A (C:}olor" A; )!)P:,A 6-$@I A ( Luminance& AI )!@)P:',$A:}  6-% A P Ap5 6-F:,-@(@!2(COLOR= 5$, -#( :} )-,$/ --(-&-%+(/ + 6-%6-6-' A+  -( COMM:}ANDS:- -(!-@-(--@(!--(--@(!:}--($- -(!-@ -(&4 -( Blank All$-@4( Blank Line( -(:} Blank Column0 -( Change Mode35-@!( Change Width'-5(Poke P/M8:-@( Set Color:}*-@:( Poke ColorBO-@( Save Data#-1( Load Data; A$E A"PO A PE 6-6-G :} $L6.Change A`~6.Select A` -( A 2$E -( Processing:}!-((., B2AP@E$22@P@!-% /22$x: 6-6-#@:}K:- A3:(?$)@$"AUA-"A&6-P:',#( - A?!@G*:} @X-6-$%+&@H,5(>:,? A (} A@( $+ -#(Enter Poke Valu:}es +-' - A'"A A )!A 6- A! -(   Ap6:}8 6-%6-F:, A$-+( .'8 Ap@\ A -#( Poke Color- A\ )!AV)P:'@:},$@AJ6- A 0!-6!F:%,A <  -&(No P/M Data To Save.-:}2 < Ap ' A% A 6-m)@@D:PMDATA16-%:6.=:,D AP6.DATA:} Z Ac6.=:,m A, 6.=:, A"6.=:F:,,, A) -6-F:%,6.=:,) AB 6:}.-1 A-*@AU8@B Ap& -#(Ready Tape Recorder &$*@@D*-:}B:,#*@@:7<,,' *$lO A% A6-' A-6-O2qL A:}3@@D:PMDATA;-H)@L vQ A 6- A$' A -6-7 A"PA A :}GQ A P. - A !"@E$'. A 6- A! @ Ap= 6-:}-@$)@0"@D3'= A "@E' A 6-$%A:>:,, *$4-6-A(-:}-%- A! >(6-& A!0H(R$ 6-' 6-%! A$$ "6- A"0 :}"6-@ A"0 6- A"P Ap( -@$@!%(W=($/ A"@F%:}6-@b/ A#0 6-@F > A$- 6-F:%,(%0%4 > Ap` & -@! (MS:}=&6-j %6-%@4%"@FA$0t 6-A$%@h~  6-$%$ (T:,A% J A -:}"(Confirm, A61%B6-A(J6-% @ -%(>:,6-6"6-%*-. 76-R:,@6-T:, :}"*A% % -%(>:,'% Ap $D:PMDESIGN.AID6"6-%*-. 76-R:,@6-T:, 8NiDZZZZ dIIA>}TARI COLOR CHART by G.Potter Modified by D.Bell (INSTRUCTIONS) A A -@!@76>}-$@%@C6-@M APY6-Avc APy6-$@%@6-@ AP6-@s A>}PO/-$@%@$@%@;,@G/AuK O GG216,72,173,19,6,24,105,16,141,19,6,1>}41,10,212,141,26,208,104,64,0S #A!-A6AU%"+/ AASA@!6-%$>}AV!6-%@c-AuN+&@,'@"P:+&@,'@,*!@ c%F:%,%A(1#>}F:%,"@y)F:%,"A16-%@ BBA+AY7A`CAaUA#@d>}o0@AY@4B2y@4F:B2y,"@*@w4 AA- A>}F:A,%@*+-+#A%$@ +-@+",%%P:O:,,+ A>}"/%%P:,"P:,A`"   $, 62,8.5,-1,-9.5,2,8.5@ J-2,-9.5,1,9.5,-9.5T >}^##-2,7,9.5,-1,5,6,-9.5,2,4,-9.5h r&&-1,-5,-9.5,-1,4,5,-9.5,1,3,6,8.5| 1,5.5,-5.5,2,9.5 $>}$1,5,-9.5,-1,-5,-9.5,-1,6,8.5,0 2,8.5,-1,-5,-9.5,-2,6,8.5 -1.5,-1,5,9.5,1,5.5 $$2,4,>}6,8.5,-1,-5,-9.5,2,4,6,8.5 2,4,-8.5,-1,-5,-9.5,2,8.5 (10)3,9.5,1,3,-7.5,3,9.5  (11) >}1,9.5,-1,-5,-9.5,2,4,6,8.5à (12)&2,8.5,-1,-9.5,-2,-8.50Ġ (13):1,9.5,-1,-9.5,2,8.5DŠ (14)N>}1,9.5,-1,-5,-9.5,-1,-9.5XƠ (15)b1,9.5,-1,-5.5,-1.5l +@'0A0@>}[0@u0@6-F:A`,6-F:Aa,vm-@@4(@anal>}og computingF-@@[(@proudlym-@@::(@presents>:@,>:@,>:@>},O6-%$AV'%@@;%@@O%@$@s-@@ ?(@ >} >:AA, Q-@ @s(@By Graham L. Pottert-@@.(@ PLEASE WAIT@->}@ t(@&Press START, SELECT, or OPTION to ExitZ AF:A,&@*+@ 96-F:A`,H6->}F:Aa,ZA#D6-F:@,!A',6-&A(8@DB7tA`Aa5>}0@@O0@@@i0@0@@@0@>}$ӛ +@/$(@ instructions /(@$$(@256 WILL REVEAL THE >}$$(@POKE AND SETCOLOR $$(@VALUE CORRESPONDING$$(@TO EACH HUE AND ((@ LU>}MINANCE...((@!/$(@/(@$$$(@ҠӺ )$$(@TAKE>} A NUMBER FROM .$$(@THE LEFT OR RIGHT 3$$(@SIDE FOR THE COLOR.B$$(@TAKE A NUMBER FROM G>}$$(@THE TOP OR BOTTOM L$$(@FOR THE LUMINANCE. Q(@ŠӺV$$(@FOR USE>} IN POKE `$$(@COMMANDS TO COLOR e$$(@REGISTERS, USE THE j$$(@VALUE (COL*16+LUM).8>}-@#8(@ӠԠϠ F:B2y,@A$D:256COLOR.BAS16+LUM).8<p