@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 D8u1020 POKE 764,255:CLOSE #N4:OPEN #N4,N8,Z,"P:":? #N4;"@A";CHR$(N8);"M";CHR$(LMAR);:RETURN 1600 SCR=SCR+320/H:FOR I=N1 TO T}HT/N81601 IF MODE=0 THEN ? #N4;"K";CHR$(COLL);CHR$(COLH);PRNT$(N1,LIM):GOTO 16101602 IF MODE=1 THEN ? #N4;"L";CHR$(COLL);U}CHR$(COLH);PRNT$(N1,LIM):GOTO 16101603 IF MODE=3 THEN ? #N4;"z";CHR$(COLL);CHR$(COLH);PRNT$(N1,LIM):GOTO 16101604 IF MODE=V}6 THEN ? #N4;"y";CHR$(COLL);CHR$(COLH);PRNT$(N1,LIM):GOTO 16102100 FOR J=N1 TO W2101 IF MODE=0 THEN ? #N4;"K";CHR$(COLL);W}CHR$(COLH);PRNT$(N1,LIM):GOTO 21102102 IF MODE=1 THEN ? #N4;"L";CHR$(COLL);CHR$(COLH);PRNT$(N1,LIM):GOTO 21102103 IF MODE=X}3 THEN ? #N4;"z";CHR$(COLL);CHR$(COLH);PRNT$(N1,LIM):GOTO 21102104 IF MODE=6 THEN ? #N4;"y";CHR$(COLL);CHR$(COLH);PRNT$(N1Y},LIM):GOTO 2110CHR$(COLL);CHR$(COLH);PRNT$(N1,LIM):GOTO 21102104 IF MODE=6 THEN ? #N4;"y";CHR$(COLL);CHR$(COLH);PRNT$(N1 WELCOME TO THE ANTIC MONTHLY DISK Most of the pr [}ograms on this disk arewritten in Atari BASIC. Some requirespecial hardware or specific instruc-tions. Please read the cor \}respondingissue of ANTIC for completeIf you wish to order a back issue,or need subscription information,call us at (415) ]}957-0886. For creditcard orders, dial (800) 227-1617, Ex.133. In California, call(800) 722-3545, Ex. 133XXX *** BONUS F ^}ILES * BONUS FILES *** Antic's Grand Underground Text Adventure (SPTIRE.EXE) _} By Steven Lee If you're homesick for themysterious caverns of ZORK, here'syour chance to explore a newunder `}ground labyrinth of fun andlighthearted adventure! It's Hot,It's Now, and It's just waiting foryou to read the HELP file a}forcomplete instructions!XXX *** > MORE BONUS FILES < *** Hold onto your hats, becauseif THAT'S not enough fo b}r you,we've ALSO included a completeversion of the Print Shop EnvelopeMaker with the Mailing Listmodification *already in c}stalled*!Just RUN "D:ENVELOPX.BAS" and buylots of stamps!!XXX *** > Even MORE Bonus Files < *** And if you're S d}TILL notsatisfied, we've got MORE:Whenever there is sufficient room,we will be including TYPO II andLINKLINE on the month e}ly disks.TYPO II is in LISTed form, and must be ENTERed before using.It will not RUN from the menu.Please see the HELP f f}iles on theback of this disk for LINKLINEinstructions.XXXThe menu that appeared on the screenwhen you booted the g} disk will onlyRUN programs with a .BAS extender.If you try to run a program and theresponse is 'cannot run Filename',che h}ck the file extender with thislist:XXX.BAS BASIC saved program, use menu RUN or LOAD and RUN..LST BASIC list i}ed program, ENTER then RUN..EXE Assembly language 'Load and Go' file. Remove BASIC, boot DOS, type L j}then enter the filename..ASM Assembly language source code (Atari Assembler Editor) Must be compiled. k}.M65 "SAVEd" MAC/65 assembly language source code. Must be compiled.XXX.OBJ Machine language object f l}ile. Same as .EXE but not 'Load and Go'. See corresponding article..SYS Reserved for DOS system files..TXT m} Text file. Usually accessed by another program..ACT ACTION! language source code. Must be compiled..LGO n} A Logo program. Requires the Logo cartridge.XXXAll programs from ANTIC issues datedprior to August 1984 were re o}producedfrom ANTIC's Archive. We've updatedthem from our HELP columns andmost are compatible with the XL andXE machines. p} We have worked to insurethat our programs operate aspublished, but we consider all oursoftware listings to be works inpr q}ogress which we encourage you topersonalize and enhance.Good luck, and ENJOY! -ANTIC ED r}d ENJOY! -ANTIC ED H^_O""FILECSRETADRADRSTEMPQBLNLINEDOTSTAMPTOPDLFLACOUNLSSTARFINSCCCPASt}xxxxxwxx! ) * 2 A @@A u} THE ENVELOPE MAKERv}BY TODD R. THEDELL(c)1987, ANTIC PUBLISHING(DISKFILE ENHANCEMENT-BY S.L. HARRISON.(c)1988, ANTIC PUBLw}ISHING2"A@";@,d SETUPnrr;@,;@$$@,;@$$@,;@$$@,x};@%,;@$$@,;@%,x11;@,;@,;@,;@,!6.>:A%,!CLEAR SCREENy}1 6. "67@$$@,.167@,. 6.6. . . . . 6..6. ------ 6.| |z}ﬠ  ApSETBG A&MAIN PROGRAM{} SETBG-*0@+H:,$@,-$ CAPS"-*A+F:A,",$@d-$, CURSOR6|}-*AR+F:AR,",$@-$@ WELCOMEJ(T'-@@'@@^ A->CURSO}}R OFFh( .r( . .|( . .!!( . .""(~}""(||""(||""(||}""(|Š|""(|ԠР|""(|Š|""(|Ҡ}|""(|젠|""(||""(||""(|}|""(||""(||""(}-@A @@$& CONVERT0-@B:,:!!67<,.>:@:7<,,%A(,D }N$X SENDERb #A6-l"v A`67$@$%@,. 6-B:,67%@,.}% A6-%@% A # B( Ap#SETBG 6-B:,$$-P:'@$,&@-}@%@,,(7$@$%@<$@$%@$,  A->CURSOR ON'-@@ Ap}'SETBG9,(#? Y9@4Y)4y$ ( ApSETBG.-@}@.(ҠΠ 6-* ALOWERCASE4)-@%@)(%@->>@}HB:,"A R67$@$%@,.\ 6-B:,f67%@,.p6-%@z!@A } A  ACURSOR OFF AUPPERCASE"6. A SENT2(-@}@ ApSETBG#A@d# AE(ҠŠ6-6. A}LOWERCASE@-@@%@(7$@$%@<$@$%@$,)-@@%)(%@->}@B:,"A AP-&@@ A'`@3"*B:, @}6'@ AE67$@$%@,.$ 6-B:,.67%@,.1( A3 5 A 86-%@}B!@AL AV AUPPERCASE`"6.j(t ACURSOR OFF~ 6}-B:,$$-P:'@$,&@-@@%,,(7$@$%@<$@$%@$, -@}@ ACURSOR ON2%(? Y2@!4N)4n6.! A `}$ CHECK( Ap A 3-@@'@@3L. MARGIN (}  (ԠҠϠŠР( (ŠΠŠҠ2 (< (Ӡ}F (P AERROR CHECKZ!@@!L. MARGINd@i.@}.@@P:n(x$$-P:'@$,&@-@@%,,(7$@$%@}<$@$%@$, $$-P:'@$,&@-@@%,,(7$@$%@<$@$%@$},  APPOSTAGE-@@++(#ǠӠŠ-@@ ++}(#Ӡ˾ϠРǠ$ POSTAGE-@0@(-@0@(| |"-}@0@(| |,-@0@(6$@,,(" ˠҠҡJ3()( }ΠΠҠҠ3 AT SPACES^-@h(@ r |(@$ SIDES$}6-@ A $->SPACES$6-@d A $->SPACES(@$ FOLD-@@!}(@  $ BEGIN6-$@$%@6-$@$%@$6-%@$& BEGI}N0 A:(((@7@<@4,7<,D$NPRINT ITX (BEGIN)b SETBGl Apv$6-@9} A $(@'6-@(6-@'6-@)-@@@(@ } 6- A  6- A SP=C3:GOSUB 1620(@(@6-&@6-%@6}-&@  A (@ (@ . .*& A@&(@ . . . .4}>##(@7@<@d,HV"(@7@<@,.6-8 AK(@7<,V6.7<,R22}(@7@<@d&+@%B:,,,\f#6-@ A # Ap(@ 7<,z88(@}7@<@d&+@%B:,,, J"(@7@<@,, A?(@7<,J6.7<,22(}@7@<@d&+@%B:,,,! A!7,47,A"0(@7,6.7,;1(@7@}<@d&+@%B:,,,; A"@""(@7@<@d,(@ A(@# } A(@#(@  A 6-$ A@. (@8 T6-@ A # A}I(@7@<@4,7<,T6.7<,B .((@7@6%B:,<@t,.#36L (@V A@`} Aj A@t # A(@#(@~ # A(@#(@ A  (@}  A@ (@ (@(@  -@Q@x@  A(@}   A  ACURSOR ON $ MORE??? ( Ap# 6-@ A&( -@@}2 4'(ϠՠԠϠϠҿ N4@< 4N)4nA&F 'P <(/(#ϠՠԠŠŠ}ӿ N<@Z 4N)4nA&d  A'0? IT AGAINn  A%SAY WHAT?x ( $GOODBY. }MAIN PROGRAM  * A'   A0-->WELCOME  A-->SENDER  A0->KEYBD OR DISK  A `}-->SENT2  A`->CHECK  A->PRINTIT  A%->MORE?  KEYBOARD OR DISK  Ap}SETBG !A@d!UPPERCASE Q(-@@D(%ENTER NAMES FROM EYBOARD OR ISK? DQ@ }4K)4k6- $ 0D*0d A0  6-@ GET NAME FROM DISK ' Ap A'SETBG}, CURSOR ^(-@@:(INSERT DISK WITH LABEL FILES^( PRESS Π WHEN READY Q@.@}@K:;)@GAUQ A0 A A@;@@D:*.*A(}&} ( A1 @(( A10 =@(9(#ENTER NAME OF FILE CONTAINING NAMES=: X 6.D:<7@<}@,0:*7@<@,0:K67@,.Q6.X6.D 7@+@@76-N }@X B:, @ A2b 6-%@l $!@@$ A2 v A1P " A1P} @ A2p ;(-@@;([DO NOT INCLUDE BLANK LINES!] H-@@;( HOW MANY LINES} IN EACH RECORD 3H@ @ @(6(YOU MUST HAVE AT LEAST ONE LINE@ A2` 7!@(7( YOU CA}N'T HAVE MORE THAN 4 LINES ; @)!@--@AP1 ; A0  +@+@@} $D1:ENVELOPE.TSTA0  +@+@@O9:2$8BRWTFMMMSSCCPICFGHSUCRCCCC}@ }GEDIT.BASBY ROBIN SHERER(c)1987, ANTIC} PUBLISHING6-F:B2y,@ASSEMBLY ROUTINES;@W,TDELAY.OBJCC6.9hh}h` ;@T,FILMEM.OBJ @@6.6hhhhhhΑ̈hΈ}̈`>H;@I,MOVMEM.OBJR;;6.1hhhhhhΑ̈hΑ̈`pz;@},SOUNDS.OBJii6._hhh> Ңҩʎ`(ҩҩ`ҩʍҩ`};@7,CIOCTL.OBJ//6.%hhhihhBhEhDhIhHLV ?;Av,!67@,.067Av,.}?67@,. MAILINE;@,;@,9@, +@ AT%%6-F:@,%F:@},$AV#SET UP COLORS-AA "  12,0,29,66,71123,156,214,234"}DRAW SCREEN, @6','/@y@',A'/@yAJ-@@}T6-+$@,&@^-AAh,&@/&@ r | K6-@76-@}'6-@36-@?6-@K6-@GET USER INPUT6-?:C:,<@@, AQpAdAU}!6-T:,!6-R:,-@@ 68,-F:A%, &6-F:Ad,&"@ACp} PAINT -& ,/% FLASH CURSOR 1 1&&1%&0 1%: },D ,&N ,%&X ,%b6-?:C:,<@,l @v6-?:C:,<@, , ,&} ,%& ,%@w6-?:C:,<@,  ,,&,%&,%}CHECK KEYBOARD"AUAQ6-?:C:,<,$"@G!AdAU$%"@B}6-% ABP "AA@@ A(AGP "AB6-%@*"AC6-&@}4"A46-&@>"A56-%@H36-@ '6-36-@R' }6-'6-@\'!@ 6-@ '6-@f'!@ 6-@ '6-@p6-?:C:,<,z A}RGET COLOR@AP"6-P:+%@,'@," @+,&@A+/%@}A6-?:C:,<@@,&6-T:,&"AI 6-R:,COLOR HUE!!@*}@AI6-+&@,$@("@(6-F:A%,%@("@(6-F:A%,&@} 6-!AU6-AUA% AG$COLOR SELECTION.!!@*@}AG8 B+,&@A+/%@ALV"ABP`"@6-%@j}"@6-&@t @6-@~!@q6-@q AG`SAVE SCREEN@b}APNAdAUN6-?:C:,<+F:@,%F:@,$AV,:F:,,< K + AT(0(Filename to SAVE4KB:, @AP\L7@<@,4D*+}7@<@,4:)7@<@,4:,R6.\ APp967@<@,.D:967@:F:,,< K + AT(0(Filename to LOAD4KB:, @AP }\L7@<@,4D*+7@<@,4:)7@<@,4:,R6.\ AQ@967@<@,.D:967}@2@@'@%\2@'@%` &6-%@!*'& AC-@@"(}@06-%@69'C AP$&} A8,1/@E-@@a2@}A7@ }2A8@ +U A8,#@B/,@;/@EA8Q,@}U 0X A8,@1/@@C-@@X(@penance1I-@@,(@} continuesI-@6?5a2A7@ ;2@A8@ ? a-P:'@,}6@:j -@6@<2@0@@ N6-%@R `6-%@j AX}` -@6@>2@A"&@`2@b0 A4&'@"P:'}@,0@&l? , @',?2@vb-@@=2@A}"&@b+@'&+'@"P:'@,,,{$$6-?:<B(<B(<@,a , /2}Q2@[@2a,6-$s +@AVAR"76-6@}'A0C6-O6-aAAsA@6-6(@&&&&&&&&&&&& &&&&&&}%2@B-A@P6@^2@@b l#A-A0}@ Ap""A`2@@;2@@@W2@}@@s2@@@-@ II6-?:"@&}APC$R^6-%@@'!,>-@6@Z2@Ab@^ Wg2}@@C2@%@P@@S1&@g@2Ae\5 @2,!6-&@5}"Ae^ Ah, AUaZ @&,52W2@}Z$f@w#6-&@5-@@R(@P:'@, fA  F:B}2y,"@@ 86-@$F:AD,". A8 A COLOR 25:PLOT X1,Y10 A6-F:A}2,0!@A@?!6-%+ @,&+!@,? )!@AP 1"@2A0#}"Au A# A0 6-O6-@&@2!,'6-I+A0%@$+!@,,%O, Q%2}@!@@G2Q AP A4,M1%@"@2)}@2/,=6-%@GA)M,"@&A$1"Au A#@21,%@)!!! }Af* ApA .'"@@',%@0'"@@2',%@3/"As6-@ }% A/ A5/"At6-@% A/ AB AL}6-%@@'!,>-@ }6@\2@A"&@}6-?:<B(<B(<@,MK%2@)  }K2N?-@S@;2@@? Q772@@b&&P:H: },$@,@R%%2@b@S'1&@'@2A V5 @2,!6}-&@5"A [ A4, A`a @&,52W2@}a AEE319,53,72,42,217,1,23,0,0,0,0,0,106,72,72,53,173,1,23,0,0,0,0,0 FF106,64},81,53,162,1,23,0,0,0,0,0,106,72,85,53,217,1,293,0,0,0,0,0EE319,53,72,42,217,1,23,0,0,0,0,0,106,72,72,53,173,1,23,0,0,0,0},0EE106,64,81,53,162,1,23,0,0,0,0,0,106,72,85,53,217,1,83,0,0,0,0,0(@@2,53,72,53,173,1,1,0,0,0,0,0,2,53,72,53,173,1,23},0,0,0,0,02EE106,53,64,40,162,1,18,0,0,0,0,0,106,53,72,42,217,1,23,0,0,0,0,0<@@83,0,0,0,0,0,2,53,72,53,173,1,1,0,0,0,0,}0,2,53,72,53,173,1FEE23,0,0,0,0,0,106,53,64,40,162,1,18,0,0,0,0,0,106,53,72,42,217,1P??23,0,0,0,0,0,23,0,0,0,0,0,106,53},72,52,173,1,23,0,0,0,0,0ZKK106,57,81,47,193,1,106,53,85,72,217,1,106,53,96,72,144,1,23,0,0,0,0,0dFF212,57,96,72,144,1,}23,0,0,0,0,0,638,53,85,72,217,1,23,0,0,0,0,996-F:A`,.-AA@J2@@f2}@@6-P:H:,$@,X7A`%@$+"@,&@$+"@,; X-@}6@d"2F:B7p,>2@A@B P6-&@d A A`} AA`4(@}6-@*6-@4 A@TAY$(@}06-}<"@H6-@T6-@BE!-@1-@%A(@E EI-@}IA AA0AA0AJ=AY@4'-@=(@SCORE=OO-@}@5(@TIME=P:'@,?A4E,O AT&&(@ ***** ***Y&&(@*} *^&&(@** ***** *** * *c&&(@*** ** * *h&&(@*** **** } **m&&(@ **** ** *r&&(@*** ***** *** *w&&(@ * ****** *** *|}&&(@ &&(@*****************O6-@6-'6-@36-@ }?6-@CO6-A$&&(@************ ******&&(@ **** *&&(@ }**** ** * * *&&(@* ** ** *&&(@**** ** *&&(@* ** !} * ****&&(@* ** ** *&&(@* * ** ****&&(@ "}&&(@**************O6-@6-'6-@ 36-@?6-@CO6-A$#}&&(@ &&(@ * * &&(@* * * *&&(@$}* *&&(@* *&&(@* *&&(@* %} *&&(@* *&&(@* *** *** *&&(@*** ******** *&}**O6-@6-@'6-@36-@?6-@CO6-A$&&(@ ******'}*&&(@ &&(@*** * * &&(@* * * &&(@(}*  ** &&(@* * * &&(@* * * &&(@* *)}****** ** *** * &&(@* *! &&(@****************# O6-@6-'6*}-36-@?6-@ CO6-A $ $& &&(@* *+ &&(@******+}* *0 &&(@* **5 &&(@* ******* : &&(@* **? &&(,}@* *****D &&(@* * *** *** *I &&(@* * *N &&(@-}* S &&(@*******U O6-@6-@'6-36-@?6-@ C.}O6-A V $X &&(@* *] &&(@* * * *b &&(@** * /} * *g &&(@**  * ** *l &&(@* * * * *q &&(@**** * ** *v 0}&&(@* * * *{ &&(@* *** ****** * &&(@* * &&(@1}************ O6-@6-@'6-@ 36-?6-CO6-A $(#g +@2}AVAR1A@fCAR@UA@fgA)#((BY TONY BARNES*#( YOU3}R SCORE = ,#''( PRESS THE TRIGGER TO BEGIN.#)(@ )(@0#((@ ((4}@2#""(@ < < << <<4#""(@ > > >> > >6#""(@ <<<< < < < <8#""(@5} > > >>>> > >:#""(@ < < < < <<###(@ > > >>> >>> >>>=#%2@c@@6}G2@@b@@i2@@b@@2@@@@>#116-?:C:hhh e7} ԝЭ`,<A,F#j +@AVAR1A@CA ADUA@PgAA8}jK#%2@A@@G2@@@@S6-_6-@6-P:H:,$A%9},%A$P6-@6-AM#V6-@6-A>6-$+F:A2,@,%@PJ AUV6-@P#j :}-@6@62@T2@%@P@^@2j,U#/@  A;}'5AY!6-B56-AV$A$'G;6-C:.hhhhhhh`,GFM,TO<},KNT'FF6-C:9hhhhhhh fˑ`,'WW67@<@`,.<B<$f}'6-C:Yzk^,'""6.)lѹ(l('RAAR'AA$<6-?:<<<A,F#?}BR6-"'!!6-?:KEYBD OR DISK2990 REM KEYBOARD OR DISK3000 GOSUB 2%d}70:REM SETBG3010 POKE 702,64:REM UPPERCASE3020 ? CS$:POSITION 2,10:? "ENTER NAMES FROM EYBOARD OR ISK? D";:INPUT #16;Q$%e}3030 IF Q$="K" OR Q$="k" THEN FLAG=0:RETURN 3040 IF Q$<>"D" AND Q$<>"d" THEN GOTO 30203050 FLAG=13060 REM GET NAME FROM DI%f}SK3070 GOSUB 270:GOSUB 310:REM SETBG, CURSOR3080 ? CS$:POSITION 7,10:? "INSERT DISK WITH LABEL FILES":? " PRESS %g}Π WHEN READY"3090 CLOSE #1:OPEN #1,4,0,"K:":GET #1,L:IF L<>155 THEN GOTO 30903100 GOSUB 310:CLOSE #1:OPEN #1,6,0,"D:*.*":?%q}^?B%DOS SYSB*)DUP SYSBSBILBOARDLSTBZDOC TXTBFsENVELOPXBASB*GEDIT BASB`HELL BASBCHELP BASBKMENU B^PATCH LSTB(ySLEUTH BASBSPTIRE EXEBDSPTIRE TXTBYSTRING1 BASBaSTRING2 BASB iTRANSFUSBAS "}"3110 TRAP 3120:INPUT #1,TEMP$:? TEMP$:GOTO 31103120 CLOSE #1:? :? "ENTER NAME OF FILE CONTAINING NAMES":INPUT FILE$313%r}0 TEMP$="D:":IF FILE$(2,2)<>":" AND FILE$(3,3)<>":" THEN TEMP$(3)=FILE$:FILE$=TEMP$:TEMP$=""3140 CLOSE #1:OPEN #1,4,0,FILE$:%s}COUNT=03150 INPUT #1,Q$3160 IF LEN(Q$)<1 THEN GOTO 32003170 COUNT=COUNT+13180 IF COUNT>4 THEN CLOSE #1:GOTO 32203190 GOT%t}O 31503200 IF COUNT=0 THEN GOTO 31503210 CLOSE #1:GOTO 32703220 ? CS$:POSITION 2,11:? "[DO NOT INCLUDE BLANK LINES!]"3230%u} POSITION 2,10:? "HOW MANY LINES IN EACH RECORD 3";:INPUT #16;COUNT3240 IF COUNT<1 THEN ? :? "YOU MUST HAVE AT LEAST ONE LI%v}NE":GOTO 32603250 IF COUNT>4 THEN ? :? "YOU CAN'T HAVE MORE THAN 4 LINES"3260 IF COUNT<1 OR COUNT>4 THEN FOR DE=1 TO 150:NE%w}XT DE:GOTO 30203270 CLOSE #3:OPEN #3,4,0,FILE$3280 RETURN %x}0 RETURN $3TUFmVXCYCVXYSPSCJSTSCAAJUMPPOSNSSSHAPBYTSTICSTCPLY)z} ){}@ !")|}#$% SLEUTHBY HEATH LAWRENCE(c)1988, ANTIC PUBLISHING A AP)}}MAIN ROUTINE( A`6-6-6-) A`/6-56-;6-G6-@S6-@g1@@s @)~}6-A2 "6-@ @<6-@,-@6@:6-%@V2@@)}@h-@ y(@-@A  FO -(@--(@O2@)}P]"@*"@'6-%@9-@@!G(@S6-@] AZ]")}@*@%6-@16-@=6-@I6-@S A0] A d\"@*"@'6-%@9)}-@@!F(@R6-@\ AnT"@*@%6-@16-@=6-@J6-6@)}T A0x16-"@'6-@1 A`%"@6-@% A` @@MOVE CURSO)}R\6-R:+&@,$,*@wOT:+&@,$,"*"AY A\$\"@-$(@)}8-@@ < B-R(@>:,\ A` -(@>:,W6-@$+"@)"@)")}@,&@$+"@ )"@)"@,6-@$+"@ )"@)"@,&@$+"@)"@)"@)},} 6-%6-%A6-%@$+ @,&@$+!@,o6-%@$+ @,&@$+!@,w1)}}-\(@02@%@@R2@\ A`INDICATE PLAYER TURN)}[ --@"((@^<-@@0@ L-@"[(@ k'2@%@@@)}+ 7-@"F(@^h2@k$GAME OVER[-@"(@**6-@)}4 AQF:B2y,@A`[ @ REVEAL SHAPE-AA--(@>:,[2@)}+&A,$@@@o-@@us w 2@", -(@>:8)}<,,)6-8<,,$,JUMP ANIMATION6a -!(@>:%@2,'-?(@>:%@2,S1@@a)}-@@ -A@6@6-A%$+!Au,%A&$+ Av*!A ,%A'$+ A!*!@e)},%A($+ @f,2@@@Jg-@!(@>:,# /-@!>(@B d2@)}g$TINITIALIZE/PLAYFIELD^ +@!AV'AV3A@5EAQ6)}-]6-i6-@u6-@6-@6-@6-Ah-@#-2(@)}>-@ M(@Q e-@ q-(@r-@(@" 6-@)}@J-@@q68<,-P:H:,$@,%@iw-(@|+2@+%,$@@)}@/ 3 U2@g-@@!{(@ᠣ 0-@@!(@)} 0'-@@"$(@^'$REDEFINEN +A@1A@C-@@)}N(SLEUTH8-@@$( 1 Joystick'(8( 2 JoysticksH-@@'6-&@H(+")"@)},A9@0<@0,5AF:A@,&@?+@QA@c-@@w(@)}SLEUTH-@@(@&-@@B(@ȠT-@@p(@PL)}EASE WAIT...6-+F:A,%@,$AVf-A#*%F:BsD%,. :6-AdN-@@&b)}-@f"& %% 6-%@# &$SHAPE DATAll24,24,60,90,153,36,36,102,25,26,60,88,152,3)}7,34,96,153,90,60,24,24,165,66,0,24,24,60,90,153,231,0,0,60jj126,90,126,126,90,102,60,24,24,72,62,9,56,78,193,108,16,126,)}239,223,223,110,60,254,16,48,121,222,120ll132,0,24,60,126,66,255,219,90,195,60,90,153,255,255,153,90,60,56,68,130,255,129)},181,177,255,60,102,102mm14,24,0,24,24,36,24,165,90,90,165,24,36,60,36,36,36,60,60,165,126,132,72,48,255,133,135,133,255,)}0,8,254ll28,62,255,90,60,0,126,255,165,60,90,129,255,24,60,36,126,165,189,36,102,60,102,195,255,60,60,60,126,15jj14,8)},8,8,104,240,96,170,1,128,1,128,1,128,85,255,255,255,255,255,255,255,255,255,255,255,231,231,255ee255,255,255,255,231,195)},195,231,255,255,255,195,129,129,129,129,195,255,195,129,0,0,0,0,129,255 D1:SLEUTH.BAS  ,231,195(u Ro //fYY婙fff@`Xee`//fffYYYfff-}``XXX //<<33??3Yfffffeeeee``//,, 0pPw9?<1o-}ffff````XXXX@@@@@@9;;;@Op@@CooooooooffffffffXXXXXXXX@@@@@@;;;9|@@@@oooooooo,,//-}9WPp0 1<?offffXXXX````// <<333??喖Yfffffeeeee``-}//YYYffffffXXX``/ /喖YYffffeeX`@`-}""""""#""" ` 00000003333333 3333-}00~0 ~ <~~< *o@@@@@@@@o*  *oo* -}j*@@@@@@@>`<|~ffff>fff<ck>6f< x~ 0~<~~<-}~x|nf8x8<<ff"ffD"22*LL8DDy68of;00p pxL̈8D-}0~~006<00 8000000-}00`6<00000>000<``nf>ff~fff~~f<-}flxxlf`````~cwkccfv~~nf0<24~< < >f>-}6 ``|f|00<6<00<<ff><6,8<f>|6,<8f>``|ff|<```<>ff>~>ff>|``|fff-}<<``lxln<gkcff>|f```<`<|~ffff<fff<ck>6f<|~ 0~0ckw6Ak6k666<00)ҩ/ԅM©R'SHXY-}mn-/nULn}inߢnЀnn nHnpߩn i(iZUTgo04ƱgoR#R )3lR-} Q;L+Ʊ88~l ?? 1)X*lűWS ; Q;L+ ;Z0Lj+X J"'B<-}4 fг:$XЧ' 0Й-Е L*8 >>+HHl :L)dY)D: = ELQ;C-}7 , Q; }= =L, BX!LQ;'SX1-L&, Q;L79L,) #h"=*%c©$ Q;L), )i LQ; ':_2-}_-62MXH7 H h9'W~L,```:4aa Q;L79a^: ^-} ;)X8 eÅéiii~ <pࠐ 7; ;&XS-" ; }=S ; Q;X-b&NL+' Q;-} : :==UTk 9  h ԍi٩==LB)` :Uk 9CkL--}:U L9UDk 9 :UӢk 9lL- 0kaTU 9#Kxy = =BDkE-} JK V0=D~EnHIŰ B V0 = N= X , d< =`H = N=hLQ; -}:Uk 9#+LB)UN 9`(I*X)  <+LQ;goW.W#WW,LQ;.%- -}/"64< < d<3LQ;& 0h LQ;31 Q;L79L3:8?N!)LQ;?Y5Z ;J[ҩ-}[L':L3:@<C iiBLQ; Abb d4UA 9UUL9'1mImLZ9U Uv 9@ 9ULZ9Uv 9`8-}LZ9 BHI V`DEH BI V`'hT` )i Q;` )i Q;`U( 9k 0 9)-} 9`b@Bl 9澤`d(Jl 9澤 `:Sl 9澤 `!e\l 9澤 `# cИ&h-}Ϲel 9澤`1мgRkl 9澤 R`xlX``i ȘlA睊 `X AAUT*H-}UT =h PPLy;QQȄ ɛL~;ľ넿&8Ue UTT 9 9澤ĿɛзUT`U-}HTɅʅ Ti(L;L];`؄(Px( X. g%漊 ?D?EUeTlA 9 ?:潦8-}¥UT)l 9`U؄(Px T ' g ?D?ElA 9 ?:UT潦8̥T )l 9-}` ` -l`UT)l 9`ȅ@(`ЍЍЍ/ԩ 0=1-}"/`/ԩ$Ǎ0=1"/`` B V0`pp0Dppp-}A=pppBH0A=N S W E U D LOADSAVEQUITDIG SAY BEATKICKKILLBURNLIGHCLIMCLOSCUT DROPEAT EXA-}MLOOKGET TAKEGIVEGO ENTEINSEJUMPSWIMLISTOPENPOURPULLPUSHREADSLIDUSE WEAR}-}-...///^/^/// 0n0q11133344444k5k55-}5q66687s777ASPIBANIBEDSBOTTBOULBUTTCABICAR CARDCARPCHEECOOKCRACCROSDODODOORDRAWDWARDYNAELEVFOOTHAIRHAT HOLEICE JACKKETTK-}EY KNIFLADDLIFELIGHLIQULOGSMAN MASKPIN POOLRAT RESTSHELSHOVSIGNSINKSKELSTAITIRETOADTOILTRAPTUB VAMPWAITWINDWIZAWRITPOSTBED BI-}RDGUARLOG 1@8@@@D@J@Q@W@^@a@e@k@q@v@{@@@@@@@@@@@@@@@@@@@@@@@@AA AAA A$A(A0A6A:A?AEAIALASAYA_AeAAsp-}irinBanisterBedsBottleBoulderButtonCabinetCarCardCarpetCheeseCooksCrackCrossDodo birdsDoorDrawingsDwarfsDynamiteElevatorFootp-}rintsHairHatHoleIceJacketKettleKeyKnifeLadderLifeguardLighterLiquidLogsManMaskPinPoolRatRestaurantShelvesShovelSignSinkSkelet-}onStairsTireToadsToiletTrapTubVampireWaiterWindowWizardWriting    BHBB-}BCCCDeDD5EEEZFFFGrGGGIH|HHIIII J@JJJ3KKKYLL7MMMYNNNO]OO$P@PoPP You are outside o-}f your car next to a deep hole. It is pitch black. Luckily you see a light down below. The room is so smoky-} that you can only make out the outline of what appears to be a window. It is a long corridor created of stones.-} The den is empty, but you notice a crack in the wall which is just large enough for you to crawl through.-} You feel disoriented in this tunnel. There is nothing here. A floating sensation makes you feel queer.-} There is a musty smell in the air. There is some writing on the wall. You look around suspiciously, but s-}ee no trolls in sight. There is a door to the east. On the walls of the cave are small drawings of dancing gnomes-}. There is a door to the west. The entire room is covered with carpet, bloody red in color. There -}is plenty of dirt here, and you notice footprints in the grime. You're at the top of the staircase. The stairs are-} cracked and broken in many places. Banister posts hold the staircase up. You're at the bottom of the staircase. A-}t the foot of the stairs is a door. It smells and looks as if it hasn't been washed in years! This is a ten-f-}eet deep pool. It is extremely cold here. You shiver and shake from the freezing temperature. The smell is un-}pleasant and you hold your breath in disgust. This is where all the brewing took place.-} The room is empty except for a wizard. There is a door to the east. The smell here is of decayed flesh.-} Stale food fills this tiny room. There is a door to the east. The cooks here look like elves and dwarfs. They gla-}nce at you suspiciously and continue working. There is a door to the west. The place is elegantly designed. Each -}table has a burning candle and flowers. This is a tiny space made of bricks. On the muddy floor, you notice-} a large purple "X.# The hallway is... (gasp!) empty. Although there is no one around, it shows s-}igns of current use. You have just interrupted a council meeting of the dwarfs. The silen-}ce in this room calms your nerves. You kneel and utter a prayer. There are many cages holding the believed-}-to-be extinct dodo birds. ...and you thought it was cold in the Fog Room. Little green toads are happ-}ily hopping about. There are also dozens of them lazing around the pond. Everything looks green and healthy.-} There is no one here but you notice huge identical footprints embedded in the dirt and they all point north.-} There are large footprints in the mud which all point east. There are more footprints to t-}he left and right, but most point to the north. No one is here, but many footprints are apparent in-} the dirt, pointing west. There are footprints all over the room, pointing in all directions..} There are lovely carvings all made out of ivory. An enormous rat instills itself in the middle of the r.}oom. It's not the place anyone would want to stay at. The wide-spread dust creates thick layers of f.}ilth. There are three buttons on the wall: one red, one purple, and the third green. You notice an elevato.}r ahead of you. The tunnel is lighted with purple bulbs. You're back on land! A me.}ssage says: "Employees only#. There's no smoke in sight. A yellow display flashes "Lee's Chi.}nese Restaurant.#JRVRRRRRRRRSS,SGSiS|SSSST*TBTNTYTrTTTTTU)U@UYUzUUV3VMV]VVVW#W?W]WWWWWXEXXXX.}XYhYYYYYZZuZZZZZ [.[I[b[[[[[%\<\U\\\\\\ ][]]]]]]!^6^O^p^^^^_A_v____4`c`````aBaQawaaaa.}aa b6bNbgb|bbbb5cNcWcucccd3dudddddDeUeveeeeRfpfffff gFgYgegtgggggh h%h@h_hkhvhhhhhh3iAiXihizii.}iiiSpeak up!!!I don't know how to Do what?The word " is not in my dictionary.O. }kay.Done!That's quite impossible!No can do.I wouldn't try that.That's ridiculous!Follow directions!You're not going an. }ywhere.I don't see any here.You're holding it!You don't have it!Nothing happens.It's much too heavy.You fou. }nd something, but the number of objects in this room prevents you from seeing what it is.Get the trap first!Cannot activate. } device!Bad sector!Disk full!Version 1 doesn't exist!You feel slightly sick from the cheese.You feel very sick.You die . }from food poisoning!You have a cold from swimming the pool.You are running a high fever.You die from pneumonia!The liquid.} cools down.The door is in your way.You have no way to get up there.The wizard sees the grotesque mask. His face contorts .}with terror and he throws you out. -Hit RETURN-The man won't allow you to go there.The cross terrifies the vampire! -Hit RE.}TURN-The rat blocks your path.The mask helps.The amount of dust here forces you to retreat.Where's the tire??? You'll nev.}er get out of this place!You replace your tire and drive off! You and your mother enjoy a wonderful reunion!With what?You .}like digging that much.This is not the place to dig.You uncover a downward opening right where the "X# was.A booming echo .}replies: " ...only if you can catch them!...but they're so cute!He doesn't want to hurt you.You die .}from the poisonous bite of the rat.He lunges at your neck with his two sharp fangs. Before you can let out a scream, you die.}.What has he done?Before you can act, he steals your knife.You've got to be kidding.The fuse begins burning.You hear a l.}oud explosion. You are dead, but your remains are scattered across the room.Playing with fire is dangerous.You can't even s.}tart a fire.The dynamite explodes and shatters everything in sight.The liquid boils.A nice fire is started.It's already l.}ighted.You trip and hit your head against the stone ground. You crack your skull open and die.In order to close it, it must.} be opened first.It's stuck.What are you going to cut it with?It's already in shreds.You give yourself a crew cut.Your h.}air is too short to cut again.There's no more room here.Something won't let you!The falls and immediately disap.}pears!It fell in the pool!It lands on the logs.Ouch! The trap snaps right on your big toe!The rat smells the cheese and r.}uns toward the trap. SNAP!!You feel a lot better.There's no more aspirin.It tasted awful, but you managed to eat it all.N.}o matter how you look at it, it looks normal.It's nothing special.It's ordinary!!!It's not too exciting to look at.It is .} a purple Diner's Club card.It is the ugliest, most grotesque thing you've ever seen.It's filled with some sort of liquid..}It's empty.You don't know what kind of liquid it is, but it sparkles magically.It's hot.It reminds you of a dwarf's beard. }.There isn't much hair to examine.You found something!It's dead as a doornail!It looks like this: -Hit RETURN-There seem.!}s to be some aspirin in it.It's in bad shape.The cheese looks stale.You notice they are short and have beards that reach t."}he ground.They stare at you in frozen silence. I think you better leave.There are ugly monsters wandering on the other side.#}.There's a figure of a man on it.They pay no interest in you.The warning label says: "Explosives - Keep out of reach of ch.$}ildren.#A message above the elevator says: "Emergency exit only.#They resemble a creature name "Count Dracula.#Engraved on.%} the purple key are the words, "George Gnome.#There's plenty of lighter fluid in it.He is tall, dark, and skinny.It's a pr.&}etty, purple pin.The water looks cold.He looks harmless, but looks can be deceiving.They're empty.There are words written.'} on this sign.You can't bear to look.It's written in English.It is a high-class restaurant.They fly away from you.It's o.(}n the top of your head!That's sick!!The skeleton will break if you pick it up.They hop away from you.You can't hold all t.)}hat!You can't give that!They refuse your gift.Instead of taking your he looks at you and laughs.He takes it .*}and thanks you."Now I can eat!# He leaves the place and heads toward the restaurant.A rat doesn't want that!Yum-yum.There.+}'s no one to give it to.You slam yourself against the closed door.Uh-oh. A slide panel made of unbreakable glass covers the.,} opening at the top.A gang of monsters attack you! You are dead!The elevator is closed.Okay. You come out into a tunnel. T.-}he elevator closes behind you.Insert it where?The cheese goes in the trap.It's already in the trap.The door is unlocked!..}The lifeguard tosses your inventory to the other side of the pool. After you swim, you get your inventory back.No sounds he./}ard.They speak a different language.You hear his stomach growl.There's just a bunch of "ribbits# and "croaks.#You hear a .0}laugh, or is it more like a cackle?The waiter says: "Beards okay, hippies - no way. A membership card will do anyday.# -Hit .1}RETURN-Dead rats are normally quiet.It's already open.You found some aspirin! You decide to toss the bottle away.It's sec.2}urely locked.The liquid soaks into the ground.It runs off the ice.It slowly melts the ice. A small compartment is revealed.3}!A door has a knob.That hurts!It won't help.Whoosh... you are teleported somewhere.The elevator slides open!"City of Sa.4}cramentoHome of the Gnomes, Elves, & DwarfsPopulation: 12,500#Whee..!How do you want to use it?You're already wearing it.5}.How could you? It's in shreds.Disk error!It's dead!It says: "Admission to Diner's Club.#You're in it!...but you have a.6} flat tire!Perhaps they are frogs.He is dressed in a tuxedo.Your goal is to find a tire, not to stare at lifeguards!"Be c.7}areful.#He leaves immediately.Bare means bareThings disappear,They go elsewhereTo a place quite queer.You lean the ladd.8}er against the attic.It doesn't fit you.How?  Ĉ  .9}"00" !! $.:}$&"#%$$&('(+'*-+ '+.  (.;}.!&SPARE TIREӠŠӠ٠źĿ @Are you sure?@Whi.<}ch color?@REDGREENPURPLEisk or assette?@What version number (1-9)?@D:SPTIRE1.DATCONGRATULATIONS!ՠŠĠҠ.=}Ρ$%*+.37%5$diction vocabul(pieces)(wearing)(on logs)(burning)(dead)(with cheese) ! '- !),-0125 .>}  "$%6(*37' #$).1?:*8=9 %# /(>- .+350.?}{ACEHCKNQ~ESSUX;CC`@BEGBJMP}ESSUWBB_?BDFBILO|DRRTVBB#reatedby7ai0ing,eeAZXAC\\.@}CKNQ>HC^CU;CC@ZW@C\\BJMP=GB]BUBB?YV?D[[BILO?@ ABCDEFGHIJK( ,fGRAND UNDERGROUND TEXT ADVENTURE(SPTIRE.EXE)By STEVEN LEEANTIC SUPER DISK BONUS -- JUNE 1988 "Suddenly you hear chat2E}teringnoises from below. Perhaps someonedown there can help. You have onlyone choice, to investigate andattempt to find2F} a spare tire..."XXXGETTING STARTED You'll want to save yourpartially completed adventures, souse the DOS menu C com2G}mand to copythe Grand Underground Text Adventureto a DOS 2 compatible disk thatcontains only the DOS.SYS andDUP.SYS files2H}. Rename SPTIRE.EXE toAUTORUN.SYS if you want it to loadand run automatically.XXX To load or save a game, just typeL2I}OAD or SAVE respectively. You maysave as many as nine differentversions on a disk. Type QUIT torestart the adventure. I2J}f you don'tenjoy the gaudy colors of themultiple text windows, press theinverse key for the monochromedisplay. Antic'2K}s Grand Underground TextAdventure uses the classic verb-nouncommand format such as EXAMINE KNIFEor GET KNIFE. All directi2L}oncommands can be typed with just thefirst letter -- North, South, East,West, Up, Down.XXX Here is a list of verbsre2M}cognized by the program. Only thefirst four letters of these commandsare read:LOAD SAVE QUIT DIG SAY BEATKICK K2N}ILL BURN LIGHt CLIMb CLOSeCUT DROP EAT LOOK GET TAKEGIVE ENTER JUMP WEAR SWIM LISTOPEN POUR PULL PUSH RE2O}AD SLIDEUSE GO EXAMine INSErtXXXHOW YOU GOT HERE Let's set the scene for the storyof Antic's Grand Undergro2P}und TextAdventure (originally titled SpareTire). It's time to visit your motheragain, whether you want to or not.You 2Q}head towards mom's house,realizing that the last time youvisited her was over a year ago. Bynow, not only did you lose he2R}r phonenumber, but you also don't recallhow to get there.XXX Day becomes night as you drivearound in circles. The ro2S}ads arenarrow and dark and even with yourhigh-beams on, it is still hard tosee. Suddenly, a little dog appearsout of 2T}nowhere. You swerve to avoidthe animal, only to lose control andslide into a hole. You see starsaround you, but fortunat2U}ely you arenot hurt. The only damage is a veryflat tire. Looking in the back ofthe trunk, you discover that thespare ti2V}re was used last time youvisited your mother. Suddenly youhear chattering noises from below.XXXPerhaps someone down the2W}re can help.You have only one choice, toinvestigate and attempt to find aspare tire. Have fun adventuring and don'tfo2X}rget to visit your mom soon!tempt to find aspare tire. Have fun adventuring and don'tfo0</0p)?MAXNUMAXLESTORAGEWORKINDESTARLENGTFINIS6Z}STRING ARRAY HANDLER #1BY RICHARD WHITSELL$$(c)1988, ANTIC PUBLISHING INC. #6-@#6-@ %@6[} ;$, ;,( +2 ENTER 10 NAMES<-&@F A`P Z +d 6\}i!!===========================n-&@x AP B:, !!=============6]}==============SUBROUTINE TO GET STRING6-$%@6-@:7<,,"6.$6-%@6^}6-%&@6.7<,$noSUBROUTINE TO PUT STRINGp6-$%@z67<,.>:B:,,B:6_},"$6-%@6-%B:,&@67<,.$D1:STRING1.BAS6`}%@6-%B:,&@67<,.$D1:STRING1.BAS489 "MAXNUMAXLESTORAGEWORKLENARRAYINDESTARLENGTFINIS@@ A @A:b}@ASTRING ARRAY HANDLER #2BY RICHARD WHITSELL$$(c)1988, ANTIC PUBLISHING INC. 6-@6:c}-@  ;$, ;,# 9,( +2 ENTER 10 NAMES<-&@F A`P :d}Z +d i=========================n-&@x AP B:, :e}=========================SUBROUTINE TO GET STRING6-$%@ 6-8,"6.$:f}6-%&@6.7<,$noSUBROUTINE TO PUT STRINGp6-$%@z68,-B:,B:,":g}$6-%B:,&@67<,.$D1:STRING2.BAS:h}67<,.$D1:STRING2.BAS8+,SCTRFNNUFIRSLASAADHADLNUMHNUMLJN>j} ;A(,;@, AD A-&67@,.567A(,.D67@>k},./ 6-C:,6-P:'AV,/6-&+$AV, !!READ A SECTOR INTO A STRING Ai@ ˠ%Ap>l}@%ĠҠ&Aq@d&Š(1ArAs1ӠƠǠ27Av>m}A('Aw7ƠӠ<*Af@*DISPLAY CTRL CODESd(SECTOR #n&6-P:'AV,>n}&6-&+$AV,xAxAy6-?:C:h S`,,HH(ASCII equivalents for the above string are: 104, 32, >o}83, 228, 96)(@( ##(} File Transfuser Routine- (ENTER OBJECT FILENAME: -@>p}# @@#$,4"(STARTING, ENDING SECTOR: 1@4$D1:TRANSFUS.BAS>q}#$,4"(STARTING, ENDING SECTOR: 1@4$D1:TRANSFUS.BAS<