@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- 144ɛ+,' 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 D8uL 䙣ލȎ!"` !"H h`lDD T}SAB.ORTNI:D"NUR䙣ލȎ!"` !"H h`lDD '(NNNNNPROFFNNAMELBASICKE V} K6-6-@'6-@36-@?6-@K6- W}@&&A......Data Management,DMSDB.BAS((B............Data Sort,DMSSORT.BAS((C.Mailing List Utility,DMSMAIL.BAS X}))D.............Guardian,GUARDIAN.BAS%%E..............MT Rock,ROCK.COM&&F................Hoppo,HOPPO.BAS))G... Y}.........Superplot,SUPRPLOT.BAS((H..............Termite,TERMITE.BASt[+@@d+B7t@d7A Z}CA OA[AR~6-@<<;@ ,;@ ,;@",;@,;@,(6. [}(6.hji jL  K:. -.( . -.( | T.W.A. \}U.G. #20 MENU Side A. |. -.( -@% "-@(  ]}(-@"((LOAD WHICH PROGRAM ?AdAU  )!! @e)!@A&@d!A ^}(#&@d2 "<67<,.D:67,.FP7B:,&,0BASAZ(-@"(( à _}͠ d An Ax%7B:,&,0COMA`(-@"(( ٠͠  A `} A6-?:AUv,7B:,&,0OFFA :-@":(&٠͠ǠƠà a} A A6-?:C:,,7B:,&,0BINAP1-@ @"1(ï٠ b}͠  A*-@"*(Ϡà͠  A" A,,D:TURBOBAS.COM,6-?: c}AUv,69 -2@'AU5-@U9 @B2@AU--@U1 5 ?2}HHHhhhe H)8h Lh e ԍХ) ̍`H h`lDD KDE`tADDBECIOICCOICBADICBLEICSTABUFFERFIREADADADLEEf} B(&Ag} ;@,#F:B2y,@#%D:MENUO 6.hhh%67@,.>:Ap,767@,.LVO67@h},.>:A(,?+@%@?6-F:A`,%AV$F:Aa,%@Q0@70@i}Q0@@@R&@@%@d3-@ADF:%,"@R%@2F:%j},"@%@d2%@%@d z,@@ D:COLOR.OBJ9)@F)@S)@k}`)@m)@z)@++6-@%+%AV$,&+%AV$, A @i*@l}@ D:PICTURE96-F:@,H6-F:@,T6-Ay6^ A i@G%2AP@@m}G2@AT@@6-?:Ai<@,h -@6? <2AQ@X2n}@AR@dA h %D:MENU6-@File#2,$2036-A46-A6'6-A@36o}-A5 %%%@B 6-6-P:'AV,*6-&$AV2%B%%@%@6-?p}:C:,<,$ D2:INTRO.BASB 6-6-P:'AV,*6-&$AV2%B%%@%@6-?#UU PUUUU@* *PUU@UUUP PUUUPr}UUZ PUUUPUV UUUPUj( UUPs}** ** ** *t}* UP** P** P**u} P** *? *? v} *? *꠪*w}** ??*x} y}@UZ*UUTUU@PTUj  ?* UUTUUPTTUj**???**UTUUTUTz}U**???**UTUUTUATV**??? *UPUUTUQTV**???*U@UUTUUT@*{}*?? *@TUUT@*+?? *@TUUT@*+?? *@TEUTV*+|}?? *TUUTAUTV*+?? *UUUT@UTV*+?? *U@UUT@TV* ?}}? *U@UUP@TV*?? *U@UU@@T@*?? *UT@T@*+??~} *UU@T@*+?? *UU@@TV*+?? *UTEUP@TU*+?? }*UTAUT@TU**?? *UT@UT@TU**?? *UT@T@PUj  U}P@T@@UjU@@T}}}}?"#""G"}"Dp홲fL͙fUY}l"#j""OjZ""D}Y""D\peɉ""DO8N""DH}Lx""DH""DH`:Gȉ""DH1x}nvH""DHѬ\H""DH7'H""DH{}{H""DH&DH""DH1sDH""DHr-}2DH""DH2DH""DH"'}8?} }}<<<?<?<?<<<?}<?:,5 ;6-A A3' B1 @; A:!(} DATA BASE SE}LECTION$. @P:6-A`:*("ENTER DATA SET NAME (I FOR INDEX)-(:( (END)B:,"A ,}B:,"@*4I" Ae, A` -6-@ A-"A4"(DATA SET LOADED" Ac>86}-@-@) A%46-%8,8 R>;,;@0,#-@067<,. 4 > Aq ;8,,}$r ;8,,$s ;8,,$t ;8,,$u ;8,,$v ;8,,$"Ae6-A A}>@6@[@@ e B+(} +( TO ADD RECORD, ENTER:}-@A A %8,@7( (8, CHAR MAX)A Ap$( (6 CHAR - MMDDYY)..6-B:,.}"@*"A3! AD!Ap8 A%  A@*(@*(TRANSACTION A}CCEPTED (TYPE E FOR FMS MENU (0EA=@3@5@= A}"AH(} $( INQUIRY / LIST0"@H(Ҡ5( A - LIST ALL RECORDS5}( S - SEARCH ON KEY-!( E - END (RETURN TO MENU)-6-@  ( 4EA 4AA#*1 4S}6-@(}' AA1 A#4( A `N6-6-'6-A 1 AN@@} 8 A$ @$ B8!@A#0 07<,A# %6-%@%@A$$ }/6-@6-@/!A#p. '6-A$@ A'3  8 ))3      }B 2-@6-8,& @26-@G L-67<%8,&@,.7<%8,&@,86-%8,H6-%%@L }L > A37@<,*6-%@> @UA#V 6-3  A#` # AC(#( (E TO ST}OP)j 0EA#t "(~ !!!( REC COUNT-  "@3  "@ Ac"} A  "A /(} %( UPDATE / DELETE/ AA f6-A A6@@}Z@@D:TEMPf6- $ A2P@$ B %07<,(@% A0`} AC0 L.(&ENTER: FIELD # TO UPDATE; D TO DELETEL(PRESS RETURN TO WRITE REC: ;6-%@$B:,"}1(@; A0`? 4DA0`D 8 A1 6-A:, B8 @)!A1 N &( ENTER NEW  }A %&( b .6-B:, AD.A1Pl # A% A@# A1 D-@B:,!67<,.} % D67@<@,.D:TEMP, 0067@<@%B:,&@,.7@, c@@>@6@}c@3@ M(@2@M@5@} "( 3(MORE UPDATES? (Y OR N)#34YA0 A%-@B:,!67<,.} % A6-@-@) A@%A67<%8,&@,. 6-%8, 67,.* $2( SELECT KEY:}(%-@2(  0 A %(  (0"AA@5(PRESS RETURN FOR KEY:5( 1ST  POS} OF "- A %( ()"( -( OR, ,(ENTER KEY FIELD #@9 AB B+ @)!/(9} AA@J6(ENTER VALUE OF $ A %6( (1-8,)T86-B:,# @)!8,.( LEN8 AAp^@6}-@!@)-@<6-%8&@,@ h"( AA`r6-%&@$56-@}-@56.7<%8,&@, A%6-%8, (} (-@3 (  A %$ }A@%,( 0 3$0.6-" @)!8,.6-@:2"8,AEAE AE`.2(D$}A-@6-@:7<,,5 @H)!@WA6-@   $% AE@%6-@A57@}<@,201)7@<@,312A6-@A57@<@,201)7@<@,331A6-@$}, 7&@<&@,0 ,6-@+ AE!6-A:7@<,,+ B$6-@ AEp2%(}} DMS DATA DICTIONARY MENU(2 @P--(% A - ADD NEW APPLICATION / DATA BASEC"( I - LIST DICTIONARY INDEXC(} L - LIST CURRENT DB DESCRIP?( D - DELETE DATA BASE?( E - END (RETURN TO DMS MENU)( (4AA}7 4I6-A`! Ae$()(-7 A`4LAp4DAu4EA( Aa}-@AP $%-@B:,!7<,0 % g6-&@+67@<@,.D:O67@}<@%,.7@<,d67@%,..DBg$d6(} DATA SET INDEX()6-3 A6$XC#(} DATA DICTI}ONARY INQUIRY7( A - ALL FILESC6-@ l6( S - SINGLE FILE6( E - END (RETURN TO MENU)v( 4EA`}4AAp5 4S(ENTER FILE NAME+6-@5 App( Ap0B:,"Ap`#}6-Ap A# ApLN+(#} TO DELETE DICTIONARY ELEMENT ANDN( RELATED FILE, TYPE FILE NAME:V.( (CANC}EL).B:,"A``f6-Au A6@@Z@@D:TEMPf6-}j$ Av@$ Bt.07@@6@}c@3@[6@2@ D:TEMP,DMS.DB[@5@} A`@N" } ADD TO DATA DICTIONARYN(' ENTER APPLICATION NAME (1 TO 25 CHAR)J46-B:,& @)}!@%*(4 ATL%(ENTER FILE NAME (1 TO 8 CHAR)L(" FILESPEC WILL BE 'D:XXXXXXXX.DB'^46-B:,& @})!@*(4 A0hA37@<@,2A)7@<@,3Z7(A A0| AcN#( (MIN REC LEN}=10, MAX=120)N(&ENTER # OF DATA ELEMENTS IN REC (2-6) A B' @)!@(' A}Q6--@N(} FOR DATA ELEMENT #  OF  ENTER:Q(G(HEADING (1-12)#6-B:,9 @})!@=(G A  A%= (ELEMENT LENGTH (1 TO 30)=( (TOT REC LEN IS )? A0 B}1)!@05(? A0 68,-6-%A.(&EDITING? (N:NUMERIC, D-DATE, $:DOLLAR)A(RETURN TO SKIP}-68,-4N-68,-@ 4D68,-@ 4$68,-@   9 @)!A }/(REC LEN= 9 Al 167@<@,.167@ <@3,. H-@@H67@2%$@}<@3%$@,.=:8,, ($67A%<A%,.=:8,,(  H67@F<@W,.167@X<@i,.H67}@p<@,. Y67@<@,.167@<A,.H67A<A,.Y67A$,.* - AP-(}TYPE Y TO CREATE DATA BASE 0YA` O A2@6@O@@ } J(@@@@5@J B!(DATA BASE CREATED !Z @@}+@P@5@Z A`!2@Ap(6-A2 A!/(} NOT ON DISK/(TYPE Y TO INITIALIZE!0YA`!* @@* A0."--(%}} DATA DICTIONARY RECORD8".( FILE NAME - .( APPLICATION - L"41() ELEM # HEADING LENGTH EDIT?4(`"}:-@(* A %:(8,t"8,"( ~"8,"@(NUMERIC"8,"@}(DATE"8,"@(DOLLAR"%  ("( RECORD LENGTH = %$(#16.7@<@,16.7@ <@3},2#/6-6-/-@@<#U468,-A:7@2%$@<@3%$@,,U68,-A:7A%<A}%,,F#8,"APP#S6-%@6-%8,G6.7@4%$@<@E%$@,S A%Z# } Ac$#6 A*@@66-#8 A@$ B8!@AP$}I"?( 7@<@, 7@ <@3,I A$07@:AS,+,@>@@dP!}B7t@dZ A@2RR;A,;A$,;@%,;@,;@,;@,;@,<RR;@,!};@,;@,;@,;@,;@,9@,F*-@@&68,-* P$( } D!}MS DATA BASE SORT( @P@(( SELECT DATA SET;@( (I - INDEX), D - DMS, E - END).6-B:,""@*4D!}.%D:DMSDB#6-@#"A@""@*4E+":"@*4I+ } DATA SET INDEX!}.(:6-hK6-A@ A?@@D:DMS.DBK6-r$ AC@$ B!}|I"?( 7@<@, 7@ <@3,I AB07@( REC LOADED= , RAM (BYTES)= !}&@M( BEGIN SORT(6-@6-&P$6-6.7<%,$6-%ZAR AR@d:'7%&@!}<%&@,27<,46.7<%,:6-n ARPx:'7%&@<%&@,27<,46.7<%,:6- 6-%! }AR0#67<%,.7<%,067<%,. 6-% AR( SORT COMPLETEDe A2@!!}6@O@@Y Be6-9-@'(@7<%,56!"}-%@9 C@3@5@C( RECOUNT= ;'(SORT THIS FILE AGAIN? (Y OR N)+!#};4YAP A@%U@1(ˠˠ <@M( PRESS ENTERQU I& 6. !$}$J& 6. $K& 6. $L& 6. $M& 6. $N& 6. $]& ( $^& ( $_& ( $`& ( $a& ( $b& (!%} $ D:DMSSORT. $L& 6. $M& 6. $N& 6. $]& ( $^& ( $_& ( $`& ( $a& ( $b& ( ghfwAPPFILFILDHD1HD2HD3HD4HD5HD6IJRECINDMDLSXPNEODSRSVNSSSSNSTARFORMLE%'} @%(}%)} !"#$(1@'@@91 @2]];@&,;@,;@ ,%*};@,;@,;@,;@,;@,<RR;@,;@,;@,;A2,;@1,;@%+},9@,AW1;@,;@,;@$,;@,H6.ĠԠW6.D:DMS.DBFD"6.PRESS RETURN TO %,}CONTINUE86.SELECT OPTION:D6.K*-@@&68,-* P767@,. %67A2,. 46%-}7@,.7$Z;@,d. +.( DMS MAILING LABEL UTILITYn ( PRIMARY OPTION MENUx( D - SEL%.}ECT DATA BASE""( S - PRINT DATA TO SCREEN##( P - PRINT DATA TO PRINTER ( E - END (EXIT PROGRAM)/((%/} SELECT OPTION/4DAP4SA  4E4PA A`0 SELECT DATA SET%0} 1ST& Ac0 A9 (} DATA BASE SELECTION#- @P96-A`:*("ENTER DATA SET NAME (I FOR INDEX)-%1}(:( (END)B:,"A ,B:,"@*4I" Ae, A` -6-@ A-"%2}A4"(DATA SET LOADED" AcR>;,;@0,#-@067<,. 4 > A"A%3} }  A - PRINT ALL RECORDS## S - PRINT SELECTED RECORDS!! E - END (RETURN TO MENU)$  %4}4EA.! 4A6-@! A`8' 4S6-@ }' AB  A`L/( SELECT KE%5}Y:"-@/   V A % ` ENTER KEY FIELD #j% @)! % A t6 ENTER %6}VALUE OF $ A %6  (1-8,)~86-B:,# @)!8,.  LEN8 A@@6-@!@)%7}-@<6-%8&@,@ 6-%&@* * ENTER NUMBER OF FIELDS TO PRINT% @)! %%8} A`1 - !START PRINTOUT WITH ENTRY NUMBER 1R +  WHAT IS THE FORM LENGTH IN LINESN ENTER '0' FOR INDIVI%9}DUAL FORMSR96-A A9@@P: A""A(} %:}6-@6-N6-6-'6-A 1 AN@@ A$ @%;};6-@ B'6-%@;"@A#(07<,A" -@$  7<%8,&@,)%<}  4P A00 6-%8,3  4  4P A36   8 A"t " ~ !!!  REC%=} COUNT-  +@@ !+ A PRINT SUBROUTINE   $0 "" @7<%8,&@, %>}$   $ " $ " $ -@&  @   $-@AP %?}$%-@B:,!7<,0 % g6-&@+67@<@,.D:O67@<@%,.7@<,d67%@}@%,..DBg$d6(} DATA SET INDEX()6-3 A6$(#16.7@<@,16.7@ <@3,2#/%A}6-6-/-@@<#4468,-A:7@2%$@<@3%$@,,F#8,"APP#S%B}6-%@6-%8,G6.7@4%$@<@E%$@,S A%Z#  Ac$#6 A*@%C}@66-#$ A@$ B$I"?( 7@<@, 7@ <@3%D},I A$07@(HI:P)Q}-@(@`( SAFE MEN:H "6-% AIo "%-@A@A2@@@)R}E S6-%@a6-%@o6-%AJ/%2@/ @KŠˠӛP3 )S}6-%6-F:, "&6-0 AU3$U+ "6-%@+6-%$%&@9_? !!6-@56-%)T}$%&@9? Ad3 6-%6-F:, "&6-0 AU3$i+ "6-%@+6-%$%&@s? )U}!!6-@56-%$%&@? Ax$}Šԛ56-F:%," 6-,6-2)V}5$ "6- AU$ "6- AU$ 6-%$̠ԛ5 6)W}-'6-56-%@_-@@92@@P@@[2@)X}_  2 "6-@)6-%$%&@9/2$,6-@#6-%$%&@),$נȮ)Y}ӛ*%$%@'%$%@8*$Šқ-@@0;2@d&@@Y2)Z}@%@@o-@@0&s 22@c)[}-@@  1-@@?( GAME OVERQ-@7@W(0]!c6-\ 6-6-!-@@)\}?(PRESS START TO PLAY AGAIN\F:B2y,@A @ŠĠԛk%$%@')]}%$%@856-&@C6-&@O @]6-%@k6-%@ A$Рě)^}%$%@'%$%@8;-@@]2@A@@2@)_} |-@@ +%&@%$G2@@@K h-@ @6@|%&@%$)`}+ 6-&@! @+ A%2@B-@5@&6@N-@ T()a}hv2@@@@-@@ }-@ (i72@K-@)b}@O [-@ a( e w-@%@ }(i A$٠ӛs AF:A,&@)c}*+<AR@N-@@a( s-@ @(BY >> HEATH LAWRENCE0-@)d}@R2@@@f-@@j 2-@@ )e} -@@7(Š٠ӮI-@@e(ԠҠӮ2@)f}[-@@5(Ԡ̨̠9G6-$@M6-[6-%@ 6-6-#-@)g}@E2@@@Y-@@] 2-@@)q} xB%DOS SYSB*)DUP SYSBSAUTORUN SYSBUMENU BdCOLOR OBJB eINTRO BASB>qPICTURE B]DMSDB BASB DMSSORT BASB"&DMSMAIL BASB,HGUARDIANBASBgxMTROCK BASBM%HOPPO BASBRrSUPRPLOTBASB?TERMITE BASBROCK COM  /-@ @,(Ǡ/$ΛM +!AV'AV;0@)r}MAR@"%6-F:@,%AV$F:@,16-@=6-@I6-@@U6-A(a6-Am)s}6-y6-A6-A6-6-@6-@'6-%$@%&@976-%$@%&@)t}C6-@O6-@[6-@h6-6@t6-@06-@(6-6-6-A,נ)u}ě1o-@@$( abgggg6-@@?(cgQ-@6@Z(dgl-@@o(;Q-)v}&@!%% ;-&@M%$@"%Q @Q-@"!%$% 9-@")w}M%&@%$Q ET-@&@+%$@!%/ A-@%@ G(iQ AuT$Y*}uv 303BURLINFALLEJYSTXYSTYPOKPLPLPMBASPOWWW2W2W3W3RESTARLEDRVOCPNCDSCPLBEGISCRO-y}LM@@i@@@A&A@dA{ B0  B2H A B'h-z}AA@@sAAA%@B"VA(@C@A-{}"Bg` Bi@!@$"A#@&$@%B&B '(AQ)B0 A)6-%@-|})6-@&+&@,-@@!,@S-/AY@i6-$7-@-}}327  A[6-F:A2,6-%8,(6-%8,4!A@6-A[Calcula-~}tes players moves6-?:C:,<<<<,"F:AD,"@" AP Player shoots uG6-?:C:,<%Ah%%-}@<@<%Ah%%@<@,c-@@ @qB2R&u "GG6-?:C:,<%Ah%%@<-}<%Ah%%@<,,## Did you hit any nuke waste?6z6-F:B2V,"@*6-@U66-@`-}D6-%@V@@h-@@z(@ @k"@6-@s'6-A56-%@G@-}@Y-@@k(@ Jj"@6-@'6-Ae56-%@G@@Y-@-}@j(@ T Calculate nuke moves ^+ A56-%@+6-%@hO!A46-%-}@)!A 56-@UA6-@`O6-%@r+ A%6-&@+6-%@|]!A$6-%@-}+6-%@7!A C6-@sO6-A]6-%@+ A"6-%@+6-&@]!A!-}6-%@+6-%@7!A C6-@O6-Ae]6-%@@ A44 Coll. Reg. ke-}ep plyr in  bounds0F:B2`,$6-Ad06-At0F:B2R,$6-Ad06-At-}!! Actual ML moves players WW6-?:C:,<%@<<%@<<%@<<%@<<%@<<%@<,-}W2@@@;2@@@W2@@@B2xHITCLR A@-}INITIZATION[6-=;@%,;@,9@,9@,G APQ A[ A!p+@-}%@k0@@ 70@@Q0@@@k0@@@&-}AY A0BACKGROUND DRAWING:MOUNTAINSD1 @,@@1/@@Nq @-},@1/@@C/@@M@_,@q/@@X9/@ @#'/-}@"@#9/@'@'bC @,@'1/@(@'C/@(@4l1 @,-}@51/@2@5v]/@4@A'/@6@F9/@@@PK/@C@X]/@X1 @-},@D@Y1/@D@g1 @,@h1/@R@h'/@R@'/@-}k @,@1Ae@C-@k@@S:k @-},@1Ae@C-@k@@S:k @,@-}1Ae@C-@&k@@S:k @,@'1Ae@-}C-@4k@@S:k @,@X1Ae@C-@-}gk@@S:k @,@51Ae@C-@Xk@-}@S:a,@Y'Ae@9-@a@@S:-}1 @/@1/AY@This is the city _ @)-@`@f@=-@u-}@C,G K _Artifacting color @!-@p@t5-@s@;,? C M@_-},@q@uq,@r@,@s@w C @!-@x@5-@p@;,? C *g -},@y@q1,@@C,@@uU,@@wg,@@s4K @)-@@-}@=-@s@C,G K >K @)-@@@=-@s@C,G K H-}S @)-@@@E-@t@@K,O S RC @!-AA5-@-}@;,? C \6-@6-@f6-%@6-&@p5,A%/A&+"@w5-} A z Ap @,A@1,A@C,A@U,A@g,A@-}{-AA ,@ 1 @!-AA-,@1 U @,A@1/A-}@iC,A%@iU/A%@1 @,A@i1/A%@i',A @p'/A -}@U @,A@1/A%@iC,A%@U/A@iC @!-A'A1-}5-@u@w;,? C 1 @,A'@1/A'@u1 @!-A(A)-,@u-}1 K @)-A5AY@=-@@C,G K y ,A7@1,A9-}@C,AE@W-APASk-@@q,u y 1 @,A6@1,AD@-}C @!-AFAI5-@w@y;,? C ',AG@w'/AY@s"@-}A` AP AP$8AY@b'B2w@8Enable P/M Gr..w@@'-@-}<(@ N@@`-@@w(@ SCORE 8H -@6?<2@-}@@ HDing!B F:B2y,"@A@L F:AD,"A@V A`jtCUST-}OMIZED CHARACTER SET~/6-AV$+&@,/AV'AVC-A(A*%F:BsD%,. C. ROM N-}UMBER SET[ #A!-@@%"9-@="S%++$@,%,W [ ((45,130,198,238,254,-}254,238,238,238%%51,126,192,192,62,2,254,252,248&&35,62,126,192,192,192,254,126,62''47,124,124,230,230,230,230,12-}6,62((50,252,196,252,252,254,206,206,206((37,254,224,248,224,254,254,254,254""52,254,254,56,56,56,56,56,56((4-}6,198,230,246,254,222,206,206,206((53,198,198,198,198,254,254,254,124((43,198,204,216,240,248,222,222,222$ -}ALTER DISPLAY LISTGR. 2 ABOVE GR. 7%%6-F:A`,%F:Aa,$AV(%@@q2%%6-F:@,%AV-}$F:@,<6-&@ FggLine 1370 re-aligns the GR. 7 screen to left edge of screen by -}alteringPBBDisplay List. Ever see this before ?ZX6-?:C:,<@<,XThe ML program ha-}ndles HI byte LOW byte problemdE%@@e.%@F:A`,E%@F:Aa,n$xI-}NITIALIZE VBLANK PM,F:A,"A"#AP, Ap/ #A@!-A6A%"+/ '-At-}A#' 46-F:A,&@2&BBy46-AV$S-%A#%A G'+ C--}%Ah%A"OS /-@"+%A%%/ /-@"+%A%-}/ 9 #A`!-@%"5%A7%9 9 #A`!-@%"5%A%9 %A-}@$@%@GA@$@%@iA@$@%@A@$@%-}@Y6-B2H6-A'6-A9A#@MA%@YBByH6-?:A,H> VBlank -}PM < This only needs executed once"c6-Ad6-At'6-@U36-@`?6-@sK6-AW6-@-}c6-Ae,K@#%@@7%@@K%@@6G %@+%-}@9%@G%@@%@%@J$TVBLANK INTERRUPT ROUTINE^For moving P/M -}GraphicshBB162,3,189,244,6,240,89,56,221,240,6,240,83,141,254,6,106,141rAA255,6,142,253,6,24,169,0,109,253,6,24,109,252-},6,133,204,133|FF206,189,240,6,133,203,173,254,6,133,205,189,248,6,170,232,46,255FF6,144,16,168,177,203,145,205,169,0,-}145,203,136,202,208,244,76,87EE6,160,0,177,203,145,205,169,0,145,203,200,202,208,244,174,253,6CC173,254,6,157,240,6,1-}89,236,6,240,48,133,203,24,138,141,253,6DD109,235,6,133,204,24,173,253,6,109,252,6,133,206,189,240,6,133GG205,189,248-},6,170,160,0,177,203,145,205,200,202,208,248,174,253,6;;169,0,157,236,6,202,48,3,76,2,6,76,98,228,0,0,104,169 7,162,-}6,160,0,32,92,228,96 P/M Data ##252,32,35,255,248,240,240,2240,24,124,62,62,126,59,24!! Initialize sti-}ck values 68@,-@-68@,-@B68@,-@X68@ ,-6@n68@,-6@6-}8@,-6@68@,-68@,-68@,-68@,-@.68@,-6@-}C68@,-X68@ ,-@n68@,-6@68@,-68@,-@68@,-6@-}68@,-$:: #A`!-@@%%"367<,.>:,7 :$D""104,74,170,160,0,104,13-}3,255N##104,133,254,104,240,4,200,145X((254,136,104,145,254,202,208,237,96bGAME OVERl*** G ***vy @-},@s@s1/@e@sC,@e@tU/@e@g,@f@ty/@f@o,@e@-}'/@t@9/@t@yK,@s@]/@s@yo/@p@y*** A ***o,@v@-}'/@y@s9,@@sK/@@],@w@xo/@@x*** M ***,@@-}'/@@s9,@@K/@@s]/@@wo/@@s/@@,@@-}s/@@*** E ***,@@'/@@s9,@@K/@@s]/A-}@so,A@w/A@w,A@/A@*** O ***],A@'/A-}@s9/A#@sK/A#@]/A@ ** V **9,A&@s'/A0@9/A4-}@s ** E **],A6@'/A6@s9,A7@K/A7@s]/AD@sK,A8-}@w'/AB@w9,A8@K/AD@  ** R **,AG@'/AG@s9,AH-}@K/AH@s]/AU@so/AU@x,AT@s/AT@x ]/AH@x',AP-}@x9/AT@K,AQ@x]/AU@* F:B2y,@A 4AY!6-@-}-6-96-E6-Q6-Ad]6-Ati6-@Uu6-@`6-@s6-A6-@-}6-Ae>G %@+%@9%@G%@H%@%@RO @-}@@3-@i@?,@SK/AYO \ A`fpINTRODUCTIONz}+@%@-}/0@@ I0@@@c0@@@}0@@@O-6-F:A`,%F-}:Aa,$AV%@O6-F:@,%AV$F:@, #A#06-@+6-%@"@ +6-%@-}4KA"@" -(@_-@@%-&@4(@ :-G(@K U -}A#_ A"A-@@#-@ 3(@ B7 A A# J -@@6@,-@ -}<(@Y @ J A# j -@"@6@4-@%@G(@ S-@f(@-}STEVEj  A#f -@"@6@4-@%@E(@ Q-@b(@LOWf-}  A# A#@ z-@@92A%@@M-@@Q U w2-}z$ z-@@92A@@M-@@Q U w2-}z$ M,T,R,O,C,K$ -@A .  Scroll intro to left 8 C6-#-@-}@56-?:C:,<<%,C6-%@B 4-@@-,(@ 0 4 L .-@@.(@ -}PLEASE WAITV --@@ -(@ 30 SECONDS` -@AP j $t D:MTROCK.(@ ,p0b:SCSTMCHIPTERWSSEZDSTPOKEBKNOTKKHSTRESNKKNOTIMMUSIRNKKNSEGGE9}EJEFGOBLAB @&@@@ @ A @q B @9}@@@BH@@@@9}BH@@C @a!@"@#@&$%&'A$ ()*+,@9}-./0@`1@02@3@4@56@7@8@9@;9}Šɠ˛ A0+@%@/0@@T0@H:,$@@ `6-@l6-9}x6-@6-@06-@`6-@6-@+@%@/0@@T0@9}H:,$@@ `6-@l6-x6-@6-@06-@`6-@6-@ A9}AV'AV%%6-F:@,%AV$F:@,D-@@"#-D(@ 9}E2@@A2E  -@+6-P:H:,$@,M6-P:H:9},$@,%@S-b(@2@P@@ A-@@ =29}A  -@+6-P:H:,$@,M6-P:H:,$@,%@S-b(@t2A9}@@A-@@% =2A -@A-H:,$@9}H:,$@%@P(@al2@@2 K6-@ 69}-@'6-@36-@?6-@K6-q%%@ $@/-@@K29}@O q2έЛ%%6-F:@,%AV$F:@,6-%%@ $>69}-R:,!6-T:,>0@F:B7p,@Z@X!-@7(@ I-@9}Z(@*#3%2@36-%@$!Ap Ap%'-@@ '9}&5"@)6-&@56-@(5"@)6-%@56-@*5"9}@)6-%@56-@+" B,5"@)6-&@56-@/9}b 1"AG4-@6@P2@P@T b6-%@0p"A-%(@9}B-@@@6@^2@@b p6-%A1o"@-$(@A-@9}06@]2@@a o6-%A2%%@ $35!@'%%@ $9}56-&@45 @'%%@ $56-%@55 @'%%@ $56-%@69}5!@"'%%@ $56-&@<6-%%@ $= "*" A>aA#-@@9}' I2U"@5a6-@?9)6-P:H:,$@p,/ 9 @u9}@ !6-&A  6-%B !6-&C  6-%EG%2@@G2@9}@F6-@K @ +Šě, -@@6@4-@@%8 L09}@h2@@2@@@ -a0@@?29}a2@.-@@)%%@ $=-@@pA c2A9}@g %%@ $6-@ 6-@/7-@327 9}0'6-&@"' AP2-@@;2@W2@@9}s2@@@0@H:,$@@ 0@67-@32:}7 ;6-@6-@<-@32@P@@G-@@P:}K m2-@@P  $ ȭԛJ$6-+F:A,&@,$AV8-:}@F%J .-A*%F:BsD%,.  #A" $1-:}@"-%$@%1  A0KĠӛL$$10,56,124,254,254,84,56,84,146V''11,124,126:},251,255,126,124,84,146[$$12,56,84,254,254,124,56,84,146]%%14,124,126,223,255,127,52,42,73`4,0,0,4,0,16,8,64,0e:}5,1,66,0,34,8,64,20,128j6,0,0,4,80,8,20,0,0o$$58,68,130,84,56,124,186,68,130t''2,255,253,239,247,255,191,251,255:}w$$58,68,130,84,56,124,186,68,130y!!57,0,40,84,186,124,56,68,40z##55,24,36,90,165,165,153,66,60|$$52,0,56,124,254:},239,218,124,56} 51,7,5,7,56,40,184,128,128~33,65,65,99,62,28,8,8,28!!34,7,5,7,248,104,248,64,192-1 '+:}@%@'A@ ,(@,(@ TERMITE!  S(@.(@ 9(: }@S0@@@ 0(@0(@PRESS start TO BEGIN "F:B2y,"@" @ * A: } H:,$@* A0l -@6@40@@H-@@%L h2: }@l >+@%@ (@>(@ S-@ @p32@@: }O2@@@S .(@.(@ your score is: G%2G2@: }-(@ -@@-(@G-@@P --@@G(@:} -@@P Q(@0(@ PRESS start TO PLAYQ(@ OR select TO QU:}IT@F:B2y,"@*+@%@66-@@ @F:B2y,"@p APbX ÛY%2:}AU@@G2@AT@@[-@A0@H:,$@P@ :}Z #Aq]("A(AF:B7p,^"AU Aq b2@@l?'2@&:}@@@;-@@?  Apii121,96,96,121,91,91,81,81,81,91,108,121,144,128,144,121,108,:}121,72,64,72,91,81,53,47,45,53,33,35,4045,47,53,60,60,255A+@%@ (@+(@6(@A(@:}i%6-P:H:@,$@,%@G2i2@8"@.:}(@ TERMITE POWER!8 Ar="@3(@ CLAW LICK'IN GOOD!! = Ar7"@-(@:} SUPERMITE !7 Ar>"@4(@ GO FOR IT! > Ar<"@2(@ TOT:}ALY AWESOME!!!! < Ar ;-@@P70F:B7p,F:B7p,; % @ 6-@'6-%@:}*6-&@6-&@1+@%@EAV'AVj0@H:@,$@@ 0@:}@6-%@ @'Ԡқ'-6@ @ 72O:,@@FAO:}:,J Vp6-P:H:,$@ ,6-P:H:,$@ ,'#6-&@P#A'$ D:TER:}MITE2(@((@ CHOMP AWAY!2 Ar9(@/(@ CLAW LICK'IN GOOD!9 Ar)(@:})(@ WAY TO GO! -@A ' AAp==@P@5:})(@ WAY TO GO! -@A ' AAp==@P@58B$J8-+&@d,%(1-@2+&@d,%5(8$D:MENU.AU--@U1 5 ?2 ML 䙣ލȎ!"` !"H h`lDD > }SAB.KCORTM:D"NUR䙣ލȎ!"` !"H h`lDD <5-@U9 @B2@AU--@U1 5 ?2B$J8-+&@d,%(1-@2"}+&@d,%5(8$D:MENUAU--@U1 5 ?2B$J8-+&@d,%(1-@2 #0,0,0,0,0,0,255,255,255,255,0L0,0,8,0,0 D:BRICKOUTŠӠBKK0,255,255,255,255,0,0,0,0,0,0,0,0,0,0,0,8?@V(}Y$ D:CATACOMBU@(}$YAd@'@@d9B7t@d=OAR,&N&]&PCOLPCOLPLPLPLPPMBASPCOLPCOLCADDDDREXYSPSCXYDUPIICVVVCOOUCLIVEBONUTPLL2&}NADSPLVOSSPDSR 2'} 2(} !"#$%&@'()*+2)},-./01 $;@, A$ A@:@w$6-F:A2,0"2*}@: @0'"@6-&@ ' @0'"@6-%@ ' @0'"@6-&@2+}' @0"@6-%@A%@%@A2A @@7-!Ad)!Ar2,}) @r) @67 A # "6-@ @B% !6-@ @B'6-@*"@P2-},! !6-%@! @P.6-%@2OOA @Q@R@SAPAP@TAP2.}AP36-&@ @`46-%@ @`56-&@  @`66-%@  @`<1 2/}12A@@@= "*" A A336-++&@(,$@,%++&@H,'@,C!@20} AHkF:%,"@"%A%06-%@B-@ @ G(U-%@a"@Tk AJ21} @)!@G6-++P:H:,$@,$@ ,%@r,u6-++P:H:,$@ ,$@,%@6,%@22}%@6-L%6-%@"*"% A @NF:%,"A A PA%223}3-@7 A @ I6-P:H:,$@,?+"@)"@,*"@I @S/%+"@)"24}@ ,*"@/ @T--+"@)"@,*"@Q @R!* @$)6-&25}@!@ )6-@ l-@l68,-++P:H:,$@,$@,%@,%++P:H:,$@ ,$@26},%@@,1%8,A-%8,%@A1 1$8%@,"*". A 1$C-@27}$%8%,@?%8%,%@AC &-@68%,-8,# &$%228}36-$AE-@@!V( ՠĠԠh-@@"v(BONUS:-@ @ ] 6-%($-@29}AY2H:,$@@%@ @@] %236-%@?2:}-K6-a"@*@o6-%@-@@#( Š"@*@--@2;}AZ2H:,$@@@@^ 2!@6-@2<} A A-@@P )6-&@5"G-@@!V( GAME OVERx22=} APi-@&@ !(LIVES=+ A/(;6-ArG6-AdS6-@r_6-@6i A2>}`6-@@ &68,-* 66-5 %@+%@5 @ U-@&2?}@ %( LIVES= 7-@@"U(TO PLAY AGAIN,PRESS F:AD,"" A4AY2@}@6-F6-R6-@^6-j-v6.b b b%@ A AQ8%@2A},"$$-@$%8%,@"%8%,%@A" $ ''AAAA2B} 6.b $6.b b $6.b b b $6.b b b b$  +'0@92C}AR@EY%@m%@6-F:A`,%AV$F:Aa,%@@h!K2D}-@-%@%@1 K0@@ @"nAV'AV#6-Ar/6-Ad;6-@r2E}G6-@6[-@@ j68,-n $>(-@@ >( cd cd cd cd cd cd& ( 2F} (C-@@ #(SCORE=5-@&@ C(LIVES=*%%6-F:@,%AV$F:@,,gAY@b2G}!@r-@RA%@ArU%@A2gAR@.0AY@b!"@-6-2H}0$0 @ %@%@--@@A-@@O&@q2AU@2I}@-@@ '2@@@&@@-A-@@E g22J}{A@d%  -6-%@#AA- A -AD@'%@;2K}-@c2&+@$,@@g k 2%@w62L}-@6-@ =2@@u@@S6-?y%'A_6-@k6-@w6-@U22M}@72@%@ @U2@%@P@C 6-$6-$+%?,/6-$+%?,C!2N}@A $R-@327 C"@O6-R$ A%@2O}+-@@?-@SA@d%y2@@&&@@}  A%22P}7AAA A }INITIALIZING PLEASE WAIT...%-A6A2Q}"!% '-AtA#' (6-F:A,&@(6-AV$+-%A#%A G'2R}+ )-%A%%A0"%) $)-%A%A"%) ))-%A7%AD2S}"%) .9A@@'AA9AAU8'6-B2H6-A'6-ABGA#@2T})A%@;B2w@GBByL6-?:A,V7@#%@@7%@@2U}`C/%@C%@j+%@+%@t$*2V} VBLANK ROUTINE DATA *BB162,3,189,244,6,240,89,56,221,240,6,240,83,141,254,6,106,141AA255,6,142,253,6,24,169,0,109,2W}253,6,24,109,252,6,133,204,133FF206,189,240,6,133,203,173,254,6,133,205,189,248,6,170,232,46,255FF6,144,16,168,177,202X}3,145,205,169,0,145,203,136,202,208,244,76,87EE6,160,0,177,203,145,205,169,0,145,203,200,202,208,244,174,253,6 CC173,22Y}54,6,157,240,6,189,236,6,240,48,133,203,24,138,141,253,6DD109,235,6,133,204,24,173,253,6,109,252,6,133,206,189,240,6,1332Z} GG205,189,248,6,170,160,0,177,203,145,205,200,202,208,248,174,253,6*;;169,0,157,236,6,202,48,3,76,2,6,76,98,228,0,0,1042[},1694 7,162,6,160,0,32,92,228,96 * PLAYER DATA * * LINE 3010-GRIMO * * LINE 3020-HOPPO * * LINE 32\}030-SPIKE * 130,186,214,56,68,56 108,40,124,84,124,84,68,56 8,8,8,28,28,62,62,28b"A+F:A,&@2]},,+>AR@X0@b Ap$$6-AV$+F:A,%@,.-A#2^}*%F:BsD%,. 9-@G"+Av%%/ 9 A<<15,63,255,255,255,255,63,15,108,40,122_}4,80,124,80,68,56AA10,42,170,170,170,170,42,10,160,168,170,170,170,170,168,1609910,40,160,128,128,160,40,10,160,40,102`},2,2,10,40,160a6--3;@,9@ ,?6-@K6.b b bW6-@a AX9( ( (2a}(((9( H H OOO PPPP PPPP OOOb@-@@<( H H O O P P P P O O@ l((( HHHHH O2b} O PPPP PPPP O Ov@-@@<( H H O O P P O O@ ''( H H OOO P P OOO2c}$@ +'0@9AR@[6-F:A`,%AV$F:Aa,o-@ @"}%2d}@ Bh Ap!AV'AV;0@@ @>(A(D(h( cd cd cd cd cd cdDAY2e}@b)%@AV=%@@r_2A @@6-F:@,%AV$F:@,%A2f}FA%F-@@ =2Q-@PU i%@@22g}A @@%AQA%H-@@ 'AV3@rU2A@@2h}@i-@@m 2J}-@@P /%@AC%AV2i}A%e2A @@y-@@} L@12A@@@E-@2j}@I k2-@@5 %AaANe%AbA+-@2k}@/ C%@A2O6-Ad[6-@e A Oe-@ @"#-J " 2l} N Z6-@e6.SLOWP-@@!%( SPEED=SLOW16-@C-@'@!P(LEVEL=1\2m}6-@n-@@"(PRESS TO STARTQ66-R:,"@,6-%@6 AR5"@62n}-%@)!@ 56-@S:-@@ 0T:,": APT:-@@!(,-@32o}@!0(: ArARATAVt6-A A`v6-@P A`x6- 2p}A`|,#%@)6-,$!@6-@AAA6.SLOW$2q}6.MED.$6.FAST$$' AP @ D:HOPPOAAA6.SLOW$0O}((MEMCURSORPXPYDRXDRYCCOLDEVICEANJOYLINENSETPINTARRASETDISAVLIPLTDCHNGCOSWITCMODPRODELCOMNIN6s}COLOINITMUNTRAFLACCBBRRBASDJODKEREATAAOFFSEHIGLOVTADLISTXTMEBYTCOUNTEA6t}AAAAA~   B A Ap A B A A A06u} A` A@ AP B B@@@! !6v}"#$B%&'()*+,-./016w}2@3@04 *** SUPERPLOT ***~~;@,;@,9@ ,9@ ,9@ ,9@ ,9@ 6x},9@,;@,;@,;@),(?6-B6-A '6-Ap 36-A ?6-B 2c6-A 6y}6-A '6-A0 36-A` ?6-A@ K6-AP W6-B c6-B<'6-6-@'6-@6z}F   PO +((%A@ =(*** SUPER PLOT ***OA@Z0( @((ENTER CURSOR C6{}OLOR,0 d!! )!@@n1 A)(ENTER CURSOR LUMINANCE-1 x!! )!@A6|}1 A0)(ENTER BACKGROUND COLOR-1 !! )!@A05 AP-(ENTER BACKGROUND LUMIN6}}ANCE15 !! )!@AP68@,-@$%-@2 A*(ENTER COLO6~}R FOR REG. .2 !! )!@A6 A.(ENTER LUMINANCE FOR REG. 26 !! )6}!@A68,-@$% &6-F:A,&@&A +@   A-6}@(A%8,, AA8@,$$6-?:<<,&@"$$6-?:<<@,&@,6} 6-%6-%6!AY6-@ 6-AYJL!@6-,67@,.=67AU6},.L67@,.TL 6-@,67@,.=67AU,.L67@,.^67%@<%@ ,.6}hB2H%@FrMAV'AW@1( CAW@M( |3%!@*O:T:6},&@,) 3 AO:T:,&@, "6-F:B2y,@" .F:Ad,"@3*Ad6}AU.  A CHNGCOL##Changes current drawing color6-P:'@@,,AV'6}AW@!,  68,-$$ PLTDR++PLOTs, DRAWTOs, and saves coordinatesb /AV16}AW@08(DA68,-J68,-X6-%@b A P ,68,-68,-.AV'AW6}@0.(P6-O:&@, "@!6-@   T:,"A e@w$ 6}SWITCH Checks console switches "@  "@  !"@6-&@!  $DELCOM6}ND::Deletes last PLOT-DRAWTO and COLOR (if one was made)0"@$0just finished saving screen, $,just6} PLOTted, must DRAWTO firstE ),8&@,8&@,E/8&@,8&@,,8&@,"6@6})6-&@,$J"@6-8@,"4AW@!9(G6-&@J$68&@,-6@6}""-&@@6@N8,6@8,#6-8,5AW@!:(H6-&@K'N$ 6-&6}@$ INCOLOR33Change value of user-specified color registera APAV@1AW@O(6}Enter register to changeY AP ]a ++ )!@)"@AP T APAV@1A6}W@B( Enter colorL AP@PT !! )!@AP@X APAV@1AW@6}F(Enter luminanceP AP`TX !! )!@AP` 0 AP+"@(68@6},-@$%+$68,-@$%$((Short routine to clear prompt lineTAV@'AW@6}Q($ T$pMODPROG (The biggie!)z((Modifies program to add statements""6})6-%@"$9B2H'AY@49BB@d +-@@-@6}( %8,6@% C. 8,:"@A`pJ)8,"8&@,*8,"8&@,@(DR. 6}8,,8,J A`:8,"8,*8,"8,0(PL. 8,,8,: A`(PL. 8,,8,:(DR. 6}8,,8,6-%@  B +@  BC%6-F:A@,%AV$F:AA,;6-$AV6}%AC6-&@6-P:'AV,$6-&AV$2%@@%@)AY@F)B2H%@F6}Z 6-@'-@8A%8,< QA8@,Z6-C:,$XINTARRAYb11Initializes6} PX(, PY(, DRX(, DRY(, C( arraysl-@@ v!68,-!68,-!68,-!68,-6}68,-6@ 68@,-$@ SETDISJ))Sets up display at bottom of screenT'AV'A6}R@^%AW@%(ؽ h%AW@%(ٽ r AW@ (ý|(6}AW@3((͠I:,3AV'AW@$3(Խ?AV@'AW@6}?(*** SUPER PLOT ***%%6-F:A`,%AV$F:Aa,%@@3)6-F:%@,%AV$F:%@,6}3#A1#-%A %A %@ '"-1 %%0,0,5,85,85,170,170,175,255,255+%@A0+%@6}AA9A'A@9BBA$(# SETPM2#Initializes PM graphics<#%%6-F6}:A4,%AV$F:A5,F#%%6-F:A@,%AV$F:AA,P#6-%@BByZ#6-+$AV%A,&d6}#$6-P:'AV,$6-&AV$n#%@%@x#+%@+%@@#+%@6}+%@@#467@,.%67AU,.467@,.#A@$%#! #A0!-@6}@#"67<,.>:, #0,32,32,216,32,32,0#67%@<%@ ,.#B2H%@F#'AY6}@F'B2w@#$' INITML'::Initializes m/l interrupt routines & joystick driver$' #B6-6})'33F:A6,"@r*F:A,"@dB`.'B""6@&A8A@B B`8'6}A6%B'6-%@ B0L'C 6-C:,#B*-@@)."<67<,.>:,@ C$)hh72,138,72,166}9,10,162,148,141,10,212,141,23,208,142,24,208,169,6,162,30,141,1,2,142,0,2,104,170,104)kk64,72,138,72,173,197,2,174,198,2,6}141,10,212,141,23,208,142,24,208,169,6,162,0,141,1,2,142,0,2,104,170) 104,64")-1h)dd104,104,104,170,104,189,120,2,46}0,176,2,74,74,41,3,56,233,2,16,2,169,2,133,212,169,0,133,213,96* SAVLIN+""Saves lines to output device +SAV@6}'AW@@(Enter output deviceDS4B@+_BB@d)BB'g;A6}MA@_BBA +L APAV@1AW@H(Clear lines (Y/N)L*+ 4N6} AP$4+0YB@>+9B2H'AY@49BB@dH++ +-@@+6-6}@R+-B@\+V(6-%@!"@ -6-@7 BD(>:A%,V-@@f+ 6} Bp+Q +@ 36-F:A@,%AV$F:AA,I6-$AV%AQ6-&z+@6-P:'AV,$6-&AV$6}2%@@%@+)AY@F)B2H%@F+f 6-@6-B3-@D6}A%8,H ]A8@,f6-C:,+$+''Short routine to do modifications,3 (CONT-06}AB@3&,AB@$ N1 @,@B@1/A@*N',A@'/A@6}'4N',@A@'/@)@&>N',@q@b'/A@(HN',@q@b'/@)@'RN6} @,A'@x\N',@h@V'/@u@VfN',@q@Y'/@h@VpN',@t@V6}'/@q@YzN,@p@XN',@q@X'/@q@WN/@p@WN,@r@WN6}',@i@W'/@q@WN',@@'/A@(N/@@@N',@@6'/@6}@5N',@@4'/@@4N,@@4N/@@4N1 @,A@!1/6}A@0N',A@1'/A@0N',@@7'/@@2O,@@1O/@6}@)O',@@2'/@@2$O',@@1'/@@0.O',@@''/@@'6}8O',@@1'/@@8BO',@@4'/@@6LO/@@6VO',@@6'/6}@@6`O',@@9'/@@6jO',@@5'/@@5tO,@@3~O/@6}@0O',@@0'/@@0O',@@0'/@@0O',@@1'/@@26}O',@@2'/@@3O1 @,@d@Q1/AO',@@$'/@@%6}O',@@''/@@)O',@'/@@wO,@@uO1 @,@6}@u1/A@wO',A@s'/A@hO',@@x'/@@YP/@@C6} P',@@8'/@@CP,@@5P',@@#'/@@"(P',@@"'/6}@@42P',@@9'/@@5