@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 D8u:;QAANDENSTASECMASECSIFILSIQNEXSEFBYSECNUBYT}  00-- DISKMEND -- by Justin Wilder, SepU}t 1985g6-@1;@@,;,;@,;,96.NE6-A@Q6-A(]@g A%-A6V}A""!% {+AA:(@Z(@ diskmend commands{(@W}($(@ret GET NEXT SECTOR@(@ SECTOR # + 1\(@ SECTOR # - 1z(@X}rEDISPLAY SECTOR(@2k(@dIRECTORY LIST@(@uNDELETE/CLOSE FILE`(@tRACE SECTOR CHAINkY}(@<j(@ mODIFY LINKS>(@cHANGE SECTOR BYTES_(@wRITE SECTOR TO DSKj(@FY(@Z} pRINT SCREEN>(@hELP (COMMAND MENU)Y(@ qUIT DISKMENDP.'*( ĠҠ .[}Z0A@dS +AA@(ŠҠ FILE I(,S A n + APx\}1 &A(6-%A('6.Y1 A ! 6-6-6.N! A 0+Ap1 &A(6-%A]}('6.Y1 A # 6-%6-6.N# A 0-A) !6-&A(6.Y) A + 6-^}&6-&A(!6.N+ A 4H@04PA 6-6-4DA@4UA_}4TA@ 4QA A/AAH9 B=+@ )!A4MA `} 4W A  @"4CA ,4RA@6$ A06-A:,6-$6.N@;  )!1( a}ңԠƠ 1 TO ; @J0 6-6-4N! AP0- Get SectorT AP @^a+Ab}A3( DENSITY SECTORL(BYTE# HEX CHARa-- Print Sector SRr-%A'@|# >$6-?:Ac}6<, # =!A`* Ai2(٠ :6-%=$8"A`)"A$-( à 56d}-%8$. @#( Ԡ +6-%.$/ A0/( =  Ԡ = 74( Š = F:Ae},  = F:A,7$6-?:AA<&,$-+6-A`6---- Directory List?AA?(f}%ţ ͠ ' 6-% AP'( SECTOR ;-A!A3@(F:, +(16-g}; @p ( @@7-%@%@B(>:F:,,F p( F:%@,%AV$F:%@,h}l@@&4(F:%,%AV$F:%@,F@@3O6-F:,[!A'b(Dl A )!@c(i}A"!@)(*$!@$P:'@,$(-O/(6-% /F:@, @A`!Ag6-j} @* ( PUSH TO CONTINUE* @&DAi6-?:Ai,"(6-2 AD-- Drive Status0hk}6.SINGLE6-A (6-A(76-F:AF,C!A'O6-A@^6.ENHANCEDh A:(!@16-AVl}(6.DOUBLEDBAp@'Aq@d1 AB-- Read SectorN1!(ΧԠĠ '6-1 @m}X$bGAi!ArAS3As@G-- Disk Access SRl6-?:A<<,$v2B:,!@n}7<,4$) AP26.=:, 6- $* 6--@B:,*-- Hex to DecG6-@:7,,%!@G* @X=o}6-$@%&@HG A;!@d* @q16-$@%&@U; A@26-6 ' $p}   $K(̠ԡ%A 7AAA AK @ AP-- Change BytesLAq}@ !-@L(&MOVE CURSOR, CHANGE LINE, PUSH -)(!OR ENTER COMMAND OR SECTOR NUMBER-@B:, @r}$AA*6-6-@!@ @E6.7@, AP+6.7@,E )!%A A *-s}%@*B:, @A O6.7@,+7@<@,4 EA!%@:7@,,O A+ APt}* AV+A!% )  A 4Y6-) @* A049 APA@d9-- Wriu}te sector to disk>/+( WRITE SECTOR  TO DISK (Y/N)/H, 0Y"(SECTOR NOT WRITTEN, ApRVAp@v}'AqA(1 A5L(ˠŠҡV Ap\(SECTOR WRITTENfAA$pa+w}AA# A C6-F:%,%AV$F:%@,I6-a(} ҠzQ(FILE  ,-%@%x}@7(>:F:,,; Q( START SECTOR=% 6- A A0%6-%aF:A,(7( FILE # MISMATCH @y} SECTOR Q( CHECK PREV SEC LINKSW6-a @A P' "(END6-6-' @I(( FILE Sz}IZE ERROR9( SECTORS INSTEAD OF ?6-I @/F:A %,&@/(PARTIAL SECTOR?F:@,!@{}5( PUSH TO CONTINUE? @$ (,!F:@,!@5$( A ^)( FILE NUMBER or TO AB|}ORT-7 A0@6-A:,^ )!@cAs6-P:'@,"6-%AaD6-@$+&$@,%A!}}N APWF:, i( NO FILE# s A ,)6-F:%@,%AV$F:%@,,$1 APA@ 1~}-- Modify LinksS1 @)!AY* Ai)")!A#I(ϠӠϠS @9&( NEW NEXT SECTOR #} or *94Apg A06-A:,D @)!AY* Ai))!A#](ĠҠg} A@$ 6-.C( NEW FILE # or #*496-F:A,C A8D A06-A:,& )!@c:(}ĠŠD ApBD6-P:'AV,,A%&AV$DA%@$%L A  @VY }A3"AAD6-@@&@ $N:F:@,,Y(Ǡ`C'6-F:@,%AV$F:@,&;}-%@$C-j-6.>:F:%,,3-6.>:@:,&A(,t3`*2{)4|A`~'6.>:@:,%@2,}3_'6.. 67,. 3 )AA A) @-#( ҠӠԠ- Ap}Q+A@d# A )6-I(ǯ FILE Q6.B: 6-6- A# A0:F:A},"A0O 6- A-A%$@;A%E APO A@ 6. A@ 6-%}AD 6- A$6-P:'AV,6%&AV$D%@P @:, AP(7( COPY TO ANOTHER} DISK :(@6-F6-P @))104,141,254,2,104,170,104,72,24,105**253,133,214,138,105,3,133,215,142,72''3,}169,11,141,66,3,104,160,254,132 %%216,48,2,177,214,72,74,74,74,74&&160,1,132,217,16,3,104,41,15,201%%10,144,2,105,}6,105,48,32,86,228())198,217,16,238,169,32,32,86,228,2302**216,48,247,164,216,192,8,144,210,160<((0,152,72,177,214,2}01,155,208,2,169F((46,32,86,228,104,168,200,192,8,144P**236,142,254,2,96,104,104,104,170,189Z%%251,3,72,41,3,133,213},104,74,74d))133,203,189,252,3,133,212,189,253,3n))133,204,96,104,133,213,169,83,141,2x((3,32,83,228,136,132,212,96,}104,104$$141,9,3,104,141,8,3,104,141,11##3,104,141,10,3,169,49,141,0,3##169,7,141,6,3,32,89,228,172,3""3,136,}132,212,132,213,96,ENDD:DISKMEND.BAS-12 ) REPEARMFALBRMCMPROODLINR@@@@@ }!+K l%%A NA  @ @!@@4@@x@4@@A0@x }@@ 1 +@A1AR@z-@@-(@ dragonlord?-@@ }[(@DUNGEON EDITORz( By Clayton Walnum.(.(# Copyright 1987 by ANALOG Computing(?6-@6- }@'6-@36-@?6-2<<;@,;@,;@,;@u,;@7,<++9@w<@ },9@<@,FD-@@w+-@@<68<,-@ D PB-@@+-@ }@/":68<,-> B Zee1,1,0,0,1,0,1,0,1,0,0,1,0,1,1,0,0,0,1,1,0,1,0,1,1,1,1,0,1,1,0,1,0,1,1,1,1,1,1,1,1,0,0,0,0 },0,1,0d0,1,0,0,0,0,0,1,1,0,1,1n467@,. %67@7,. 467@,.x6.| |1 + }A1AR@;-@@;-@@3@ - (   }Af@?-(% = UP  = DOWN  = RIGHT  = LEFT?Af,,($N,S,E,W = EXITS C = CLEAR Q = QUIT? }6-@6-@!6-'6-36-@9-?(;#@@K:0)@;@ }"@:Q,)"@:q,A H#+"@:N,)"@:n,,*!@1-&@7(H68<,-@H#+"@:S,)"@:s,,*  }@g1-%@7(H68<,-@U0+"@:E,)"@:e,,*'@P:'@,>-%@D(U68<,-@ }iD+"@:W,)"@:w,,*+&@,'@P:+&@,'@,R-&@X(i68<,-@Z"@:C,)" }@:c,--&@&@1(E-@@V68<,-Z 4"@:*,6-%@(!@w46-@ }4"@:+,6-&@( @46-@w"6"@:-,6-&@( @66-%@w,6"@:=,6- }%@(!@w66-&@w6 A  A@ AAJ6.D:DUNGEON0.DATT7 A@-@ }@!3(DUNGEON NUMBER7^!! @)!@ A@hO A'67@<@,.=:,2@O }@@rP-@@"<(!FILE ALREADY EXISTS! OVERWRITE IT@P0YA |V@+@ }@5 AG-@@!V( WORKING...6-A)@-@@g@, 6.=:," }67@,. DATA , B)-%@6-@) A -@@!8<,"8<, ! Ap }('6-%@(!@A A0467B:,%@,.=:,067B:,%@,.,4 8&(@7 }@>177,243,72,41,127,32,93,6,104,16,237,169,160,164,175,200~88145,243,208,228,160,0,}177,2,230,2,208,2,230,3,96,0230,2,208,2,230,3,96,0 D:VSEARCH.BAS160,0,17^2940 DATA 4,6,6,9,6,9,6,9,6,6,52950 DATA 1,9,9,8,5,2,4,8,9,9,32960 DATA 12,11,2,4,3,2,1,5,2,11,122970 DATA 7,6,10,10,6,10,}6,10,10,6,152980 DATA 11,12,2,1,5,2,4,3,2,12,112990 DATA 4,8,8,9,3,2,1,9,8,8,53000 DATA 1,6,6,8,6,8,6,8,6,6,3q2940 DATA 4,9,9,9,9,9,9,9,9,9,52950 DATA 7,8,8,8,8,8,8,8,8,8,152960 DATA 4,5,4,9,9,10,9,9,5,4,52970 DATA 2,7,15,2,7,10,15,}2,7,15,22980 DATA 1,3,1,8,8,10,8,8,3,1,32990 DATA 7,9,9,9,9,9,9,9,9,9,153000 DATA 1,8,8,8,8,8,8,8,8,8,3k2940 DATA 4,6,6,6,9,6,9,6,6,6,52950 DATA 1,6,5,9,10,9,10,9,4,6,32960 DATA 4,6,3,7,3,2,1,15,1,6,52970 DATA 1,6,5,7,6,10,6,1}5,4,6,32980 DATA 4,6,3,7,5,2,4,15,1,6,52990 DATA 7,6,5,8,10,8,10,8,4,6,153000 DATA 1,6,8,6,8,6,8,6,8,6,3l2940 DATA 4,6,9,6,5,9,4,6,9,6,52950 DATA 7,6,10,6,15,2,7,6,10,6,152960 DATA 1,6,8,6,3,2,1,6,8,6,32970 DATA 7,6,6,6,6,10,6, }6,6,6,152980 DATA 4,6,9,6,5,2,4,6,9,6,52990 DATA 2,13,10,14,2,2,2,13,10,14,23000 DATA 1,6,8,6,3,8,1,6,8,6,3 o2940 DATA 4,9,9,9,9,9,9,9,9,9,52950 DATA 7,10,10,10,10,10,10,10,10,10,152960 DATA 7,10,10,10,10,10,10,10,10,10,152970 DATA$} 7,10,10,10,10,10,10,10,10,10,152980 DATA 7,10,10,10,10,10,10,10,10,10,152990 DATA 7,10,10,10,10,10,10,10,10,10,153000 DAT$}A 1,8,8,8,8,8,8,8,8,8,3$0 REM -----------------1 REM Ġ3 REM NEW VERSION 5/874 REM -----------------80 FOR X=N1 TO N77:I(X)=N0:ER((}X)=N0:NEXT X:I(39)=N7:ER(39)=1:RESTORE 3010955 IF NOT ER(ROOM) THEN ER(ROOM)=1:RC=RC+12162 IF ROOM=DR THEN 21752163 GRAPH(}ICS N0:POKE 756,CHSET:POKE 752,N1:POKE 710,N0:POKE 711,54:POKE 712,1122164 DL=PEEK(560)+256*PEEK(561)+N4:POKE DL+22,N6:POKE (}DL+23,N6:POKE DL+24,N6:POKE DL,N0:POKE DL+N1,MAP2165 POKE 88,N0:POKE 89,MAP:POKE 559,34:POSITION 23,N21:? " ":P(}OSITION N4,22:? " "2166 R=DR:GOSUB ROOMPOS:POSITION COL,ROW:? "| |"2167 POSITION COL+N1,ROW+N1:? "(}":FOR X=N1 TO N10:NEXT X2168 POSITION COL+N1,ROW+N1:? " ":FOR X=N1 TO N10:NEXT X2169 IF STRIG(N0)=N0 THEN GOSUB SND1:GOTO (}21752170 GOTO 21672175 GRAPHICS N18:POKE 756,CHSET:POSITION N2,N1:? #N6;"ՠŠġ"2195 IF RC=77 THEN SC=SC+1502210 O(}PEN #N1,N4,N0,"K:":GET #N1,A:CLOSE #N1:IF A<>ASC("N") AND A<>ASC("Y") THEN 22102211 CN=N0:FOR X=N1 TO N10:PR(X)=N0:NEXT X22(}12 IF SC<=RS(N10) THEN 22202213 CN=CN+N1:IF SC>RS(CN) THEN 22152214 GOTO 22132215 FOR X=N9 TO CN STEP -N1:RS(X+N1)=RS(X):P(}R(X+N1)=PR(X):RS$((X+N1)*N9-N8,(X+N1)*N9)=RS$(X*N9-N8,X*N9):NEXT X2216 B=N0:FOR X=N1 TO N9:IF N$(X,X)<>" " THEN NEXT X:GOTO (}22192217 B=B+N1:IF B=N2 THEN FOR Y=X-N1 TO N9:N$(Y,Y)="":NEXT Y:GOTO 22192218 NEXT X2219 RS(CN)=SC:PR(CN)=N1:RS$(CN*N9-N8(},CN*N9)=N$:F=N12220 CN=N0:IF NOT F THEN 22232221 CLOSE #N1:OPEN #N1,N8,N0,"D:DRAGONLO.DAT":FOR X=N1 TO N10:? #N1;RS(X):? #(}N1;RS$(X*N9-N8,X*N9):NEXT X2222 CLOSE #N1:F=N02223 GRAPHICS N17:POKE 756,CHSET:POSITION N3,N0:? #N6;"record scores":POSITIO(}N N3,N1:? #N6;""2224 FOR X=N1 TO N10:POSITION N3,X+N4:? #N6;RS$(X*N9-N8,X*N9);"";RS(X):NEXT X2225 FOR Z=N1 TO(} N10:IF PR(Z)=N0 THEN NEXT Z:GOTO 22292226 FOR X=N1 TO N20:NEXT X:POSITION N2,Z+N4:? #N6;"":FOR X=N8 TO N0 STEP -0.4:SOUND (}N0,N10,N10,X2227 SOUND N1,N15,N10,X:FOR Y=N1 TO N4:NEXT Y:SOUND N0,N0,N0,N0:SOUND N1,N0,N0,N0:FOR Y=N1 TO N3:NEXT Y:NEXT X2(}228 NEXT Z2229 POKE 711,54:POSITION N2,22:? #N6;""2230 FOR X=N1 TO 30:NEXT X:POKE 711,N0:IF STRIG(N0)=N0 TH(}EN 22322231 FOR X=N1 TO N10:NEXT X:POKE 711,54:GOTO 22302232 IF A=ASC("N") THEN POKE 82,N2:END 2233 POSITION N2,22:? #N6;"(} ONE MOMENT "2240 RESTORE 2940:HP=50:STR=100:SPL=N0:PIE=N1:CNT=N0:B=N0:WN=N1:G=60:ROOM=39:SC=N0:SM=N0:TURN=N0:RC=1:GOTO (}802300 DIM ER(77),RM(N77),I(N77),RM$(255),MV$(N20),N$(N9),W$(28),DIR$(N20),S$(120),B$(40),CL$(40)2310 DIM R$(N1),R(N5),C$(N(}1),E$(N4),D$(81),F$(N14),RS(N10),RS$(90),PR(N10)2340 WN=N1:PIE=N1:CNT=N0:G=60:SPL=N0:HP=50:STR=100:B=N0:ROOM=39:SM=N0:SC=N0:(}TURN=N0:RC=12350 ROOMPOS=180:CHOOSE=290:DIR=370:CLUE=210:DEAD=2162:DELAY2=360:SND1=160:SND2=170:TEL=1303030 POKE 559,0:POKE(} 87,N0:POKE 88,N0:POKE 89,MAP:A=USR(ADR(CL$),N15)3040 POSITION N18,N9:? RM$(RM(ROOM)*N17-N16,RM(ROOM)*N17)3301 TRAP 3351:OP(}EN #N1,N4,N0,"D:DRAGONLO.DAT"3302 FOR X=N1 TO N10:INPUT #N1;A:RS(X)=A:INPUT #N1;N$:RS$(X*N9-N8,X*N9)=N$:NEXT X:TRAP 40000:CL(}OSE #N13340 FOR X=N1 TO N9:IF N$(X,X)<>"-" THEN NEXT X3342 F$="D:DUNGEON .DAT"3343 POSITION N2,N15:? "WHAT DUNGEON <0-9> (} ";:TRAP 3343:INPUT D:CLOSE #1:F$(N10,N10)=STR$(D)3344 OPEN #1,4,0,F$:CLOSE #13345 GRAPHICS N0:POKE 559,N0:? :? :? "ENTE(}R";CHR$(34);F$:? :? :? "CONT"3346 POSITION N0,N0:POKE 842,N13:STOP 3347 POKE 842,N12:RESTORE 2940:FOR Y=N1 TO 77:READ A:RM((}Y)=A:NEXT Y3350 TRAP 3030:N$(X)=" ":POP :TRAP 40000:POKE 559,34:GOTO 5503351 RS$(N1)=" ":RS$(90)=" ":RS$(N2)=RS$:CL(}OSE #N1:OPEN #N1,N8,N0,"D:DRAGONLO.DAT"3352 FOR X=N1 TO N10:RS(X)=N0:? #N1;RS(X):? #N1;RS$(X*N9-N8,X*N9):NEXT X:CLOSE #N1:GO(}TO 3310(%&~  SULINDATUMHEXCKSUBYTDATCHA,} KKTALKER STRING EDITOR DECODE AND MACHINE LANGUAGE LISTER-by A.A. NOGASCopyright 1986. y6-,}6-'6-@J;@,;@,;AP,d(}CHECKING DATA LINES:y(Please stand by."4X ,}@p=" -@B:,@36.7<%@,= A (E 6-%'2@@367,.>:,A6-%,}@E 2O%2+"76-E6-%@O @ <I(((ERROR IN DATA LINE %A,}F(Please check your typing.IFm(&(INSERT A FORMATTED DISKETTE<(IN DISK DRIVE #1.[(Press any key to conti,}nue.mAdAUP"F:Ad,"AU" @Z..@@ D:MACHINE.LSTdI"(}CREATING MACHI,}NE LANGUAGE4( LISTING FILE.I(Please stand by.n(@@x?%6-@:7@<@,,&@H1!@,} ?6-&@M6-$@36-@:7@<@,,&@H?!@ M6-&@ 6-%$!!MACHINE L,}ANGUAGE DATA BELOW[[3330373020414C4C4F2428312C3831293D225041B15041B25041B35041B45041B54FD941D945C84B,3482[[4BB350D04A,}C84E4EB149C85454B25252B141D84DCD5454B14448B149D945D94444B15557B141CF41,4909[[C15959B241C54848B14242B154C855C85557B2229B33,}30383020414C4C4F242838322C313630293D,3559[[2241D74444B24747B356D64747B153C85AC85252B246C64B4BB24B4BB15ADA4EC74CCC57D758D2,}57,4958[[C85959B143C84552B14552B24FD74448B253D34E4EB24848B24FD241D259D24747B245CC4242B280,4935[[229B33313030204D41544,}3482428312C3738293D2268A2066895CACAD0FAAD0006F01CA900A2029D,3522[[0006E8E010D0F8AE01068E02069D1006E8E0F0D0F8F0078A9D0006E,}8D0FAA9008D05068D04068D08,4455[[068D09068D0A06AC0306A200B1CDC920F033C9229B33313130204D41544348242837392C31353429,2979[,}[3D222CF02FC92EF02BC92FF027C93BF023C92AF01FE003F0089D0806E8C838B0DAAC0606B1CD0980,4763[[91CDA20086D4E886D560B0B18D0706C8,}8C0306A9008D0C068D0D068D0E06A200AC0406B1CF30229B,4003[[33313230204D4154434824283135352C323330293D22089D0C06E8C838B0F4297F,}9D0C06C88C0406,2939[[AD0806CD0C06D013AD0906CD0D06D00BAD0A06CD0E06D00338B021EE0506AD0506C941F00338B0B3,3511[[AC0606B1C,}D098091CDA20086D4E8E886D560229B33313330204D4154434824283233312C33303629,3717[[3D22B096AE0206AD0506C920D0020940C940D00338B,}00B9D1006EE0206E8E0F0F03CAD0706C92FD0,4085[[0338B029C920D008A9029D100638B015C92CD008A9039D100638B009C92ED02EA9049D1006EE2,}29B,3661[[33313430204D415443482428333037293D220206E8E0F0F009AD03068D060638B0A4AC0606B1CD09,3222[[8091CDC8CC0306D0F4A2,}0086D4A20386D560C93BD0098E0106A9018D000660A9009D10068D000685,4126[[D5E886D4A4D488B9100691CBC000D0F660229B3331373020455241,}5345243D22686885CC6885CBA9,46773300A891CBC8D0FB8556A9028555A913855460229B,2473X D:TALKER3.BAS,o[\#'#PPLAPSCREECHALSTDXTDYPOCHPIPELLVALVVRWARPLECDMSSC0}@ @ @0}@@@ !0}"#$%&'()d ROTO-WRENCH n JOHN HANLEY x0} SACTO. CA 1 +@AY1@@dB7t@d A--@AP0} !6--6-@ %%@ $8@,%%A@ MAIN LOOP "F:@,@ 0}" A`<6-P:H:,$,&6-F:B7p,2 A< A:6-F:A2,6-%8,(6-%8,:6-%%@ 0}$(F:AD, A`WF:,!A 6-&@.6-%@@-@@"M(@W ApF:0},"ATAF:,"@APF:,A8 6-8,$%%@ $,%26-86-"0}%A A""%A A , A6B6-F:%8<@,,0B7`8<@,BB7aA0}@B"-%8<@,8<@,?B7aB$J2"@ )"@2%8<@,T%%0}@Y%*@b%A^B7a!$h"@Q)"@R$rb"@ )"@4%8<@1},%AFB7aAT6-%@b!AP|$ SLIDE! rB7b)-@@1}A%%@ $^%%@ $8@,%rB7c&@< 6-6- %B7c9%A1}@<${B7b2-@@6@J%%@ $g%%@ $8@,%{B7c@1}&< 6-6- %B7c9%A@<$ GET WRENCH U%%@ $8-@1}6@U-A@d6@d]B7`&@d+B7aA`%3%96-?6-C G S61}-@d] A VALVES @dAW6-A(6-%@0%@ 8,%B6-%%@ 1}$NAUW68,-N6-%@P#-@@"0(@<"@N@T -@1}6@4-@@ L2%@P T `@w$6-F:@,26-&@>"@J1}6-ATV6-AU` A& Ap0>@/6-&+ A`,$@;">$:g8@,1 }AT068@,-8@,M-@6@c2@g D66-&@6-%@3@1 }@ &6$N DEATH X'AAH'B7ebz -@6? <-A(1 }A(\%8<@,8<@,%r2@v z l#"@ A # APv"@A`1 }'6-A(6-%@' AP ROTO-WARP @)"$b-@4-AT1 }AQ6@:FB7`ZB7aA`%^ b ])6-P:H:,$@,:6-8<@,K1}6-8<@,]6-%%@ $b -@6@4-AQAT:FB7`ZB7aA`%^1} b Q@b%6-&@1-@@#B(@ H6-N6-Q$ GAME OVER ` -@1}6@7-6?PX28<@,@\ ` ,-@@,(@ 1}9-@A@,F:AD,"/'9 A   A BONUS -6-P:H:,$,# A1}- A*k+AP:H:,$@,%A896-&@EB7dWB7eAek"@0A 4:1}6-F:A2,6-%8,(6-%8,:6-%%@ $>8F:,!A 6-&@.6-%@8 A`H"1}A RF:,A\8 6-8,$%%@ $,%26-86-f"%A Ap"%A1} A z A LEVEL/ADD BONUS cAAH1-@PAU@M2@@@1}Q cB7eZ"!-@@4(@H-@AL Z6-%A(-@1}@((@u6-+%A,$,-@6@:6-%@L-@@"Y(@] 1}q-@APu ]6-%@#-@@0(@>6-%@P-@@#](@q6-1}%+ @@,$@ q6-+"@,$A%%+"@,$A%+"@,$Au%+@,$AP6-%+ @%,1}$@}-@@((@ D-@#@5@R%ATV b6-n6-z6-1}}$ INITIALIZE 6-F:A,&@&A8AA$JA@\A @61}nA@"AAH;@ ,;@ ,;A,;@,9A<@,9@<@,91}@,9@,9@,9@,9-@&68,-568,-9 68@,-6@.1}68@,-@D68@,-6@Y68@,-@n68@,-@Y68@,-@`68@,-@a1}68@,-@b68@,-68@,---@@ ")67<,.>:,- A6-?:C:,,1 }6-$AV1-@A'5"=%A $K-AA1"#%' ;-AdA?"G%K .1!}B-A+-@@/":68<,-> B 8B-@+-@@/":68<,-> 1"}B B%%6-F:@,%AV$F:@,L TITLE/PLAY SCREENS V$AY$(@}`ll6.b 1#} roto warp 85 j# 6.=:,#67@<@1$},.tB #A$!-@@%"1-@>(@B ~!AY@4!AVH-@B:,&@1%} .-@@H(@7<%@ ,%F:AD,"'% A)-@@   ) A`1&}AY!6-@-6-@96-@%E6-APQ6-@]6-@i6-u6-6-1'}6-A(6- #A%!-@#%"1->(@B TAdfAY1(}@4x@ APlPP104,162,4,160,0,177,205,145,203,200,208,249,230,206,230,204,202,208,242,960,1,1)}7,15,31,31,31,62!!0,64,240,248,252,252,252,62""28,62,252,252,252,248,240,6428,62,31,31,31,15,7,1$$28,190,251*}5,247,255,255,255,12928,62,31,31,27,31,31,30 ##0,129,255,255,255,247,255,190""28,62,252,252,236,252,252,60 1+}0,0,255,255,255,255,255,0*""28,62,255,247,255,255,255,62428,28,28,28,28,28,28,28>0,0,223,159,1,159,223,0H0,1,}0,247,239,255,255,255,0R0,0,251,249,128,249,251,0\28,28,24,20,28,28,28,28f28,20,62,8,8,62,28,0p28,20,62,61-}2,28,0,0,0z 12,24,17,19,62,112,224,192!!119,119,119,0,238,238,238,0##60,126,242,224,224,244,126,60##60,126,251.}5,231,231,239,102,5260,126,79,7,7,47,126,60##44,102,247,231,231,255,126,60WW26,11,32,11,45,9,47,9,51,9,53,9,62,1/}11,64,11,66,11,72,11,74,11,81,9,83,9,85,9,87,9 bb89,9,91,9,93,9,95,9,102,11,104,11,106,11,108,11,110,11,112,11,114,11,121,10}9,123,9,125,9,127,9 ee131,9,133,9,135,9,142,11,144,11,146,11,152,11,154,11,156,11,161,9,163,9,165,9,173,9,175,9,177,9 ii11}182,11,184,11,194,11,196,11,201,9,203,9,206,11,212,11,215,9,217,9,222,11,224,11,234,11,236,11,241,9$ kk243,9,245,9,253,9,212}55,9,257,9,262,11,264,11,266,11,272,11,274,11,276,11,281,9,283,9,285,9,287,9,291,9. kk293,9,297,9,302,11,304,11,306,11,308,13}11,310,11,312,11,321,9,323,9,325,9,327,9,329,9,331,9,333,9,337,98 gg342,11,344,11,346,11,352,11,354,11,356,11,363,9,365,9,314}67,9,371,9,373,9,375,9,377,9,384,11,386,11B NN392,11,394,11,396,11,415,9,417,9,3,5,9,5,15,5,5,10,13,10,9,15,3,17,15,17` ^^15}!))",!)%))%)",!)%))))))%)",+ +,$)'))))))')#,$)'))')#,$))# ll!)'')')'')')'')",+z++ +16}+ ++z+,&)( & * # $ * ( +z$",+ + + +1z+,& * *)* ' ' *)* %))( XX+ + + +,& * * *)*)*)* * ')'#,+ + 17} +z+ + +,& * *)*)#z$)*)* * *" YY+ + &( + ++,&)* ( & *)($,+ + &( + +z,& *)* *)"z!)* *)* (z18} YY+ + +z+ + +z,& * * *)*)*)* *)* (!,+ + + +z+ ++,& * *)* % % *)*)* (+ YY+ + + ++,&)*)* * " 19}! * * *)*(,+z+ + ++ + ++,+z$'%)%)( &)%)* % (+ ;;+zz+zzzz$)#zzz+ ++,$))# 00 $)))%#, 5 D:WREN1:}CH.BAS0VcwVOVOICPITCDISCNTSUSTAI..*** ĠӠ5<}ҠҠ ***? #A 06-@?Change to volume value if differentI-@@0",6-P:'@5=},0"4"I6-P:+&,'@,!" "2!B7h@ F:@ , A  5>} D:SOUND2.BAS4\](DDDDDDDDDDD1D1D1D1D2MDCOLSMLOSSCRRCRCCRSPODLLDT9@} @@9A} !9B}"#$%&'()*+,33*** ĠӠҠ9C}Ӯ *** 6-6-@'6-@36-@?6-@K6-@W6-@c6-@o6-@9D}{6-@ 6-@6-@6-@6-@6-@ 9@)<@,;@,9@,"9E}AR(>:A%,"-: A A! A+ A :68,-AB( AAdAU2F:9F}B2y,"A<F:B2y,"AFF:B2y,"@@PF:B2y,"+ZF:B2y,"A 9G}d 6-R:,  @AnT:,"Ax F:Ad,"AU@P6-F:Ad,$AdAU9H}6-+$+"@,,%+$+"@X,,%+$+",,%+$+"@b,,%+$+"@,,%+$+"@5,,"AҠ9I}՛77AAA A0A@AP٠ěN B-@)J6-?:C:,<8<,<8<,<9J}8<,<8<,<8<,,N 5 22!2+25 @P+Šқ, -%(>:,6S+6-%++9K}",$+ @),,&++",$+!,,7"@E6-&$+!,S"A`@1"@#6-%$+ @",1"ApJ39L}"@)6-&@$+!@,3 ATE"@)6-%@$+ AU,;6-$+ @!,E A^ A9M}h26-%$+ @,(6-F:A6%,2 Ar"6-&$+!,"6-F:A6%,|%"@!6-A!% A9N}"@!6-AUK -%-6-F:@,%F:@,$AV<6-F:@,K6-F:@,N6-%+$@@,%+9O},"6-F:,>6-&+@d$+"@,,D(N @PΠěL68<,-$68<,-068<,-$%$+!,;69P}8<,-L68<,-$+!,W-@"-%(|# +-%1(96-%E"@0K6-W6-@"K -%-9Q}6-F:@,%F:@,$AV<6-F:@,K6-F:@,N6-%+$@@,%+,"6-F:,>6-&+@d$+"@,,9R}D(N @PWŠӛX1 6-%6-$+ ,#-@'(1 @PbJ 6-%6-$+ @,)-@9S}0( <-@@(J @PlD 6-%6-$+ ,#-@*( 6-@:(D @PvJ 6-%6-$+ 9T}@a,)-@20( <-@2@(J @PY 6-+$,6-%+",+6-$+ A),7-@2?( K-@29U}O(Y @P; 6-%6-$+",6-#6-/6-@";6-A$5 "-(SND#-@6+(5 A9V}% -(-@6%(NTS;-@"-%(|# +-%1(; @PŠ՛. -9W}.( - Play ̫ - Print ++(# - New ԫ - End>,($ ԫ- Save (Any Key) 9X} >AdAU F:Ad,"AUA0ZAdAU-6( oice:  B-@"Z( u9Y}stain:  E"( istortion:  .-@"E( ontrol:  B"( oudness:  .-@9Z}"B(otes/Sound  @PŠϠ˛ B @P) D:SOUND.SUB56-A B6. DATA 9[}*91( DIM ML$(54):RESTORE 2030>:AU,96-%4W5( ML$=>:@4,>:@4,>:AU,=6-%W(9\} FOR L=0 TO 29:>``(JREAD V:READ P:READ Q:READ C:READ S:U=USR(ADR(ML$),V,P,Q,C,S):NEXT L:RETURN>:AU,H5 6-9]}6--! A`)6-%16-%5 R @P\ 6-%(@fT -D(8<,,8<,,9^}8<,,8<,,8<,J T(,p (>:AU,$ԠĠ6 @P33!*** SOUND EFF9_}ECTS EDITOR DATA ***63A3 1. Voice x 2!32. PitchA33. Distortion x 16 + VolumeB&34. POKE 53768 (AUDCTL - $D2089`})?35. Sustain (Jiffies)B3-@)@@3DATA 8<,,8<,,8<,,8<,,8<, 9a} @PԠΛU 6-6-6-6-!6-'6--6-36-?6-A$KAU A!W -.( o9b}ice:  ustain: 2 W( istortion:  ontrol: 0 ''( oudness: 6 otes/SoundD-@"9c}6--@(||||||||||||||||||||||||||||||D % -(-@6%(NTS$O 6-6-@"-%#(9d}1-@)9-D68<,-H L O$ŠΛ3 +@00%0-03-?;@09e},56.SOUND effects ?#APP-@)"""!"%";6-?:C:,<<<<<,L(7%<%9f},P *( ((*( , 22%-A) ,$GG0,34,143,1,5,0,17,143,2,20,9g}0,17,138,2,5,0,17,135,2,5,0,17,132,2,5NN0,17,130,2,30,0,85,97,64,20,0,119,98,64,20,0,85,99,64,20,0,119,100,64,20RR0,89q}OB%DOS SYSB*)DUP SYSB<SDISKMENDBASBDUNEDIT BASB VSEARCH BASBDUNGEON1DATBDUNGEON2DATBDUNGEON3DATBDUNGEON4DATBDUNGEON5DATBDRAGON LSTBTALKER3 BASBGWRENCH BASB;SOUND2 BASB6?SOUND1 BASB5~ROCKS OBJB"MELODIC BASB+POLARPLTBASBEBBKART OBJB<EBIRDEGGSBAS5,101,64,20,0,119,102,64,20,0,85,103,64,20,0,119,104,64,20,0,85,105,64,20SS0,119,106,64,20,0,85,105,64,20,0,119,104,64,209r},0,85,103,64,20,0,119,102,64,20 OO0,85,101,64,20,0,119,100,64,20,0,85,99,64,20,0,119,98,64,20,0,85,97,64,20NN0,119,97,9s}64,20,0,85,97,64,20,0,119,97,64,20,0,85,97,64,20,0,119,97,64,20wԠśx4 #A-@"-A6%19t} 4$660,121,108,96,91,81,72,64,60,53,47,45,40,35,31,29 Ԡ̤? #A;@T,(-@T,"867,.>9u}:,< ?$UU104,104,104,170,104,104,133,203,104,104,133,204,104,104,133,205,104,104,168,169JJ0,157,0,210,157,1,210,149v}1,8,210,133,20,165,203,157,0,210,165,204,157551,210,165,205,141,8,210,196,20,144,2,176,250,96ԠРٛ# +9w}AR##A pI-A$Ah"!% 7AIA@M%6-F:A`,%F:Aa9x},$AV=-%@%@&IA0M 9A'A@9BBA2 -2($9y}Ӯ96-AU-@"#-'(56-&@9  P #A"-@!#"9z}/-@63(7 I-@6@"M(P$dd72,138,72,166,208,189,27,4,141,10,212,141,24,208,232,224,16,208,2,162,0,19{}34,208,104,170,104,64 ::18,20,18,22,18,20,18,22,18,20,18,22,18,20,18,20,18,04E8,"AB#A!*-@."9|}768,-; E A">5518,20,18,22,18,20,18,22,18,20,18,22,18,20,18,22H#-@68,-8,%# LA9}}8,&&A4-@EAQ%8,I L$D:SOUNDEDT.BAS8U ҩ& ҅̅έͩ@Ϡ@̑@FPPP PI;Pש@ԩ/b=} \䩈0=1 & )$ D%M_G<"/M<<< ޭ$_G@=}p !9PL /`GMWG;_G 8>0 %3ͩ %&i@ %9P O%:P 8:Pm9Pe=}̰=̐ӍP!"ʭP)i@iȑ %9P O%:P8:Pm9Pḛ̐1̠ͩБȩQ %iPRPSȩԑȘ=}e̅ %m آ %i= =}0)= 00="#1 9$%& \?//+P(PPLj L!P#PL1! U% D%0>P~P $P=};;  $PW)PP}5Pl %&PPPP,PP+P PPP$P<i<< э<Ѝ< i<Ѝ=}<P $@P%P?P#$ $L#"Pخ PWGi WG$P` WGL#T %``EO%N`wP>>@?F .=}` aG) MaG )]P>>@?ʈ0ǩD D` )HTThUUPP` ҬP)L$)L$PЍiЮ>PʩT=}UTU $PWG$%0$P`p=X=`tW`̩̈́`P }%PPP*nPPP`=}`<)`>P#=SSʈPPP P t$` )` )` )`PPPP`HHʍ Խ?н=ԍ ԽX?нp?н=}?н@?н > ԍн >}8> ԍʽ%& G ԍЍ!P 0P 4$hh@H6 4$h@ ҍh@&'+PL/ʍP%PL/=}P hhL!L/ PL&PP8=P $ D%L/ +$ (?i) p(??i ҩύҍL/w*P)]>>@?ҍ=}ҍҭP  IL/=g==\==+8>=>>@=>PF0=PLA''(>>===}>PF0=PLA'=6P6Pɀ >6P7P7P:<) BzBs BBgBB7PPP(<=} q?r?>(q?r?P P P8H!CCC?CCC PPL)Pz>PL(5PL)P()P ;P=}PxMP) ;P;P;P;P ;PPIP;PPP PP>PL7)>PL7) PPPx)Lm);P P %=}PP!GPLm)EGҽ3GieiePLm)PL(;P * P%PɁ|P PP O%"P"P #L) *m)P=}Lm)P;PP!x)x)Px)x)Lm)>PL7)>PL7)PP PP>P%%>PP&&PPэP $=}-Pq.PL* }%L* }%1P1P %4P 0P %`G`G E~W/PPPɈ!Py PP6=P O%"P"P #(Pi(P(Pη;;D;;<<`G`GaG=}aG D%@,-Px P?P%P $L/ U%L,P*ҭP  U%L,>P=SSʬPȩ# U%L,=SP0- PSʈݩ=S =} ) >Pɀ  P % PLD-PfPLD-x)U)>Pi $ $L,>P $ $P >Pi $PIP=}",P,P--,P ,P,PPP@P0>PȭP"G!GȩBU2PL-8P0P %3P3P8 %Ѝ=}P2P3P-P] )3P ( !@3Pҩҩ йHF #%~W0"P83PҩҊ HF #%vWwWBPLm.APAPl=}ҍAPBPЪzV-.`i6.*ҩP8APP %MPҭ ) hF #%V7AP8 ҩVVOҪ )xF{V|V}V~V=}Ș)2P2PP"=P=PJJ @ҩ PҭPL/&P0m&Pҭ&P0L/P;x+PL/ $ =}ҭ )>P PHF #% $./ PL/ $,P ,PJJJJL/ҩ,PP8iЩ P>P8 )0FT=} P P )0PFP .%PPU P PMЭ@P(?P 4$@?Lb//::UZ\YW[\XU[\XW[^`bb\XWYU[\Y=}VZ^`bd\XV[\Y\YUZ\XV[_`baef]^`daij_c\YVZ^`dc\XUZ_^_`acij]`bbij]`ij^_]`adcbgh`ij^]^bij]_``acbaef]]_``ij^_^`ackklkklllklmnonom=}llklklnkllkklmonoomkllklkllkklmoprqrpqrprrqr:;prprprqrpqrpqrprqpqprprpqrprqrprprrpstust}ststutsus}sustusts~~sutu}ttsututttu=}s}sstu}}wx}v}}v}}}wx}}}xv}x}}yz{|y}}}x}}}}}}v}}}}w}}}}}}}}}}}}}}}}}}}}}}}}}}}}}~~}}}}}}}}}}}}}}}}}}}}}}#2!$3=}&5%,0<=,%6%,=}pp01Ԁ0Ԁ0@75@35@375Ԁ0Ԁ0Ԁ0: R;A0=ԀԀ<<=Ԁ0=}=Ԁ0pppppD;pppppppppppppp==pA=P>>ʤ22222222222$4444444444 6666666666P@@@@@@@=}@@@HH@@@@@@@@P@?@ BB/;;/@=}@;>;=TyT ?> @PPP@ (y% 59-)89)$88$99)%TZ=}TT **  `X>;=@PY@PU?=@PUUYV꾻BC=}jiUYeYiVeYYeUYf@SUUYUV~ZVe~_YUYe{^ee_Y_~=}YYYYU_UUW?CD=}$~~$$<~BB$~~$$<~B$~~$$<~BB$~~$$$fBB$~~$$$BBB=}$~~$$$BBB$~~$$$BBZ$~~$$$BZZ$~~$$$ZZB$~~$$>*I"=}>EF$(88(<~<T8|8T(8<<8|8T8TZU>~$HB(4D@(9ADGK"""""""""""""!!!!!!!!!11 8@PX`hpx 80_][YXXY[]_08HH((((((((((HH=} <fuFPFPFPFPPAS@@ @4 @A}"E2/2@@E2@@(+"@+2@@A}@2W2@;2@@@W2@@@<-@@P A}F @ P-6-@#Ap# @- @ Z>#6-@42@> @dA}MEASURE 1n50,4,0,0,0,0,0,0x0,0,0,0,0,0,0,01,4,0,0,0,0,0,01,0,0,0,0,0,0,050,4,0,0,0,0,0,050A},0,0,0,0,0,0,01,4,0,0,0,0,0,01,0,0,0,0,0,0,0MEASURE 250,4,0,0,0,0,0,00,0,0,0,0,0,0,01,4,0A},0,0,0,0,01,0,0,0,0,0,0,050,4,0,0,0,0,0,050,0,0,0,0,0,0,01,4,0,0,0,0,0,01,0,0,0,0,0,0,0MEA}ASURE 3"50,4,0,0,144,6,0,0,0,0,0,0,144,6,0,061,4,0,0,0,0,0,0@1,0,0,0,144,6,0,0J50,4,0,0,144,0,0,0TA}50,0,0,0,144,6,0,0^1,4,0,0,0,0,0,0h1,0,0,8,0,0,0,0rMEASURE 4|50,4,0,0,144,6,0,00,0,0,0,144,6,0,0A}1,4,0,0,0,0,0,01,0,0,0,144,6,0,050,4,0,0,144,0,0,050,0,0,0,144,6,0,01,4,0,0,0,0,0,01,0,0,A}8,0,0,0,0MEASURE 550,4,0,0,144,6,0,00,0,0,0,144,6,0,01,4,60,0,0,0,47,41,0,53,0,144,6,45,4A}50,4,47,0,144,0,40,450,0,53,0,144,6,45,41,4,60,0,0,0,47,41,0,47,8,0,0,40,4&MEASURE 6050,4,47,8,14A}4,6,40,4:0,0,47,8,144,6,40,4D1,4,60,0,0,0,47,4N1,0,53,0,144,6,45,4X50,4,47,0,144,0,40,4b50,0,53,0,14A}4,6,45,4l1,4,60,0,0,0,47,4v1,0,47,8,0,0,40,4MEASURE 750,4,47,8,192,6,64,40,0,47,8,192,6,60,4A}1,4,64,0,0,0,53,41,0,60,0,192,6,47,450,4,53,8,192,0,45,450,0,60,0,192,6,40,41,4,64,0,0,0,35,41A},0,53,0,0,0,31,4MEASURE 850,4,53,8,192,6,35,40,0,53,8,192,6,40,41,4,64,0,0,0,45,41,0,60,0,192,6A},47,4 50,4,53,0,192,0,53,450,0,60,0,192,6,60,4 1,4,64,0,0,0,64,4*1,0,53,0,0,0,64,44MEASURE 9>5A}0,4,53,8,182,6,72,4H0,0,53,8,182,6,64,4R1,4,72,0,0,0,60,4\1,0,64,0,182,6,53,3f50,4,60,0,182,0,47,4p5A}0,0,64,0,182,6,53,4z1,4,72,0,0,0,60,41,0,60,0,0,0,47,4MEASURE 1050,4,60,8,182,6,47,40,0,60,8,182A},6,47,41,4,72,0,0,0,60,41,0,64,0,182,6,53,450,4,60,0,182,0,47,450,0,64,0,182,6,53,41,4,72,8,0,0A},60,41,0,72,8,0,0,60,4MEASURE 1150,4,81,8,162,6,29,40,0,81,8,162,6,57,41,4,81,8,0,0,31,41A},0,81,8,162,6,64,450,4,81,8,162,0,35,4$50,0,81,8,162,6,72,4.1,4,81,8,0,0,40,481,0,81,8,0,0,81,4BMEAA}SURE 12L50,4,91,8,162,6,45,4V0,0,91,8,162,6,91,4`1,4,91,8,0,0,47,4j1,0,91,8,162,6,96,4t50,4,81,8,162A},0,53,4~50,0,91,8,162,6,108,41,4,91,8,0,0,60,41,0,91,8,0,0,121,4MEASURE 1350,4,96,8,192,6,0,0A}0,0,96,8,192,6,0,01,4,96,8,0,0,0,01,0,96,8,192,6,0,050,4,96,8,192,0,0,050,0,96,8,192,6,0,01,A}4,96,8,0,0,0,01,0,96,8,0,0,0,0MEASURE 1450,4,96,8,192,6,76,4 0,0,96,8,192,6,76,41,4,96,8,0,0,76,A}41,0,96,8,192,6,76,4(50,4,96,8,192,0,76,4250,0,96,8,192,6,76,4<1,4,96,8,0,0,76,4F1,0,96,8,0,0,76,4A}PMEASURE 15Z50,4,76,8,192,6,64,4d0,0,76,8,192,6,64,4n1,4,76,8,0,0,64,4x1,0,76,8,192,6,64,450,4,A}76,8,192,0,64,450,0,76,8,192,6,64,41,4,76,8,0,0,64,41,0,76,8,0,0,64,4MEASURE 1650,4,64,8,192,6,A}53,40,0,64,8,192,6,53,41,4,64,8,0,0,53,41,0,64,8,192,6,53,450,4,64,8,192,0,53,450,0,64,8,192,6,A}53,41,4,64,8,0,0,53,41,0,64,8,0,0,53,4MEASURE 1750,4,53,8,192,6,45,40,0,53,8,192,6,45,4"1,A}4,53,8,0,0,45,4,1,0,53,8,192,6,45,4650,4,53,8,192,0,45,4@50,0,53,8,192,6,45,4J1,4,53,8,0,0,45,4T1,0,A}53,8,0,0,45,4^MEASURE 18h50,4,53,8,192,6,45,4r0,0,53,8,192,6,45,4|1,4,53,8,0,0,45,41,0,53,8,192,6,4A}5,450,4,53,8,192,0,45,450,0,53,8,192,6,45,41,4,53,8,0,0,45,41,0,53,8,0,0,45,4 D:MELODIC.BAS@{VWWXNURIFRAMTODLISADDRESNUMBEIOCADRHADRLNUMHNUMLDABQWERTZE} E} A0%6E}-@'-@%6-76-+-@0?P7 A%(" O:,!6-" @2) E}6-$6-E:,$)6-G:,$$?<;"/,%AA&+@%,;6-@F##/%AA&+@E}%,P   Ape""ĠǠΠf""ĠǠΠg""ĠǠE}Πh""ĠǠΠh((AUTO SCALING...&6-4-@P-@0?P\ AE}%b!h6-   Ann*160-310 IS 'AS IS' SUBROUTINE SUPPLIED BY Ԡ TO SAVE AE} GR.24 SCREEN TO DISK.16-@6-@ 12*@$$-AA.*F:,2 E}6-F:A,$AV%%6-F:A`,%AV$F:Aa, 6-6-&%@6-@$'6-A2%'E}%@%@6-P:'AV,6-&$AV%@%@6-P:'AV,6-&AVE}$"%@%@ ,6-?:C:hhhLV,<,6'@$@*"49 SECOND SCREEN DUMP"J.@.E}@@P:T8((@>:@',A>:@,8-%@9^06.>:,!67A,.067@E},.hI6-?:A6<:@',K>:A,>:,F I$rq%2A@@9-@E}A= _2qAdAU|66-F:B2y,"@,6-%@6 AE}"@ A`"@ A0 F:Ad,@(A6- Apj!`;@I,E};@I,;@I,;@I,;@I,;@ ,;A,;Ai,j+@$;%6-F:@,%F:@,$AV;6E}-%@@$A@ #A`!-@Ah%"<67B:,%@,.>:,@ --@@a")A5%E}-  +@1AADCA @U-((ŠҧӠҠҡE}=%(NUMBER OF FORMULA'S TO ENTER)=!@Ap-@b(#(}٠κ&(E}b(7INPUT FORMULA AS R=IN TERMS OF 'D' WHERE 'D'=THETA( FORMULA #  A%!AY=67B:,E}%@,.:RETURNC(}U-@c(A%f(o(CONT-AB@&+ABE}@'AY@4+ m(U(J}PLEASE CHOOSE |1] AUTOMATIC SCALING (ABS. BOUNDS) |2] MANUAL SETTING.Ym"@E}A`&"((ABSOLUTE ENDPOINTS"0c 6.D:(c(OINPUT TITLE OF SAVED SCREEN (IF SAVED) IN FORME}AT (8 CHARACTERS MAX): 4 6. D:SCREEN.MPD-67B:,%@,.#"@- A0NW +@$A@XE}1A@XCA M@W @ X9"@ Ap# Ap/6-A09 @0b"E}@!,Au@U3/AAAgE,AA@UW/AuAga A0u-@@6-A0%E} @0l Apv 6- $w6-@$+'@,$x6-'@$y6-'@$C-@ AE}%,B:,!@9C6.7@<@9,u6-6-+&@,) A- ?,AAQ/AAE}c,A@2u/AA{6-@6-@)6.3 A?6-@M6.W AE}c6-@q6.{ Aw6-6-@06.ABS.ENDPOINTS:: AC6.=:,^6-+@&B:,,'@E}j6-@t Aw$ 6-?:C:,<<~>QRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRE|J}倢􀀀||䀢쀀|ZRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRCV$raw.largeJ},ine#ircle"oxBV0arms4ext&ont&ill2aysBV(orz6ert&our4xture$ef4xtBV"rush3et#lr%raseJ}5ndo6iewBV2ainbw3ave+oala-icro-agniBVHIJ FGLKBV򀔀#olor#olorJ}#olorBV(ue"lack,uminanceBUUV$efine4ext-ode0arametersBV$ir(gt7dtJ}B8904.2%&, _\^](ʔF D  $6J^r88J&}eѥ8 5?>څ؅٩ۦ۽=ֽ=פڦ㹨= = ޥ8ް eݩ@8ڨ⹨= =ޥ8ް J'}L]=eܦ܅݅ ;L]=܅݅ BG  Lx=ڥA hhLvDJPV\bhmsy~``?, EDHIJ)}񥀅󥁅ȱ! C?量 L]>88 /? /?J*} /?L>0L> /? W?L>󅀥􅁠 /? C?L> W?L4> 8H韝I BLVJ+} 5ܑ懥ɾ`hhL?恥ɟ8```(ϥJJ ?녱}LLi\J,} i i(ii(i`ee`\]^_` 5 ? E΅υJ0.J-}1  @ {?L@xK2, K!8i) EL0@ ,HL0@ GA|@HA}@ 4 ? H {? @ =` J.} ? ; {? E EL0@ E i,Х i/@ @ @@$`ƕ敥`敥ƕ ?ɿƔ攥8Ω攥(J/}Ɣ ?ɟiΩ$г @LA @L@ @LA @L@A@@@/A;A5AAA乽,{,`u, 710u, u,` ~8O0.1 7 WJ0}A셮u, 7 1KɛKK `A&x  ޢ WA A `A EJ1}3x d cH Cv,u, EhLB`Ä `1)&&&i%`ei8弅J2}彅`8弅彅8巅帅`8巅帅ei`eiei`ee8J3}8偅`&&8庅`澤Kɛ` LBĦ Cť妾 BʦJ4}ؤ Cˤ˱Eä9C# B sB  ;LC @ E ?< 4HH IChhLC`d8dH hJ5} 8 H h` F 5 rKp)) )N)))Ʃ):)Ne)f)g) J F 7=EJ6} \ H DxD M/  E H E ELDi8 D ELD8iLD悥LDƂ + 7 J7} + +`` E E` E E 4 :8E:9E LEMЈ,L_H Ԧ',J8},,,Цҽ,樦h@H ԍЩ h@LE` 5)10@ԩE E, J9}L E$` EЩ ԩo:/` EЦ"Kx:K$}*K2K]P ~_ J:}aLH` E 'F G E =` FLF 2GF3GF ; )J L2J ; ;ƌ ;ƍ` &GLBG GLBJ;}G G8LBG GiLBG ;L;i`i`FFFFFF GF )Jō 8卅 8嗅Ō 8包J<} 8喅ő JLGJ=e ŝ8坅ee ŝ8坅e ;ƜL2JxK*J=},6K`i)LE bK$HcK%H HL4ҥ 7 EL&H挥ň攥`ƌ`ƌʼnƔ``J>}Ŋƕ$#``捥ŋ敤$$`ƍ` AHLgH AHLH THLgH THLH꽛-, C,, C,,, C,,J?},`-10@ԩ]Eԩ:/, EР$-$,, ,`GLLɠ7HJJeJ@}ih)) ӥ)ӨJ9KJ1` BLVH Ih JBKEDKLV E, ,x !𥓅 JA}4ILE擥 ELIƓ ELI؅i(LiL```"lack2ustJB}2ed /rng$rk /rng2ed$rk ,ave#ob "lue5lt "lue-ed "lue$rk "lue"lue 'ry/liv 'rn-ed 'rnJC}$ark 'rn/rng 'rn/range?0 UD:PICTURES.PIC    #  @@ JD}AHTHgHHHHHH'*Ȅ %( 0 c*#7+*0"`(*HxvwDEBUCHANGPPATNFLASHIFCGIMAGBLANKPM102P0EGSCORSEGGLEVELIVEBONUNONOWAVETIMDCHBAARPNF}MMEP0 NG}NH} BIRD EGGSBY WADE MARSHALL (c) 1987, ANTIC PUBLISHING6-+F:B2y,"@, ! NI}AP B! B9@'B2x@9@w6-6-@ *-@NJ}@*(7%<%%@,# 6-6(::6-?:<AP%@$+,<%A <@,2^R:,@&6NK}-&@26-ACT2A@@^ @e<?6-%@6-A6?2NL}A6-?:(7@%$@<@ %$@,A$ BA-@@>(7@%NX}$@<@%$@,A$L$ $6-F:@,$B2w k+@%@'-@I(@NY}k2 F-@4(@lives F-@NZ} e-@4(@level F-@e(@̠   @A@N[} --@-(@ time bonus 56-&$@P +6-5 A0E 6-@#@.-N\}6@P2A@@d6-@#@26-@#@N]} X-@@'(@ 56-%@G-@@T(@X   -@A  N^}+ AP A! B+ @ K6-@6-'6-36-?6-K6-@Y-N_}@ 1(@ GAME OVER<(@Y(@ PRESS start@F:B2y,"@" AP, A6N`} B@ @  A@q +76-F:A`,%AV$F:Aa,%@K-@@$Y%@] Na}q&@@hI6-@16-F:@,%AV$F:@,=6-I6-KA@'A Nb}A9A@KAA6-A 6-$AVAP0'6-@6-'6Nc}-@/-@$@$%@#"+%/ )-@%%) --@1")Nd}AP%- ;;6-C:.hhhhhhh`,AV AAV(}-Ne}-(%##&##################################--(%### (' -(' -------(%### )***,('- Nf} -----(%##$ --(' - (##$# (##.(##.(##%#(##%.-@ @ #@Ng}*(##. X-@@%( #########--7-@@F( # - (' --X-@@!AR@Nh}> (##.$(##. ###>(### #####F$p%%255,255,255,255,255,255,255,255z%%252,252,252,Ni}252,252,252,252,252%%192,192,192,192,192,192,192,1923,3,15,15,63,63,255,255131,15,60,242,0,0,8,00,0,0,3Nj}2,131,15,60,240 192,192,240,48,48,60,12,150,0,0,16,84,84,255,2550,0,0,0,0,0,255,2553,3,15,12,60,48,240Nk},192128,128,8,8,32,32,2,2%%240,240,240,240,240,240,240,2400,240,12,13,0,0,0,00,15,48,112,0,0,0,00Nl},0,60,193,0,0,0,00,0,60,67,0,0,0,0@* (}@'AV*(J--(% Nm} T..(& ^..(& h..(& Nn} r..(& |..(& ..(& No} (..(& ..(& Np}..(& ..(& ..(& Nq} ..(& 7.(& 1(4(7(J(Nr} 3( J( V-@ @-(### ### ### ## ###?-@ @ Ns}V(# # # # # # #,-@ @!,(### # ### ## #U-@ @",( # # # # # # #>-@ Nt}@#U(### # # # # # #6- F:B2y,"@A%6-%@% @Aa 6-6Nu}::6-?:<AP%+,$@<%A <@, A`@@ $'11;A!,;@@,Nv};@,;AU,'226.( $' AB'_@wA(#B;-@Nw}A@?"G4DU67,._ BpL'67,.V' )$h)77D,I,D,I,I,D,I,D,I,I,D,I,D,I,I,D,I,D,Nx}I,D,I,D,D,I,Ir)77D,I,D,I,I,D,I,D,I,I,D,I,I,D,D,D,I,I,D,I,I,D,I,D,I|)77D,I,I,D,I,D,I,I,D,D,D,I,I,D,D,D,I,I,D,D,I,D,I,D,DNy})77I,D,I,D,I,I,D,I,D,I,I,D,I,D,I,I,D,I,D,I,D,I,I,D,D)77I,D,I,D,D,I,D,D,I,D,I,D,D,I,D,I,D,D,I,I,D,I,D,I,D)77I,D,D,I,D,INz},D,D,I,D,I,D,D,I,I,I,D,I,D,D,D,I,D,I,D)D,I,D,I,I:REM OVERFLOW*r6-F:A,&@(6-$AV:A@TN{}LB2VXBByd6-A(r6-%A#+>6-A 67@,./67AU,.>67@,.+% #BN|}%6-?:(7@%$@<@ %$@,A$.X-@@@+-@T(N}7@%$@<@ %$@,X ".A-@@ >(7@%$@<@%$@,A$D1:BIRDEGGSN}.BASL