@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( 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`  `1  ɐ     `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.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 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 ALLOWED736 FREE SECTORS COPYING---D1:DIRECK.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 D8uL`NXTHLRRPTXYXYTLASXLYLZZZMSGZZZZZZTHETDLISSRASHAPSTARTLOTIMXOLYOLXNET}YNEBILITTLHRMISEHANDSFSCRATOCTICINDATLDIGITINCARUU} V} !"#$%&W}'()*+,-./012345X}6789:;< $$****************************** $$* DIGITAL ANALOG CLOCK Y}* $$* by Reid Brockway * $$* *$$* COPYRIGHT 1989 *$$* BY AZ}NALOG COMPUTING *$$******************************4;@,6-@0(6-A046-@( (} (!([} DIGITAL CLOCK$((((# (Tell me what time it is.#(2(( )(< @PF((((Do you \}want a 'metric' clockP0YAZ'6-@66-A@'6-@d B+@%@1-@]}@L(@ JUST A MOMENT^-@@(@WHILE I WIND MYSELFnx--^}@s")A6%- 䛌+-@@+-@@ <<6-?:A6<@0_}&'@<@<@<@,# -@A # ##6-$A`%$@&@`};@,+@%@'0@@'@Z6-@56-'6-@036-@a} ?6-@4K6-W6-Z-A`6-@%$G:,6-@Hb}&$E:, , "#,.-@6.=:, "* A. 6# A0 Ac}#Add hands@""֠J9@'@9@ Td}^BB+F:@,$BU6%F:@,$AV%F:@ ,,Aph@w APr6-%@0|>>6-?:e}A6<@ $+%@,<@<@<@,++%@A0A6-%?P6-('f}"@6-@'6- AP!!䛸 6- AP6-6-'6-%@g} AP!6-'6- Ap$## 6- A06-6-'6-%@h} A0!6-'6- Ap 6-%@6- $"")6-@%$G:,)6i}-@H&$E:,$&<6-@%$G:'@,96-@H&$E:'@,<$0:G j},@@H%//@A,@@HG/D$N##򮶛X%%6-F:A`,%F:Aak},$AVb))6-F:%@,%F:%@,$AVl-@B:,v++6-BsD%@$+@:7<,,&@2,6-%l}%@ $%&@-@%@ $F:%,  $囲mm104,104,10m}4,141,0,210,104,104,133,204,104,104,133,205,104,104,133,206,169,160,141,1,210,166,204,32,65,6kk24,105,1,201,176,208,241,1n}69,14,166,205,32,65,6,56,233,1,208,246,169,175,141,1,210,166,206,32,65,6,56DD233,1,201,159,208,241,96,160,19,136,208,253,o}202,208,248,96,256DD13,8,15,22,16,44,15,65,13,80,10,86,7,80,5,65,4,44,4,22,6,8,9,0;;14,13p},16,33,16,57,14,78,10,88,6,78,4,57,4,33,6,13,9,0 D2:CLOCK.BAS15,65,13,80,10,86,7,80,5,65,4,44,4,22,6,8,9,0;;14,13E00CHSESMOVECLEARTRANTURRAMTOPMBASSTRANSFXYPDDDMATXTDPZZZDDBPPCXYCHPA r}DPPPBPCMMZCCCSCDPN24N25NN2N19N26N28N12PAPBNPYXN1NNNNN1N6NN4N2SSLN1N1WNNRDN28 s}N30N25OB@B@Bs++** Ad @ AR B6 @ t}ss@@Ad@Bq66@@$A u}A @!"@#$%@&@'Bt(@2)@*Ad+@(,- v}./01234A5@6@u7@28@9@:;<@ w}=@$>A?Ad@AAA&BCD@EFGH@IJ@KL@ x}M@N@O@dP@dQ@R@HS@!TUV@W@XY@Z@[\ y}]A^A_AU`@$$******************************$$* DOUBLE SIX *$$* LI z}STING 1 *$$* by Pierre Roberge *$$* *$$* COPYRIGHT 1989 {} *$$* BY ANALOG COMPUTING *$$****************************** ( A)(@yAd  |}** LOAD GAME ** > 6-6-@ 6.* AR>@Ad ** MAIN LOOP **c 6-$6-@2% }}'6-@%56-@&C6-@u&Q6-@(%c%%%$+", A** CHOOSE POINT **(6. ~}( A&&@w&F:Ad,A(r6-F:A2%,6- 6-J6-%+"@,$+ ,&+ }"@,$+!,r6-%$++"@,$+",&+",$+",, )%%$+",26-%$+",%%2F:AD% },@ 3 26-%6-!6-)6-$32""** CHECK FOR ILLEGAL MOVE **44+F:%AS%$,*, })+"*"&$,@ ** FIND TOP MAN ON PILE ** 86-$++",&+",,%6-%%%$.6-F:,86-+","G6-+P:', }"',56-O:+",$+",%$+",&+!,,G*@$& 6-&6-F:,&"&$@6&P 6-%6-F:,-* }-@ 04 B-@ HL P ' ** ERASE MAN FROM POINT **(I 6-6-I+F:&+&+P:+&,',,$& },&,$+,%$+",,$+",%$)** DRAW MAN ON POINTER ***2 %%(6.2 A&+** CHOOSE } A DIE **,O6-F:A2%,6-O6-%$++"@,$+",&+",$+",,$+P:',"',. %%%0:% }@f#%%%$+",:F:AD%,@D2/ 2#6-$+",%$+",%/6-+",&3##** MOVE MAN IN INNER TAB }LE **4' 2%!*"&$' A5** MOVE MAN ON BAR **6! "6-&6-! @X7** WALK MAN ON }BOARD **8`6-+"*"%$,,6-++",&+",,$$(66-$$<6-B6-J6-%X6-%$+",`6-%:C%%$+", }%%'212?-@PC < 6-&@V=$$** CHECK FOR REMOVAL OF MAN **> "6- @ }r?** PUT MAN ON POINT **@@6-$++",&+",,%6-%%%$.6-F:,@")"@BI 6-6-%6-F:,$ }6-+",96-(+")"@f,?"I @D4 6-%6-&$6-F:,4"&$* @hF# "6-%%%$# }@H5%%$+",-#-)- 5-JM&$+)",$+, ! 1%%A76-M6-%$+ }+",&+",,K ** PUT AN X ON USED DIE **L4P:','%"%%*%4%%M** CHECK FOR WINNER ** }N "6-!%A6O** MEN IN INNER TABLE **P(!* *"&$(%$F:%$,%R 6-&@S }** END OF MAIN LOOP **T( 6-(%@#6-( @U ** ILLEGAL MOVE ROUTINE **V? 2%%$+" },#-%%5%?%%X% - 6-6-%2Z>6.( A&0-4 }> @[** QUIT ROUTINE **\EB2wB2e-AY@4BAF:A@,E]** BAR ROUTINE * }*^I 6-6-$+&+",,+6-%A&$46-F:,>6-+",I6-(+",`4 6-%6-%$6-F:,4"&$* @ }b, "6-%A&$"', @d&!*"%$&%($F:%($,&f" &$+)",6-"$g** } REMOVAL ROUTINE **h!6-%A&AV$!6-j 6-%F:,"Al#F:%$, )%!'# @n$o } ** ROLLING DICE ROUTINE **p(6.( A&rP6-P:H:,$,6-P:H:,$,'-P6-?:C:,0,24,12,198,198,246,198,0@!!0,220,198,220,198,198,220,0B0,28 },198,192,192,198,28,0D!!0,216,198,198,198,198,216,0F!!0,222,192,216,192,192,222,0H!!0,222,192,192,216,192,192,0J }0,30,192,192,206,194,28,0L!!0,198,198,222,198,198,198,0N0,244,48,48,48,48,188,0P0,14,6,6,6,198,116,0R!!0,204 },216,192,216,204,198,0T!!0,192,192,192,192,194,222,0V!!0,194,214,222,202,194,194,0X!!0,198,198,214,222,206,198,0Z! }!0,124,230,194,194,230,124,0\!!0,220,198,198,220,192,192,0^0,28,198,198,198,204,54,0`!!0,220,198,196,216,204,230, }0b 0,124,226,120,30,142,124,0d0,254,0,56,56,56,56,0f!!0,198,198,198,198,198,222,0h0,198,198,198,198,12,24,0 }j!!0,194,194,202,222,214,194,0l0,198,238,24,48,238,198,0n0,198,198,28,24,24,24,0p0,254,0,56,112,0,254,0r }28,56,118,230,160,86,40,20t0,192,224,48,24,14,6,0v56,28,110,103,5,106,20,40x%%255,255,255,255,255,255,255,255z }0,60,126,126,126,126,60,0{ ** TURN ON P/M GRAPHICS **|6-+%,$AV~BBy%B2wA# }** CLEAR P/M MEMORY **6-?:C:,<<A$,** CREATE 3-D BORDER **% -!%A#%@c% G }%AQA'%%A9%AyARG%A1G%A%AY3%A 5A@G%A }AR= -%A %+%Ar%/ =%Au!!6-?:C:,<Af<<B2H,**48,80,111,143 },52,109,166,0,3,3,3,3,0** COLORS **!!6-?:C:,<Ap<<A,6,6,6,6,70,134,0,8,10** DRAW SCREEN ** }R%6-F:@,%F:@,$AV=6-?:C:,<At<<,OAY@GR$MM5,0,0,32,32,32,0,228,239,245,226,236,2 }29,0,243,233,248,0,96,96,96,0,0,0cc5,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126, }126,126==0,0,98,108,117,101,90,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0ee126,126,126,126,126,126,126,126,126,126,126,126,126 },126,126,126,126,126,126,126,126,126,126,126aa126,126,126,126,66,96,125,126,126,126,126,126,59,32,126,126,126,126,126,126 },126,126,126,126dd126,126,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254,126,126,126,126,126,126,66OO2,1 }26,194,32,2,66,2,96,2,194,96,2,66,2,66,32,254,126,191,0,191,126,126,67KK3,126,194,32,3,67,3,96,3,194,96,3,67,3,67,32,254, }126,0,0,0,126,126,68NN4,126,194,32,4,68,4,96,4,194,96,4,68,4,68,4,254,126,191,0,191,126,126,69JJ5,126,194,32,5,69,5,6 }9,5,194,96,5,69,5,69,5,254,126,0,0,0,126,126,70OO6,126,194,32,6,70,6,70,6,194,96,6,70,6,70,6,254,126,191,0,191,126,126,12 }6KK126,126,194,0,0,0,0,0,0,194,0,0,0,0,0,0,254,126,66,92,126,126,126,126JJ126,126,194,0,0,0,0,0,0,194,0,0,0,0,0,0,254 },126,66,30,126,126,126,70PP6,126,194,96,70,6,70,6,70,194,32,70,6,70,6,70,254,126,191,0,191,126,126,74QQ10,126,194,96, }74,10,74,10,74,194,32,74,10,74,10,74,254,126,0,0,0,126,126,73QQ9,126,194,96,73,9,73,32,73,194,32,73,9,73,9,73,254,126,191 },0,191,126,126,72MM8,126,194,96,72,8,72,32,72,194,32,72,8,72,8,96,254,126,0,0,0,126,126,66RR2,126,194,96,66,2,66,32,6 }6,194,32,66,2,66,2,96,254,126,191,0,191,126,126,126ee126,126,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254, }126,126,126,126,126,126,126aa126,126,126,126,66,32,61,126,126,126,126,126,123,96,126,126,126,126,126,126,126,126,126,126 }ee126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126990,0,0,50,37,36,26,0 },0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0ee126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126,126 },126,126MM0,0,0,0,167,161,173,165,154,0,46,165,183,0,175,178,0,47,172,164,0,0,0,0D:DOUBLE6N.BAShhhhhhh }˥̠q˅ː̠ȱG,0ץ eeׅ֐Ϡ֑դЧ`hhhhhhh֠ґ }`hhhhhͦΠˈ0̠`Ϡ֑դЧ`hhhhhhh֠ґ KZ8dX* SAVE#D:ERRMAN.M65nX* ASM,#-,#D:ERRMAN.COMxX* ASM,,#D:ERRMAN.COMEIEKX*X*#X*---------------------}--------*#X* ERROR Manual by Mat*Rat *#X* (c) 1989 Analog Computing *#X*-----------------------------*#X* Hook }a special handler into *#X* the K: device. When the *#X* user presses control-escape *#X* the current error code } *#X* at location 195 is checked, *#X* and an english error message*#X* is displayed for it. The *#X* current gr}aphics mode must *"#X* be 0 when the user presses *,#X* control-escape, or it will *6#X* be ignored; so the display *@}#X* isn't garbled. *J#X*-----------------------------*T#X* For XL and XE computers *^#X* ONLY! The text} for all the *h#X* error messages is kept in *r#X* RAM which shadows Atari *|#X* BASIC. When ERRMAN.COM is *#X* }RUN from DOS, the program *#X* first verifies that Atari *#X* BASIC is on now. If it were*#X* to install without i}t *#X* enabled, all sorts of nasty *#X* things might happen. This *#X* technique is compatible with*#X* virtu}ally all Atari *#X* compatible DOSes except *#X* SpartaDOS X cartridge, which*#X* constantly toggles intern}al *#X* BASIC on and off. *#X*-----------------------------*X*#X*-----------------------------*#X* Impor}tant system equates *&#X* and constants *0#X*-----------------------------*: CHDESCCODEN ASC}CLS}X ESCAPEb ASCRETl EOLv BEL ESC EOF SPACE  XCORDU YCORDT SAVMSCX }DINDEXW LMARGNRSCREEN;;Work SCR ptrCONSOLSTRING;;String ptrORGX;; Start X cordSVY;}; Save y reg#X*-----------------------------* #X* CIO addresses of importance *#X*-----------------------------* CIO}V;;CALL OS HERE*ICCOMB;;COMMAND TO CIO4ICBADRD;;BUFFER OR FNAME>ICBLENH;;BUFFER LENGTHHICAUX1J;;AUX} BYTE #1RICAUX2K;;AUX BYTE #2\#X*-----------------------------*f#X* CIO constants of importance *p#X*---------------}--------------*zCOPN;;COMMAND OPENCCLOSE ;;COMMAND CLOSECGTXR;;GET TEXT RECCPTXR ;;PUT TEXT RECC}GBINR;;GET BINARY RECCPBINR ;;PUT BINARY RECCDRAW;;COMMAND DRAWTOCFILL;;COMMAND FILL#X*-------------}----------------*OPIN;;OPEN FOR INPUTOPOUT;;OPEN FOR OUTPUTOPDIR;;OPEN FOR DIR#X*---------------------}--------*#X* Important addresses and *#X* constants for the rest of *#X* ERROR Manual program *#X*------}-----------------------*$COLDSTD. DOSINI 8 CASINIB BOOT? LVKEYBD;; KB init. vectVKBCODE ;; Cu}rrent key.`CH1;; Prior key.jCT_ESC;; Enables manualt PORTB~BASICERR;; Find err here'CASBUFF;;} 128 byte input buffer NOTEXIST;; File not foundBASUNDR#X* A 1 is in GINTLK if an externX* cartridge is in}stalledGINTLKDOSID;; 'S' for Sparta K8#X*-----------------------------*#X* CLOSE Macro } *#X*-----------------------------* CLOSE     ACLOSE,1 PARAMA $> ( Q>CCLOSE2 PICCOM9< }CIOFP#X*-----------------------------*Z#X* PUSHALL - Push all regs onto*d#X* the stack for safe keeping *n#X*--------}---------------------*x PUSHALL    APUSHALL-NO PARAMSA5A5C5#X*-----------------------}------*#X* POPALL - Pop all registers *#X* back off stack *#X*-----------------------------* POPALL }   APOPALL-NO PARAMSA",76?@7J>T7^h#X*-----------------------------*r#X* BASICOFF - Turn BASIC of}f *|#X* and allow access to RAM *#X* underneath *#X*-----------------------------*BASICOFF } QPORTBL> PPORTB#X*-----------------------------*#X* BASICON - Turn BASIC on *#X* to allow BASIC inte}rpreter *#X* ROM control of the system *#X*-----------------------------* BASICON  QPORTBM> PPORTB&0}#X*-----------------------------*:#X* GL - Get a line of text *D#X* macro. Places hi byte *N#X* of string addr }in A reg, *X#X* low byte of string addr *b#X* in X reg, and max len *l#X* of string in Y reg *v#X* }and then calls GETSTRING *#X*-----------------------------*GL    AGL error, 2 paramA Q>5  $>4}   %> %  GETSTRING #X*-----------------------------*#X* Graphics 0 macro *} #X* Execute the equivalent of **#X* an Atari BASIC GRAPHICS 0 *4#X* command *>#X*---------------}--------------*H GR0 R  \ ANo param for GR0AfpQ>z GRAPHICS#X*-----------------------------*#X*} Sprint a string at the *#X* X,Y position specified *#X*-----------------------------* SPXY    A}SPXY-Param countA  Q> Q   PXCORD  $ Q> . 8 Q B L PYCORDV Q>4 ` $>5} j SPRINTt ~ #X*-----------------------------* #X* Sprint macro, no X & Y * #X* specified,so use the current* }#X* X,Y coordinates * #X*-----------------------------* SP    ASP-Param countA  Q>4  $>}5  SPRINT  #X*-----------------------------* #X* Main RAM for title screen * #X* and user selection of *} #X* drive that contains the *( #X* ERROR.MAN file *2 #X*-----------------------------*< 4F FP #X*----}-------------------------*Z #X* Strings for prompts and *d #X* user interface information *n #X*------------------------}-----*x ERINTRO AError Manual,A  A by Mat*RatA=EOL  A(c) 1989, AnalogA  A ComputingA=EOL=EOL  ESC ISERR }ABASIC is NOT ON!A  BEL=EOL=EOL  AIt MUST be on toA  EOL  Arun ERROR ManualA EOL=ESC ISXERR ACannot r}un ERRORA  A ManualA=BEL=EOL  Awhen an EXTERNALA  ACARTRIDGEA=EOL  Ais present!A=EOL=ESC DONINST AInstal}lation ofA"  EOL,  AERROR ManualA=EOL6  ACOMPLETE!A=EOL@  AControl-ESCAPEAJ  A to enable.A=EOLT  ADo NOT use B}ASICA^  A OFF inA=EOLh  ASpartaDOS, or youAr  A will CRASHA=EOL=ESC| ABORTX AABORT ErrorA  A ManualA  A ins}tallationA EOL=ESC NOSOURCE AERROR.MAN notA  A foundA=EOL=ESC NODEST ACan't openA  A destinationA EO}L=ESC WHATDRV  APress ESCAPEA  A twice andA=EOL  ARETURN to abort.A EOL=EOL  AWhat drive is A  AERRO}R.MAN on ?A  A [1] A=ESC& UNEXER AUnexpected errorA0  A on openA=EOL:  Aof ERROR ManualAD  A file.A=EOL=ESCN }UNEXER1 AUnexpected errorAX  A on READA=EOL=ESCb  Aof ERROR ManualAl  A file.A=EOL=ESCv MYDRV A1 A  }ERRMAN AD1:ERROR.MANA EOL=ESC #X*-----------------------------* #X* Prompt the user for the * #X* drive where  }the ERROR.MAN * #X* file can be found. If it * #X* doesn't exist, retry. The * #X* user may press escape twice * # }X* and RETURN for the drive * #X* number to abort the program * #X*-----------------------------* BEGIN GR0  R }EDOBEGIN SP ERINTRO QGINTLK;; Extern cart? FTRYBAS;; No, good* SP ISXERR4 :> TRYBASH QPORTBR M>;; Basi }c ON?\ FGETDRV;; Yes, OKf SP ISERRp :z GETDRV Q> 1 PERRMAN SP WHATDRV GL MYDRV= QMYDRV R>E}SC;; abort? HTRYDEF ABORT SP ABORTX : TRYDEF R>EOL;; RTN is FDEFDRV;; default driveR> 1 DGETDRV}R> 9$EGETDRV;; Get filespec.PERRMAN8#X*-----------------------------*B#X* Does ERROR.MAN exist on the *L#X* spec}ified drive? *V#X*-----------------------------*` DEFDRVj CLOSE t$>~ Q>COPN PICCOM9 Q>OPIN P}ICAUX19 Q>4ERRMAN PICBADR9 Q>5ERRMANPICBADR9 CIOC IREADITSP NOSOURCE!REDOBEGIN#X*-----}------------------------* #X* File open, now turn off *#X* basic and read it into *#X* RAM under BASIC ROM } *(#X*-----------------------------*2 READIT<BASICOFF F$>P Q>CGBINRZ PICCOM9dQ>4BASUNDRn PICBADR9xQ>}5BASUNDRPICBADR9 Q>4K8 PICBLEN9 Q>5K8PICBLEN9 CIO )>EOF FREADONESP UNEXER1 CLOSE }: READONE CLOSE #X*-----------------------------*#X* File copied, now install *#X* the keyboard handle}r *"#X* for the ERROR Manual *,#X* program *6#X*-----------------------------*@ INSTAL}LJ QDOSINITPNEW_INI^QDOSINIhPNEW_INIrQ>4NEW_INI| PDOSINIQ>5NEW_INIPDOSINI FININST }SET_KBVECSP DONINST BASICON :#X*-----------------------------*#X* Get a string from *#X* the key}board through the *#X* E: device 0 and return it *#X* in the A register *#X*----------------------------}-* GETSTRING&ICBADR;; String addrPICBADR&'ICBLEN;; Max length0$>:&ICBLEND Q>CGTXRN PICCOMX!}CIOb#X*-----------------------------*l#X* GRAPHICS g *v#X* ENTRY: A-REG GRAPHICS MODE *#X* EXIT: Y-RE}G HAS STATUS *#X* *#X*-----------------------------*SNAME AS:A=;;OPEN FNAME GRA}PHICS5;;SAVE 'G'$>;;FILE 6 Q>CCLOSE PICCOM9 CIO;;FIRST CLOSE #6X* WE IGNORE ANY ERRORS$>;;AGA}IN, FILE 6Q>COPN;;OPEN THIS FILE PICCOM9  Q>4SNAMEPICBADR9;;USE FILE "S:"  Q>5SNAME*PICBADR9;;POINT AT }IT4!X* ALL IS SET UP FOR OPEN, NOW>#X* WE TELL CIO WHAT KIND OF OPENHX*R7;;OUR SAVED MODE\PICAUX29;;GIVEN TO 'S:'f! }X* (NOTE THAT S: IGNORES UPPERpX* BITS OF AUX2)zM>;;GET UPPER BITSN>;;AND FLIP BIT 4#X* (S: EXPECTS IT TO BE IN!}VERTED X* FROM WHAT BASIC USAGE IS)L> ;;ALLOW R/WPICAUX19;;FOR CIO AND S:!CIO;;OPEN S:#X*-------------------"}----------*#X* Sprint: *#X* X-Reg: Hi byte adr of string*#X* A-Reg: Lo byte adr of string*#X* Str#}ing is terminated with *#X* an escape character. Use to *#X* determine its length. *#X* The text may have embed$}ded *#X* return characters, and may *#X* be as long as 65536 bytes *$#X* if so desired - just so it *.#X* doesn't %}have an embedded *8#X* escape character. *B#X*-----------------------------*LSADR;; Work str ptrVX*` &}SPRINTj PICBADRt&ICBADR~ PSADR &SADRX* Find string length%>'ICBLENLENQ@SADR7 R>ESC '}FGOTLEN3HLEN#ICBLEN #SADRHLEN GOTLEN  'ICBLEN Q>CPBINR PICCOM($>2!CIO<#X*--------(}---------------------*F#X* Page 6 code for Error Manual*P#X* handler. *Z#X*----------------------------)}-*dn#X*-----------------------------*x#X* My keyboard handler *#X* Technical assist by Kevin *#X* Gevat*}osky, Mr. COVOX himself*#X*-----------------------------* NEW_INI #X*-----------------------------*#X* Jump he+}re on iniz or *#X* RESET to setup new keyboard *#X* trap vector. *#X*----------------------------,}-* SET_KBVEC=;; Kill IRQ'sQVKEYBD;; Save system KBPNOCMD1;; interrupt adrQVKEYBD;; replace w/theP-}NOCMD1;; addr to our"Q>4MYKBH;; key-trap,PVKEYBD;; routine.6 Q>5MYKBH@PVKEYBDJ.;; Restore IRQ'sT:^#X*--.}---------------------------*h#X* IF PEEK(195)=0, display this*r#X*-----------------------------*|AOK A0:AOK,ErrorA A/} Manual,by Mat*RatA #X*-----------------------------*#X* IF PEEK(195) is not found *#X* in the ERROR Manual dat0}a *#X* display this message *#X*-----------------------------*NOERR A?:Error undefA EOL#X*----------1}-------------------*#X* The actual keyboard handler *#X* *#X* If control escape is pressed*2}#X* location 195 is peeked, *#X* BASIC is turned off, and *#X* the data in RAM shadowing *&#X* BASIC is searc3}hed for this *0#X* error code. When found *:#X* the string is displayed on *D#X* the top line of a graphics 0*N#X*4} screen. *X#X*-----------------------------*b ERPTRl MYKBHv5 QKBCODE R>CT_ESC FSHOWERR5} NOCMD7 NOCMD1!;; Let OS do rest SHOWERR PUSHALL BASICOFF QYCORD;; Top line?FNOCANDO;; Don6}'t do itQDINDEX;; Must be GR0FSHOWERR0;; to work  NOCANDO !GOT_YA  SHOWERR0* QBASICERR4 FNOSHOW>Q>4BASU7}NDRH PERPTRRQ>5BASUNDR\ PERPTRf%>pLOOKQ@ERPTR7;; 0 err codezFERRNFOUND;; is end ofRBASICERR;; error 8}manual FGOTERR#X*-----------------------------*#X* No match on error code *#X* skip over line of text *#9}X* to next error code *#X* *#X* Self modifying code *#X* SEARCH the RAM un:}der *#X* BASIC ROM. Of the format: *#X* Errorcode (byte) *#X* Descreption (text) *#X* Te;}rminator (EOL) *#X* Next error code (byte) *#X* etc. *#X* End of error code info<} *$#X* is designated by 0 value for*.#X* the code. *8#X* *B#X*--------=}---------------------*L FINDEOLV #ERPTR` HNEXTj #ERPTRtNEXTQ@ERPTR7~ R>EOL HFINDEOL #ERPTR HLOOK >}#ERPTR HLOOK ERRNFOUND Q>4NOERR PERPTR Q>5NOERR PERPTR!SHOLSETUP GOTERR #ERPTR HSHOLSET?}UP #ERPTRHSHOLSETUP( NOSHOW2 Q>4AOK< PERPTRF Q>5AOKP PERPTRZ SHOLSETUPd%>nSHOLINEQ@ERPTR7x @}R>EOL FSHOLDONE#X*-----------------------------*#X* Convert to screen format *#X*-----------------------------*A} R>SPACE HCONTERQ> FPUTITCONTERR>[ EPUTIT;S>  PUTIT P@SAVMSC73 HSHOLINE" SHOLDONE,B})>'6FSHOLDONE0@Q>JSHOLCLRP@SAVMSC7T3^)>'h HSHOLCLRr SHOLDONE0|I#X*-----------------------------*C}#X* The addres for the following*#X* RTI instruction must *#X* terminate at or before *#X* $6FF - or your eD}rror manual *#X* handler code is TOO LONG *#X*-----------------------------* GOT_YA BASICON  POPALL 7;; E}Return from7;; interrupt.9 BEGINEI---------------------------* GOT_YA BASICON  POPALL 7;; 744Error Manual, by Mat*Rat(c) 1989, Analog ComputingBASIC is NOT ON!It MUST be on torun ERROR ManualCannot run G}ERROR Manualwhen an EXTERNALCARTRIDGEis present!Installation ofERROR ManualCOMPLETE!Control-ESCAPE to enable.Do NOT H}use BASI45C OFF inSpartaDOS, or you will CRASHABORT Error Manual installationERROR.MAN not foundCan't open destinatiI}onPress ESCAPE twice andRETURN to abort.What drive is ERROR.MAN on ? [1] Unexpected error on openof ERROR Manual file.J}Unexpected e56rror on READof ERROR Manual file.1 D1:ERROR.MAN E74 q7l4 q7`)64 q7`1)6K}q5 q76 ,76#5 q7`ɛ 19Ѝ)6 B VBJ(D6E V D5 q7L;6 ӢBDEHL}I V5 q767 B V` B V    4 q7)`DEHIBLVS:H` B V`BBM}D7EhK)I JLVDEI IH BLV xR SH X`0:AOK,Error Manual,by MatN}*Rat?:Error undefH ɜhLHHH ӥTWL9ЩѠѱɛ:ЩL ЩѠO}ɛ [8 X' X')hhhhh@66ЩѠѱɛ:ЩL ЩѠ>2:NOT enuf RAM for next LINE or DIM3:VALUE ERR; # out of expected range4:TOO Many Variables; 128 MAX5:STRING Length ErQ}ror; bad index6:OUT of DATA; READ past end7:NUMBR>32767 for LINE # or 'INT'8:INPUT stmnt Error; # expected 9:DIM ErrorR}; too BIG or re-DIM 10:ARGUMENT Stack Overflow 11:FLOATING Point ERR;# too big/small 12:LINE # referenced NOT FOUND 13:NES}XT with NO previous FOR14:LINE Too Long; MAX length=12015:GOSUB or FOR Line Deleted16:RETURN found with NO GOSUB firstT}17:'ERROR-' LINE found during RUN18:BAD String Char for VAL func19:LOAD Program Too Long20:BAD Device #; #'s 1-7 onlyU}21:LOAD File Error;NOT SAVE format128:BREAK Key Abort during I/O129:IOCB Error;file already OPEN130:NONEXISTANT DeviceV};?FILENAME131:IOCB Write Only;cant READ it132:INVALID Hndlr Cmd;?XIO or IOCB133:DEVICE or File not OPEN134:BAD IOCB #W}; 1-7 only in BASIC135:IOCB Read Only ERR;cant write136:END OF FILE137:TRUNCATED Record;?INPUT line138:DEVICE TimeoutX};?UNIT or ?DEV #139:DEVICE NAK;?I/O cmd or ?cables140:LOST data on serial I/O bus141:CURSOR Out of Range;?GR Mode142:Y}SERIAL Data Overrun;?too fast143:SERIAL Bus Data Frame CKSM ERR144:DEVICE Done;valid cmd ?response145:INVALID GR Mode cZ}ommand146:FUNCTION Not Implemented147:NOT enuf RAM for GR Mode148:UNRECOGNIZED disk format Sparta150:DIRECTORY not fo[}und-Sparta151:FILE Exists-Sparta152:NOT binary file-Sparta154:LOADER-SYMBOL not defined-Sparta158:OUT of memory Spart\}a160:DRIVE # ERR;?not in system161:TOO many OPEN FILES;?buffers162:DISK Full;XIO#254=format new163:FATAL System I/O E]}RR;?bad DOS164:FILE # Mismatch;?POINT or file165:INVALID FILENAME; ?len ?chars166:POINT Data Length ERR; 125 MAX167:F^}ILE LOCKED;XIO#36-unlock168:INVALID Device Command169:DISK DIR FULL;XIO#254=format170:FILE Not Found;?FILENAME171:POI_}NT Invalid; ?FILE update172:ILLEGAL Append to DOS I file173:BAD sectors during FORMAT255:ERROR Manual by Mat*Rat-(c) AN`}ALOG0:END OF ERROR MANUAL2:ILLEGAL Append to DOS I file173:BAD sectors during FORMAT255:ERROR Manual by Mat*Rat-(c) AN@A0$'RAMTOPMBASZEPPPPP0SHAPP1SHAPP2SHAPP3SHAPMOVEb} $$******c}************************$$* FASTMOVE V.1.01 *$$* by John W. Little *$$* d} *$$* COPYRIGHT 1989 *$$* BY ANALOG COMPUTING *$$****************************** e}**INTRO SCREENS**;@(,;Ar, +@-@e$(@ FASTMOVE /(f}@M(@ by john littlea-A e (W +@-@A(@AFTER PLAYERS APPEAg}RL(@W(@<<<FOLLOWING SPECIAL CHARACTERS ARE [CNTRL][T],[CNTRL][U]F^%(@ml routine will loadF(q}B%DOS SYSB*)DUP SYSBSCLOCK BASBaqDOUBLE6 BASBtERRMAN M65B FERRMAN OBJBPERROR MANBPaFASTMOVEBASBrFASTMOVEM65,SKULL BAS STRING1 STRING2 TXCRUNCHBAS@in about  secondsZ-A0^ HJ''**MAKE ROOM FOR P/M AND ROUTINE**LP56-F:A,&r}A&@56-F:A,Z +@d+6-%@BBy+6-$AVnkkSTRING DATA 104,104,133,209,104,s}133,208,104,104,133,207,160,0,152,170,145,208,200,208,251,230,209,232xDATA 228,207,208,244,967767@<@(,.t}hhhhhϠ`=6-?:C:,<A6<@,=6-?:C:,<$AV<@,**400/800 OR XL/XE?**u}A1=XL/XE**P/M INFO**B2w@A#@%%AY@4v}%@%@KA@8'AAQ9A@UKAA**SET-UP FOR ML ROUTw}INE**KB2V'B2W9B2XKB2YKAP@0'AQA x}9AH@PKAIA|AD@'AEA9AFA5KAGAU_-y}@xB2H%F:AD%,| KAV@'AW@9AX@ KAY@ ]Az}@'A9AKA@]A @?A*ATF:AP,?A{}UF:AQ,%%A+F:AQ,&F:AP,,A@'A@'A@|}**SET-UP P/M AREA** ;6-%A$6-%AV-6-%AV;6-%AV1#-%@H%@H%@ '"-}}1 "1#-%@H%@H%@ '"-1 ,1#-%@H%@H%@'"-1 61#-%@H~}%@H%@'"-1 8:))**SET-UP PLAYER LOCATION POINTERS**<@U$A7P:+%@H,'AV,UA}6%@H&+F:A7,$AV,&@JU$A9P:+%@H,'AV,UA8%@H&+F:A9,$AV,&@}TU$AAP:+%@H,'AV,UA@%@H&+F:AA,$AV,&@^U$ACP:+%@H,'AV,}UAB%@H&+F:AC,$AV,&@`b**SET-UP PLAYER SHAPES**dh1#-%A%A%@y}'"-1 r1#-%AW%AW%@y'"-1 |1#-%@%@%@q'"-1 1#-&A}U&AU%@q'"-1  **SHAPE-FINDING POINTERS**d6-Aa7-%A%A%@p}@R&P:'AV,$AV`6-%@d `6-Ai7-%AW%AW%@p@R&P:'AV},$AV`6-%@ `6-Aw7-%@%@%@c@ R&P:'AV,$AV`6-%@} `6-A7-&AU&AU%@c@ R&P:'AV,$AV`6-%@ $$A}P:+%A,'AV,%%**READ IN DATA FOR ML ROUTINE** B **START ML ROUTINE**}6-?:C:, 0,16,16,16,16,146,84,56,16H0,1},2,4,8,144,160,192,240R0,128,64,32,16,9,5,3,15\0,16,32,64,255,64,32,16,0f0,8,4,2,255,2,4,8,0} #B ` }-}-@Ar")67<,.>:,- }A"6@>(%ERROR IN CODE! CHECK DATA STATEMENTS!A(}$<}KK104,104,}170,104,168,169,7,32,92,228,96,216,169,0,141,17,6,168,173,252F}DD2,201,31,208,7,169,1,141,74,6,208,42,201,30,208,7,169,2,14}1,74P}DD6,208,31,201,26,208,7,169,3,141,74,6,208,20,201,24,208,7,169,4Z}BB141,74,6,208,9,201,29,208,5,169,5,141,74,6,173,}18,6,141,14,6d}DD173,19,6,141,15,6,192,1,208,8,173,76,6,240,13,136,240,10,192,3n}GG208,27,173,77,6,240,1,136,173,69,6,240},16,173,14,6,56,233,128,141x}BB14,6,24,109,62,6,141,15,6,173,75,6,240,4,192,2,176,7,185,120}DD2,201,15,208,5,185,65,6,24}0,106,141,24,6,172,17,6,185,20,6,133}DD205,185,70,6,240,8,141,16,6,208,9,24,144,156,173,74,6,141,16,6}II152,24,109,17,6},141,83,6,133,203,169,6,133,204,160,0,177,203,141,81}HH6,200,177,203,141,82,6,162,0,173,24,6,201,14,240,43,232,201,10,240}}JJ38,232,201,6,240,33,232,201,13,240,28,232,201,9,240,23,232,201,5,240}JJ18,232,201,11,240,13,232,201,7,240,8,208,3,24,}144,171,24,144,125,172}CC17,6,208,24,189,25,6,240,31,205,58,6,240,26,141,58,6,141,84,6}DD173,57,6,141,85,6,208,102,192,}1,208,27,189,33,6,240,3,205,59,6}EE240,125,141,59,6,141,84,6,173,57,6,56,233,1,141,85,6,208,71,192}DD2,208,30,189,41,6,}240,99,205,60,6,240,94,141,60,6,141,84,6,173}DD57,6,56,233,2,141,85,6,208,40,24,144,156,192,3,208,70,189,49,6}DD240,65,}205,61,6,240,60,141,61,6,141,84,6,173,57,6,56,233,3,141}GG85,6,208,6,24,144,54,24,144,216,160,0,200,173,84,6,133,203,173,8}5~II6,133,204,177,203,141,86,6,173,81,6,133,203,173,82,6,133,204,173,86~LL6,145,203,196,205,208,221,224,3,144,24,224,6,}144,102,240,103,224,7,240~FF102,238,17,6,172,17,6,204,80,6,208,191,76,98,228,173,81,6,205,14"~HH6,240,83,162,0,160,1,173},81,6,133,203,173,82,6,133,204,177,203,136,~KK145,203,196,205,200,200,144,245,206,81,6,160,0,173,83,6,133,203,169,66~JJ13}3,204,173,81,6,145,203,205,14,6,240,34,232,236,16,6,208,203,172,17@~HH6,173,24,6,201,10,240,12,201,6,240,11,208,163,24,144,}160,24,144,89J~JJ24,144,82,24,144,81,173,64,6,240,146,164,205,173,81,6,133,203,173,82T~II6,133,204,177,203,170,169,0,145,}203,173,81,6,24,109,62,6,56,229,205^~LL141,81,6,133,203,138,145,203,136,208,16,173,83,6,133,203,169,6,133,204h~GG173,81,6},145,203,208,183,173,81,6,56,237,62,6,24,101,205,141,81,6r~JJ208,187,24,144,165,144,85,144,86,173,81,6,24,101,205,205,15,6,}240,78|~MM162,0,164,205,173,81,6,133,203,173,82,6,133,204,177,203,200,145,203,136~GG136,16,247,238,81,6,160,0,173,83,6,1}33,203,169,6,133,204,173,81,6~JJ145,203,24,101,205,205,15,6,240,28,232,236,16,6,208,202,172,17,6,173~GG24,6,201,9,240,9}5,201,5,240,88,208,166,24,144,86,24,144,80,173,64~KK6,240,155,164,205,173,81,6,133,203,173,82,6,133,204,177,203,170,169,0}~JJ145,203,173,81,6,56,237,62,6,24,101,205,141,81,6,133,203,138,145,203~LL136,208,16,173,83,6,133,203,169,6,133,204,173,}81,6,145,203,208,187,173~GG81,6,24,109,62,6,56,229,205,141,81,6,208,187,169,1,208,168,24,144~DD104,162,0,172,17,6,192,1},208,15,173,76,6,240,36,136,185,8,6,24~EE109,78,6,208,17,192,3,208,22,173,77,6,240,17,136,185,8,6,24,109~CC79,6,200,153},8,6,153,0,208,208,199,185,8,6,205,12,6,208,8,173~CC63,6,240,186,173,13,6,56,233,1,153,8,6,153,0,208,192,0,208,31~AA173},76,6,240,59,185,8,6,24,105,1,205,13,6,208,48,185,8,6,56~GG237,78,6,208,33,24,144,44,24,144,151,192,2,208,29,173,77,6,240,}24@@185,8,6,24,105,1,205,13,6,208,13,185,8,6,56,237,79,6,153,8GG6,153,0,208,232,236,16,6,208,214,240,166,162,0,172,17},6,192,1,208DD15,173,76,6,240,73,136,185,8,6,24,109,78,6,208,17,192,3,208,24&CC173,77,6,240,54,136,185,8,6,24,109,79,6},200,153,8,6,153,0,2080DD169,0,240,202,192,0,208,14,173,76,6,240,26,185,8,6,24,109,78,6:CC208,12,173,77,6,240,12,185,8,}6,24,109,79,6,205,13,6,240,8,185DAA8,6,205,13,6,208,8,173,63,6,240,154,173,12,6,24,105,1,153,8N116,153,0,208,232,236,16},6,208,143,240,134,-1D:FAST1NEW.BAS~EE144,104,162,0,172,17,6,192,1,208,15,173,76,6,240,36,136,185,8,6~DD24,109},78,6,208,17,192,3,208,22,173,77,6,240,17,136,185,8,6,24~CC109,79,6,200,153,8,6,153,0,208,208,20,185,8,6,205,12,6,208,8~}DD173,63,6,240,187,173,13,6,56,233,1,153,8,6,153,0,208,192,0,208~AA31,173,76,6,240,59,185,8,6,24,105,1,205,13,6,208,48,18}5,8,6~GG56,237,78,6,208,33,24,144,44,24,144,151,192,2,208,29,173,77,6,240~AA24,185,8,6,24,105,1,205,13,6,208,13,185,8,6},56,237,79,6,153~EE8,6,153,0,208,232,236,16,6,208,214,240,166,162,0,172,17,6,192,1~EE208,15,173,76,6,240,73,136,185,8,6},24,109,78,6,208,17,192,3,208~BB24,173,77,6,240,54,136,185,8,6,24,109,79,6,200,153,8,6,153,0~FF208,169,0,240,202,192,0,}208,14,173,76,6,240,26,185,8,6,24,109,78~AA6,208,12,173,77,6,240,12,185,8,6,24,109,79,6,205,13,6,240,8~CC185,8,6,205,13},6,208,8,173,63,6,240,154,173,12,6,24,105,1,153338,6,153,0,208,232,236,16,6,208,143,240,134,-1 D:MLR.LST,6,205,13t7EIdX;FASTMOVE V1.01 BY J.LITTLEiX;COPYRIGHT 1989jX;BY ANALOG COMPUTINGnX;***************x#X;MOVES ALL 4 PLAY!}ERS DURING VBIX;WITH OR WITHOUT JOYSTICKX;*************** X;*FAST X;*SMOOTHX;*RELOCATABLE$X;*VARIABLE SPEED FO!}R EACH PLAYERX;***************X;CHANGES SHAPES OF PLAYERS#X;TO MATCH DIRECTION OF MOVEMENTX;***************$X;OP!}TIONAL HORIZONTAL OR VERTICALX;X;***************%X;DOUBLE OR SINGLE LINE RESOLUTION"X;***************,"X;ALL PARAM!}ETERS POKED IN BASIC6X;***************@X;PLAYERS 0,1 OR 2,3 MAY BEJ!X;COMBINED TO MAKE MULTI-COLORO X;PLAYERSTX;*****!}**********^%X;WORKS WITH 400/800 OR XL/XE OS'ShX;***************r|X;****************X;* OS REGISTERS *X;***!}*************HPOS0;;P0 HORZ POSITIONSTICKx;;P0 JOYSTICKX;*************X;* ZERO PAGE *X;**!}***********PAGE0;;TEMPLENGTH;;CURRENT PLAYER:DX;**********************NX;* PAGE SIX CONSTANTS *XX;!}**********************bg%X;POINTERS TO ADDRESSES OF PLAYERSlP0;;PLAYER0vP1;;PLAYER1P2;;PLAYER2P!}3;;PLAYER3#X;HORZ POSITION PSEUDO-REGISTERSHVAR0;;PLAYER0HVAR1 ;;PLAYER1HVAR2 ;;PLAYER2HV!}AR3 ;;PLAYER3X;PLAYERS' SCREEN BOUNDARIESSCRNLEFT ;;LEFTSCRNRIGHT ;;RIGHTSCRNTOP;;TOPSCRN!}BTM;;BOTTOM"X;FOR CHANGING SPEED OF PLAYERSSPDVAR$X;FOR ROTATING PLAYERS DURING VBIPCOUNTER!}SAVETOP;;TEMP STORAGESAVEBTM;;TEMP STORAGELEN;;LENGTH OF PLYR 0LEN1;;LENGTH OF PLYR 1LEN2!};;LENGTH OF PLYR 2LEN3;;LENGTH OF PLYR 3!TEMPSTICK;;HOLD STICK VALX;X;POINTERS TO ADDRESSES FORX;DI!}RECTIONAL SHAPESP0SHAPE0;;UP SHAPEP0SHAPE1;;UP LEFT SHAPE P0SHAPE2;;UP RIGHTP0SHAPE3;;DOWN !}P0SHAPE4;;DOWN LEFT*P0SHAPE5;;DOWN RIGHT4P0SHAPE6;;LEFT>P0SHAPE7 ;;RIGHTHP1SHAPE0!;;UP SHAPER!}P1SHAPE1";;UP LEFT SHAPE\P1SHAPE2#;;UP RIGHTfP1SHAPE3$;;DOWNpP1SHAPE4%;;DOWN LEFTzP1SHAPE5&;;DOWN!} RIGHTP1SHAPE6';;LEFTP1SHAPE7(;;RIGHTP2SHAPE0);;UP SHAPEP2SHAPE1*;;UP LEFT SHAPEP2SHAPE2+;!};UP RIGHTP2SHAPE3,;;DOWNP2SHAPE4-;;DOWN LEFTP2SHAPE5.;;DOWN RIGHTP2SHAPE6/;;LEFTP2SHAPE70;!};RIGHTP3SHAPE01;;UP SHAPEP3SHAPE12;;UP LEFT SHAPEP3SHAPE23;;UP RIGHTP3SHAPE34;;DOWNP3SHAPE4!}5;;DOWN LEFTP3SHAPE56;;DOWN RIGHT$P3SHAPE67;;LEFT.P3SHAPE78;;RIGHT8X;=X;HI-BYTE OF SHAPE ADDRESSESB!}SHAPEPAGE9LX;Q%X;LO-BYTE ADDRESS OF CURRENT SHAPEVP0SHADR:;;PLAYER 0`P1SHADR;;;PLAYER 1jP2SHADR<;;PL!}AYER 2tP3SHADR=;;PLAYER 3X;X;VDIFF>;;SCRNBTM-SCRNTOPHWRAP?;;HORZ WRAP-AROUNDVWRAP@;;VERT WRA!}P-AROUND X;LOOK0A;;PLAYER0 AMILOOK1B;;PLAYER1 AMI(LOOK2C;;PLAYER2 AMI2LOOK3D;;PLAYER3 AMI<X;=!}DBLRESE;;DOUBLE-LINE RES>X;FSPDVAR0F;;SPEED PLAYER0PSPDVAR1GZSPDVAR2HdSPDVAR3InX;xCOMMON!}J;;STORE SPDVAR}XLINDK;;XL/XE OSCOMBIN01L;;COMBINE P0&P1COMBIN23M$X;HORZ DIFFERENCE BETWEEN P0 & P!}1DIFF01NDIFF23ONUMPLYRSP;;# OF PLAYERS LOCATIONQ;;OF CURRNT PLYRPOINTERS;;TO LOCATIONPS!}T;;CURRNT SHAPE ADR TEMPVX;X;"X***TO SAVE SPACE IN PAGE ZERO,$X;"LOCATION", "POINTER", AND "PS"X;ARE RO!}TATED INTO PAGE 0 AS$X;NEEDED FOR INDIRECT ADDRESSING.X;X;AFASTMOVE V1.01A =M = =B  ==!}(;;ORIGIN",76|X;INITIALIZE VBI ROUTINE7;;START ADR HIBYTE>;; 7;;LOBYTE?;;Q> \:!}X;START OF VBI ROUTINE START-Q>;;FIRST PASS...PPCOUNTER;;OF VBI?;;STICK INDEXQ;;SPEED CHANGE?X;&!}X;0#X;COMMON SPEED CHOICE FROM KEYBD:X;DONER>;;SPEED = 1?NHTWO;;IF NOT,CHECK 2XQ>;;IF SO,CHANGE...bPCOMMO!}N;;SPEEDlHLOOK;;THEN CHECK STICKv TWOR> HTHREEQ> PCOMMON HLOOK THREER> HFOURQ> PCOMMON!} HLOOK FOURR> HFIVEQ> PCOMMON HLOOK  FIVER> HLOOK Q>* PCOMMON4X;>X;H%X;---BEGINNING OF !}MOVEMENT LOOP---RX;\X;f X;-IF 2 PLAYERS ARE COMBINED,g%X;ARRANGEMENTS MUST BE MADE FIRST-pX;z!LOOKQSAVETOP;;REINST!}ATE ORIGPSCRNTOP;;SCRN TOP,BOTTOMQSAVEBTM;;IN CASE THEYPSCRNBTM;;WERE CHANGED.X;)>;;IS THIS PLAYER1?H!}CPY3;;NO,CHECK FOR P3QCOMBIN01;;P0,P1 COMBINED?FRESOL;;NO.DOUBLE RES?1;;YES,READ STICK0FRESOL;;REALLY A JMP!}CPY3)>;;IS THIS P3?HSTKCHK;;NO,GO READ STICKQCOMBIN23;;P2,P3 COMBINED?FRESOL;;NO 1;;YES,READ STICK2 X; X!};$ %X;-IF P1 OR P3 AND DOUBLE-LINE RES% X;ADJUST SCRNTOP AND SCRNBTM& X;TO COMPENSATE' !X; FOR FACT THAT PLAYERS DON'T( !X;!}START AT BEGINNING OF PAGE.-8 X;B !RESOLQDBLRES;;DBLE-LINE RES?L FSTKCHK;;NO.V QSCRNTOP;;RAISE SCRNTOP...` ;;;128 BYT!}ES SO...j S>;;UPPER AND LOWERt PSCRNTOP;;SCREEN LIMIT...~ ,;;CHECK WILL WORK. OVDIFF;; PSCRNBTM;; X; X; X;-!}CHECK PLYR#(0-4) TO SEE IF $X;CURRENT PLAYER SHOULD BE MOVED- X; STKCHKQK;;XL/XE COMPUTER? FOLDOS;;NO,400 OR 800 !})>;;YES;IF P2 OR P3, EXLOS;;SKIP STICK READ. OLDOSQSTICK8;;CHECK STICK R>;;STICK CENTERED? HSTKMOV;;NO XL!}OSQLOOK08;;CHECK AMI( FINTERMRETURN;;NO MOVE2 !STKMOVPTEMPSTICK;;SAVE STICK< X;F X;P %X;-SET LENGTH,SPEED, AND LOCATIO!}N-n %PCOUNTER;;x QLEN8;;SET LENGTH FOR PLENGTH;;CURRENT PLAYER.  QSPDVAR08;;INDIVIDUAL... FCOMSPD;;SPEED SETT!}ING... PSPDVAR;;OR COMMON SPEED. HUNCOM;;  INTERMLOOK2, DLOOK  COMSPDQCOMMON;;KEYBD SPEED PSPDVAR;;I!}NTO SPDVAR. UNCOMC;; ,;; OPCOUNTER;;INCREMENT... PPOINTER;;POINTER... PPAGE0 Q> PPAGE0" %>;;TO...,!} Q@PAGE07;;CURRENT...6 PLOCATION;;PLAYER...@ 3;;ADDRESS.J Q@PAGE07;;T PLOCATION;;DONE!^ h X;r %X;-DETERMINE DI!}RECTION OF MOVEMENTw X;AND SHAPE REQUIRED-| X; X; $>;;INDX FOR SHAPE. QTEMPSTICK;;SAVED VALUE. R>;;GOING UP? !}FSHAPE;;CHANGING ROUTINE 2 R> ;;UP LEFT? FSHAPE 2 R>;;UP RIGHT? FSHAPE 2 R> ;;DOWN? FSHAPE 2& R!}> ;;DOWN LEFT?0 FSHAPE: 2D R>;;DOWN RIGHT?N FSHAPEX 2b R> ;;LEFT?l FSHAPEv 2 R>;;RIGHT? FSHAPE HINTE!}RMRETURN  INTERMLOOK, DINTERMLOOK2  INTERMRETURN, DINTERMRETURN1  * SHAPE%PCOUNTER;;P0 CURRENT?4 !}HSHAPE1;;NO,CHECK P16 9 "X;CHECK PLYR0 SHAPE POINTER FOR: #X;ADDRESS CONTAINING SHAPE DATA.> QP0SHAPE09;;H FSSJ;;ZERO=!}NO CHANGE.R RP0SHADR;;NEW SHAPE=OLD?\ FSSJf PP0SHADR;;p PPS;;NO,CHANGE SHAPEz QSHAPEPAGE;; PPS;; HCHANGE;;!}GO GET CHANGED. SHAPE1)> HSHAPE2 QP1SHAPE09 FSSJ RP1SHADR SSJFSAMESHAPE PP1SHADR PPS QSHAPEPAGE!} ; S> PPS HCHANGESHAPE2)>$ HSHAPE3.QP2SHAPE098FSAMESHAPEB RP2SHADRLFSAMESHAPEV PP2SHADR`!}PPSjQSHAPEPAGEt;~S> PPS HCHANGEINTERMLOOK3,DINTERMLOOKSHAPE3)>HSAMESHAP!}EQP3SHAPE09FSAMESHAPE RP3SHADRFSAMESHAPE PP3SHADRPPSQSHAPEPAGE;S>  PPS HCHANGE(!}2INTERMRETURN1,< DRETURNFPINTERMLOOK1,ZDINTERMLOOK3dnCHANGE%>;;REPLACE...xLOOP3;;OLD...yQPSz !}PPAGE0{ QPS| PPAGE0Q@PAGE07;;SHAPE... PTEMP QLOCATION PPAGE0QLOCATION PPAGE0 QTEMP!}P@PAGE07;;WITH...)LENGTH;;NEW...HLOOP;;SHAPE."SAMESHAPE(>;;DIRECTION INDEXDMOVEUP;;FOR X<3(>;;FOR 2!}6DINTERMOVE;;DOWN,FINTERMLEFT;;FOR X=66(>@FINTERMRIGHTJTX;--RETURN ROUTINE;PLACED INU$X;MIDDLE OF PROGRAM!} TO FACILITATEV X;BRANCHING. RETURNS TO CHECK^#X;NEXT PLAYER OR EXITS VBI AFTER_X;LAST PLAYER--hX;rRETURN#PCOUNTER|!}%PCOUNTER;;WHO'S NEXT?)NUMPLYRS;;ALL PLAYERS?HINTERMLOOK1;;NO,GO AGAIN.!b;;RETURN FROM VBIX;X;-UPWA!}RD MOVEMENT ROUTINE-X;X; MOVEUPQLOCATION;;IS PLYR ATRSCRNTOP;;TOP OF SCRN?FUWRAP;;WRAP-AROUND?$>;;NO,I!}NIT SPDVAR UPSPEED%>;;INIT BYTE-COUNT QLOCATION PPAGE0QLOCATION PPAGE0UPMOREQ@PAGE07;;MOVE...!}1;;ONE BYTE...P@PAGE07;;UPWARD&)LENGTH;;FINISHED MOVING?03:3DDUPMORE;;NO,KEEP MOVING.N"LOCATION;;MOVE FINISH!}ED.X%>;;STORE NEW...Y QPOINTERZ PPAGE0[Q>\ PPAGE0bQLOCATION;;PLAYER...lP@PAGE07;;ADDRESS.vRSCRNTOP;!};TOP OF SCRN?FUWRAP;;YES,WRAP-AROUND? 2;;IF NOT,(SPDVAR;;CHECK SPEED ANDHUPSPEED;;MOVE AGAIN.%PCOUNTER;!};VERT MOVE DONE.QTEMPSTICK;;CHECK FORR> ;;DIAGONAL MOVEFINTERMLEFTR>FINTERMRIGHT HRETURN I"}NTERMRETURN4, DRETURN *INTERMOVE,4 DMOVEDOWN>HINTERMLEFT,RDINTERMLEFT6\fINTERMRIGHT,pDINTERMRIGH"}T6zX;X;-DETERMINE IF VERTICALX;WRAP-AROUND IS DESIRED AND#X;IMPLEMENT FOR UPWARD MOVEMENT-X;X;UWRAPQ"}VWRAP;;WRAP-AROUND?FRETURN;;NO %LENGTHULOOPQLOCATION PPAGE0QLOCATION PPAGE0X;X;ONE BYTE AT "}A TIME...!X;STORE PLAYER DATA IN XREG...X;AND ZERO OUT...X;LOCATION BEING MOVED FROM.Q@PAGE07;;>;; Q>;;"}P@PAGE07;;X;QLOCATION;;OLD LOCATION...,;;OVDIFF;;PLUS SCRN LENGTH ;;;MINUS$SLENGTH;;PLAYER LENGTH....P"}LOCATION;;= NEW LOCATION.0 PPAGE08A;;STORE DATA INBP@PAGE07;;NEW LOCATION.LV1;;MOVE FINISHED?`HULOOP2;;IF NOT,"}PREPAREjQPOINTER;;TO MOVEkPPAGE0;;NEXT BYTE.lQ>m PPAGE0tQLOCATION;;PUT NEW ADR IN~P@PAGE07;;ADR POINTER."}X;HINTERMRETURN4;;NEXT PLYR."ULOOP2QLOCATION;;NEW LOCATION ;;;MINUSSVDIFF;;SCREEN HEIGHT ,;;PLUSOL"}ENGTH;;PLAYER LENGTHPLOCATION;;=OLD LOCATION.HULOOP;;MOVE NEXT BYTE.INTERMRETURN3,DINTERMRETURN4  " } INTERMLEFT6DINTERMLEFT1 INTERMRIGHT6DINTERMRIGHT1 X;-DOWNWARD MOVEMENT ROUTINE-(X;2X;<"MO" }VEDOWNQLOCATION;;IS PLYR ATF,P OLENGTHZRSCRNBTM;;BOTTOM OF SCRN?dFDWRAP;;YES,VERT WRAP?n$>;;NO,INIT SPD INDXs" }X;x!DOWNSPEED%LENGTH;;MOVE FIRSTy QLOCATIONz PPAGE0{QLOCATION| PPAGE0 DOWNMOREQ@PAGE07;;BYTE OF..3;" };PLAYER...P@PAGE07;;DOWN.11IDOWNMORE;;GET NEXT BYTE.#LOCATION;;MOVE FINISHED.%>;;STORE NEW... QPOIN" }TER PPAGE0Q> PPAGE0QLOCATION;;PLAYER...P@PAGE07;;ADDRESS., OLENGTHRSCRNBTM;;AT SCREENBOTT"}OM?FDWRAP;;IF SO,WRAP 2;;IF NOT,"(SPDVAR;;CHECK SPEED,HDOWNSPEED;;AND MOVE AGAIN6@ %PCOUNTERJQTEMPSTICK;;"}CHECK STICKTR> ;;FOR DIAG MOVE^ FLEFThR>rFINTERMRIGHT2|JTR2HINTERMRETURN3INTERMLEFT1, DLEFT"}INTERMRIGHT1,DINTERMRIGHT2X;X;%X;-IF VERTICAL WRAP-AROUND DESIRED%X;IMPLEMENT FOR DOWNWARD MOVEMENT-X;X;"}DWRAPQVWRAP;;WRAP-AROUND?FINTERMRETURN3;;NO WRAPX;WORKS SAME AS UPWARD WRAP. %LENGTH&DLOOPQLOCATION' "}PPAGE0(QLOCATION) PPAGE00 Q@PAGE07:>DQ>N P@PAGE07X QLOCATIONb;l SVDIFFv, OLENGTH PLOCATIO"}N PPAGE0A P@PAGE071 HDLOOP2 QPOINTER PPAGE0Q> PPAGE0 QLOCATION P@PAGE07 HJTR2DLO"}OP2QLOCATION, OVDIFF;  SLENGTH PLOCATION  HDLOOP*4INTERMRETURN2Q>> HJTR2HRINTERMRIGHT2,\D"}INTERMRIGHT3fpX;zX;-MOVE LEFT ROUTINE-X;X;LEFT$>;;INIT SPEED INDEX%PCOUNTER;;INIT PLAYR INDXX;#X;"}-ARRANGE FOR COMBINED PLAYERS-X;LEFT4)>;;IS THIS PLAYER1?HCPY3L;;IF NOT,CHK P3.QCOMBIN01;;P0,P1 COMBINED?"}FLEFT1;;NO. 1;;YES.QHVAR08;;FIND PLAYER 0...,;;AND ATTACH P1...ODIFF01;;AT OFFSET.HLEFT3;;REALLY A JMP.$ "}CPY3L)>. HLEFT18 QCOMBIN23B FLEFT1L1V QHVAR08`,j ODIFF23t LEFT33~PHVAR08;;STORE P1 OR P3PHPOS08;;IN "}NEW POSITION.HINTERMRETURN2;;NEXT PLYRX;X;-IF P1 OR P3 ARE COMBINED"X;PLAYERS,THEIR LOOP ENDS HERE-X;$X;-GEN"}ERAL LEFT MOVEMENT ROUTINE-!LEFT1QHVAR08;;CHECK HORZ POSRSCRNLEFT;;IS PLYR AT EDGEHLEFT2;;NO,KEEP MOVINGQ"}HWRAP;;WRAP-AROUND?BTRFINTERMRETURN2;;NOQSCRNRIGHT;;YES,PLACE PLYR;AT RIGHT EDGE  LEFT2;;;S>;;MOVE LEFT 1"}PHVAR08;;SAVE NEW POS(PHPOS08;;SET POS REG2X;<X;F%X;-ADJUSTING P0 OR P2 POSITION FORG$X;WRAP-AROUND OF COMBINED "}PLAYER-PX;ZX;dCPY0L)>;;IS THIS P0?nHCPY2L;;NO,CHK FOR P2.xQCOMBIN01;;P0,1 COMBINED?FSPDL;;NO.QHVAR08;;"}IS PLAYER 0...,;; O>;;RSCRNRIGHT;;AT RIGHT EDGE?HSPDL;;NO.QHVAR08;;YES, MOVE P0...;;;LEFT ENOUGH...S"}DIFF01;;TO FIT P1 IN.HLEFT5;;JMPINTERMRIGHT3, DRIGHTINTERMLEFT4," DLEFT4,6@CPY2L)>;;" }IS THIS PLAYER2?J HSPDLT QCOMBIN23^ FSPDLh QHVAR08r,|O>RSCRNRIGHT HSPDL QHVAR08; SDIFF23LEF"!}T5PHVAR08 PHPOS08X;X; SPDL2(SPDVAR;;CHECK SPEEDHINTERMLEFT4;;MOVE AGAINJTRFBTR;;MOVE NEXT PLAYER""}X;-MOVE RIGHT ROUTINE-&X;0%X;-IF P1 OR P3 IS COMBINED,TACK IT1%X;ONTO P0 OR P2, THEN RETURN. THIS2X;PART OF RIG"#}HT ROUTINE IS3 X;IDENTICAL TO LEFT ROUTINE.-DX;N RIGHT$>X %PCOUNTERbRIGHT4)>l HCPY3Rv QCOMBIN01 FRIGHT1"$}1 QHVAR08, ODIFF01 HRIGHT3 CPY3R)> HCPY0R QCOMBIN23 FRIGHT11 QHVAR08, ODIFF23  RIGH"%}T33 PHVAR08  PHPOS08*Q>4FJTR>X;HX;R%X;FIND SCRNRIGHT IF COMBINED P0,P2\X;fX;pCPY0R)>;;IS THIS PLAYE"&}R0?zHCPY2R;;NO,CHK P2.QCOMBIN01;;P0,P1 COMBINED?FRIGHT1;;NO.QHVAR08;;CURRENT HPOS... ,;;PLUS...ODIFF01;;"'}P0-P1 OFFSET.HRIGHT5;;P0P1 @ SCRNRIGHTCPY2RQCOMBIN23 FRIGHT1 QHVAR08, ODIFF23X;X;-IF COMBINED PLAY"(}ER IS AT$X;SCRNRIGHT, CHECK FOR HORZ WRAP-X;RIGHT5RSCRNRIGHT FCHKWRAP$X;.%X;-UNCOMBINED PLAYER AT SCRNRIGHT?8")}X;BRIGHT1QHVAR08LRSCRNRIGHTV HRIGHT2`X;jX;tCHKWRAPQHWRAP~FJTR;;NO WRAP = RETURN QSCRNLEFTX;!X;-"*}GENERAL MOVE-RIGHT ROUTINE-X;RIGHT2,;;INC CURRENT...O>;;POSITION AND PUTPHVAR08;;NEW POSITION INPHPOS08;;"+}POSITION REGS.X;X;2(SPDVAR;;FAST ENOUGH?HRIGHT4;;NO,MOVE AGAIN. FJTR;;YES, RETURN.OSITION INPHPOS08;; fPQeeHQQDLILFRNVDRDIRITVVNNINVIISWV1N1I0I1I2I3I4I5I6I7I8I9I10I11I12I13I14I15I1&-}6I17I18I19I20I21I22I99I16IYNOKWNCSSS1WSPWPW1I25DOGNTDHNRHUPRPOILVILNOKOKLONLITDCTAQD&.}IBDJNCVCVTRCXXYDGQEWNSTOIINSSHIINFIRFOOSKHNASHKIFCHOCTFENWI&/} &0} !"&1}#$%&'()*+,-./01&2}23456789:;<=>?@A&3}BCDEFGHIJKLMNOP&4}QRSTUVWXYZ[\]^_`&5}abcdefghijklmnop&6}qrstuvwiA@'@A9B7tAE6-@&7}Q6-@Y6-%a6-&i6-&;@,;@d,;@C,;@B,;@,;@,;@,;&8}@$,;@,;@,;@c,;A,;,;,bb;@,;@,;@,;,;,;,;,;,&9};,;,;,;,;,;,;,FF;,;,;,;,;,;,;,;,;,;,;,;,;,hh;@,;&:}@,;@,;@1,;@e,;@",;@3,;@ ,;@ ,\ ;, B 6-B ,6-A&P&;}86-A&D6-A&P6-A&\6-A& 6-A56-@!'6-@I36-A%?6-A%PK6-@T&<}W6-A)c6-Ao6-@Y{6-A6-ADD6-& m@K:)A@;AVAE&=}GARYA @c @m @ A-@>(&>>>>>>>>>>>> Skull Island <<<<<<<<<<<<A$ A-&>}@>(&@&@&@&@&@&@& Skull Island &@&@&@&@&@&@A$ J6-?:C:,-H @L Q(W6-]6-c6-g DA@d!A&B}6F:Ad,"AU@ BpD ( 6-6-F:Ad,$"@`( "@9)"AT  )"AU&C}@PQM+ @2)"A')"A%)!AT* A`)!AR,*@'Q "A&*" "@'&D}6-@20"A&( $67,.,6-&0 1 @56-%%(>:,167,.>:,  #&E}"@ $$1(6-%$2+ 6-6-B:,( "'6. + 3h @`$6-?:6.7%<,B S6.7<@,W h6.7<@,49 @ -B:,@(6-%547<%,9 5   &G}6/-B:,@6-%+47<%,/ 7   9&-@6-?:C:,<,# &$;? 6-6-6-#-&H}@16-?:C:,<,5 ? @<9 @u6.7<,&-@947<,@p?U  4I6.%-@&I}E(@You are carrying Q &@ U @4HBA= 4Q6-@(}/AVAE9 @&J}= B 4X A C\ 4Y(}"6. `>>>> O.K.<6.{``{ What's next NAVA$X @\ &K}D\ 4Z(}"6.  O.K.<6.  What's next NAVAEX @\ E4%BYF( -&L}47<, $ A'( G/ +(You can't go in that direction./ KB:,"@L B:,"6. P:6.7&M}<@,*-@3@747<%,:$Q  @Z-@47<,$[  6. \>-B:&N},@#47<%,7(7<, what?:'> ]O -B:,@'47<%,H(7<,Do what to the ?K'&O}O ^  6. dA@@'A @3AY(You are lying on the lagoon of(a strang&P}e island. A sign says:ej$('WELCOME TO SKULL ISLAND'06-A<6-AB6.R6. East/West[6.EWg6-@&Q}j$s 6. $A@6!A3A @X(You are walking along what isw(known as 'Deat&R}h Beach'.6-@= 6.6-AP!6-A16. East/West:6.EW=$ 6. $A@'A &S}@N(You're lost deep within a largeh(dense rain forest.t6-AP6-AP6-@Z 6.6-A&T}P!6-A@6.North/South/East/West/ ?K6.NSEWW"AZ$ A` 6. $AA'A&U} @N(You've come across a field thato(has dozens of Palm Trees.{6-A6-# 6.6.North/&V} ? 6.N#$  6. $,A@H'A @O( You are walking on a forbiddenedt(ancient Buria&W}l Ground of past6-@-M(Mohandian Kings.'6-AP-6.<6.South/ ?D6.SJ6-M$; 6. $^|A&X}@!A H(You are walking amidst hundredsd(of erupting geysers.p6-A|6-Ah; 6.&Y}6. North/East#6.NE,6-H:,26-86-;$m 6. $r*&(A geyser erupted in your face.* wA@2&Z}'A @L(You've come across a clearingq(which has dozens of giaganticw6.rA#( Tote&[}m Poles./6-AP;6-A PG6-AP_6.North/East/West ?i6.NEWo6-r$ 6. $A@f'A&\} @M(You're walking aside a volcanoo(in a dried-up lava fisure.{6-A6-AQ 6.6-A&]} /6.North/South/East/ ?96.NSEB6-H:,H6-N6-Q$ 6. $,(( A lava-avalanche has buried you., &^}AA('A @I(A friendly native welcomesf(you into his village.r6-AP~6-AP6&_}-* 6.6.North/South/ ?'6.NS*$ 6. $&AAH'A @G(@You've come acr&`}ossg(a large grassy clearing.s6-A6-A6-AP6-0? 6.6-A16.North/South/East/Wes&a}t<6.NSEW?$5 6. $X(6-AP Y AbW6-A6-AP!6.66.North/South/ ??6.&b}NSH6-H:,N6-T6-W$g 6. $l,(( The lion made you his next meal., uA@8'A @L(&c}Quick sand traps surround youu(!as you step onto this shaky land.S 6.6-A!6-AP26. South/West&d};6.SWD6-H:,J6-P6-S$ 6. $+'(You've sunk into the quicksand.+ yA!A@3A&e} @X(You've come across what seemsy(to be a deserted village.N 6.6-AP!6-AP66.No&f}rth/South/ ??6.NSK6-@N$ 6. $A@6'A@29A @[(As you walk &g}apon this sand(dune, a hasty wind thrashes up.i 6.6-A!6-A-6-A96-APU6.North/So&h}uth/East/West`6.NSEWf6-i$ 6. $ A@4'A@69A @`(You've come upo&i}n an area filled(with bamboo plants. A sign![*(here says: 'Bamboo burns well'.06.<6-APJ6.West/ ?&j}R6.WX6-[$/ 6. $R{A!A@3A @X(You are walking along a large{(f&k}isure made of sharp rocks.\D 6-6.6-A '6-AP86. South/EastA6.SED$a 6. $~A@ &l}!A K("A foul stench is in the air as your(come across a dingy swamp area.~6-@rA6&m}.!6-AP-6-A P96-AE6-APd6.North/South/East/West/ ?o6.NSEWr$ 6. $rA@&n}!A G(You're at the southern edge ofl(the island. There's a stranger6-b(feeling in the ai&o}r.$6.06-A <6-AP6. North/West/ ?Y6.NW_6-b$ 6. $zA!A@3A &p}@U(Animals are all around youz(as you enter a savage jungle.] 6.6-AP!6-AP-6-A &q}D6.North/South/WestN6.NSWZ6-@]$ 6. $wAAE'A @L(You're at the only &r}section ofq(the island where you can makew6-G(something of it.'6-A-6.<6.North/ ?D6.NG$&s}) 6. $LAA('AA(9A @[(You're now swimming in thex(lagoon. Havin'&t} fun ?6-AVC 6.6.East/ ?6.E+6-@46-H:,:6-@6-C$[J(It's gone forever now!+6.XXX&u}XXX5 APGA @J$`(You just drowned. ~AA('AAH9A @Z(&v}You are now in your boat.y(It's been a tiring day.6-@= 6.6.?6. (6-H:,.6-:6-@&w}=$0,($You failed to complete your journey.0 z(You are on top of a:(very tall Palm Tree.F6-AP&x}L6.X6-@c6.Downk6.Dw6-@ z$ 6. $q(You are on top of a7(strange platform.C6-&y}A PI6.U6-@`6.Downh6.Dn6-q$A AP BA(%It's been zapped to another location!G -&z}7<,4X&67<,.>:,2 %@86.D6-APG$  B Ahn$(You are inside a native'&{}s@(hut. Someone's here.L6-AR6.]6.Easte6.Ek6-n$# 6. $FmAA 6(It'&|}s to dark to seeO(anything in here.[6-APa6.m6-@P>6.South ... and hurry!&6.S/6-H:,56-&}};6->$U AZ)%(You fell and broke your neck.) xzAA('AA(F(You are now swim&~}ming ing(the ocean. Sharks are allz( around you.O6-@6.!6-AP/6.East/ ?76.E@6-H:,F&}6-L6-O$ A-)(!You were just attacked by sharks.-  AM6-A6-AP'6-@-&}6.A6. South/West/ ?J6.SWM$ 6. $uA!A @C(You're walking dangerouslyc(th&}ru the Caves of Death.o6-Au6./ 6-6.South/ ? 6.S,"A/$ A 6. $*4XXX&}XXX'(nothing at all.*$ 6- -7<,4X (6-B#A %@:7<,,"+(a .0&}(86-%B Av< -%7<,0X.#A %@:7<,,2"< A0   $(( A .( &}AP( A .(6-% A "@$ A41(You've scored  points in &} turns4$3Coconut Shell4Piece of Paper5Piece of Wood6 Coconut7Black Pearl8 Diamond9Shar&}p Rock:Crystal Skull;Rusty Saw<Piece of Bamboo= Bag>Bunch of Nails? Machete@Piece of BarkA&} TorchBGiant VolcanoCTall Palm TreeDlot of TreesEStrange PlatformFBurial PlatformGSymbolic Po&}leHNative HutINative GirlJFlat BoulderKHungry LionL BellM NativeNStalk of BambooOLarge &}StonePSmall FireQ Hole 0-B:,,67<,.>:@:7<,,%A(,0  &"( I can't ' ' something.&  0-&}B:,,67<,.>:@:7<,,%A(,0  +'(I don't know what a '' is.+ ( -)(!I don't understand what you mean.&}- - (I don't see it here. 2 )%(You can't, you don't have it!) 7 ,(( You can't, there's no room here., Z &}(That's impossible.   4N6-  4S6-  4E6-  4W6-  4D6- $ # 6-&}&"%6-# A0 "@6-@ !@6-& A9A9A@$A@$A@V&}A@uAAAAAA AA AAPAAuAAABAB%AB%ABPABuAC AC%&} +")"@)"@+6-&@  6-&$ 6-@P622@P&@@6  9-@&}6?P22@u%@6 9$H h-@6-@:7<,,52@@C-@G Q2&}h-@6?uI *A2@# ' *$z e-@"!6-@:7<,,72@@O2@&}'@e-@:7%<%,,$ ( 2 %2@($ y-@@%6-@:7<,,;2&}@@Y2@'@@a-e u2@y   2$ K*!%@6-7(You&}r torch just went out.A A5PK A5 (A5  %@A5 R 6- (The fire went out..-@&};7<,4H67<,.XR A5   "AP  <!@*(8(7<,You have starved to death.< &} <"A8(7<,You have taken to many turns.<  ()"P:,A5  "A5  ? % &} 6-H:,   6-%  (  "   ? %  ?P*( %  6-H:,  )"A&})"A%6-AP)  $<!@ n+ "'(You are carrying to much.+ 4 -7<,4>:,&} *67<,.X4 A@A -7<,4>:,=(You already have that item.A    @A@&}6 -7<,4 6-,6-%@6 A@B 1(%Not without something to put them in.>67<,. B 7 6&}-%6-%@)")"@76-%@1#"@)"@)"@16-%@"@6-@&}< %@-$7<,4X267<,.>:,< A@! a @W-@9(@You are carrying &}?6.K &@ W6-a @  " !@ ! -!7<,4>:,A@(   &}aG+"@*A,)+"@*A,)+"@*AP,O6-&W6-&a A@0 A@1C A335(#&}It shattered into a million pieces!9 C A@!;#"@)"@)"@' 1 AE; A@8"AP*&}" AD!!"@*APA@E"@**!@ 1"@*6-&'6-&@1 A@9&}J A1 -&7<,4X467<,.>:,@ %@J A@8 )6-&@  A@S) A@!&}/ A@Q-"7<,4 /67<,.X7<,4 67<,.X? -7<,4X)67<,. 5 %@&}? A@C G -7<,4X%67<,. -6-&9 %@= G A@! !@ =  &}A33-&7<,4X367<,.= A@H C -7<,4X%67<,.1 %@96-%C A@P&}  6-& A@!="AP9(%You can't drop the bag of nails here.= $U"@*)(The &}torch went out./6-E"A)"AQ6-APU $"A@`@ A Q&} 0($It says: Girls fancy precious stonesM(Men prefer dark beads.Q B -7<,4 8(It&} reads:B A@b   P%(To lower the weir around thisL("atoll, leave a glister on a stone.P 7 @)&}!@3(You can't climb that!7 ''&@A@wA@A@AP A6-A =(%You s&}lid over the top to a new place.A >"A)"AP:(You can't climb these trees.> AP  &}6-A A*A P  "A6-@6-AP 7"@ *"A3(S&}he's not into that!7 ,@((You can't eat that !, P -7<,4>:, F($Thanks, but it tasted k&}ind of funny.P AA   3 6-&6-&@%6-@) 3 A@! @)  +'(You alrea&}dy drank the milk.+  M -7<,4 =(Thank you, it was delicious.I6-@M      )%!@)&}*+@1*@2,) 7 BP7"@*+"A)"AP,AA!!"@*"APAA0--"@&}*+"A)"A P,AA0!@6-%- --7<,4>:,)7<,4>:,AA    !&}@AA%AA AA"AA!AA#AA$AA$AA%AA$AA!AAAAFAABAA&&}AA!AA(AA0gg&@AA"AA#AA1AA3AA2AAAAAAAAAA@A&}A41-(%There's nothing interesting about it.1 +('(It's full of coconut milk.+ *&(Looks like it could &}be useful.* +'(It has something written on it.+ +'(Sounds like something's inside.+ (It's very fragile&}.  (It looks like flint. %!(It seems quite sharp.% (Seems kind of dull.  &"(It's bur&}ning brightly.& !(It isn't burning. "(It looks climable. #+'(She'd like a sign of affection.+ $&"&}(It seems quite ferocious !& %#(It has ashes around it.# &B -7<,4>(!There's a Crystal Skull in t&}here.B '! (It's quite empty.! ,(It seems quite hot. .!(They could be useful.! 1"(It's quite &}sea-worthy." 2#(It's full of nails.# 3 - AA56@ 7A 86-A&}  O*@3 P> B A:(I don't see her around here.> Q)(%(She'd like a gift fi&}rst.) RAAS " Tq  A4#A @D(That was quite pleasing. Shee(thanks you by dr&}oping a saw.q6-@UI -7<,4X%67<,.1 %@?6-%@I A@!V XQ)(!Being the sav&}age that she is, sheM(stabs you for being too kinky !Q Y6@2(You can't light that on fire !6 Z:()&}AP6(I don't see a fire around here.: [ - 7<,4AA\   ]C 6-%@9(It's now &}lit, but not for long.?6-C h@# iA j"AAyk*  AB-&7<,4&}* lS '(Suddenly, a native appears/-<7<,4XI67<,.S ABm n, %@-,7<&},4ABo%  (.6-%@% A@!rk( and takes;($the pearl. He says 'Dig a hole where](the ground &}can measure time.'k6-%@%s&67<,.X %@& A@!t_-@(-@6?P>2@u@&}T2@u@X \ _$@%*@ "@%AB57"AP3(You can't do &}that to this tree.7 =A*AP9(I don't see any trees here.=  (You already did. @ -&}7<,4 *6-%@66-@@ AB2/ +(You can't do that empty handed./ /"A67<,&}. )67<,.X/6./"AP67<,. )67<,.X/6.Z B3(!As this tree falls, so do all theP(&}rest in the dark forest.Z A@!1A-(I don't see a Stalk here.1  (You already did.  -&} 7<,4 AB9 AB10(,(The Machete's not sharp enough.0 >6-@ !6-%@.67<&},. 46.> A@!@( *&(You can't dig a hole here.* #")+"AP*!@,#  -&} 7<,4ABU4 0($You don't have anything to dig with.4 D ABa-"7<,4@(There's al&}ready one here.D C  - 7<,4X-67<,.9 %@C ABX AP A@!T+(&}#A Crystal Skull is inside the hole!96-%@C-%P7<,0XT 467<,.6-%@* %@4 A@&}!2(.(!Not until you do something first.2 $@ /AP+(You can't do that here./ &}K -7<,4  (6-@G(Your Machete is now sharp.K     @1 /AP+(&}You can't do that here./ *(&(You can't do that...Yet!!* 9@5(!You're missing an essential item.9&} =!@9(%Drop the things you don't need first.= , 6-% 6-AP(6.XXXXXX, @0*&}@4 W B0 "AP+6-%@P1(}CAVAEM @W AC0V*("Sleeping on Skull I&}sland is risky.R(#A head-hunter has just scalped you.V m-@6-?:C:,<,# 1-@=-@m(&}@"@@@ %%% CONGRATULATIONS!!! %%% @@@oA$/2$@@@G2@$@K ]A&}A(k-@@o e-@16-@:7<,,52@@Y2@$@@@a-&}e ! 2 !2@o6-?:C:,<@,)-@@Q( You have survived a journey thrui(&} Skull Island.o6-h( You are now livingH(" on Paradise Isle with the natived( girl as your wife.&}h 0K -7<,4 %67<,.1 %@5 9 A6-%K AD1   $2b A346-&=(#As the rock&} strikes the boulder, it\(lights the bamboo on fire.b6-3 6-& A@!\0 -7<,4>:,&67<,.X0 A&}DF] ^"@6-_"@6-`$ 6-&"@AE"@AE n,($The&} Skull disappears into a cloud ofP(smoke as the fence lowers here.Z APf6-@n6-%A @6-&}$` -7<,4@(#He thanks you and says: 'Dig a holeV(where the ground` AE  6-%( &}A@6&( can measure time.'#6-%&$/ (She takes it gratefully.,6-@/$L-A@%A &};2@@? I2L$'`-@6-#6-@- B96-@E6-@O BS &}] A33`$'Z-%@6 Be$ <-%@@F BeJ Z2@' 2-&} $Q'62@$@32@$?p6$. " $. 2"@0$2( Watch it! :&#&}@)*@1*@2&$:@)BQ:5 -(+7<,4)7<,4,*(+'5 BU:   :&}AP ;  AAE<# (It looks drinkable.# >  >? B`AR'-@47<&},4 ;( ? >*(>:@:7<,,%@d, &( *>0-B:,,67<,.>:@:7<,,%@,0 >.4 [_O]^*XO&}L_VK+$ B. BgP>AR B hBC"A P)+"AP*(,5AH:,$APC6-%>ViB &}6-%? @ $mB/ ( +(7<,Is anyone out there?/ PF??P:@$H:,%,BBBB&}BF6-A6.$G6-A6.$|G6-AP6.$G6-AP6.$DH6-AP&}6.$Hqu+@A+B7tA7ACAROA a-@@u(Initializing...&}IqP-@?0%A ) @-@6?0LA P JqAY0u- B-@&} D:STRING25u/ 6-C:,!(/:u--A6A)$( -?uD@&} D:STRING156-?:A<Bhd,:D BPu3+AY@4(0(File not found.3z\I6.?GETTAKDROGIVREA&}CLIEATDRIEXALOOENTKISHUGLIGRINCUTSAWDIGSHABUIGOT\6. NSEWDIHQXYZ%z@+6.!NORSOUEASWESDOWINVHELQUIXXXYYYZZZ@6. &}zpp6.fSHEPAPWOOCOCPEADIAROCSKUSAWBAMBAGNAIMACBARTORVOLTREPLAPOLHUTGIRBOULIOBELNATSTASTOFIRHOLMILSLEBOASHIYOUz6&}7A<A,.HEL|R6.XXXXXX6.6."6.(6..6.46.:6.@6.F6.L6.R6.|K 6.6.6.&}6.!6.'6.-6.36.96.?6.E6.K6. |d 6.67<,.#67<,.067<,.=67<,.J67<,&}.W67<,.d67<,.|d67<,.67<,.*67<,.767<,.D67<,. Q67<,. ^67<,.&}d6.|_67<,.67<,.+67<,.867<,.E67<,.R67<,. _67<,.|;67<,.!6. &} O.K.;6.  What's next 8|f 6. $+0AYBA@TA@fA &}AV9||@A'B7tA9AVAE?-[(@@@ skull island @@@gARy@&}|(:|s-@@(BY+-@G(%&% %&%s('  Copyright 1989   John Patuto &};|b(*( A.N.A.L.O.G. Computing<AY@4F BX@@b B<|Q-@$@e'&}6-@:7<,,5-@M2%@@Q =|W+-@:7%<%,,'@ '+&@,/ 92= G2&}W2@>| 2$B|P-@  )@S:;@AMB7tAP$|2 (*!&}.(You're slowly growing weaker.2 |OOA4PA4uABB0A4uAPBBA33| -&}  |}-@@#%6-@:7<,,;2@@Y2@'@@i-'@Pm }2@&}| 2$ } (*( A4P }& A&(Want to try again  } )"@% }@x&}B }P (} (-(B($ 堡 F P B "}:,($ &} 0 : B "}52H:,$AU@5F:B2y,B "}% D:SKULL.1 $f 0000fff3ff3$BB$BffB 08ppp888f<p|>f 0z:z*}6f|6f6f~6f6`~00```&f|ffl8Άl8,&f>`@`0 xx6*}cΪ8pp8?쪪+}DDN?ww??f8\00 pJJNȮf:X x`x`~<~~<+}0~0 ~ `8ľ|6`~6f~?SCSTMCHIPTERWSSEZDSTPOKEBKNOTKKHSTRESNKKNOTIMMUSIRNKKNSEGGE3 }EJEFGOKDADWUDRLDIFBRBTTBSSNSSNKSSSNKSSCTTUDHY3 } 3 }@ !"#$3 }%&'()*+,-./01233 }456789:;<=>?@ABC3}DEFGHIJKLMNOPQRS3}TUVWXTX C R U N C H E R))COPYRIGHT (C) 1989 ANALOG COMPUTINGBY FRANK 3}MARTONE 1/23/89y +@-@G(@A.N.A.L.O.G PRESENTS YA@e6-o 3}Ay A0 A+@%@90@@^0@H:,$@@ j6-@v3}6-6-@06-A6-@6-@ 6-kAV'AV#6-@/6-@;6-@#3}G6-S6-@_6-@k6-@%%6-F:@,%AV$F:@,-@@"#-3}E(@[2@}2 6-@ -@+63}-P:H:,$@,M6-P:H:,$@ ,%@S-b(@2@0@@ A-3}@ =2A  -@+6-P:H:,$@,M6-P:H:,$@ ,%@3}S-b(@;2A@@A-@@ =2A 3}-@A-H:,$@H:,$@%@P(@jl2@@23} 36-@ 6-@'6-@36-y ,@@1/@@C,@3}@U/@@g,@@y/@@K-6(@堠堠<-3}K(@ -@@;2$@@? a2s-@3}@(@+6-@vV%6-F:@,%AV$F:@,7-@ @L(@P:, V AAW3}6-R:,!6-T:,36-%%@ $EA @W@w#"*"@# A Q^-@3}@"(@4-@@A(@^0@F:B7p,@ 1!}"@5#-@3}@@-6@@@g2O:,%@5@@k o }6-%AP#W%2@3 }36-&?PA6-%@M @W Ap/Z"AG,-@6@H2@@3!}L Z6-%A0\"@Y,-@6@J2$@@N \6-%AP1b"3"}A,-@p@6@P2$@@@T b6-%A2%%@ $3GA 3#}!!@9%%@ $G6-&@45 @'%%@ $56-%@55 @3$}'%%@ $56-%@65!@"'%%@ $56-&@7* H:,$@ @* 3%}A94*H:,$@ @*!B4 AP:4*H:,$@ @*!B4 A<;%23&}1"@E; A = "*" A> "*" A? "*" A@$!B3'}$AF:B7p,A,"!B*F:B7p,"@D, AP!@6-@ QA 'A 3(}@>H:,$ @n-H:,$@H:,$@%@}(@-2AU@@3)}R @ c--MAGIC STAR APPEARS!--dB3-H:,$@H:,$@%@B(@#e-@3*}@ ;2$@@@_2@$@@@sA$@2@@3+}@A fLA)-@E2I L$,w -(@+53,}-@@6@I-@@%M a0@w2@-!2@%@@3-}% ?0@@a22@.-@@)3.}%%@ $=-@@0A c2@@g %%@ $6-@ 6-@3/}/7-@327 06-&@1" AP2P -@@6?030}62@@L2@@P 67-@327 7B -(@31} --(@ 3-B(@ 8e6-@6-@'6-@36-@?6-@K6-@e032}@@@$g +@A@+6-@76-@C6-@O6-@[6-g6-33}@D-@@6(@D6-%@&-@ @&(@0-@34}@ S -@6@<2@@HAL P S$ ROBOT INTELLIGENCE ROUTIN35}E!6-%%@ $!6-@X112@ @@ %  *"6-&@% A) % 36}!*"6-%@% A) #  6-&@#6-@X !6-%@%%@ $$&!6-37}%%@ $!6-@X+112@@@-#  6-&@#6-@X. !6-%38}@/  *"6-&@0 !*"6-%@1%%@ $:$D!6-%%@ $!6-@XI139}12@@@K#  6-&@#6-@XL !6-%@M  *"6-&@3:}N !*"6-%@O%%@ $S$--CHARACTER SET--$$6-+F:A,&@,$AV.3;}-A*%F:BsD%,.  #A" $1-@"-%$@%1 3<} A0K--REDEFINED CHARACTERS--L""10,20,62,127,93,73,127,99,62V##11,20,62,127,93,73,127,119,62[%%12,20,62,3=}127,127,127,127,127,62`4,0,0,4,0,16,8,64,0e5,1,66,0,34,8,64,20,128j6,0,0,4,80,8,20,0,0t2,255,0,255,0,255,3>}0,255,0w%%58,60,126,231,255,189,189,24,36z""27,56,16,186,238,186,16,56,0{55,0,16,40,84,40,16,0,0} 63,7,5,7,56,3?}40,184,128,128~42,16,68,0,146,0,68,16,0!!3,146,84,16,238,16,84,146,026,0,0,0,0,0,0,1,328,0,0,0,0,0,0,1283@},19229,7,7,7,15,15,15,15,7""30,255,156,8,8,207,8,156,255((31,224,224,112,112,112,112,240,22432,7,3,7,24,43A}8,24,4,0##61,189,195,255,126,60,24,24,0""62,224,192,224,24,12,24,32,049,0,0,0,255,0,255,0,0##8,170,77,170,73B}7,170,77,170,77 13,66,129,36,0,0,36,129,667,6,13,14,8,68,66,34,281,0,0,0,0,0,0,0,01,44,56,66,3,2,4,0,93C}1,14,16,66,4,2,4,4,51,44,55,68,0,0,0,1,61,14,15,18,1,0,1,1,11,57,85,58,7,0,3,8,91,17,15,51,1,0,3D}1,4,41,19,19,99,9,9,9,2,41,14,16,66,4,2,4,4,51,0,0,0,0,0,0,0,01,19,19,99,9,9,9,2,41,57,85,58,7,3E}0,3,8,91,44,55,68,0,0,0,1,61,0,0,0,0,0,0,0,01,44,56,66,3,2,4,0,91,44,56,66,3,2,4,0,91,0,0,0,0,03F},0,0,01,44,56,66,3,2,4,0,91,0,0,0,0,0,0,0,01,0,0,0,0,0,0,0,01,19,19,99,9,9,9,2,41,19,19,99,9,9,3G}9,2,41,17,15,51,1,0,1,4,41,57,85,58,7,0,3,8,91,19,19,99,9,9,9,2,41,19,19,99,9,9,9,2,41,0,0,0,0,3H}0,0,0,01,0,0,0,0,0,0,0,01,44,56,66,3,2,4,0,91,0,0,0,0,0,0,0,01,19,19,99,9,9,9,2,41,19,19,99,9,93I},9,2,41,17,15,51,1,0,1,4,41,57,85,58,7,0,3,8,91,19,19,99,9,9,9,2,41,19,19,99,9,9,9,2,41,44,56,63J}6,3,2,4,0,91,0,0,0,0,0,0,0,0-1-@@-,(@-N2b-3K}@@f l-{(@ 2A@@  A @ HYPERSPACEZ 3L}-(@ ,-@@>%%@ $R-@@V Z  -(@  -@3M}6@62@T2@$@@r2@$@c@A%@y 3N}A -(@  G%6-P:H:,$@,%@G6-P:H:,$@,%@  -(@3O}  E-@@)%%@ $=-@@A E   -(@  6- @3P}  --TITLE SCREEN-- ! +@!AV'AV 9AA"'A@9A @w 6-3Q}@6-@  %2+-:(@+N-@@R X-g(@ 23R}@ @@ z6-&@"@:-@6?0X2$@3@lA3S}%@Ep z A0& A0 9A'A@9A@ 5-@@ 5(@3T} TX CRUNCHER  5-@@5(@ *  7-@7(@3U} h-@@4(@ by frank martoneF-@"h(@QQQQQQQQQQQQQQQQQQQQ 7-3V}@7(@QQQQQQQQQQQQQQQQQQQQ %-@A % A@Y+@%@)AV'AV;3W}A@MA@UY6-@/-@@/(@ 7-@7(@3X}QQQQQQQQQQQQQQQQQQQQ7-@"7(@QQQQQQQQQQQQQQQQQQQQ9-@/(@POPO w 10093Y} AI9-@/(@KENTU 2509 AI9-@/(@CIRCA 5009 AI3Z}9-@/(@MAGIC STAR # 50009 AIF-@@.(@ PRESS STARTB-@@PF 3[}F-@@.(@ press startB-@@PF 5+F:B2y,"@)T:,"5 A@03\} A@G-@!-,9/@"= G @ A@P##--JOYSTICK MOVEMENT ROUTI3]}NE--?"@6-@'6-36-?6-?"@6-@'6-36-?6-3^}?"@6-@'6-36-?6-?"@6-@'6-36-?6-3_})"@)6-&@)"@)6-%@)"@)6-%@3`})"@)6-&@6$$Q -@6@<2@P@@ N6-%@3a}Q$--GAME OVER---@@$(@0A-@6@U0@@i-@3b}@m 2@ 6-@-@@#-@<(@ @ ,-3c}@@,(@ S-@ @p32@@O2@@@S S%3d}2G2@S6-,-@@,(@ 3e}D-@@0 --@@D(@ )-@@0 )6-%@.-@@3f}.(@ k"@(#-@-9,E/@Y-@@] a 3g}k A0A+F:B2y,"@)T:,"76-A @p APbW--MUSIC--XK-@ @$3h}(@*-9(@*KA@Y|%2AU@@G2@AT@@[3i}-@@PxAH:,$@| Z #Aq]"^"AU Aq b2@@3j}l''2@&@@@q<-@@ 'A<AF:B7p, Apii121,93k}6,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,255Y%23l}G2@YA=-@!-,3m}9/@"= ! A6-A "6-%@$"@ A'-6-%@6-%?P-6-&3n}@'( A*6-%@#+@%@7AV'AV\0@H:@,$@@ v0@3o}@6-%@ @'#--BONUS SCREEN--(#V +@A@1-@@J(@ 3p}V6-)#2-@@2(@ՠԠ 5*#.-@@.(@ à+#/-@3q}@/(@ ϠԠ-#@-@A<AH:,$@%@P@ 2#v +@!AV3r}'AV3-@L(@ X6-@d6-@vAAV3#-@"7(@3s}C6-O6-@[!Bg6-@s6-@6-@4#O-@7(@3t}C!BO6-@5#.-@@#.(@ AVOID TRAPS6#-@@!@3u}7#+-@+(@ - - - -9#5 )6-F:@,%AV$F:@,56-Z#66-%%@ $$6-3v}R:,6A@[# "*" A\#4*!B*H:,$@ @4 A_#? AA!@3w}1%%@ $?6-&@d#5 @'%%@ $56-%@e#5 @'%%@ $3x}56-%@f#5!@ '%%@ $56-&@g#%%2h#"@3y} An#W@#-@@' /1A-@@W(@COUNT s#"@E A3z}x#$$AF:B7p,#h"16-P:H:,$@,%@S6-P:H:,$@,%@Y-3{}h(@#u6-%@!-,(@ I-@6@e2@@i u6-3|}#"Ac#-@@G2%@@@[A$@_ m6-%@23}}A# AP#$2-@@#2(@CONGRATULATIONS$0-@3~}@0(@ No͠BnS $-@@@D2H:,$@@@q2@H:,$3}@ @@u 6-P:H:,$@,$A%A6-%$u-@@1(@BONUS  3}S2u2@$H-@@ 4-@6@@A3}D H  $6-%@ A-+@%@AAV'AVf0@H:@,$@@ 03}@@ @"$ AP%=!-@@#=(@SORRY NO BONUS%-@0@P3}%Y -6@@@A2O:,%@@UA%@PY % %q%2@ @3}@7AAUK-@@@O q2%6-%@ A-+@%@3}AAV'AVf0@H:@,$@@ 0@@ @' AP D:TXNEW3}.BAS2(@((@ CHOMP AWAY!2 Ar9(@/(@ CLAW LICK'IN GOOD!9 Ar)(@3})(@ WAY TO GO! -@A ' AAp AAp3}WAY TO GO! -@A ' AAp AAp0w