@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 D8ue RTCLOKMOVEFROM MOVETO_ I`ENDLOOPaINCLOOPbLOOPADDcHOWMANYMX;or addT}ress|  ~Q P  X; $X;******************************* X;X;INPUT macroX;%X;Usage: INPUT IOCU}B,address,length$X;.%X;'IOCB' is the IOCB number to use8#X;'address' is a label or actualB$X; buffer address where the iV}nputLX; string is to be storedV$X;'length' is the number of bytes`$X; to be input - if missing, thenj X; length is set tW}o 255 bytestX;~ INPUT  3  AError in INPUTA $>  Q>GETREC PICCOM9 Q>4  PICBAL9X} Q>5  PICBAH9  Q> PICBLL9 Q> PICBLH9( Q>4 2 PICBLL9< Q>5 F PICBLH9PZ CIOVdY}nxX;$X;*******************************X;X;PAUSE macroX;X;Usage: PAUSE jiffiesX;X;'jiffies' is the nuZ}mber of#X;jiffies (1/60 sec) to pause, a#X;value up to 255, or an addressX; PAUSE    AError in PAUSEA[},D@SKIPPAUSE" @TIMER ,@SKIPPAUSE6Q>@PRTCLOKJ  TQ ^ P@TIMERhr Q>4 | P@TIMER\} @DELAYQRTCLOK R@TIMER H@DELAYX;$X;*******************************X;X;ADD macroX;X;]}Usage: ADD first,secondX;$X;'first' is an address of a two-X;byte number&#X;'second' is either the address0%X;of a ^}two-byte number, or a value:X;DX;first = first + secondNX;X ADD b  l AError in ADDAv  ,Q_} O> P  D@SKIPADD #  @SKIPADD,Q O P  Q   O  P  *4>`}X;H$X;*******************************RX;\X;SUBTRACT macrofX;p!X;Usage: SUBTRACT first,secondzX;$X;'first' is ana} address of a two-X;byte number#X;'second' is either the address%X;of a two-byte number, or a valueX;X;first = fb}irst - secondX;SUBTRACT    AError in SUBTRACTA  ;Q S> P $ E@SKIPSUB. " c}8 @SKIPSUBBL;VQ `S jP t Q ~ S  P X;$X;***************************d}****X;X;DPOKE macroX;X;Usage: DPOKE to,fromX;!X;'to' is a 2-byte destinationX; address %X;'from' is se}ource value (0-65535)X;X;( DPOKE 2  < AError in DPOKEAFP Q>4 ZP d Q>5 n P xX;f}$X;*******************************X;X;FOR macroX;$X;Usage: FOR label,start,stop,incX;"X;'label' is byte to g}hold index#X;'start' is initial index value X;'stop' is final index value%X;'inc' is optional step incrementX; Fh}OR  3  AError in FORA", Q>4 6P @ Q>4 J PENDLOOPT  ^Q>h PINCLOOPr| Q>4  i}PINCLOOPQ>4@LOOPSTART PLOOPADDQ>5@LOOPSTARTPLOOPADD@LOOPSTART4X;$X;******************j}*************X;X;NEXT macroX;X;Usage: NEXT labelX;&"X;'label' is byte holding index0X;: NEXT D  Nk} AError in NEXTAXb,l QINCLOOPvG@LOOPDOWNO  RENDLOOP F@RELOOPE@LOOPDONE @RELOOPP !@LOOl}PADD: @LOOPDOWNO  RENDLOOPG@LOOPDONEP !@LOOPADD: @LOOPDONE  X;*$X;**********************m}*********4X;>X;MOVE macroHX;R X;Usage: MOVE from,to,length\X;f"X;'from' is starting address ofpX; block to be mn}ovedz#X;'to' is starting address whereX; block is to be copied to#X;'length' is number of bytes to%X; be copied (vao}lue, not address)X;X;calls subroutine MOVESUBX; MOVE    AError in MOVEADPOKE MOVEFROM= p}DPOKE MOVETO= DPOKE HOWMANY=  MOVESUBE    AError in MOVEADPOKE MOVEFROM= @X;$X;*******************************X;"X;CLS (clear screen) subroutineX;CLSPRINT =CLEARSCR: r}CLEARSCR }=EOLX;$X;*******************************X; !X;sub. to move a block of dataX;called by MOVE macro  s}X;* MOVESUB4;;;find out if>QMOVETO;;moving data upHSMOVEFROM;;or down in RAMRQMOVETO\SMOVEFROMf GMOVE t}DOWNpX;zX;move to higher RAM addressX;,;;start withQMOVEFROM;;byte havingOHOWMANY;;highestPMOVEFR u}OM;;address,QMOVETOOHOWMANYPMOVETOX; X;move block with < 256 bytesX; STARTUP %HOWMAN v}Y;;if low byte of FFINISHUP;;HOWMANY=0, this $HOWMANY;;part is done$ PARTIAL1. 18 Q@MOVEFROM7B P@MOVETO7L 0V H w}PARTIAL1` X;j $X;move remainder in 1-page blockst X;~ FINISHUP "MOVEFROM "MOVETO "HOWMANY;;when high b x}yte IPAGEUP;;of HOWMANY=0 :;;then all done PAGEUP %>;;use Y as index, $>;;X as counter NEXTUP 1 Q@MOV y}EFROM7 P@MOVETO7 2 HNEXTUP , DFINISHUP( X;2 X;move to lower RAM address< X;F MOVEDOWNP QHOWMANYZ FFI z}NISHDOWNd %>n X;x $X;start with lowest address, move X;data in 1-page blocks X; NEXTDOWN Q@MOVEFROM7 P@MOVET {}O7 3 HNEXTDOWN #MOVEFROM #MOVETO "HOWMANY , DMOVEDOWN FINISHDOWN QHOWMANY FDONEDOWN X; |}" %X;finish with block of < 256 bytes, X;6 PARTIAL2@ Q@MOVEFROM7J P@MOVETO7T 3^ )HOWMANYh HPARTIAL2r DONEDOWN| }}:%X;finish with block of < 256 bytes, X;6 PARTIAL2@ Q@MOVEFROM7J P@MOVETO7T 3^ )HOWMANYh HPARTIAL2r DONEDOWN| IdX;Macro Workout ExamplenX;Karl E. WiegersxX;F=EIX;X;pull in macro definitionsX;and equatesX;>}D8:MACRO.LIBX;X;some equates we needX; TEMPSDLSTL0X;$X;*******************************X;MAIN PR}OGRAM STARTS HERE$X;*******************************X;"P,X;6$X;-------------------------------@$X;clear screen, }set screen colorsJX;ask you to enter your nameT$X;-------------------------------^X;h CLSrSETCOLOR = =|S}ETCOLOR ==POSITION =PRINT PROMPTPOSITION =INPUT =NAME= X;$X;---------------------}----------$X;go to Graphics 2 screen, changeX;two lines to Graphics 1 by!X;finding and changing display X;list$X;-}------------------------------X;GRAPHICS POKE TEMP=SDLSTLPOKE TEMP=SDLSTLQ>&%>0 P@}TEMP7:3D3N P@TEMP7XX;b$X;-------------------------------l#X;write some stuff on the screenvX;change colors of yo}ur nameX;using a loop$X;-------------------------------X;POSITION =PRINT =LINE1POSITION =}PRINT =LINE2POSITION =PRINT =NAMEPOKE COLOR0=FOR I== #COLOR0 PAUSE  NEX}T I  END!ENDX; $X;-------------------------------*X;text strings4$X;------------------------------->X;HPROMPT} APlease enter AR Ayour name:A=EOL\LINE1 Awelcome toA=EOLfLINE2 Aboot campA=EOLp NAME z EOLX;$X;-}------------------------------X;bring in subroutines$X;-------------------------------X;>D8:SUBS.LIBLX;$X;-q``CRYPTTEXTNN1NNSSNROOMLONN1N1NN2NNNNN1NNN1N1N1N1N1N1NVLOCSPCNSITEMIT}EMLOCSCFLGINVDLSCRSCRDLDLTURKILLFLIINSWCINPBRTLICNTVBBRIENNVERBNOUNOPUNLOPOPSCORITEMLOWECOVR}INFLLNROOM }} !"#$@%&'()*+@,}@-@./0123456789:;<}=>?@ABCDEFGHIJKL}MNO@P ************************** * * * Castaway V1.}2 *( * 12/20/86 *2 * by Rick Graves *< * A.N.A.L.O.G. Computing *F * } *P **************************Zd;+1(initializing, please wait...; ADn6-?:C:,6-%F6-%N6-%V6-%Y$^W6. 6-(6-%.6-66-%>6-%F6}-%N6-%T6-W$h#6.6- 6-%#$r6. 6-%$|+6. 6-%(6-}%+$#6.6-% 6-%#$)6. 6-%&6-%)$6. 6-%$'6. }6-%$6-%'$76. 6-%$6-%,6-%46-%7$76. 6-%$6-%,6-%}46-%7$6. 6-%$76. 6-%$6-%,6-%46-%7$/6. 6-%}$6-%,6-%/$6. 6-$& #AE-""68,-& %-@r"!67,.>:,% }%-@5"!67,.>:,% %-@5"!67,.>:,% @ -&"6-&B:,367$&%<$&,.<6}8,-@  -68,- &! -68,- !68,-0C #AG -@5"3AB%?67,}.>:,C :%67<,.>:A,%67<,.>:,D'67<,.>:%@@,'67<,.>:,N8+ A@%6-P:C:,'AV,86}-C:,&$AVX]67@4,.>:,'67@5,.>:,3AY?A`KAa]AY@4b 6-%l } A6pvA@:((:6-#-&,8,0 : A`26.7$&%<$, A(( .6}-2 ((Nothing.*A AAA+"@)"@)")"%)"%,*8@,"6AB}**8,"6)8,")+8,"6*",A A[Q6.GUif!usbotnjuufs!jt!ivnnjoh-!cvu!!!!!!!tpnfuijoh!jt!cmpdljoh!jut}!tjhobm/[ A < AP2-# -2<68@2,-J AD (("B!@0*}@4*@7J6-% !6- A@* 46.Xibu@ A * Ap)")")")")"@(})68,-6V6-%!6-!6-L6.$B!hvtu!pg!xjoe!cmpxt!pvu!zpvs!nbudi/V A -#!@0*@4*}@7- AA0 4LOOK)4LA4QUITAD C4YELL'6.Bbssshhhhiiiiiiii=1 A 96-%C} Ap*4RESTARTA4!!4 INVENTORY)4IA5`>#4SCORE A8 # ApH-B:,")B:," A}Ap#6.- A RC4BRIEF6-/6.Csjfg!Eftdsjqujpot/9 A C Ap\G4VERBOSE6-36.Wfscptf}!Eftdsjqujpot/= A G Apf4SAVEAB`p4RESTOREACPz6-?:C:,O:8,,*8},6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf=:"@'*"*:6.Uif!cbdl!epps!jt!bmsfbez!pqfo/?"@'*"*(*}6-?6.Uif!cbdl!epps!jt!opx!pqfo/A"@'*"*(*(A6.!Uif!cbdl!epps!jt!tfdvsfmz!mpdlfe/C""@'**+}8,"6)8,",C6.Uif!qbofm!jt!bmsfbez!pqfo/C""@1*+8,"6)8,",*C6.Uif!ejbsz!jt!bmsfbez!pqfo/I#"@1}*+8,"6)8,",*()6-I6.Zpv!pqfo!uif!npmez!ejbsz/3#"@'*(*+8,"6)8,",)6-3 A  A }6-% Ap* 6.Uif!qbofm!jt!opx!pqfo/* A6.Zpv!dbo(u!dmptf!uibu=(>O:8,,*8,6*8,6>}6.Zpv!dbo(u!tff!uibu!ifsf=2="@'*"*(=6. Uif!cbdl!epps!jt!bmsfbez!dmptfe/<>"@'*"*6->6.U}if!cbdl!epps!jt!opx!dmptfe/FF#"@1*+8,"6)8,",*(F6.Uif!ejbsz!jt!bmsfbez!dmptfe/PI""@1*+8,"6)8},",*(6-I6.Zpv!dmptf!uif!npmez!ejbsz/Z++"@'*(*+8,"6)8,",AdG""@'**+8,"6)8,",(6}-G6.Uif!qbofm!jt!opx!dmptfe/n A 6-% Apx0&6.Uif!qbofm!jt!bmsfbez!dmptfe/0 A6.Zp}v!dbo(u!mpdl!uibu=>O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf=E"@'*"*(*8,"6E6. Uif!cbdl}!epps!jt!bmsfbez!mpdlfe/F"@'*"**8,"6#6-F6.Uif!cbdl!epps!jt!opx!mpdlfe/:"@'*"*8,6:6}.Zpv!epo(u!ibwf!boz!lfzt/ A 6-% Ap 6.Zpv!dbo(u!vompdl!uibu=>O:8,,*8,6*8,6>6}.Zpv!dbo(u!tff!uibu!ifsf=F"@'*"**8,"6F6."Uif!cbdl!epps!jt!bmsfbez!vompdlfe/."@'*"*(*8,"}6$6-. A0:"@'*"*8,6:6.Zpv!epo(u!ibwf!boz!lfzt/ A 6-% Ap((6.Uif!cbdl}!epps!jt!opx!vompdlfe/' 8,68,-6-%' A  A 6.Zpv!dbo(u!xfbs!uibu="6O:8,,*8,}666.Zpv!dbo(u!tff!uibu!ifsf=,1 8,"616.Zpv!bsf!bmsfbez!xfbsjoh!uibu/6C"*8,"668,-6C6.!Zpv!opx!d}mptfmz!sftfncmf!b!hiptu/@B"*8,"668,-6B6. Zpv!bsf!opx!xfbsjoh!uif!hphhmft/J08,6*8,606.Zpv!epo}(u!ibwf!uibu=T A 6-% Ap^ 6.Zpv!dbo(u!sfnpwf!uibu=h>O:8,,*8,6*8,6>6.Zpv!dbo(u!t}ff!uibu!ifsf=r9"*8,"696.!Zpv!bsfo(u!xfbsjoh!uif!cfe!tiffu/|;"*8,"668,-6;6.Zpv!sfnpwf!uif!cfe!ti}ffu/7"*8,"676.Zpv!bsfo(u!xfbsjoh!uif!hphhmft/M"*8,"668,-6M6.+Zpv!sfnpwf!uif!hphhmft!gspn!zpvs}!!!!!!ifbe/08,6*8,606.Zpv!epo(u!ibwf!uibu= A 6-% Ap<8,"6)8,"626.Zpv!bms}fbez!ibwf!uibu=< A@Y/+"@)"@)"@,*"*(8,O6.Uif!cjse!esjwft!zpv!bxbz=Y A@?"*}"@'56.Zpv!dbo(u!ejtuvsc!uif!efbe/? A@,"*+8,"6)8,",*"6-, A"*8,*8,"6A}D"@(*8,"6:6.Uif!gjsf!cvsot!zpvs!gjohfst=D A@2"@2(6.Zpv!dbo(u!ep!uibu=2 A@8}O:8,,.6.Zpv!dbo(u!tff!uibu!ifsf=8 A@2 8,"6(6.Zpv!dbo(u!ublf!uibu=2 A@* 6--8,"} 6-* A5+  (+6.Zpv!dbo(u!dbssz!boznpsf=!#"*+8,"6)8,",*(#6-& A@+" 68,-66}8,-"6.Plbz/0 A 6-% Ap:$$6.Uijt!bddpnqmjtift!opuijoh/D''O:8,,*8,6*8,6AN} AX""6.Zpv!dbo(u!tff!uibu!ifsf=bH&"@1*"@$*8,*8,"6H6.Zpv!ibwf!bmsfbez!epof!uibu=lB'"}@1*"@$*8,"6*(8,068,-86-%B A`v4$"@&*+8,"6)8,",***6-4 Ap5%"@&}*+8,"6)8,",*(*+6-5 ApI+"@&*+8,"6@)8,",**(16-?6-%@I Ap6&"@&}*+8,"6)8,",*(*(,6-6 A A 6-% Ap_K6.AXjui!bo!joivnbo!fggpsu-!zpv!npwf!uif!!spdl-!}dmfbsjoh!uif!qbttbhf/U A _ A1'6.Zpv!uvso!uif!usbotnjuups!pgg/1 APF<6.2Uifsf!jt!op!sfbdujpo!gspn}!uif!!!!!!!!!usbotnjuups/F AP6.Zpv!epo(u!ibwf!uibu=;O:8,,*8,6*6;6.Zpv!dbo(u!tff!uibu!ifsf=}9"@)*8,"6 68,-/68@!,-9 A 0 A PY -8,"68,-E6.!Zpvs!upsdi!ibt!cffo!}fyujohvjtife/O A Y A  A  A98,"*+8,6)8,6,96.Zpv!epo(u!ibwf!uibu= 48},"6)8,"668,-*6.Plbz/4 A  A 6-% Ap ' -8,"68,-' A p*  }A p46.Tffnt!psejobsz/>>O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf=HE"*+8,"6)8,",*E6}."Uif!nbudift!bsf!ebnq!up!uif!upvdi/R?"*"@'?6.%Mzjoh!po!uif!cfe!jt!b!npmez!tlfmfupo/\`"*"@'`6.}FUif!tlfmfupo!jt!dpwfsfe!gspn!ifbe!up!!upf!xjui!uif!evtu!pg!nboz!zfbst/fC"*8,"6C6.+Uif!qjfdf!pg!gsvju!gffmt!hppe!}jo!zpvs!iboe/p0"*"@'*(06.Uif!epps!jt!dmptfe/z;"*"@'*;6.Uif!epps!jt!tuboejoh!xjef!pqfo/g}"@(*"@g6.GZpv!gffm!uif!fyusfnf!ifbu!pg!uif!gjsf!fwfo!gspn!xifsf!zpv!bsf!tuboejoh/="*+8,"6)8,",}=6.Uif!tiffu!jt!mpoh!boe!xijuf/(("@!*+8,"6)8,",A"  A"`cc6.YB!qjfdf!pg!dmpui!ibt!cffo!uj}fe!bspvoe!uif!xppefo!tublf/!Uif!upq!pg!uif!tublfjt!cmbdl-!bt!D:67@,.'jg!uif!tublf!ibt!cffo!!!!cvsofe!cfgpsf/D A} G=6./Uif!xppefo!tublf!ibt!cffo!tnpuifsfe!!!xjui!ubs/G A  6-% ApH"*8,"6H6.0Zpv!d}bo(u!ep!uibu-!bt!zpv!bsf!xfbsjoh!uif!tiffu/A"*+8,"6)8,",A6. Xbufs!ibt!gpsnfe!po!uif!hphhmft/@%"@0*+}"@)"@%,@6.Ju!tffnt!up!tqbslmf/D#"@1*+8,"6)8,",*(D6.Uif!npmez!ejbsz!jt!dmptfe/;""@}1*+8,"6)8,",*;6.Uif!ejbsz!jt!pqfo/ """*+8,"6)8,",A% """*+8,"6)8,",A% H"}@ *8,"6H6.*Mpplt!mjlf!tpnfuijoh!UBS[BO!njhiu!!!!!vtf/$ N"@*"*(8,N6..Uif!ubohmf!tffnt!up!cf!cmpdlj}oh!bo!!!!pqfojoh/. I"*"@7I6./Uif!qmbof!ibt!uif!mphp!V/T/!OBWZ!po!!!jut!tjef/8 O"@*"*(8,O6./Uif}!cjse-!qspufdujoh!jut!oftu-!esjwft!zpv!bxbz/B O"@*"*(8,O6./Uif!cjse-!qspufdujoh!jutfmg-!esjwft!!!zpv!bxbz/L} "*"*8,A% V //"*+8,"6)8,")8,"6,*8,A$` **"@&*+8,"6)8,",*A$j J "@#}*+8,"6)8,",J6.#Uif!qmbot!tffn!up!jowpmwf!b!spdlfu/t ++"@&*+8,"6)8,",*(A$p~ **"@'*+8},"6)8,",*ADP ++"@'*+8,"6)8,",*(A$`  A 6-% Ap (6.Uif!qbofm!jt!dmptfe}/( A$P 6,6."Uif!txjudi!jt!jo!uif!pgg!qptjujpo/6 A$P 5+6.!Uif!txjudi!jt!jo!uif!po!qptjujpo/5 A$P SI6}.?Po!uif!usbotnjuufs-!zpv!tff!bo!pcmpoh!txjudi!boe!b!tnbmm!qbofm/S A$P YO6.EUif!lojgf!jt!fyusfnfmz!tibsq!boe!!!!!!d}pwfsfe!xjui!esjfe!cmppetubjot/Y A$P C96./Uif!ofxtqbqfs!jt!wfsz!pme!boe!cbsfmz!!sfbebcmf/C A$P H( (In the }nest, you see:&6-0-&:8,6> H A%@ 26.7$&%<$, A(( .6-2  ((Nothing.}  6-% Ap 6.Zpv!dbo(u!uispx!uibu= >O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf= 6"*}8,"6*"*(8,$68,-,6-%6 A&0 -8,"6)8,"6#6.Uispxo/- A&(  A 6-% Ap2 0 }-8,"68,-&68,-0 A&<   A&F Y 68,-6Y6.EZpv!iju!uif!cjse!trvbsfmz!xjui!uif!!!!qjfdf!pg}!gsvju-!esjwjoh!ju!pgg=P 0 -8,"68,-&68,-0 A&`Z  d  A  An 6.Zpv!dbo(u!ep!u}ibu=x >O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf= 5"*8,"6*56.Zpv!ibwf!bmsfbez!epof!uibu= >}"@!*8,"6**$68,-468@),-6> A'p $$"@!*8,"6**(A( Y;"@!*8,"6@*}@4*!@0*@7Y6.Zpv!dbo(u!ep!uibu!ifsf/ Y;"@*8,"6@*@4*!@0*@7Y6.Zpv}!dbo(u!ep!uibu!ifsf/ I"*8,"6*( 6-@&6-I6.Uif!nbudi!cvstut!joup!gmbnf/ 3"*8,"6*36.Uif!nb}udift!bsf!upp!ebnq/  A 6-% Ap KK6.AUif!ubs!po!uif!tublf!cfhjot!up!cvso-!!qspwjejoh!zpv!xjui!b!upsdi/} 7 -8,"#68,-@)- A 7 A   A  A mm6.cUif!tublf!cfhjot!up!cvso-!cvu!bt!}uifsfjt!op!gmbnnbcmf!tvctubodf!po!ju-!uif!!gmbnf!rvjdlmz!tvctjeft/ A'` $$6.Uijt!bddpnqmjtift!opuijoh/ 7 8,}676.#Zpv!epo(u!ibwf!uif!sfrvjsfe!pckfdu/ >O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf=" $$"*"*8,}"6*8,"A(, "*8,"6*"A(6  A 6-% Ap@ /%6.Zpv!ibwf!bmsfbez!epof!uibu=/ A(p}J  8,68,-6-%T \\6.RDvuujoh!uispvhi!uif!ubohmf!pg!wjoft!!!sfwfbmt!b!nvtuz!qbttbhf!mfbejoh!up!uifopsui/^ } A  Ah 6.Zpv!dbo(u!sfbe!uibu=r >O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf=| J "@#}*+8,"6)8,",J6.#Uif!qmbot!tffn!up!dpodfso!b!spdlfu/ $"*+8,"6)8,",$ A) >#"@1*+8,"6)8,}",*(>6.Uif!ejbsz!jt!dmptfe/ **"@1*+8,"6)8,",*A00  A 6-% Ap mm6.cUifsf!jt!}pomz!pof!sfbebcmf!tupsz!mfgu!po!uif!pme!ofxtqbqfs/!Ju!ufmmt!pg!bo!!V/T/!Obwz!bjsqmbof!uibu nn67A,.[!dsbti.mboefe!!t}pnfxifsf!jo!uif!Qbdjgjd!xijmf!!!!!!!!dbsszjoh!tfdsfu!qmbot!tupmfo!gspn!uif! //67A,.Hfsnbot!evsjoh!Xpsme!Xbs!JJ/ } A) N(K(@You have opened the diary to its last page. It reads as follows:N( kk6.aEfbs!Ejbsz;!!!!!!!!!!!!!!!!}!!!!!!!!!!!!!J!bn!ofbsmz!pvu!pg!gppe/!J!ibwf!!!!!xbjufe!tp!mpoh!up!cf! nn67@,.[sftdvfe/!Xijmf!!!mppljoh!gps!gppe!po }!uif!opsui!foe!pg!!uif!jtmboe-!J!ejtdpwfsfe!b!usjcf!pg! H:67A,.'!!obujwft/!Xifo!uifz!tbx!nf!uifz!bmnptuD AH }( jj6.`kvnqfe!pvu!pg!uifjs!tljot/!J!uijol!!!!uifz!njhiu!cf!tvqfstujujpvt!ps!!!!!!!!tpnfuijoh/!J!cbsfmz! tt67@,. }aftdbqfe/!J!dbo(u!!gjoe!boz!gppe/!J(n!tmpxmz!mptjoh!!!!!!ipqf/!J!ipqf!J!dbo!tvswjwf/!!!!!!!!!!!!!! 2267A,.!!!!!!M }u/!Kpio!Tnjui-!V/T/!OBWZ # A(6-%# Ap& 6.Zpv!dbo(u!ep!uibu=0 98@',696.Zpv!epo(u!ib }wf!uif!qspqfs!uppm/: >O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf=D O"@2*8@%,"6O6.+Uif!hspv}oe!jt!opu!tvjubcmf!gps!ejhhjohifsf/N V5"@2*8@%,"6*"@0*8@),6V6.Ju(t!upp!ebsl!up!ejh!ifsf/X I}5"@2*8@%,"6*"@0*8@),"6I6. Epo(u!cpuifs/b R0"@"*8@%,"6*8@),"6*8,R6.Z}pv!ibwf!bmsfbez!epof!uibu=l D1"@"*8@%,"6*8@),"6*(8,:68,-D A2v  A 6-% Ap} c 6-%N6.O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf= 7%"*8@(,"6*8,"6*(8,}-6-%7 A2 D""*8,"6*8@(,"6*(D6.Zpv!ibwf!bmsfbez!epof!uibu= ))"*8,"6*8@(,"6*A2}  A 6-% Ap G 68,-6-=6.$Uif!nbudift!bsf!opx!dpngpsubcmz!esz/G A2p 6.Zpv!dbo(u!ep}!uibu= >O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf= ?"@!*8,"6*"*?6.Zpv!ibwf!bmsfbez!epof}!uibu= O"@!*8,"6*"*(*6-@O6.Uif!tublf!jt!dpwfsfe!xjui!ubs/  A 6-% Ap 6.}Zpv!dbo(u!ep!uibu= E"*(8,E6./Uif!cjse-!qspufdujoh!jut!oftu-!esjwft!zpv!bxbz= >O:8,,*8,6*8,6>6.}Zpv!dbo(u!tff!uibu!ifsf=* 5"*8,"6*56.Zpv!ibwf!bmsfbez!epof!uibu=4 A"*8,"6**8,"6!6-+68,-676}.Plbz/A A4 > O:8,,*8,6*8,6>6.Zpv!dbo(u!tff!uibu!ifsf= ["@(*"[6.AOp!nbuufs!xibu!zpv!ep-!uif!gjs}f!!!!!!!sfgvtft!up!cf!fyujohvjtife/ 0 "*6-06.Zpv!tovgg!pvu!uif!nbudi/ <"@)*8,"6 68,-068@!},-6<6.Plbz/ - -8,"#68,-@!- A5    A 6-% Ap !!6.Zpv!dbo(u!sjef}!po!uibu= ;8,*8,6*8,6;6.Zpv!dbo(u!tff!uibu!ifsf= "@ *8,"6A9  A 6-% A}p (( You have: 1 6--#8,6*8,6' 1 A6 6.7$&%<$, A$ 8,"6$67 },. (being worn) ( 6- ((Nothing.$ 6-% Ap.oo6.eZpv!ibwf!tvqsjtfe!b!usjcf!pg!tbwbh!}ft/!Uifz!cfhjo!up!dibshf!upxbse!zpv-!cvu!!po!tffjoh!uif!xijuf!tiffu8^^67A,.K!zpv!bsf!!!!!xfbsjoh-!uifz!uijol!zpv!bs"}f!b!hiptu-!!boe!gmff!joup!uif!csvti/B A 6-%68,-L$V6"*(8, 6. D:ROOM.13A,6-@6 A7#}`67,.=:&,j("@1*(8,*8,"6(67,.Bt9.+!@0*@4*8,6,)+"*8,,967,.A~"*$}8,67,.A("@0*8@),"6(67,.A"@767,. ,"@0*8@),6,68@",-%}?#"@0*8@),"6*(8,,68,-46-%?67,.A-"@0*8@),"6-68@",-64LOOK)4&}LA7A8  A $("A(6.Nbtufs!Bewfouvsfs/* A'}*6.Bewbodfe!Bewfouvsfs/. @p.6.Joufsnfejbuf!Bewfouvsfs/ + @@+6.Cfhjoojoh!Bewfouvsfs/( (}@ (6.Opwjdf!Bewfouvsfs/[(2( You have  points out of a possible[(100, in  turns, which gives you()} A2( the rank of $<ii6._Xjui!b!tvshf!pg!besfobmjo!boe!b!!!!!!!gsjhiufojoh!zfmm-!zpv!hsbc!uif!mpoh!!!wjo*}f!boe!txjoh!up!bF 67@,. !ofbscz!usff/P "6- A9@Z "6-d (8,68,-6-%n! 68+},-6 A ! AxU A6-F:@,+6-F:@,7ARI@AU@3 -3(% ,} R - (-@$.( /:@F@RAR@-}@$'('( *** You are dead! *** A8 0(0(%-------------------------------------.}:6(-Would you like to restart, restore, or quit:4RESTARTA!4RESTORE6-! ACP4QU/}ITAB@ A@05(5(*The current finally takes its toll on you. A@G=6.3Zpv!ublf!b!effq!csfbui-!bo0}e!ejwf!!!!!!voefsxbufs///G A  8,"66-$"E 6-56.!Zpvs!nbudi!ibt!cffo!fyujohvjtife/;6-E A1} ,Z8@),"6"68@),-268@!,-6Z6.!Zpvs!upsdi!ibt!cffo!fyujohvjtife/66 -8,"@))682},-@!3 A 6$@   $J880N*0S*0E*0W*0D*0U*0NEAAT AB^U0SW*0SE*03}NWA6. J!epo(u!voefstuboe!uibu!dpnnboe/K A U Aph$rdZ6.PZpv!ibwf!tvddffefe!jo!tjhobmmjoh!b!!!!tijq!pggt4}ipsf/!Ju!tfoet!b!mjgfcpbu!gpszpv/d A |1(1(&******* You have been rescued! ******* 6-% A8 +(!(-5}-- end of session ---+ AP ABP((Saving Game...//@@D:CASTAWAY.DAT 6.6},33(@(@ -& 8,  -(7}8,  -(8, ;@(>:A%,(1(Save Complete.; A "("(Restoring Saved Game..8}.//@@D:CASTAWAY.DAT""! -&68,-! & -9}68,- 0 -68,- :D@(>:A%,(4(Restore Complete.:6-D A DU:}F:A,"Ap%(>:AS,U(+You don't have a save file on this disk.I6F:A,"Ag%(>:AS,6( Loc;}ked File!NAF:A,"@(A(!I don't understand that sentence.S4F:A,"Ab%(>:AS,4( Disk Full<}!X AbND6.6Tpnf!cbuufsjft!ibwf!cffo!jotfsufe!joupuif!usbotnjuufs/N ADpl<<6.2Uifsf!jt!opuijoh!j=}otjef!uif!sbejp!!!!!usbotnjuufs/v A 6-% Ap A8  AB@6-6-@'6-@>}36-@?6-@K6-@W6-@c6-@o6-@{6-@ 6-@6-@6-@6-?}@6-@6-@]6-@6-@'6-@36-@?6-@ G6-$Q6-$&W6-]6-@}!6-F:@,!6-F:@,PP;$,;$,;$,;A,;@0,;,;,;@w,;@5,B4;@5A},9,9,9,;,9,;@7,B6.D:ROOM.R 6-6-6-6-6"6-(6-.6-46-:6-@6-F6-LB}6-R6-jj6.`MATBEDSKEDOOSHEKNINEWTREFRUPOOTABKEYTANAIRBATGOGNESBIRTRAVINSTAHOLPLAROCSHOSWIPANFIRTORSPRDIAGROgg6.C}]OPECLOLOCUNLWEAREMGETTAKMOVPUSFLIDROEXASEALOOTHRLIGCUTSLIREADIGDRYHEADIPCOVCOATARINSPUTEXTRID$67,. 67$,. $6D}7,. AVV1,2,3,4,5,6,7,7,8,8,8,9,10,10,10,11,12,13,13,14,15,16,16,17,17,17,17,18,18,19,20ee104,104,133,204E},104,133,203,104,133,206,104,133,205,104,104,133,207,162,0,142,255,6,134,213,232]]160,0,177,203,209,205,208,8,200,192,3,2F}08,245,134,212,96,173,255,6,24,105,3,197,207,240 TT16,141,255,6,165,205,24,105,3,133,205,144,217,230,206,176,213,169,0,133G},212,96``104,104,104,141,255,6,104,133,204,104,133,203,160,0,177,203,201,32,240,8,200,204,255,6,208 ((244,160,0,132,21H}2,169,0,133,213,96*bb216,104,104,133,204,104,133,203,104,104,133,205,160,0,177,203,201,61,240,11,56,233,1,145,2034++200I},196,205,208,240,96,169,33,208,244>jjtpnf!nbudift,-1,cfe,-27,tlfmfupo,-27,epps,-27,b!cfe!tiffu,27,b!lojgf,27,bo!pme!ofxtqbJ}qfs,16,usff,-28H``b!qjfdf!pg!gsvju,28,qppm,-13,ubcmf,-18,b!ubsojtife!lfz,18,npvoe,-14,b!xsfdlfe!bjsqmbof,-37RXXtpnf!cbuK}ufsjft,37,tpnf!hphhmft,37,oftu,-19,cjse,-19,b!sbejp!usbotnjuufs,-3,wjof,-9\^^b!xppefo!tublf,34,ipmf,0,b!tfu!pg!qmbot,0,spdL}l,-31,b!svtuz!tipwfm,26,bo!pcmpoh!txjudi,-4fZZb!qbofm,-4,b!cvsojoh!gjsf,-17,b!mjhiufe!upsdi,0,tqsjoh,-11,b!npmez!ejbsz,27,M}hpsvoe,0pSS96,112,112,66,0,0,0,66,0,0,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,65,0,0D:CASTAWY1.BASz!ejbsz,27,r  -$-TEXTFLL ********************* ** Room Description *(* O} Creator *2* *<********************FP;AV,;@,ZD(>:A%,2(CP}reating Room Descriptions...DAR@dpp6.fZpv!bsf!tuboejoh!bmpoh!b!uijo!tusfudi!pg!tboe/!Xbwft!mbq!vq!up!uif!tiQ}psf-!!!dpwfsjoh!zpvs!gffu/!Qbuit!npp67A,.]fyufoe!bmpohuif!cfbdi!up!uif!opsuifbtu!boe!uif!!!!tpvuifbtu-!boe!zpv!dbo!R}tff!uif!fehft!!pg!b!x++67A,.ebsl!gpsftu!up!uif!fbtu/6.D:ROOM.1 Aoo6.eZpv!bsf!tuboejoh!bu!uif!S}fehf!pg!b!ebslgpsftu/!Ju!jt!qpttjcmf!up!foufs!uif!!!gpsftu!up!uif!fbtu-!xijmf6667A,.#!b!tboez!qbuimfbet!upxbse!uifT}!xftu/6.D:ROOM.2 App6.fZpv!bsf!tpnfxifsf!jo!uif!njetu!pg!b!!!ebsl!gpsftu/!Zpv!tffn!up!cf!mptu/!Uif!opjtfU}t!pg!gpsftu!efoj{fot!aa67A,.Nsjtf!boe!!!!gbmm!bspvoe!zpv/!Tfwfsbm!qbuit!ifbe!!!pgg!jo!ejggfsfou!ejsfdujpot/6V}.D:ROOM.3 Aoo6.eZpv!bsf!mptu!tpnfxifsf!jo!uif!ebsl!!!!gpsftu/!Uif!opjtft!pg!gpsftu!efoj{fot!sjtf!boe!gbmm!bspvW}oe!zpv/ll67A,.Y!Qbuit!mfbe!!pgg!jo!ejggfsfou!ejsfdujpot/!Uifsf!jt!b!usff!xjui!mpx.ibohjoh!csbodift!ifsf!>>67AX},.+xijdi!qspwjef!qbttbhf!vq!joup!uif!!!!!usff/6.D:ROOM.4 All6.bZpv!bsf!tuboejoh!ofbs!uif!upq!pg!b!Y}!!!ivhf!usff/!Pgg!up!uif!opsui-!zpv!tff!bubmm-!mpofmz!npvoubjo/oo67@,.\!Uifsf!jt!b!mpohwjof!ifsf!joufsxpwfo!xjui!uZ}if!usffupq/Bmtp-!tpnf!csbodift!ifsf!qspwjef!b!!!!4467A,.!qbttbhf!epxo!up!uif!gpsftu!gmpps/6.D:ROOM.5 A[}ll6.bZpv!bsf!tuboejoh!ofbs!uif!upq!pg!b!!!!ivhf!usff/!Pgg!up!uif!opsui-!zpv!tff!bubmm-!mpofmz!npvoubjo/"oo67@\},.\!Uifsf!jt!b!mpohwjof!ifsf!joufsxpwfo!xjui!uif!usffupq/Bmtp-!tpnf!csbodift!ifsf!qspwjef!b!!!!,4467A,.!qbttbhf!]}epxo!up!uif!gpsftu!gmpps/66.D:ROOM.6 A@pp6.fUp!uif!tpvui-!zpv!tff!uif!nbkps!!!!!!!gfbuvsf!pg!uijt!bsfb-!b!^}tqbslmjoh!!!!!obuvsbm!tqsjoh/!B!sbqjemz!Jkk67A,.Xbtdfoejoh!!!qbui!dmjnct!up!uif!opsuixftu/!Uifsf!!!jt!b!mbshf!usff!_}tjuvbufe!ifsf!xjui!!!!TRR67A,.?mpx.ibohjoh!csbodift!xijdi!qspwjef!!!!qbttbhf!vq!joup!uif!usff/^6.D:ROOM.7 `}Ahnn6.dZpv!bsf!tuboejoh!bmpoh!b!obsspx!tusjq!pg!tboe/!Xbwft!mbq!vq!poup!uif!tipsf-!dpwfsjoh!zpvs!gffu/!Uif!rqq67a}A,.^cfbdi!fyufoet!up!uif!opsuifbtu!boe!uif!tpvuixftu-!!!boe!zpv!dbo!foufs!uif!ebsl!gpsftu!up!!uif!|NN67A,.;tb}pvuifbtu/!Up!uif!opsuifbtu-!zpv!!tff!b!uijo!xjtq!pg!tnplf/6.D:ROOM.8 App6.fZpv!bsf!tuboejoh!ofbs!bo!fopsc}npvt!qppmxijdi!jt!pwfsgmpxjoh!xjui!b!cmbdl-!!!!cvccmjoh!nbtt/!B!cmbdlfofe1167A,.!qbui!usbjmtcbdl!up!uif!opsui/d}6.D:ROOM.9 Ajj6.`Zpv!ibwf!ejtdpwfsfe!b!epxo.uspeefo!!!!bsfb!pg!uif!gpsftu/!Tjhot!joejdbuf!b!!sfdfou!gpsftu!e}gjsf/!DD67@,.1Uifsf!jt!b!ivhf!!!ubohmf!pg!wjoft!boe!xffet!ifsf/6. D:ROOM.10 App6.fZpv!ibwf!gpvf}oe!b!epxo.uspeefo!bsfb!pg!uif!gpsftu/!B!ubohmf!pg!wjoft!ibt!cffodvu!uispvhi!ifsf!up!sfwfbm''67A,.!b!opsuifso!qbttg}bhf/6. D:ROOM.10A Aii6._Zpv!bsf!tuboejoh!bu!uif!cpuupn!pg!b!!!tuffq!ijmm/!B!qbui!cfhjot!ifsf!mfbejohvq!uiq} B%DOS SYSB*)DUP SYSBSBOOTCMP1M65B qBOOTCMP2M65B ~BOOTCMP3M65BCASTAWY1BASB[NCASTAWY2BASB/ROBOX OBJBXROBOX1 M65B9ROBOX2 M65BRROBOX3 M65B9qROBOX4 M65BTROLL16 M65f!ijmm-!boe!b!DD67@,.1tpvuifbtufso!qbui!!usbjmt!cbdl!upxbse!uif!tqsjoh/6. D:ROOM.11 Aoo6.eZpv!r}bsf!tuboejoh!po!uif!fbtufso!fehf!!pg!uif!jtmboe/!Xbwft!mbq!vq!bmpoh!uif!tipsf!dpwfsjoh!zpvs!gffu/mm67A,.Z!B!qbui!ms}fbetvq!uif!cfbdi!up!uif!opsui!boe!b!!!!!!!opsuixftufso!qbttbhf!mfbet!cbdl!upxbse! 67A,. uif!npvoubjo/&6. D:t}ROOM.12 A0kk6.aZpv!bsf!tuboejoh!jo!uif!njeemf!pg!b!!!eftfsufe-!obujwf!wjmmbhf/!Up!uif!fbtu!jt!b!tnbmm!ivu!boe!b!u}:mm67@,.Zcmbdlfofe!qbui!!!mfbet!tpvui/!Uifsf!jt!b!gjsf!ifsf!uibujt!tfoejoh!tnplf!ijhi!joup!uif!bjs/D6. D:ROOM.v}13 ANmm6.cZpv!ibwf!tvqsjtfe!b!usjcf!pg!gjfsdf!!!tbwbhft/!Uifjs!jojujbm!tvqsjtf!xfbsjohpgg!rvjdlmz-!uifz!ljmm!Xw}67A,.zpv=b6. D:ROOM.13A Alpp6.fUijt!tnbmm!ipwfm!vtvbmmz!ipvtft!uif!!!wjmmbhf(t!dijfgubjo/!Ju!jt!ox}fbsmz!!!!!fnquz-!uif!pomz!opujdfbcmfvWW67@,.Dopujdfbcmf!gfbuvsf!!!!cfjoh!b!tnbmm!ubcmf!jo!uif!dfoufs!pg!!uif!ivu/y}6. D:ROOM.14 Aoo6.eZpv!bsf!tuboejoh!bu!uif!upq!pg!uif!!!!mpofmz!npvoubjo/!Qbuit!mfbe!epxo!uif!!npvoubjo!boez}!up!uif!fbtu/mm67A,.Z!Tjuujoh!!!!!ofbscz!po!upq!pg!bo!jtpmbufe!dsbh!jt!bdsvef!oftu/!Uifsf!jt!b!mbshf!cjse!ifsf!{}%%67A,.hvbsejoh!uif!oftu/6. D:ROOM.15 Aoo6.eZpv!bsf!tuboejoh!bu!uif!upq!pg!uif!!!!mpofmz!npvoubj|}o/!Qbuit!mfbe!epxo!uif!!npvoubjo!boe!up!uif!fbtu/QQ67A,.>!Tjuujoh!!!!!ofbscz!po!upq!pg!bo!jtpmbufe!dsbh!jt!bdsvef!}}oftu/6. D:ROOM.15A All6.bZpv!bsf!xbmljoh!bmpoh!b!spdlz!qbui!!!!ifbejoh!fbtuxbse!bxbz!gspn!uif!mpofmz!npvo~}ubjo/!Jo!gspou!pg!kk67@,.Xzpv!jt!b!gpslfe!qbui-!xjui!pof!qbttbhf!ifbejoh!up!uif!fbtu!boe!uif!puifs!mfbejoh!up!uif!}""67A,.!!!!!tpvuifbtu/6. D:ROOM.16 Aoo6.eZpv!bsf!tuboejoh!po!uif!fbtufso!fehf!!pg!uif!jtmboe/}!Xbwft!mbq!vq!bmpoh!uif!tipsf!dpwfsjoh!zpvs!gffu/ii67A,.V!B!qbui!mfbetepxo!uif!cfbdi!up!uif!tpvui!boe!b!!!!!xftufs}o!qbui!mfbet!cbdl!upxbse!uif! 67A,. !!!npvoubjo/6. D:ROOM.17 A nn6.dZpv!bsf!tuboejoh!bmpoh!b!u}ijo!tusfudi!pg!tboe/!Xbwft!mbq!vq!up!uif!tipsf-!!!dpwfsjoh!zpvs!gffu/!Uif!*oo67A,.\cfbdi!fyufoet!up!uif!opsuixftu!b}oe!zpv!dbo!tff!uif!!ebsl!gpsftu!up!uif!fbtu/!Up!uif!tpvui-b!44467A,.!tnbmm!dbcjo!ibt!cffo!dpotusvdufe/>6. D:R}OOM.18 AHoo6.eZpv!bsf!tpnfxifsf!jo!uif!njetu!pg!b!!!ebsl!gpsftu/!Zpv!tffn!up!cf!mptu/!Uif!opjtft!pg!gpsftu!efoj{f}otRbb67A,.O!sjtf!boe!!!!gbmm!bspvoe!zpv/!Tfwfsbm!qbuit!ifbe!!!pgg!jo!ejggfsfou!ejsfdujpot/\6. D:ROOM.19 A}foo6.eZpv!bsf!tpnfxifsf!jo!uif!njetu!pg!b!!!ebsl!gpsftu/!Zpv!tffn!up!cf!mptu/!Uif!opjtft!pg!gpsftu!efoj{fotpbb67A},.O!sjtf!boe!!!!gbmm!bspvoe!zpv/!Tfwfsbm!qbuit!ifbe!!!pgg!jo!ejggfsfou!ejsfdujpot/z6. D:ROOM.20 All6.}bZpv!bsf!tuboejoh!xbjtu!effq!jo!uif!!!!obuvsbm!tqsjoh/!Uif!xbufst!sjqqmf!bmm!bspvoe!zpv!jo!wbsjpvt!]]67@,.Jqbuufs}ot/!Voefs!uif!tvsgbdf!pg!uif!xbufs-!zpv!dbo!!!!!efufdu!b!ebsl!tibqf/6. D:ROOM.21 All6.bZpv!ibwf!foufsfe!b}!mbshf-!voefshspvoe!dbwf/!Evtu!ibt!tfuumfe!ifbwjmz!ifsf!btopuijoh!tffnt!up!ibwf!\\67@,.Icffo!ejtuvscfe!!gps!nboz!z}fbst/!Zpv!dbo!sffoufs!uif!!!xbufs!up!uif!tpvui/6. D:ROOM.22 Aii6._Uijt!tnbmm!dbcjo!tffnt!up!ibwf!cffo!!!i}btujmz!fsfdufe/!Fwfszuijoh!jt!jo!!!!!ejtbssbz/!Uif!pomz!pp67@,.]opubcmf!gfbuvsf!jt!b!tnbmm!cfe!xjui!b!tlfmfupo!po!}ju/!Uifcfbdi!jt!up!uif!opsui-!xijmf!up!uif!0067A,.!!!fbtu-!zpv!tff!b!cbdl!epps/6. D:ROOM.23 All}6.bUijt!pvu!pg!uif!xbz!qmbdf!fodmptft!b!!cfbvujgvm!hbsefo/!Ubmm!gsvju!usfft!boefypujd!qmbout!bcpvoe/!nn67@,.[Ofb}s!uif!cbdl!pguif!hbsefo!jt!b!nbkftujd!usff!epuufe!!xjui!hpmefo!gsvju/!Zpv!dbo!tff!uif!!!RR67A,.?ebsl!gpsftu!up!uif}!opsui!boe!uif!cbdl!epps!jt!pqfo!up!uif!xftu/6. D:ROOM.24 Ann6.dB!tbmu!njtu!tqsbzt!poup!zpvs!gbdf!bt!!zpv}!tuboe!ifsf!bu!uif!fehf!pg!uif!tfb/Up!uif!fbtu-!zpv!opujdf!ii67A,.Vb!gpsfcpejoh!!dbwf!uibu!nztufsjpvtmz!dbmmt!up!z}pv/!!Zpv!dbo!sffoufs!uif!gpsftu!up!uif!$67A,. !!!!!opsui/.6. D:ROOM.25 A8mm6.cBt!zpv!foufs!uijt}!ebsl!dbwf!zpv!bsf!!!ofbsmz!pwfsdpnf!cz!b!gmvuufsjoh!nbtt!!pg!tibqft-!xijdi!tpvoe!Bnn67A,.[mjlf!cbut/!Tpnfqpsujpot!}pg!uif!dbwf!bsf!jmmvnjobufe!!cz!cfbnt!pg!tvomjhiu!tijojoh!uispvhi!!L&&67A,.volopxo!qffq.ipmft/V6. D:ROOM.26} A`hh6.^Dbsszjoh!zpvs!upsdi-!zpv!bsf!bcmf!up!!tff!bmm!qbsut!pg!uif!dbwf/!Spdlt!boe!!efcsjt!bsf!tusfxo!jhh67@},.Ufwfszxifsf/!Jo!b!!!!cbsfmz!efufdubcmf!dpsofs!pg!uif!dbwfsozpv!tff!b!ibmg.ijmmfe!ipmf/t6. D:ROOM.26A A~}gg6.]Zpv!bsf!voefsxbufs!jo!uif!obuvsbm!!!!!tqsjoh/!B!mbshf!spdl!ibt!cffo!npwfe!!!ifsf-!dmfbsjoh!b!$$67@,.qbttbh}f!epxoxbse/6. D:ROOM.27 Amm6.cZpv!ibwf!foufsfe!b!xbufsz!xpsme!pg!!!!gv{{z!tibqft!boe!ejtupsufe!ejtubodft/}!Tjodf!xbufs!gjmmt!zpvs!CC67A,.0fzft-!zpv!!!!!!bsfo(u!bcmf!up!nblf!pvu!bozuijoh/6. D:ROOM.27A Am}m6.cZpv!bsf!voefsxbufs!jo!uif!obuvsbm!!!!!tqsjoh/!Uif!gmpps!pg!uif!tqsjoh!jt!!!!sfmbujwfmz!cbsf!fydfqu!aa67A,.Ng}ps!b!mbshf!!!!spdl!xijdi!tffnt!up!cf!cmpdljoh!tpnf!!tpsu!pg!epxoxbse!qbttbhf/6. D:ROOM.27B Agg6.]Zpv!bsf!}txjnnjoh!jo!bo!voefshspvoe!!!!tusfbn/!Xbufs!svtift!cz!zpv!xjui!b!!!!opjtf!tp!mpve!ju!ll67@,.Yuisfbufot!up!efbgfo!!}zpv/!Uif!dvssfou!jt!wfsz!tuspoh!boe!!!dpvme!dbssz!zpv!jo!bmnptu!boz!GG67A,.4eftjsfe!ejsfdujpo/!Zpv!tfotf!b!ejn!hmp}x!gspn!!bcpwf/6. D:ROOM.28 Amm6.cZpv!ibwf!foufsfe!b!xbufsz!xpsme!pg!!!!gv{{z!tibqft!boe!ejtupsufe!ejtubod}ft/!Tjodf!xbufs!gjmmt!zpvs! DD67A,.1fzft-!zpv!!!!!!bsfo(u!bcmf!up!nblf!pvu!bozuijoh/!6. D:ROOM.28A A}gg6.]Zpv!bsf!txjnnjoh!jo!bo!voefshspvoe!!!!tusfbn/!Xbufs!svtift!cz!zpv!xjui!b!!!!opjtf!tp!mpve!ju!(ll67@,.Yuis}fbufot!up!efbgfo!!zpv/!Uif!dvssfou!jt!wfsz!tuspoh!boe!!!dpvme!dbssz!zpv!jo!bmnptu!boz!2GG67A,.4eftjsfe!ejsfdujpo/!Z}pv!tfotf!b!ejn!hmpx!gspn!!bcpwf/<6. D:ROOM.29 AFmm6.cZpv!ibwf!foufsfe!b!xbufsz!xpsme!pg!!!!gv{{z!tibqft!boe}!ejtupsufe!ejtubodft/!Tjodf!xbufs!gjmmt!zpvs!PDD67A,.1fzft-!zpv!!!!!!bsfo(u!bcmf!up!nblf!pvu!bozuijoh/!Z6. D:}ROOM.29A Adii6._Zpv!ibwf!foufsfe!b!tnbmm!dbwf!mpdbufe!gbs!voefshspvoe/!Tmjnf!boe!sfgvtf!gspnpwfs!uif!zfbst!ibt!n}HH67@,.5hbuifsfe!ifsf/!Zpv!dbo!sffoufs!uif!xbufs!up!uif!fbtu/x6. D:ROOM.30 Agg6.]Zpv!bsf!txjnnjoh}!jo!bo!voefshspvoe!!!!tusfbn/!Xbufs!svtift!cz!zpv!xjui!b!!!!opjtf!tp!mpve!ju!ll67@,.Yuisfbufot!up!efbgfo!!zpv/!Uif}!dvssfou!jt!wfsz!tuspoh!boe!!!dpvme!dbssz!zpv!jo!bmnptu!boz!GG67A,.4eftjsfe!ejsfdujpo/!Zpv!tfotf!b!ejn!hmpx!gspn!!}bcpwf/6. D:ROOM.31 Amm6.cZpv!ibwf!foufsfe!b!xbufsz!xpsme!pg!!!!gv{{z!tibqft!boe!ejtupsufe!ejtubodft/!Tjod}f!xbufs!gjmmt!zpvs!DD67A,.1fzft-!zpv!!!!!!bsfo(u!bcmf!up!nblf!pvu!bozuijoh/!6. D:ROOM.31A Agg6.}]Zpv!bsf!txjnnjoh!jo!bo!voefshspvoe!!!!tusfbn/!Xbufs!svtift!cz!zpv!xjui!b!!!!opjtf!tp!mpve!ju!ll67@,.Yuisfbufot!u}p!efbgfo!!zpv/!Uif!dvssfou!jt!wfsz!tuspoh!boe!!!dpvme!dbssz!zpv!jo!bmnptu!boz!%%67A,.eftjsfe!ejsfdujpo/6. }D:ROOM.32 Amm6.cZpv!ibwf!foufsfe!b!xbufsz!xpsme!pg!!!!gv{{z!tibqft!boe!ejtupsufe!ejtubodft/!Tjodf!xbufs!gjmmt!zp}vs!DD67A,.1fzft-!zpv!!!!!!bsfo(u!bcmf!up!nblf!pvu!bozuijoh/!6. D:ROOM.32A Aoo6.eZpv!ibwf!dpnf!}bdsptt!bo!jnnfotf!bsfb!!pg!tdpsdife!fbsui/!Uif!hspvoe!jt!!!!!!efwpje!pg!qmbou!mjgf!gps!rr67A,._tfwfsbm!zbsetjo!fwf}sz!ejsfdujpo/!Uifsf!jt!uif!tifmmpg!b!xsfdlfe!bjsqmbof!ifsf/!B!qbui!!!!mfbet!"%%67A,.cbdl!up!uif!tpvui/,6. D:}ROOM.33 A66((>:AS,!( Finished!3AR6@_-@@'(7@, D@@}Q @\@_$D:CASTAWY2.BAS6@_-@@'(7@, D@@@ fffffff~`~~fl0fF68of;x88xf<~lll| ~`~>|`~ff~~80~f~fffff~ffff<cccwcff<}``lxlf8~ffff~fff~~ff~``~ff~~f```~`~~~ffff~fff<cc>6f<)Ј ) ) )>)?)@)A)ݩ`}Hh`$%&'`}ɛ Lm*~ 0* I*)*`};<=􅋅` *H I*h  m*`} ƌ`:i 授e` 7 ; ;i i ` *8(`} *<(`H****)h)` )`yɀɁ *+IL*ɂ I@L*Ƀ@пɄ IL*Ʌ𮥀@}a { L*.)œ Т` +ɛ  Ȅɛ ) ) })Ąe悥 )`豁ɛ`) )i +,9,9,)L+> )ʆ *}ɛ9) ~ *L,`{؅A[i ?ǝ *мƇL)ة$4 i@Х i:+ $<}I$暥30" 0">(" }0"0"" ">" }""Lb,-B晦:F(ИIF(} "ȩ" "L_HH@(Ѝ ԽC(Ѝ hh@yzyz )故 =/l, \}, \9- B) ԩ )Ѝ Ѝ ЩD8曠x%&-.آ3i3D3 b+ ) ,}ɛ  b+L.43 5 b+L.L.ȹ30) .L.,:,: 2ɛL/ LZ.膝}430/ȹ30)ɛM .L. .L.p:*5p:./ɛ p:p:ɛp: }b+` V:/W:/ L.15 b+<5 b+D5 b+G5 b+J5 b+M5 b+`5 b+`N:N: 2s4 b+4 b+4 b+4} b+5 b+5 b+`L25 b+` 2`5 b+ ,440 à4 b+`/0ȹ40)ݦ4:4}: 2ՠ4 b+`8 b+ )敥*L8 b+ ~0 0/Щ@ԩ*_ \b \ 0Lb088 b+Ҡ8 b+} ~0Lb0 )8 b+8 b+`0`5 b+` 2`͠4 b+` f:0g:0 9:9: 2L.014 b+),:p: (1} : b+ J1 U1),:p:,: 2`٠4 b+ (10ѩ U1`H J1h JB:E"DK V` B V` B:E,D$HI} V J1` 2`8 b+ ,15 b+`381 4L14= )0 ) 0 ) ) ,128轪8ɛ} Ѣ2ɛ7>:>: 2L2F:F:L2Р8 b+`ĝL1>:>: 2L2F:F:L92Ǡ5 b+`Z6 b+`7 b+O}7 b+`7 b+7 b+`8 b+`O:`y8 b+ ,Ƚs4񩌠8 b+O:`8 b+8`),:e8 023i }( (`Q:Q: 2P:4y8 b+ ,Ƚ48 b+`P: 28 b+U5 b+ )_5 b+ )5{ u3 35 u3 }35 u3 35 u3 3`0 )) ) )` ,ݮ5 R: 2`Terminal Activated^\o\gj_ph34`ib\b}g\pi^kg\m`omd`qnojmrmdono\^o\kkmjbm\mjh(di_43no_m`b\di_-no_m`b]di_2+no_m`b^amj/.,-c\godi_4.no_m`b\di_,}no_m`b]di_.-no_m`b^amj-,./c\go\i\gjb0 1 1 0 0 1 #(- origiantarelandinlaunchinstatu #no such4}5 not  storing retrieving 0 0 0 0 0 00 0 0 7 d 4b 0 e f 1 c4 0 9 2 a e command-error library s origin }  status control1. open 2. close 3. neutralgyro controhydro-lift valvrb42 valvfraber switc2131 operationwhich} ?56 was sent from  to warn earth that it is on a   with a .  has sensors to gar . when  returns to  we will al}ter   of  and avoid a . is  fourth planet from  star grindl in a parallel universe.  has 2 moons and a gravitation}al force 67of 70. it has a diameter of 17,000 .  is 98 million from grindl.the  . commands. d,st lt is used }to end ming.  is stored in3 registers: reg a,regc.  distance from  star is put in rega. mooity  regc.   4312. }  . com 78  d,fro,halt. halt is usedegc.  distanoon data  reg gravhe   rev fer to rom-b.all systems are} functioning except  and  auto ming were disrupted during a magnetic storm.password? denied allowed done1. 2. } ?!)15robox 89..your mission was a congratulations...game compliments ofBarry Kolbe and Bryan SchappelH9L9P9}]9b9g9n9w9}9999999999999:: :tapdat..data lost.readroboantarecollisioaccesprograconsists of an 8 stemi}lemeteothere are landin9o:launchinmust be put icoursillegathey are: iis stored ifiring order ithfailursuccesdi}sk file errorD:BOX.DAT/I//0001u1J2R2Z2i2x2V-order ithfailursuccesdib*dEInX;SAVE#D:ROBOX.M65xX;asm,,#d:boxerX;X;------------------X;the actual adventureX;is done hereX; !}by Barry KolbeX;------------------X; OLDC INDREOLFLAG TEMP SAVEY ILENIPU!}T;;input flag SAVEX" SAVX2, CHAR6 XPOS@ YPOSJ SCRT SCR2^ CSHAPEh BLINKr OL!}DAC| CAPS PAUSE? CLICK? DLIDX BLKPOSMYCOUNT MYCNT2 GOFLAG X1 X2!} X3 VRBN NOUNN TAPEN CPL CPH TYPE& SCORE0 X;-----:EXPBUFD MYBUF!}NLINELEN X SCMEM;b MYPM lPLR0MYPMvPLR1PLR0PLR2PLR1PLR3PLR2 BOTLIN !}X; PRINT  Q>4  %>5  EPRINTX;----------- PUTTER  Q>5  $>4  MYPUT X;----------- !}X;*4PASSPASS> PASSH>D:ROBOX2.M65R\X;f p>D:ROBOX3.M65z(>D:ROBOX4.M65 X;----!}---- X;decode X;--------$>?DEQVERB9,O> PVERB92(>H?DEQ>PDQ>$ PTAPEN.!}PRINT TRMACT8GETCOM PUTCRB INPUTL$>V &NOUNN` QMYBUFj R>EOLt~H?B1PRINT MYBUF !GETCOM ?B!}1$> ?B2&VRBN%VL9 QVERB8I?B9PRINT SYNTAX !GETCOM?B9RMYBUF FMATONE2H?B2  !GETCOM!}MATONE$>?B82(32 QVERB8< G?LASTF RMYBUF9PF?B8ZH?B3d ?LASTM>n RMYBUF9x FGOTVRB?B3 INSERR !G!}ETCOMGOTVRB&X3 $VRBN QVFG9H?VB #VFG9 GTSCR ?VB$X32 QMYBUF9 R>EOLH?B5 !TRANS ?B5R!}>  FGTNOUN"!?B3, GTNOUN26&X2@$>J?N1&NOUNNT%NL9^ QNOUN8h GNONUNr$X2| RMYBUF9 FGOTNUN $NO!}UNN2H?N1 GOTNUN23 QNOUN8 G?NLAST RMYBUF9 FGOTNUNH?N3?NLASTM> RMYBUF9H?N32 QMY!}BUF9& R>EOL0 FTRANS:?N3 INSERRD !GETCOMN NONUN$X2X INSERRb !GETCOMlX;---------------------vX;insert -er!}ror & printX;---------------------INSERR&X1$>?B4QMYBUF9 POUTBUF92(X1H?B4 ?B0%> ?B7QE!}RR8 POUTBUF923)> H?B7%X1  QMYBUF8* R>EOL4 F?B11>L>H POUTBUF9R?B63\2f QMYBUF8p?B11P!}OUTBUF9z R>EOLH?B6?B12PRINT OUTBUF:X;---------------X;handle inputX;---------------TRANSQVRBN!}T?> QJTAB9 PJPER QJTAB9 PJPER JPER  !GETCOM X;---------------$ X;pr cat. X;-------8 !}JCTPRINT CATLOGB PRINT T1L PRINT T2V PRINT T3` PRINT T4j PRINT T5t :~ X;------ X;dump st X;-----!}-- JDM$NOUNN F?JD1 PRINT COMERR : ?JD1QNFG H?JD3 #NFG GTSCR ?JD3PRINT WALN PRINT CODE2!} $> ?JD2&X1 PRINT PG1 $X1( 02 I?JD2< PRINT PG2F PRINT PG3P PRINT PG4Z :d X;------n X;eng ta!}px X;------- JEN$NOUNN (> F?JEN1 (> H?RMM !ROMB ?RMMPRINT COMERR : ?JEN1 PASWRD D?JEN3 !}: ?JEN3PRINT TAPNAM INPUT $> ?EN3&TAPEN %TN9" QTNAM8, GNOTAP6 RMYBUF@ F?EN2J ?EN6$TAPENT 2^!} H?EN3h NOTAPPRINT NOTAVLr Q>| PTAPEN : ?EN2$> ?EN52 3 QTNAM8 G?EN4 RMYBUF9 H?EN6 F?EN!}5 ?EN4M> RMYBUF9 HNOTAP $TAPEN QEFG9 H?ENA #EFG9& GTSCR0 ?ENAPRINT TREAD: :D X;----------N !}X;launchX X;----------b JLAPRINT ROBLAl PUTCRv #PAUSE? QSCORE R>* F?Z1 PRINT MISSON FINI Q>!} $> FWAIT &/ & Q>@ PNMIEN Q>* P $> %>_ Q>* SETVBV4 $>> %>bH Q>R SETVBV!}\ Q>f $>p ?KKPHPOSP09z 0 I?KK Q> $> FWAIT Q> P ?Z3!?Z3 ?Z1Q>  PMISSON PRI!}NT MISSON PRINT CONGRT FINI !?Z3X;---------X;good bye!X;---------$FINI PUTCR.PRINT COMP8PR"}INT COMP1B:L X;------VX;time killer` X;------jFWAITPRTCLOKt &RTCLOK~?FWQRTCLOKG?FW: X;-------"}X;play tapeX;---------JPL$NOUNN(> F?PL3PRINT COMERR:?PL3 PASWRD D?PL1: ?PL1QTAPEN"} I?PL2PRINT NREAD(:2 ?PL2T?<>F QETAB9P PEJMPZ QETAB9d PEJMPn EJMP x $TAPEN QPLFG9"}H?PP #PLFG9 GTSCR?PP!GETCOMX;--------- X;ret datX;---------JREPRINT RTPRG$>)?JR3QSCRTAB9"} POUTBUF90 I?JR3Q> OPENF" I?JR1,?JR2PRINT NODAT6 CLOSE2@ ?JR1Q>J REWRT$>)^?JR5QSCR"}TAB9h LOUTBUF9r PSCRTAB9|0 I?JR5 GTSCR: X;-------X;store dat X;-------JSTPRINT STPRGQ> "}OPENF G?JR2Q>  REWR: X;-----X;open file X;-----& OPENF50 CLOSE2:7D$> N PAUX19XQ>b PIC"}COM9l Q>5DISKv PICBAH9 Q>4DISK PICBAL9Q> PAUX29 CIOV: X;---- X;close 2 X;-----CLOSE2$> "}Q>  PICCOM9 CIOV:  X;------X;read/write  X;------* REWR$> 4 PICCOM9> Q>5SCRTABH PICBAH9R Q>4SCRTA" }B\ PICBAL9fQ>$p PICBLL9zQ> PICBLH9 CIOV CLOSE2: X;--------X;write prog X;--------JWR$NOU" }NN(>H?W3 PASWRDD?W1:?W1PRINT WM INPUT QMYBUF$R>1.E?W28?W3PRINT COMERRB:L ?W" }2R>3VE?W3`;jS>1t PTYPE~H?W4 Q>5W1PCPH Q>4W1PCPL!?W5 ?W4Q>5W2PCPH Q>4W2PCPL " }?W5$> ?W7&X1Q>  EPUT Q>0 EPUTQX1(L>02 EPUT<Q> F EPUTP INPUTZ$X1d%WT9n2xQWT" }9PX2$>?W9QMYBUF R>EOLF?WH QMYBUF9 R@CPL7F?W6 R>EOLF?W8 ?WH$X1 QTYPEH?WD Q"}W1FG9F?WG "W1FG9"?WF GTSCR, ?WG!?W106?WDQW2FG9@F?WGJ "W2FG9T!?WF^ ?W10$X1h2r(>|H?W7"}PRINT DONE: ?W6)X2 F?W1023!?W9 ?W8$X1 QTYPEH?WB QW1FG9H?WC #W1FG9?WA GTSCR "}?WC!?W10?WBQW2FG9&H?WC0 #W2FG9:!?WAD X;--------NX;print routinesX X;--------bPORPRINT ORMl:vPAN"}PRINT ANM:PLAPRINT LAMPRINT LAM1:PLUPRINT LUMPRINT LUM1:PSTPRINT STM: X;---"}--- X;password X;--------PASWRDQPFG F?PS1 ,: ?PS1PRINT PASPMT* INPUT4$>>%>H ?PS22R3\3"}f QMYBUF9p RWALN8z HDENY(> H?PS2PRINT ACCESQ>PPFG,:DENYPRINT ACDENY;: X;---"}----- X;score X;-------- GTSCRQ> PSCORE$>)$?GTQSCRTAB9.,8 OSCOREB PSCOREL0VI?GT`$>j ?GT3"};tS> ~ G?GT2 F?GT42 H?GT3 ?GT2,O>  ?GT5L>PBOTTOMPAL>PBOTTOMO: ?GT42Q>"}  F?GT5X;----------- X;rom-b(X;-----------2ROMBQRNOUN< H?RMZF #RNOUNP GTSCRZ?RMZQROMFLGd HROMOKn"}PRINT PASPMTx INPUT$>%> ?RMA233 QMYBUF9 RCODE28 H?RME(> H?RMA F?RMB?RMEPRI"}NT ACDENY:?RMB#ROMFLG GTSCRPRINT ACCES"ROMOKPRINT LENG, PUTCR6PRINT OPT@ PUTCRJPUTTER"} RB1T$>^ DOSCREhPUTTER RB2r$>| DOSCREPUTTER RB3$> DOSCREPUTTER RB4$> DOSCRE"}:X;-----------X;my put mess routineX;-----------MYPUTPINDR &INDR%>?MYAQ@INDR7 G?MYB'X"}2& EPUT0%X2:3D H?MYAN ?MYBM>X EPUTbQ> l EPUTv:X;---------X;handle rom-b scoreX;---------"}DOSCRE&X1 INPUT$X1 QMYBUF RRMTAB9 F?DS1Q>?DS2PRMLFLG9 GTSCR: ?DS1Q>  H?DS2 X;---"}----- %TRMACT ATerminal ActivatedA=EOL*!VERB =AcatalodumengagA4 =AlauncplaretrievA> =AstorwritA"}=H(NOUN =Astactapprograrom-A=RFW1 =Aind 98std regaind 2std regbind 70std regcfro 4312haltA=\FW2 =A"}ind 93std regaind 1std regbind 32std regcfro 2134haltA=f WALN =Aa n a l o gA=EOLpCODE2 A0 1 1 0 0 1A=EOLz!VL" } == ====#=(=-NL == ==2TNAM AorigiantarelandinlaunchinstatuA=TN == ===#"!}NOTAVL Ano such A=EOLNREAD A not A=EOLTREAD A A=EOLSTPRG Astoring A=EOLRTPRG Aretrieving A=""}EOLPG1 A0 0 0 0 0 0A=EOLPG2 A0 0 0 7 d 4A=EOLPG3 Ab 0 e f 1 cA=EOLPG4 A4 0 9 2 a eA=EOLSYNTAX A"#} commandA=EOLERR A-error ACATLOG Alibrary sA=EOLT1 A originA=EOL$T2 A A=EOL.T3 A A=EOL8T4 A"$} A=EOLBT5 A statusA=EOLL X;-----VLENG A controlA=EOL`+OPT A1. open 2. close 3. neutralA=EOLjRB1Agyro "%}controlAtRB2Ahydro-lift valveA~RB3Arb42 valveARB4Afraber switchARMTAB A2131ACOMERR A operationA=E"&}OLTAPNAM Awhich ?A=EOLHORM A was sent from  to warn earth that it is on a   with a .AG A  has sensors to "'}gar . when  returns to  we will alter   A! Aof  and avoid a .A=EOLKANM A is  fourth planet from  star gr"(}indl in a parallel universe. AU A has 2 moons and a gravitational force of 70. it has a diameter of 17,000 . A* A is")} 98 million from grindl.A=EOLWLAM Athe  . commands. d,st lt is used to end ming.  is stored inA=EOLhLA"*}M1 A3 registers: reg a,regc.  distance from  star is put in rega. mooity  regc.   4312.A EOL aLUM A   "+}. com   d,fro,halt. halt is usedegc.  distanoon data  reg gravA=EOL+LUM1 Ahe   rev fer to rom-b.A=EOLH",}STM Aall systems are functioning except  and  auto ming were A(. Adisrupted during a magnetic storm.A=EOL2PASPMT "-}Apassword?A=EOL<ACDENY A deniedA=EOLFACCES A allowedA=EOLPDONE A doneA=EOLZWM A1. 2.  ?A=EOLd!".}WT =====!=)=1=5nROBLA Arobox ..A=EOLx'MISSON Ayour mission was a A=EOL%CONGRT Acongratulations.."/}.A=EOL$COMP Agame compliments ofA=EOL0COMP1 ABarry Kolbe and Bryan SchappelA=EOLTOKADR R1 R2 R3 R"0}4 R5 R6 R7 R8 R9 RA RB RC RD" RE, RF6 RG@ RHJ RIT RJ^ RKh RLr "1}RM| RN ROX;---------R1AtapeAR2AdataAR3A..data lost..AR4AreadyAR5AroboxAR6Aantar"2}exAR7AcollisionAR8AaccessAR9AprogramARAAconsists of an 8 stepARBAmilesA RCAmeteorA RDA"3}there are 4A REAlandingA& RFAlaunchingA0 RGAmust be put inA: RHAcourseAD RIAillegalAN RJAthey are: "4}inAX RKAis stored inAb RLAfiring order isAl RMAtheAv RNAfailureA ROAsuccessA !NODAT Adisk file errorA"5}=EOL DISK AD:BOX.DATA=EOL SCRTAB VFG ======= EFG ==== PLFG ==== W1FG"6} ======= W2FG ======= NFG  PFG  ROMFLG  RNOUN !RMLFLG === !"7} JTAB JCT! JDM ! JEN*! JLA4! JPL>! JREH! JSTR! JWR\! X;-------f! ETAB PORp! PANz! PLA! PLU! PST"8}! X;--------!OUTBUF }I vectorVBREAK;;BRK vectorVKEYBD;;keyboard vecSRTIMR+;;key repeatSDMCTL/;;DMA controlSDLSTL&?}0;;display listPCOLR0PCOLR1PCOLR2&PCOLR30COLOR0:COLOR1DCOLOR2NCOLOR&@}3XCOLOR4bCHBAS;;char setlSETVBV\vSYSVBV_XITVBVb NMIENԔVCOUNT ԞCHBASE &A} WSYNC Բ CHACTCHACTLCRSINHCHRSET;;ROM charactersX; X;MISC.X;CONSOL;;conso&B}le keys RTCLOK  CH MEMLO SHFLOK*WARMSVt4COLDSVw> LBUFFH EOLRX;\X;Device &C}VectorsfX;pHATABSzEDITRVSCRENVKEYBDV PRINTV0CASETV@X;X;PAGE ZERO LOCATIONS&D}X; CASINI TRAMSZ WARMST BOOT?  DOSVEC  DOSINI  POKMSK BRKKEY SOUNDRA$ &E}CRITICB. ATRACTM8 KEYDEFyB LMARGNRL RMARGNSV ROWCRST` COLCRSUj SAVMSCXt RAMTOPj~X;X;FL&F}OATING POINTX; FR0Ԧ FREڰ FR1 FR2 FRX EEXP NSIGN ESIGNFCHRFLG DIGRT&G} CIX  INBUFF RADFLG AFP( FASC2 IFP< FPIF ZFR0DP ZF1FZ FSUB`d FA&H}DDfn FMULx FDIV(ۂPLYEVL@݌ FMOVEݖ EXPݠ EXP10ݪ LOG޴ LOG10޾X;X;STICK, PAD&I}DLES, TRIGGERSX;PADDL0pPADDL1qPADDL2rPADDL3sSTICK0xSTICK1yPTRIG0|"PTRI&J}G1},PTRIG2~6PTRIG3@STRIG0JSTRIG1TX;^X;AUDIO CONTROLhX;r AUDF1| AUDC1҆ AUDF2&K}Ґ AUDC2Қ AUDF3Ҥ AUDC3Ү AUDF4Ҹ AUDC4AUDCTL SKCTLX;X;P/M GRAPHICSX;&L}PMBASEGPRIORoHPOSP0HPOSP1HPOSP2&HPOSP30 M0PF: M1PFD M2PFN M3P&M}FXHPOSM0bHPOSM1lHPOSM2vHPOSM3Ѐ P0PFЊ P1PFД P2PFО P3PFШSIZEP0в&N}SIZEP1 мSIZEP2 SIZEP3  M0PL M1PL  M2PL  M3PL SIZEM ;;missile sizeP0PL&O} ;;player/pf  P1PL  P2PL  P3PL*COLPM04COLPM1>COLPM2HCOLPM3RCOLPF0\CO&P}LPF1fCOLPF2pCOLPF3z COLBKЄGRACTLЎHITCLRИGRAFP0 ТGRAFP1ЬGRAFP2жGR&Q}AFP3 GRAFMpCOLPF3z COLBKЄGRACTLЎHITCLRИGRAFP0 ТGRAFP1ЬGRAFP2жGR$dCHARSET ===n ===x === === =f=f=f === =f==f f=*S}=f= =~=`=~ =~== =f=l= 0=f=F= =6==8 o=f=;= === ===*T} === === =x=8=" =8=x=, =f=<=6 <=f==@ ===~J ===T*U} ===^ ===8h ===~r ~===| === === ===  =0== =*V}~=f=n v=f=~= =x== ==~= =~==~ `=`=~= =~==> ==~= =l=l=*W}l |= = = =~=`=~ ==>= =|=`=~& f=f=~=0 =~==: =8=0=D =~=f= f=f=|=H*[} =~=`=|R `=`=~=\ =~=`=|f `=`=`=p =~=`=`z n=f=~= =f=f=~ f=f=f= =*\}8=8=8 8=8=8= === =f=~= =`=f=l ~=f=f= =`=`=` `=f=~= =c=w=*]} c=c=c= =|=f=f f=f=f= =~=f=f f=f=~=$ =~=f=f. ~=`=`=8 =~=f=fB*^} f=l=v=L =~=f=fV |=l=f=` =|=`=~j ==>=t =~==~ === =f=f=f f=*_}f=~= =f=f=f f=<== =c=c=c =w=c= =f=f=< <=f=f= =f=f=~ ===*`} =~=l= 0=f=~= ===  === ===0 = ==( =x==2 ==x=<*a} ===6F c=c==P ===Z ===d ==<=~n =~=<=x =]=T=] === =*b}== === === === === === ==0=x === = ==*c}3 a=== ==?= === === === ===" =s=;=, ===6*d} ===@ ===J ===T ===^ ==?=h ===r ===| === =*e}== === === === === ===   = =?= === ===*f} ===? ?=== === === === === ===& ===0*g} ===: ===D ===N ===X ===b ===l ===v === =*h}== === ==<=~ === === ~=<== ==0=~ 0=== == =*i}~  === ==<=~ ~=<== ==~= ~=f=~=  =`=`=~ f=f=~=  ==|=`**j} `=`=|=4 ===~> f=f=~=H ==~=fR ~=`=|=\ ===~f ===p ==~=fz f=*k}~==~ =`=`=~ f=f=f= ===8 === === ===> =`=`=l x=l=f=*l} =8== === === === ==~=f  f=f=f=  ==~=f  f=f=~=$ *m} ==~=f.  f=~=`=`8  ==~=fB  f=~==L  ==~=fV  `=`=`=`  ==~=`j  ~==~=t  =*n}=~=~  ===  ==f=f  f=f=~=  ==f=f  f=<==  ==c=c  =>=6=  ==f=*o}<  =<=f=  ==f=f  f=~==~  ==~=  =p=~=  ==<=~  ~==<=  === *p} ===(  =~=x=|2  n=f==<  ==8=xF  8===P  ===Z  ===<=  === (fdX; SAVE#D:ROBOX4.M65nX;xDLIST p=p=p==B STATUS =B SCMEM$ ==========.r} =====B BOTTOM ===B BOTTOM A DLISTX;X;Introduction Display ListX;IDLST p=.s}p=p=p=p p=p=p=p=B ITEXT" p==A, IDLST6X;@A2I @== =`JI2A  =@==`TDLICLRS ==^.t}DLICLRS2  = = h"BOXPOS o=s=w={====rX;|.STATUS A庠֭˯ͺϠA.BOTTOM A.u}A' A   A' A    00    A' A  .v}  A-ITEXT A press A' A Ԡ AX;X;Special Keys c.w}odesX;KEYS ==== ====~ }==== X;INTRO PLAYER POSITSPLXPOS @=_==X;.x}&INTROQ>4IDLST0 PSDLSTL: Q>5IDLSTDPSDLSTLNQ>X PCOLOR2b PCOLOR4lX;v%>SETC1'COLOR1 WAITJIF.y}F WAITJIFF3)> HSETC1Q> PGPRIORX;WAITCNQCONSOLR> HWAITCNX; Q>4DLIST  PSDLSTL .z}Q>5DLIST PSDLSTL*X;4%>> SETP1Q>H PGRAFP08RQ>\ PPCOLR08fQ>p PSIZEP08z1 ISETP1X;$>=.{} MOVP1%>MOVP2QPLXPOS8 PHPOSP081 IMOVP2 WAITJIFF WAITJIFF WAITJIFF "PLXPOS"PLXPOS#.|}PLXPOS#PLXPOS0$ IMOVP1.Q>8$>BCLRP1PHPOSP09L0V ICLRP1`:j WAITJIFF5tQ>~ PRTCLOKWAI.}}TJ1QRTCLOK FWAITJ17:X;ERASEPMQ>?ERPMPPLR08 PPLR18 PPLR28 PPLR383 HERPM :X;X.~};Put a byte to the screen(X;2CLRSCRQ>}<EPUTR>EOL;;a CR?F HTRYDELP PUTCRQ>Z PXPOSd #YPOSn !SCROLLxX;.}TRYDELR>~;;delete? HTRYCLR MOVELEFT GETSCRQ>? P@SCR7:TRYCLRR>} HNORMAL%>CCLRS.}CPSCMEM8PSCMEM8PSCMEM83" HCLRSC, PXPOS6 PYPOS@:JX;TNORMAL ASC2IC^5h GETSCRr%>|7.} P@SCR7X;GORIGHT$XPOS2(>  DEPLEAV #YPOS SCROLL$>EPLEAV&XPOS:X;MOVELEFTQXPOS.}> LYPOS FGOLEAV&00IGOX:$>D %YPOSN HMVUPX$>bFGOXlMVUP"YPOSv GOX&XPOS GOLEAV:X;GETS.}CRQ>4SCMEM PSCRQ>5SCMEM  PSCR %YPOSGETSC1QSCR,O> PSCR DGODWN #SCR GODWN.}1  IGETSC1QSCR ,* OXPOS4PSCR> DGETSCDNH #SCRR GETSCDN:\X;fSCROLL%YPOSp )>BOTLINz DSCMOVEDN.}Q>BOTLIN PYPOS Q>4SCMEMPSCR Q>5SCMEM PSCRQ>4SCMEM  PSCR2Q>5SCMEM  PSCR2$>.}SCMOVE%>SCMOVITQ@SCR27 P@SCR7 1 ISCMOVIT$ QSCR2. PSCR8 QSCR2B PSCRL ,V O> ` PSCR2j Q.}SCR2t O>~ PSCR2 2 (>BOTLIN HSCMOVE SCMOVEDN: X; X; ASC2IC BITER LA2I9 $SAVX2 : X; X.}; IC2ASC BITER LI2A9 $SAVX2 :( X;2 BITER5< U?F U?P U?Z U?d M>n &SAVX2x > 7 M> : X; EPUT.}X&SAVEX EPUT $SAVEX : X; GETKEYQCH R> FGETKEY $> &CH POLDC K0?" )>, DK16 %>@ K1.}Q@KEYDEF7J POLDACT R>^ FGETKEYh R>r HK2| QPAUSE? N> PPAUSE? !GETKEY X; K2R> HK3 QCAPS .}N>@ PCAPS !GETKEY X; K3R> HK4 Q>@ PCAPS HGETKEY& X;0 K4R>: HK5;;click?D QCLICK?N N>X .}PCLICK?b !GETKEYl X;v K5R> FGETKEY QOLDC R>@ DK6 QOLDAC R>a DK6 R>{ EK6 QCAPS FK6 .}LOLDC !K0 X; K6$> K7QKEYS9 ROLDAC* FK94 0> IK7H QOLDACR K9R> \ DGETKEYf %CLICK?p FK10z %>.} CLKIT'CONSOL $> CLK10 HCLK1 1 ICLKIT K10: X; EPRINT EXPANDIT Q>4EXPBUF PINDR Q>5EXPBUF.} PINDRQ> PEOLFLAG PPAGE%>$PLINEQ@INDR7. PMYBUF883B R>EOLL HPLN2V #EOLFLAG` HBREAKjPLN2).}>LINELENt HPLINE~1SLOOPQ@INDR7R>  FSBRK1 HSLOOP%>LINELEN SBRK3BREAK'TEMP%>COPY.}Q@INDR7 'SAVEY R>EOL FCOP1  EPUTCOP1QPAUSE? FRESY( WAITJIFF2 WAITJIFF<RESY%SAVEYF3P )TEMPZ.} HCOPYdCn,x OINDR PINDR DEPRPOS #INDREPRPOSQXPOS FEOLTEST PUTCREOLTESTQEOLFLAG FPPAGE.}:X;EXPANDITPINDR 'INDR$>;;RESULT%>;;ENTRY EXP132" Q@INDR7, PEXPBUF96 R>EOL@ HEXP2J.}:;;FINISHED!T EXP2M>^R> h EEXP1r Q@INDR7| IEXPNVM>,O> EXPNV'SAVEYT?? QTOKADR8PEXPA.}DRQTOKADR8PEXPADR%>0 EXPLP32EXPADRQ8 PEXPBUF9& IEXPLP0M>: PEXPBUF9D %SAVEY.}N !EXP1XX;Input RoutinebX;l INPUTQ> >v EPUT$> &IPUT0 &ILENX;INLOOP&SAVEX GETKEY $SAVE.}X R>EOL FINDONEM>R>  DINLOOPR>~;;Delete?  HINEXT(>  FINLOOP*04 EPUTX> !INLOOPHX;R I.}NEXTR>`\ FINLOOPfR>{p EINLOOPz PCHARR> A DNOTUP R> Z ENOTUP,O>  NOTUP(>? FINLOOP PMY.}BUF9 QCHAR EPUTX2 HINLOOPX;INDONEPMYBUF9 &ILEN$ "IPUT. !EPUT8X;B VBLANK-LQ>V>`VBL1P.}PLR09j2t HVBL1~ QIPUT FVBI1.OUT QXPOST?T?, O>0 PHPOSP0 QYPOST?T?T?, O>' .}>X; QSRTIMR( FBLINK?2X;<Q>F PPLR09P PCSHAPEZQ> 'BLINKN> PCSHAPEVEXITPPLR09X;VBI1.OUT#MYCNT2 QMYCNT2R> HVBI1.XITQ> PMYCNT.}2 ROTAT$>"MAPSCVQCHARSET09;;^F,T?6PCHARSET09@UCHARSET(9J DMAPP2TQ>^,hOCHARSET09rPC.}HARSET09|MAPP2QCHARSET9T?PCHARSET9UCHARSET9 DMAPP3Q>,OCHARSET9PCHARSET.}9 MAPP30 IMAPSCVVBI1.XIT!XITVBVX;X;Immediate VblankX; VBI2Q> PDLIDX& $GOFLAG0 FVBI2.XIT: #.}MYCOUNTD $MYCOUNTN(>X HVBI2.XITb PMYCOUNTl %BLKPOSv3)> HNON0%>NON0'BLKPOS QBOXPOS8 PHP.}OSP1CN>? QBOXPOS8 PHPOSP2X;%> VB2FQCHARSET8 R> FVB2FN 1* IVB2F43> VB2FNQ>H.}PCHARSET8RQ>\)>f HVB2OKp%> zVB2OKPCHARSET8VBI2.XIT!SYSVBVX;X;Display List InterruptX.}; DLI15A5 $DLIDX QDLICLRS9 PCOLPF2 PWSYNCQDLICLRS29 PCOLPF1 PWSYNC #DLIDX7$>.789B.}X;LX;Routine TestVX;`BEGINQKEYDEFjLKEYDEFt HGOCLR~Q> PKEYDEFPKEYDEFGOCLR CLRSCR PIPUT.} PCOLOR4 PCAPS PPAUSE? #PAUSE? PCLICK? PDLIDX PBLKPOS PMYCOUNT PMYCNT2  PGOFLAGQ>5CHARSET P.}CHBAS(Q>2 PCSHAPE<Q>F PBLINKPQ>=Z PSDMCTLdQ>n %>4VBLANKx $>5VBLANK SETVBVQ> %>4VBI2 $.}>5VBI2 SETVBV Q>4DLI1 PVDSLST Q>5DLI1PVDSLSTQ> PNMIEN INTRO Q>5MYPM PPMBASEQ> P.}GRACTL" ERASEPM, PSIZEP06 PSIZEP1@ PSIZEP2JQ>DT PPCOLR0^Q>8h PPCOLR1rQ>| PPCOLR2 #GOFLAG%>.}Q>xDEFP1PPLR18 PPLR281 IDEFP1JQ>DT PPCOLR0^Q>8h PPCOLR1rQ>| PPCOLR2 #GOFLAG%>,4 ` CHAR =======!TROLL =====:= =< P==P=h==== === ===2} = U===V==== =?==== == P=P=P=`==== U=_=_===,==  ==2}=0===0=  === = ===  P===P====  ===== = =  ==P===S==2} = ====== 3= ====== =======  ====P===P  =====2}== ======= ======= ======P= = = === == =S2}===3= == WIZD ====U=u== @=P===T=t=P=U ======= T=U=U==u=2}=U= ======= =@=@==@=@=@= =U=U==]=_=U= =======  ==2}=====! T=T=T=P=t==T=" =======# ==T=T=T=P=t=$ =======%2} T=======& =======' ====T=T=T=P( =======) t==T==2}===* =======+ ======T=T, =======- T=P=t==T===.#BACK2}GRD =?=======/ =====P=@=@0 =?=== ===1 <=====@==2 ====2} = =*=3 =======4 =T=U=U=U=U=U=U5 ===@=@=P=T=U6 ====?=?==7 =2}?=?=====8 =======9 =======:"CAST36 =====U==; = ===2}=U==< D=U=U====== @=@=@===U=U=> =====U==? =U=U=U=U=U=U=@ =2}====U=U=UA U=U=E=E=U=U=U=B ======= C =====@==D === =U==2}=E =======F!BORDR =======G#POINTER ===U====H = ==== ==2}I!WALLS U=@=J=`=@=b=@=UJ U=i=A=i=A=A=i=UK U=`=J=@=h=@=h=UL U==)=== ==UM U=I=2}I=A=A=a=a=UN U====!=!==UO U=H=@=b=b=@=H=UP U=I=A=I=I=A=a=UQ U=B=B=`=b=@=H=HR2} U==(= ==*==S H=H=@=@=H=H=@=UT ==== ===UU U= ===)===UV U===!=!2}===UW U=)====)==UX U=a=a=A=A=a=a=UY$CHARBOMB =======Z ==_==?=={=2}![!TCHAR =======\ =======]!WCHAR ======<=<^ ======<=<_!2}TITLE =======` =======a ==?=<=<=?=<=