20-03-88/CASTLE

Home » CEEFAX disks » telesoftware5.adl » 20-03-88/CASTLE

20-03-88/CASTLE

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk:	Home » CEEFAX disks » telesoftware5.adl
Filename:	20-03-88/CASTLE
Read OK:	✔
File size:	2725 bytes
Load address:	FFFF1900
Exec address:	FFFF801F

Duplicates

There are 2 duplicate copies of this file in the archive:

AEW website » mu » mu_5_25_discs_Micro_User_02_06_D-MU02_06.ssd » CASTLE
AEW website » mu » mu_Micro_User_02_06_MU2-6_B.uef » CASTLE
CEEFAX disks » telesoftware5.adl » 20-03-88/CASTLE

File contents

   10MODE7
   20VDU23;8202;0;0;0;
   30PROCinit
   40ON ERROR GOSUB 2850
   50PROCcent("Castle Of Fear.",2,1,1)
   60PROCcent("by Marcus Adams and Michal Noels.",3,4,0)
   70PROCcent("(c) 1984 The Micro User.",5,6,0)
   80PRINT''"Expert adventuring is becoming a pastime";"for the idle rich these days. Long ago"'"Kings would pay high prices to the likes";"of you to rescue their beautiful (and"'"not so beautiful daughters). Not so now.";
   90PRINT"Even the dragons have stopped eating"'"elvies - in fact Adventureland is not"'"what it used to be."'"However while enjoying a fine meal with"'"a friendly dwarf you find yourself"'"transported to the guest room of a"
  100PRINT"large castle. As you try to recover a"'"glowing message appears in the air,"'CHR$(131)"'Escape in five score turns or DIE!'"'"As you watch the message melts away."
  110*FX15,1
  120PROCcent("Press"+CHR$(134)+"SPACE"+CHR$(135)+"to continue.",7,24,0)
  130REPEATUNTIL32=GET
  140PROCcent("Use the following keys to play.",6,4,0)
  150VDU28,0,22,39,7,12,26
  160PROCdbl("N = North",14,9,1)
  170PROCdbl("S = South",14,11,2)
  180PROCdbl("E = East",14,13,3)
  190PROCdbl("W = West",14,15,4)
  200PROCdbl("U = up",14,17,5)
  210PROCdbl("D = Down",14,19,6)
  220PROCdbl("Q = Quit",14,21,7)
  230*FX15,1
  240REPEATUNTIL32=GET
  250VDU28,0,22,39,7,12,26
  260PROCdbl("@ = Look",14,9,1)
  270PROCdbl("A = Attack",14,11,2)
  280PROCdbl("G = Get",14,13,3)
  290PROCdbl("I = Inventory",14,15,4)
  300PROCdbl("L = Drop",14,17,5)
  310PROCdbl("P = Wait a turn",14,19,6)
  320PROCdbl("H = Help",14,21,7)
  330*FX15,1
  340REPEATUNTIL 32=GET
  350ON ERROR GOSUB 2820
  360REPEAT
  370IF room%<>last% PROCenter(room%)
  380IF W%=0 PROCmvtr
  390PROCplayer
  400UNTIL0
  410DEFPROCplayer
  420W%=0
  430IF RND(100-T%)<10 PRINT'"A small dwarf walks up to you, says"'"'Hurry up', and then walks off."
  440IF RND(100)<10 PRINT'CHR$134"Listen, you can hear strange voices."
  450IF C%>0 AND RND(100)<8PRINT'"A sprite takes the ";coin$(C%);" coin"'"and runs away."':C%=C%-1:REPEAT:R%=RND(27):UNTIL R%<>14 AND cts%(R%)=0:cts%(R%)=1
  460IF (coin%(1)<>0 AND coin%(2)<>0 AND coin%(3)<>0) AND NOT (Y% EOR 0)THEN IF ABS(coin%(3)-coin%(2))=ABS(coin%(2)-coin%(1)) PROCmsg(7):END
  470PRINT'CHR$130"Turns"CHR$135;"-";CHR$131;T%:IF T%>=100PRINT'"'Sorry time up' says a ghostly voice."':PROCmsg(RND(4))
  480*FX15,1
  490G$="":PRINT'"Your move";CHR$131;:G$=INKEY$(1800):IF G$="" G$="w":PRINT"wait"ELSE PRINTG$'
  500RESTORE 2710
  510REPEAT
  520READ des$,N%
  530UNTILdes$=G$ OR N%=255
  540IF N%=255PRINTCHR$133"huh ?":ENDPROC
  550T%=T%+1
  560IF N%<=6 PROCmove:ENDPROC
  570IF N%=7 PROCenter(room%):T%=T%-1:ENDPROC
  580IF N%=8 PROCget:ENDPROC
  590IF N%=9 PROCdrop:ENDPROC
  600IF N%=10 PROCinv:ENDPROC
  610IF N%=11 PROCquit:ENDPROC
  620IF N%=12 PROCwait:ENDPROC
  630IF N%=13 PROCatta:ENDPROC
  640IF N%=14 PROChelp:ENDPROC
  650ENDPROC
  660DEFPROChelp
  670RESTORE 2810
  680REPEAT READ S%,des$
  690UNTIL S%>=T% OR S%=95
  700PRINT CHR$131;des$
  710ENDPROC
  720DEFPROCwait
  730PRINT'CHR$134"You wait,"'CHR$134"Time passes ";:FORN=1 TO 10:PRINT;".";:TIME=0:REPEATUNTILTIME>20:NEXT:PRINT
  740DEFPROCmvtr 
  750tr%=troll%(1):W%=1
  760PROCmv:PROCtroll
  770IF troll%(1)=room% AND tr%<>room% PRINT'CHR$130"A large troll enters, holding";:IF troll%(2)=0 PRINT;" nothing."
  780IF troll%(1)=room% AND tr%<>room% AND troll%(2)<>0 PRINTCHR$(130)"a"'CHR$130"glittering jewel."
  790IF troll%(1)<>room% AND tr%=room% PRINT'CHR$131"A large troll leaves."
  800ENDPROC
  810DEFPROCatta
  820IF cts%(room%)=0 PRINTCHR$129"Attacking walls may be seen as"'CHR$129"insanity and has no effect."
  830IF (cts%(room%)AND1)=1 OR (cts%(room%)AND2)=2 PRINTCHR$134"Your blows bounce cleanly off the"'CHR$134"pedestal."
  840IF (cts%(room%)AND4)=4 PRINTCHR$130"The troll just giggles!"
  850IF (cts%(room%)AND8)=8 PRINTCHR$131"The angry troll throws a large jewel"'CHR$131"at you.":PROCmsg(RND(4))
  860ENDPROC
  870DEFPROCmove
  880IF dir%(N%)=0 PRINTCHR$129"Can't go that way.":ENDPROC
  890room%=dir%(N%)
  900ENDPROC
  910DEFPROCmv
  920IF (jew%(1)<>0 AND jew%(2)<>0 AND jew%(3)<>0) AND NOT (X% EOR 0)THEN IF ABS(jew%(3)-jew%(2))=ABS(jew%(2)-jew%(1)) PROCmsg(RND(4))
  930R%=RND(3)
  940IF R%<=2 troll%(1)=jew%(RND(3))
  950IF R%=3 troll%(1)=room%
  960IF troll%(1)=0 troll%(1)=RND(27)
  970PROCtroll
  980IF troll%(2)>0 AND (cts%(troll%(1))AND 3)=0:cts%(troll%(1))=cts%(troll%(1)) OR 2:jew%(troll%(2)-1)=troll%(1):troll%(2)=troll%(2)-1:PRINT'CHR$132"You hear a distant WHOOOF!":ENDPROC
  990 
 1000IF troll%(2)<4AND (cts%(troll%(1)) AND 2)=2 THEN cts%(troll%(1))=cts%(troll%(1)) EOR 2:jew%(troll%(2))=0:troll%(2)=troll%(2)+1:PRINT'CHR$132"You hear a distant SLUUURP!"
 1010ENDPROC
 1020DEFPROCtroll
 1030FORN%=1 TO 3
 1040IF jew%(N%)=troll%(1) cts%(troll%(1))=cts%(troll%(1)) OR 2
 1050NEXT
 1060cts%(room%)=cts%(room%) AND 243
 1070IF room%=troll%(1) AND troll%(2)<>0 cts%(room%)=cts%(room%) OR 8:ENDPROC
 1080IF room%=troll%(1) AND troll%(2)=0 cts%(room%)=cts%(room%) OR 4:ENDPROC
 1090ENDPROC
 1100DEFPROCinv
 1110PRINT"You are carrying:-"'
 1120IF C%=0 PRINTCHR$134"Nothing of use.":ENDPROC 
 1130FOR N%=1 TO C%
 1140PRINT"1 large ";coin$(N%);" coin." 
 1150NEXT
 1160ENDPROC
 1170DEF PROCenter(enter%)
 1180PROCtroll
 1190VDU26,12,28,0,0,39,13
 1200RESTORE 2170
 1210REPEAT
 1220PROCfind
 1230UNTIL room%=enter%
 1240PRINT"You are standing ";des$
 1250PROCcts
 1260PRINT
 1270last%=room%
 1280PROCdirs
 1290ENDPROC
 1300DEFPROCdirs
 1310IF room%<>14 PRINTCHR$134"I see a way ";
 1320RESTORE 2740
 1330FOR N%=1 TO 4
 1340READ des$
 1350IF dir%(N%)<>0 THEN PRINT;CHR$(129+N%);des$;",";
 1360NEXT
 1370VDU127:PRINT'
 1380IF dir%(5)<>0  PRINTCHR$(131)"A Set of magical steps lead upward."
 1390IF dir%(6)<>0  PRINTCHR$(134)"A hole in the floor leads down."
 1400PRINTTAB(0,12)STRING$(39,"_")
 1410VDU28,0,24,39,13
 1420ENDPROC
 1430DEFPROCget
 1440IF room%<>5 AND cts%(room%)=0 PRINTCHR$134"Nothing here worth taking.":ENDPROC
 1450IF (cts%(room%) AND 1)=1 THEN PRINT"Get large coin."'"Taken."'"Shloop, the pedestal vanishes.":cts%(room%)=cts%(room%) AND 254:coin%(C%)=0:C%=C%+1:ENDPROC
 1460IF (cts%(room%) AND 2)=2 THEN PRINT"Get large jewel."'"Can't the thing's stuck.":ENDPROC
 1470IF (cts%(room%) AND 4)=4 OR (cts%(room%) AND 8)=8 THEN PRINT"Get burly troll?"'"Nice try."'
 1480IF (cts%(room%) AND 8)=8 THEN PRINT"Get large jewel."'"The troll won't let me."
 1490IF room%=5 PRINT"Get skeleton."'"One skeleton taken."':PROCmsg(4+RND(2))
 1500ENDPROC
 1510DEFPROCdrop
 1520IF C%=0 THEN PRINTCHR$133"Drop what?":ENDPROC
 1530PRINT"Drop large coin."
 1540IF (cts%(room%) AND 2)=2 OR (cts%(room%) AND 1)=1 PRINT"The ";coin$(C%);" coin sticks to your fingers.":ENDPROC
 1550IF (room%<>23 AND room%<>10) coin%(C%)=room%
 1560IF room%=23 coin%(C%)=14
 1570IF room%=10 coin%(C%)=0
 1580PRINT"Dropped.":C%=C%-1
 1590IF room%=23 AND cts%(14)=0 PRINT"The coin "coin$(C%+1);" rolls away down a hole  in the floor.":cts%(14)=1:ENDPROC
 1600IF room%=10 AND (cts%(10)AND 2)=0 THEN PRINT"Buuuuurp."'"Just what I needed.":ENDPROC
 1610IF (cts%(room%) AND 4)=4 PRINT"The burly troll shrieks and runs away.":troll%(1)=RND(27)
 1620IF (cts%(room%) AND 8)=8 PRINT"The burly troll walks off sulking.":troll%(1)=RND(27):PROCtroll
 1630PRINT"Whoosh! As the ";coin$(C%+1);" coin drops a pink"'"pedestal rises to catch it.":cts%(room%)=cts%(room%) EOR 1
 1640ENDPROC
 1650DEFPROCfind
 1660READ room%
 1670FOR N%=1 TO 6
 1680READ dir%(N%)
 1690NEXT
 1700READ des$
 1710ENDPROC
 1720DEFPROCcts
 1730RESTORE 2750
 1740N%=1:REPEAT
 1750READ des$
 1760IF (cts%(room%) AND N%)=N% PRINTdes$
 1770N%=N%*2
 1780UNTILN%=16
 1790ENDPROC
 1800DEFPROCquit
 1810PRINT CHR$136"QUIT!"'"Are you realy sure?"
 1820IF (GET AND &DF)=89 THEN CLS:PRINT"Bye.":END
 1830ENDPROC
 1840DEFPROCmsg(N%)
 1850IF N%=1 PRINT"Suddenly, a massive hole opens up in"'"the ground beneath your feet. The shock"'"of landing kills you."
 1860IF N%=2 PRINT"A large pendulum swings in from the roof";"and neatly cleaves your skull."
 1870IF N%=3 PRINT"A massive boulder rolls in and flattens"'"you."
 1880IF N%=4 PRINT"A large spear glides down from above and";"kills you."
 1890IF N%=5 PRINT'"The skeleton didn't like been pulled"'"off the wall, and you now find yourself"'"chained there too!"
 1900IF N%=6 PRINT'"The skeleton promptly grabs you by the"'"neck and throttles you."
 1910IF N%<=6 PRINT'"So you loose again sucker!":END
 1920IF N%=7 PRINT"Congratulations, you win, the elvies"'"mass around you and carry you away to"'"a hero's welcome.":END
 1930ENDPROC
 1940DEFPROCinit
 1950C%=0:N%=0:T%=0:X%=0:Y%=0
 1960room%=13:last%=17
 1970DIM dir%(8),cts%(27),troll%(2),jew%(3),coin%(3),coin$(3)
 1980des$=STRING$(255," ")
 1990RESTORE 2770
 2000FORN%=1 TO 3
 2010READ coin$(N%)
 2020NEXT
 2030jew%(1)=3:jew%(2)=10:jew%(3)=25
 2040FOR N%=1 TO 27
 2050READ cts%(N%)
 2060NEXT
 2070troll%(1)=17:troll%(2)=1
 2080ENDPROC
 2090DEFPROCcent(msg$,C%,Y%,D%)
 2100X%=(39-LEN(msg$))/2
 2110IF D%=1 THEN FORN%=0 TO1:PRINTTAB(X%-1,Y%+N%);CHR$141;CHR$(128+C%);msg$:NEXT:ENDPROC
 2120PRINTTAB(X%,Y%);CHR$(128+C%);msg$;
 2130ENDPROC
 2140DEFPROCdbl(msg$,X%,Y%,C%)
 2150FORN%=0TO1:PRINTTAB(X%-2,Y%-1+N%)CHR$141CHR$(128+C%);msg$:NEXT
 2160ENDPROC
 2170DATA 1,2,0,4,0,0,0
 2180DATA "at the bottom of a deepwell."
 2190DATA 2,3,1,0,0,0,0
 2200DATA "in a misty N/S passage."
 2210DATA 3,0,2,6,0,0,0
 2220DATA "at the end of a misty  passage."
 2230DATA 4,0,0,7,1,0,0
 2240DATA "a strange room with a  very high ceiling."
 2250DATA 5,0,0,8,0,0,0
 2260DATA "in the torture chamber.The room is full of weird equipment.A   skeleton hangs from the wall and the    place is littered with cobwebs."
 2270DATA 6,0,0,9,3,0,0
 2280DATA "in a dank E/W passage. A cloud of green mist enters from the   west."
 2290DATA 7,8,0,0,4,16,0
 2300DATA "in the southeast cornerpassage."
 2310DATA 8,9,7,0,5,0,0
 2320DATA "in a small, dank ante  chamber."
 2330DATA 9,0,8,0,6,0,0
 2340DATA "at one end of a damp   passage."
 2350DATA 10,11,0,0,0,0,1
 2360DATA "in the food store, a   sign on the wall flashes 'FEED ME'."
 2370DATA 11,12,10,0,0,0,0
 2380DATA "at the south end of thekitchen."
 2390DATA 12,0,11,15,0,0,0
 2400DATA "at the north end of thekitchen."
 2410DATA 13,14,0,16,0,22,0 
 2420DATA "in the guests lounge, asign above the north door says :-       'DON'T GO NORTH'."
 2430DATA 14,0,0,0,0,0,0
 2440DATA "in the trap room. A    sign on the wall flashes, I told you so!"
 2450DATA 15,0,0,18,12,0,0
 2460DATA "in a short connecting  hall." 
 2470DATA 16,17,0,0,13,0,0
 2480DATA "at the south end of thelong dining room."
 2490DATA 17,18,16,0,0,0,0
 2500DATA "in the middle of the   long dining room."
 2510DATA 18,0,17,0,15,0,0
 2520DATA "at the north end of thelong dining room."
 2530DATA 19,0,0,22,0,0,0
 2540DATA "at the western end of along E/W hall."
 2550DATA 20,21,0,0,0,0,0
 2560DATA "at the south end of theking's bedroom"
 2570DATA 21,0,20,24,0,0,0
 2580DATA "at the north end of theking's bedroom"
 2590DATA 22,0,0,25,19,0,13
 2600DATA "at the eastern end of along E/W hall."
 2610DATA 23,0,0,26,0,0,5
 2620DATA "in the queen's dressing chamber."
 2630DATA 24,0,0,27,21,0,0
 2640DATA "in the queen's bedroom."
 2650DATA 25,26,0,0,22,0,0
 2660DATA "in Eliza's room."
 2670DATA 26,27,25,0,23,0,0
 2680DATA "at the southern end of a long N/S passage."
 2690DATA 27,0,26,0,24,0,0
 2700DATA "at the northern end of a long N/S passage."
 2710DATA N,1,S,2,E,3,W,4,U,5,D,6,@,7
 2720DATA G,8,L,9,I,10,Q,11,w,12,P,12
 2730DATA A,13,H,14,?,255
 2740DATA North,South,East,West
 2750DATA "A tall pink pedestal with a large coin  on it stands on the floor.","A tall blue pedestal with a large jewel on it stands on the floor.","A burly troll is gazing at you."
 2760DATA "A burly troll carrying a large jewel,   stands looking at you."
 2770DATA Bronze,Silver,Golden
 2780DATA 1,0,0,0,0,0,0,0,0
 2790DATA 0,0,0,0,0,0,1,0,0
 2800DATA 0,0,1,0,0,0,0,0,0
 2810DATA 30,"You're doing fine.",40,"Why don't you make a map?",60,"Not much time left now.",80,"We're all gonna die!",95,"Ah well, there goes another life."
 2820IF ERR=17 THEN PRINT'CHR$12"Escape is impossible."'"Hit a key.":REPEATUNTILGET<>0:RETURN
 2830REPORT:PRINT" In line ";ERL
 2840END
 2850IF ERR=17 RETURN
 2860REPORT:PRINT" In line ";ERL
 2870END


�7
�23;8202;0;0;0;
	�init
(� � � �TbK
2"�cent("Castle Of Fear.",2,1,1)
<4�cent("by Marcus Adams and Michal Noels.",3,4,0)
F+�cent("(c) 1984 The Micro User.",5,6,0)
P��''"Expert adventuring is becoming a pastime";"for the idle rich these days. Long ago"'"Kings would pay high prices to the likes";"of you to rescue their beautiful (and"'"not so beautiful daughters). Not so now.";
Z��"Even the dragons have stopped eating"'"elvies - in fact Adventureland is not"'"what it used to be."'"However while enjoying a fine meal with"'"a friendly dwarf you find yourself"'"transported to the guest room of a"
d��"large castle. As you try to recover a"'"glowing message appears in the air,"'�(131)"'Escape in five score turns or DIE!'"'"As you watch the message melts away."
n*FX15,1
x>�cent("Press"+�(134)+"SPACE"+�(135)+"to continue.",7,24,0)
�
��32=�
�2�cent("Use the following keys to play.",6,4,0)
��28,0,22,39,7,12,26
��dbl("N = North",14,9,1)
��dbl("S = South",14,11,2)
��dbl("E = East",14,13,3)
��dbl("W = West",14,15,4)
��dbl("U = up",14,17,5)
��dbl("D = Down",14,19,6)
��dbl("Q = Quit",14,21,7)
�*FX15,1
�
��32=�
��28,0,22,39,7,12,26
�dbl("@ = Look",14,9,1)
�dbl("A = Attack",14,11,2)
�dbl("G = Get",14,13,3)
"!�dbl("I = Inventory",14,15,4)
,�dbl("L = Drop",14,17,5)
6#�dbl("P = Wait a turn",14,19,6)
@�dbl("H = Help",14,21,7)
J*FX15,1
T�� 32=�
^� � � �TDK
h�
r � room%<>last% �enter(room%)
|� W%=0 �mvtr
��player
��0
���player
�W%=0
�\� �(100-T%)<10 �'"A small dwarf walks up to you, says"'"'Hurry up', and then walks off."
�<� �(100)<10 �'�134"Listen, you can hear strange voices."
� C%>0 � �(100)<8�'"A sprite takes the ";coin$(C%);" coin"'"and runs away."':C%=C%-1:�:R%=�(27):� R%<>14 � cts%(R%)=0:cts%(R%)=1
�s� (coin%(1)<>0 � coin%(2)<>0 � coin%(3)<>0) � � (Y% � 0)� � �(coin%(3)-coin%(2))=�(coin%(2)-coin%(1)) �msg(7):�
�`�'�130"Turns"�135;"-";�131;T%:� T%>=100�'"'Sorry time up' says a ghostly voice."':�msg(�(4))
�*FX15,1
�EG$="":�'"Your move";�131;:G$=�(1800):� G$="" G$="w":�"wait"� �G$'
�
� �tVJ
��

� des$,N%
�des$=G$ � N%=255
� N%=255�133"huh ?":�
&T%=T%+1
0� N%<=6 �move:�
:"� N%=7 �enter(room%):T%=T%-1:�
D� N%=8 �get:�
N� N%=9 �drop:�
X� N%=10 �inv:�
b� N%=11 �quit:�
l� N%=12 �wait:�
v� N%=13 �atta:�
�� N%=14 �help:�
��
�
��help
�
� �dzJ
�� � S%,des$
�� S%>=T% � S%=95
�� �131;des$
��
�
��wait
�I�'�134"You wait,"'�134"Time passes ";:�N=1 � 10:�;".";:�=0:���>20:�:�
���mvtr 
�tr%=troll%(1):W%=1
��mv:�troll
e� troll%(1)=room% � tr%<>room% �'�130"A large troll enters, holding";:� troll%(2)=0 �;" nothing."
T� troll%(1)=room% � tr%<>room% � troll%(2)<>0 �(130)"a"'�130"glittering jewel."
@� troll%(1)<>room% � tr%=room% �'�131"A large troll leaves."
 �
*
��atta
4[� cts%(room%)=0 �129"Attacking walls may be seen as"'�129"insanity and has no effect."
>d� (cts%(room%)�1)=1 � (cts%(room%)�2)=2 �134"Your blows bounce cleanly off the"'�134"pedestal."
H6� (cts%(room%)�4)=4 �130"The troll just giggles!"
R\� (cts%(room%)�8)=8 �131"The angry troll throws a large jewel"'�131"at you.":�msg(�(4))
\�
f
��move
p,� dir%(N%)=0 �129"Can't go that way.":�
zroom%=dir%(N%)
��
���mv
�m� (jew%(1)<>0 � jew%(2)<>0 � jew%(3)<>0) � � (X% � 0)� � �(jew%(3)-jew%(2))=�(jew%(2)-jew%(1)) �msg(�(4))
�R%=�(3)
� � R%<=2 troll%(1)=jew%(�(3))
�� R%=3 troll%(1)=room%
�!� troll%(1)=0 troll%(1)=�(27)
�
�troll
ԥ� troll%(2)>0 � (cts%(troll%(1))� 3)=0:cts%(troll%(1))=cts%(troll%(1)) � 2:jew%(troll%(2)-1)=troll%(1):troll%(2)=troll%(2)-1:�'�132"You hear a distant WHOOOF!":�
� 
�� troll%(2)<4� (cts%(troll%(1)) � 2)=2 � cts%(troll%(1))=cts%(troll%(1)) � 2:jew%(troll%(2))=0:troll%(2)=troll%(2)+1:�'�132"You hear a distant SLUUURP!"
��
���troll

�N%=1 � 3
<� jew%(N%)=troll%(1) cts%(troll%(1))=cts%(troll%(1)) � 2
�
$!cts%(room%)=cts%(room%) � 243
.B� room%=troll%(1) � troll%(2)<>0 cts%(room%)=cts%(room%) � 8:�
8A� room%=troll%(1) � troll%(2)=0 cts%(room%)=cts%(room%) � 4:�
B�
L	��inv
V�"You are carrying:-"'
`$� C%=0 �134"Nothing of use.":� 
j� N%=1 � C%
t#�"1 large ";coin$(N%);" coin." 
~�
��
�� �enter(enter%)
�
�troll
��26,12,28,0,0,39,13
�
� �DzH
��
�	�find
�� room%=enter%
��"You are standing ";des$
��cts
��
�last%=room%
	�dirs

�

��dirs
$� room%<>14 �134"I see a way ";
(
� �ttJ
2� N%=1 � 4
<
� des$
F)� dir%(N%)<>0 � �;�(129+N%);des$;",";
P�
Z�127:�'
d>� dir%(5)<>0  �(131)"A Set of magical steps lead upward."
n:� dir%(6)<>0  �(134)"A hole in the floor leads down."
x�0,12)�39,"_")
��28,0,24,39,13
��
�	��get
�B� room%<>5 � cts%(room%)=0 �134"Nothing here worth taking.":�
��� (cts%(room%) � 1)=1 � �"Get large coin."'"Taken."'"Shloop, the pedestal vanishes.":cts%(room%)=cts%(room%) � 254:coin%(C%)=0:C%=C%+1:�
�L� (cts%(room%) � 2)=2 � �"Get large jewel."'"Can't the thing's stuck.":�
�R� (cts%(room%) � 4)=4 � (cts%(room%) � 8)=8 � �"Get burly troll?"'"Nice try."'
�I� (cts%(room%) � 8)=8 � �"Get large jewel."'"The troll won't let me."
�B� room%=5 �"Get skeleton."'"One skeleton taken."':�msg(4+�(2))
��
�
��drop
� � C%=0 � �133"Drop what?":�
��"Drop large coin."
c� (cts%(room%) � 2)=2 � (cts%(room%) � 1)=1 �"The ";coin$(C%);" coin sticks to your fingers.":�
-� (room%<>23 � room%<>10) coin%(C%)=room%
� room%=23 coin%(C%)=14
"� room%=10 coin%(C%)=0
,�"Dropped.":C%=C%-1
6i� room%=23 � cts%(14)=0 �"The coin "coin$(C%+1);" rolls away down a hole  in the floor.":cts%(14)=1:�
@G� room%=10 � (cts%(10)� 2)=0 � �"Buuuuurp."'"Just what I needed.":�
JS� (cts%(room%) � 4)=4 �"The burly troll shrieks and runs away.":troll%(1)=�(27)
TV� (cts%(room%) � 8)=8 �"The burly troll walks off sulking.":troll%(1)=�(27):�troll
^q�"Whoosh! As the ";coin$(C%+1);" coin drops a pink"'"pedestal rises to catch it.":cts%(room%)=cts%(room%) � 1
h�
r
��find
|� room%
�� N%=1 � 6
�� dir%(N%)
��
�
� des$
��
�	��cts
�
� �t~J
�
N%=1:�
�
� des$
�!� (cts%(room%) � N%)=N% �des$
�N%=N%*2
�
�N%=16
��

��quit
'� �136"QUIT!"'"Are you realy sure?"
 � (� � &DF)=89 � �:�"Bye.":�
&�
0
��msg(N%)
:t� N%=1 �"Suddenly, a massive hole opens up in"'"the ground beneath your feet. The shock"'"of landing kills you."
DW� N%=2 �"A large pendulum swings in from the roof";"and neatly cleaves your skull."
N<� N%=3 �"A massive boulder rolls in and flattens"'"you."
XC� N%=4 �"A large spear glides down from above and";"kills you."
br� N%=5 �'"The skeleton didn't like been pulled"'"off the wall, and you now find yourself"'"chained there too!"
lO� N%=6 �'"The skeleton promptly grabs you by the"'"neck and throttles you."
v,� N%<=6 �'"So you loose again sucker!":�
�p� N%=7 �"Congratulations, you win, the elvies"'"mass around you and carry you away to"'"a hero's welcome.":�
��
�
��init
�C%=0:N%=0:T%=0:X%=0:Y%=0
�room%=13:last%=17
�:� dir%(8),cts%(27),troll%(2),jew%(3),coin%(3),coin$(3)
�des$=�255," ")
�
� �dRJ
�
�N%=1 � 3
�� coin$(N%)
��
�#jew%(1)=3:jew%(2)=10:jew%(3)=25
�� N%=1 � 27
� cts%(N%)
�
troll%(1)=17:troll%(2)=1
 �
*��cent(msg$,C%,Y%,D%)
4X%=(39-�(msg$))/2
>;� D%=1 � �N%=0 �1:�X%-1,Y%+N%);�141;�(128+C%);msg$:�:�
H�X%,Y%);�(128+C%);msg$;
R�
\��dbl(msg$,X%,Y%,C%)
f/�N%=0�1:�X%-2,Y%-1+N%)�141�(128+C%);msg$:�
p�
z� 1,2,0,4,0,0,0
�$� "at the bottom of a deepwell."
�� 2,3,1,0,0,0,0
�� "in a misty N/S passage."
�� 3,0,2,6,0,0,0
�'� "at the end of a misty  passage."
�� 4,0,0,7,1,0,0
�1� "a strange room with a  very high ceiling."
�� 5,0,0,8,0,0,0
Ԏ� "in the torture chamber.The room is full of weird equipment.A   skeleton hangs from the wall and the    place is littered with cobwebs."
�� 6,0,0,9,3,0,0
�L� "in a dank E/W passage. A cloud of green mist enters from the   west."
�� 7,8,0,0,4,16,0
�'� "in the southeast cornerpassage."
	� 8,9,7,0,5,0,0
	'� "in a small, dank ante  chamber."
	� 9,0,8,0,6,0,0
	$'� "at one end of a damp   passage."
	.� 10,11,0,0,0,0,1
	8B� "in the food store, a   sign on the wall flashes 'FEED ME'."
	B� 11,12,10,0,0,0,0
	L'� "at the south end of thekitchen."
	V� 12,0,11,15,0,0,0
	`'� "at the north end of thekitchen."
	j� 13,14,0,16,0,22,0 
	tX� "in the guests lounge, asign above the north door says :-       'DON'T GO NORTH'."
	~� 14,0,0,0,0,0,0
	�G� "in the trap room. A    sign on the wall flashes, I told you so!"
	�� 15,0,0,18,12,0,0
	�%� "in a short connecting  hall." 
	�� 16,17,0,0,13,0,0
	�0� "at the south end of thelong dining room."
	�� 17,18,16,0,0,0,0
	�0� "in the middle of the   long dining room."
	�� 18,0,17,0,15,0,0
	�0� "at the north end of thelong dining room."
	�� 19,0,0,22,0,0,0
	�-� "at the western end of along E/W hall."
	�� 20,21,0,0,0,0,0
-� "at the south end of theking's bedroom"

� 21,0,20,24,0,0,0
-� "at the north end of theking's bedroom"
� 22,0,0,25,19,0,13
(-� "at the eastern end of along E/W hall."
2� 23,0,0,26,0,0,5
<(� "in the queen's dressing chamber."
F� 24,0,0,27,21,0,0
P� "in the queen's bedroom."
Z� 25,26,0,0,22,0,0
d� "in Eliza's room."
n� 26,27,25,0,23,0,0
x2� "at the southern end of a long N/S passage."
�� 27,0,26,0,24,0,0
�2� "at the northern end of a long N/S passage."
�!� N,1,S,2,E,3,W,4,U,5,D,6,@,7
�!� G,8,L,9,I,10,Q,11,w,12,P,12
�� A,13,H,14,?,255
�� North,South,East,West
��� "A tall pink pedestal with a large coin  on it stands on the floor.","A tall blue pedestal with a large jewel on it stands on the floor.","A burly troll is gazing at you."
�F� "A burly troll carrying a large jewel,   stands looking at you."
�� Bronze,Silver,Golden
�� 1,0,0,0,0,0,0,0,0
�� 0,0,0,0,0,0,1,0,0
�� 0,0,1,0,0,0,0,0,0
��� 30,"You're doing fine.",40,"Why don't you make a map?",60,"Not much time left now.",80,"We're all gonna die!",95,"Ah well, there goes another life."
?� �=17 � �'�12"Escape is impossible."'"Hit a key.":���<>0:�
�:�" In line ";�
�
"� �=17 �
,�:�" In line ";�
6�
�

00000000  0d 00 0a 06 eb 37 0d 00  14 13 ef 32 33 3b 38 32  |.....7.....23;82|
00000010  30 32 3b 30 3b 30 3b 30  3b 0d 00 1e 09 f2 69 6e  |02;0;0;0;.....in|
00000020  69 74 0d 00 28 0e ee 20  85 20 e4 20 8d 54 62 4b  |it..(.. . . .TbK|
00000030  0d 00 32 22 f2 63 65 6e  74 28 22 43 61 73 74 6c  |..2".cent("Castl|
00000040  65 20 4f 66 20 46 65 61  72 2e 22 2c 32 2c 31 2c  |e Of Fear.",2,1,|
00000050  31 29 0d 00 3c 34 f2 63  65 6e 74 28 22 62 79 20  |1)..<4.cent("by |
00000060  4d 61 72 63 75 73 20 41  64 61 6d 73 20 61 6e 64  |Marcus Adams and|
00000070  20 4d 69 63 68 61 6c 20  4e 6f 65 6c 73 2e 22 2c  | Michal Noels.",|
00000080  33 2c 34 2c 30 29 0d 00  46 2b f2 63 65 6e 74 28  |3,4,0)..F+.cent(|
00000090  22 28 63 29 20 31 39 38  34 20 54 68 65 20 4d 69  |"(c) 1984 The Mi|
000000a0  63 72 6f 20 55 73 65 72  2e 22 2c 35 2c 36 2c 30  |cro User.",5,6,0|
000000b0  29 0d 00 50 d9 f1 27 27  22 45 78 70 65 72 74 20  |)..P..''"Expert |
000000c0  61 64 76 65 6e 74 75 72  69 6e 67 20 69 73 20 62  |adventuring is b|
000000d0  65 63 6f 6d 69 6e 67 20  61 20 70 61 73 74 69 6d  |ecoming a pastim|
000000e0  65 22 3b 22 66 6f 72 20  74 68 65 20 69 64 6c 65  |e";"for the idle|
000000f0  20 72 69 63 68 20 74 68  65 73 65 20 64 61 79 73  | rich these days|
00000100  2e 20 4c 6f 6e 67 20 61  67 6f 22 27 22 4b 69 6e  |. Long ago"'"Kin|
00000110  67 73 20 77 6f 75 6c 64  20 70 61 79 20 68 69 67  |gs would pay hig|
00000120  68 20 70 72 69 63 65 73  20 74 6f 20 74 68 65 20  |h prices to the |
00000130  6c 69 6b 65 73 22 3b 22  6f 66 20 79 6f 75 20 74  |likes";"of you t|
00000140  6f 20 72 65 73 63 75 65  20 74 68 65 69 72 20 62  |o rescue their b|
00000150  65 61 75 74 69 66 75 6c  20 28 61 6e 64 22 27 22  |eautiful (and"'"|
00000160  6e 6f 74 20 73 6f 20 62  65 61 75 74 69 66 75 6c  |not so beautiful|
00000170  20 64 61 75 67 68 74 65  72 73 29 2e 20 4e 6f 74  | daughters). Not|
00000180  20 73 6f 20 6e 6f 77 2e  22 3b 0d 00 5a dd f1 22  | so now.";..Z.."|
00000190  45 76 65 6e 20 74 68 65  20 64 72 61 67 6f 6e 73  |Even the dragons|
000001a0  20 68 61 76 65 20 73 74  6f 70 70 65 64 20 65 61  | have stopped ea|
000001b0  74 69 6e 67 22 27 22 65  6c 76 69 65 73 20 2d 20  |ting"'"elvies - |
000001c0  69 6e 20 66 61 63 74 20  41 64 76 65 6e 74 75 72  |in fact Adventur|
000001d0  65 6c 61 6e 64 20 69 73  20 6e 6f 74 22 27 22 77  |eland is not"'"w|
000001e0  68 61 74 20 69 74 20 75  73 65 64 20 74 6f 20 62  |hat it used to b|
000001f0  65 2e 22 27 22 48 6f 77  65 76 65 72 20 77 68 69  |e."'"However whi|
00000200  6c 65 20 65 6e 6a 6f 79  69 6e 67 20 61 20 66 69  |le enjoying a fi|
00000210  6e 65 20 6d 65 61 6c 20  77 69 74 68 22 27 22 61  |ne meal with"'"a|
00000220  20 66 72 69 65 6e 64 6c  79 20 64 77 61 72 66 20  | friendly dwarf |
00000230  79 6f 75 20 66 69 6e 64  20 79 6f 75 72 73 65 6c  |you find yoursel|
00000240  66 22 27 22 74 72 61 6e  73 70 6f 72 74 65 64 20  |f"'"transported |
00000250  74 6f 20 74 68 65 20 67  75 65 73 74 20 72 6f 6f  |to the guest roo|
00000260  6d 20 6f 66 20 61 22 0d  00 64 a6 f1 22 6c 61 72  |m of a"..d.."lar|
00000270  67 65 20 63 61 73 74 6c  65 2e 20 41 73 20 79 6f  |ge castle. As yo|
00000280  75 20 74 72 79 20 74 6f  20 72 65 63 6f 76 65 72  |u try to recover|
00000290  20 61 22 27 22 67 6c 6f  77 69 6e 67 20 6d 65 73  | a"'"glowing mes|
000002a0  73 61 67 65 20 61 70 70  65 61 72 73 20 69 6e 20  |sage appears in |
000002b0  74 68 65 20 61 69 72 2c  22 27 bd 28 31 33 31 29  |the air,"'.(131)|
000002c0  22 27 45 73 63 61 70 65  20 69 6e 20 66 69 76 65  |"'Escape in five|
000002d0  20 73 63 6f 72 65 20 74  75 72 6e 73 20 6f 72 20  | score turns or |
000002e0  44 49 45 21 27 22 27 22  41 73 20 79 6f 75 20 77  |DIE!'"'"As you w|
000002f0  61 74 63 68 20 74 68 65  20 6d 65 73 73 61 67 65  |atch the message|
00000300  20 6d 65 6c 74 73 20 61  77 61 79 2e 22 0d 00 6e  | melts away."..n|
00000310  0b 2a 46 58 31 35 2c 31  0d 00 78 3e f2 63 65 6e  |.*FX15,1..x>.cen|
00000320  74 28 22 50 72 65 73 73  22 2b bd 28 31 33 34 29  |t("Press"+.(134)|
00000330  2b 22 53 50 41 43 45 22  2b bd 28 31 33 35 29 2b  |+"SPACE"+.(135)+|
00000340  22 74 6f 20 63 6f 6e 74  69 6e 75 65 2e 22 2c 37  |"to continue.",7|
00000350  2c 32 34 2c 30 29 0d 00  82 0a f5 fd 33 32 3d a5  |,24,0)......32=.|
00000360  0d 00 8c 32 f2 63 65 6e  74 28 22 55 73 65 20 74  |...2.cent("Use t|
00000370  68 65 20 66 6f 6c 6c 6f  77 69 6e 67 20 6b 65 79  |he following key|
00000380  73 20 74 6f 20 70 6c 61  79 2e 22 2c 36 2c 34 2c  |s to play.",6,4,|
00000390  30 29 0d 00 96 17 ef 32  38 2c 30 2c 32 32 2c 33  |0).....28,0,22,3|
000003a0  39 2c 37 2c 31 32 2c 32  36 0d 00 a0 1c f2 64 62  |9,7,12,26.....db|
000003b0  6c 28 22 4e 20 3d 20 4e  6f 72 74 68 22 2c 31 34  |l("N = North",14|
000003c0  2c 39 2c 31 29 0d 00 aa  1d f2 64 62 6c 28 22 53  |,9,1).....dbl("S|
000003d0  20 3d 20 53 6f 75 74 68  22 2c 31 34 2c 31 31 2c  | = South",14,11,|
000003e0  32 29 0d 00 b4 1c f2 64  62 6c 28 22 45 20 3d 20  |2).....dbl("E = |
000003f0  45 61 73 74 22 2c 31 34  2c 31 33 2c 33 29 0d 00  |East",14,13,3)..|
00000400  be 1c f2 64 62 6c 28 22  57 20 3d 20 57 65 73 74  |...dbl("W = West|
00000410  22 2c 31 34 2c 31 35 2c  34 29 0d 00 c8 1a f2 64  |",14,15,4).....d|
00000420  62 6c 28 22 55 20 3d 20  75 70 22 2c 31 34 2c 31  |bl("U = up",14,1|
00000430  37 2c 35 29 0d 00 d2 1c  f2 64 62 6c 28 22 44 20  |7,5).....dbl("D |
00000440  3d 20 44 6f 77 6e 22 2c  31 34 2c 31 39 2c 36 29  |= Down",14,19,6)|
00000450  0d 00 dc 1c f2 64 62 6c  28 22 51 20 3d 20 51 75  |.....dbl("Q = Qu|
00000460  69 74 22 2c 31 34 2c 32  31 2c 37 29 0d 00 e6 0b  |it",14,21,7)....|
00000470  2a 46 58 31 35 2c 31 0d  00 f0 0a f5 fd 33 32 3d  |*FX15,1......32=|
00000480  a5 0d 00 fa 17 ef 32 38  2c 30 2c 32 32 2c 33 39  |......28,0,22,39|
00000490  2c 37 2c 31 32 2c 32 36  0d 01 04 1b f2 64 62 6c  |,7,12,26.....dbl|
000004a0  28 22 40 20 3d 20 4c 6f  6f 6b 22 2c 31 34 2c 39  |("@ = Look",14,9|
000004b0  2c 31 29 0d 01 0e 1e f2  64 62 6c 28 22 41 20 3d  |,1).....dbl("A =|
000004c0  20 41 74 74 61 63 6b 22  2c 31 34 2c 31 31 2c 32  | Attack",14,11,2|
000004d0  29 0d 01 18 1b f2 64 62  6c 28 22 47 20 3d 20 47  |).....dbl("G = G|
000004e0  65 74 22 2c 31 34 2c 31  33 2c 33 29 0d 01 22 21  |et",14,13,3).."!|
000004f0  f2 64 62 6c 28 22 49 20  3d 20 49 6e 76 65 6e 74  |.dbl("I = Invent|
00000500  6f 72 79 22 2c 31 34 2c  31 35 2c 34 29 0d 01 2c  |ory",14,15,4)..,|
00000510  1c f2 64 62 6c 28 22 4c  20 3d 20 44 72 6f 70 22  |..dbl("L = Drop"|
00000520  2c 31 34 2c 31 37 2c 35  29 0d 01 36 23 f2 64 62  |,14,17,5)..6#.db|
00000530  6c 28 22 50 20 3d 20 57  61 69 74 20 61 20 74 75  |l("P = Wait a tu|
00000540  72 6e 22 2c 31 34 2c 31  39 2c 36 29 0d 01 40 1c  |rn",14,19,6)..@.|
00000550  f2 64 62 6c 28 22 48 20  3d 20 48 65 6c 70 22 2c  |.dbl("H = Help",|
00000560  31 34 2c 32 31 2c 37 29  0d 01 4a 0b 2a 46 58 31  |14,21,7)..J.*FX1|
00000570  35 2c 31 0d 01 54 0b f5  fd 20 33 32 3d a5 0d 01  |5,1..T... 32=...|
00000580  5e 0e ee 20 85 20 e4 20  8d 54 44 4b 0d 01 68 05  |^.. . . .TDK..h.|
00000590  f5 0d 01 72 20 e7 20 72  6f 6f 6d 25 3c 3e 6c 61  |...r . room%<>la|
000005a0  73 74 25 20 f2 65 6e 74  65 72 28 72 6f 6f 6d 25  |st% .enter(room%|
000005b0  29 0d 01 7c 10 e7 20 57  25 3d 30 20 f2 6d 76 74  |)..|.. W%=0 .mvt|
000005c0  72 0d 01 86 0b f2 70 6c  61 79 65 72 0d 01 90 06  |r.....player....|
000005d0  fd 30 0d 01 9a 0c dd f2  70 6c 61 79 65 72 0d 01  |.0......player..|
000005e0  a4 08 57 25 3d 30 0d 01  ae 5c e7 20 b3 28 31 30  |..W%=0...\. .(10|
000005f0  30 2d 54 25 29 3c 31 30  20 f1 27 22 41 20 73 6d  |0-T%)<10 .'"A sm|
00000600  61 6c 6c 20 64 77 61 72  66 20 77 61 6c 6b 73 20  |all dwarf walks |
00000610  75 70 20 74 6f 20 79 6f  75 2c 20 73 61 79 73 22  |up to you, says"|
00000620  27 22 27 48 75 72 72 79  20 75 70 27 2c 20 61 6e  |'"'Hurry up', an|
00000630  64 20 74 68 65 6e 20 77  61 6c 6b 73 20 6f 66 66  |d then walks off|
00000640  2e 22 0d 01 b8 3c e7 20  b3 28 31 30 30 29 3c 31  |."...<. .(100)<1|
00000650  30 20 f1 27 bd 31 33 34  22 4c 69 73 74 65 6e 2c  |0 .'.134"Listen,|
00000660  20 79 6f 75 20 63 61 6e  20 68 65 61 72 20 73 74  | you can hear st|
00000670  72 61 6e 67 65 20 76 6f  69 63 65 73 2e 22 0d 01  |range voices."..|
00000680  c2 84 e7 20 43 25 3e 30  20 80 20 b3 28 31 30 30  |... C%>0 . .(100|
00000690  29 3c 38 f1 27 22 41 20  73 70 72 69 74 65 20 74  |)<8.'"A sprite t|
000006a0  61 6b 65 73 20 74 68 65  20 22 3b 63 6f 69 6e 24  |akes the ";coin$|
000006b0  28 43 25 29 3b 22 20 63  6f 69 6e 22 27 22 61 6e  |(C%);" coin"'"an|
000006c0  64 20 72 75 6e 73 20 61  77 61 79 2e 22 27 3a 43  |d runs away."':C|
000006d0  25 3d 43 25 2d 31 3a f5  3a 52 25 3d b3 28 32 37  |%=C%-1:.:R%=.(27|
000006e0  29 3a fd 20 52 25 3c 3e  31 34 20 80 20 63 74 73  |):. R%<>14 . cts|
000006f0  25 28 52 25 29 3d 30 3a  63 74 73 25 28 52 25 29  |%(R%)=0:cts%(R%)|
00000700  3d 31 0d 01 cc 73 e7 20  28 63 6f 69 6e 25 28 31  |=1...s. (coin%(1|
00000710  29 3c 3e 30 20 80 20 63  6f 69 6e 25 28 32 29 3c  |)<>0 . coin%(2)<|
00000720  3e 30 20 80 20 63 6f 69  6e 25 28 33 29 3c 3e 30  |>0 . coin%(3)<>0|
00000730  29 20 80 20 ac 20 28 59  25 20 82 20 30 29 8c 20  |) . . (Y% . 0). |
00000740  e7 20 94 28 63 6f 69 6e  25 28 33 29 2d 63 6f 69  |. .(coin%(3)-coi|
00000750  6e 25 28 32 29 29 3d 94  28 63 6f 69 6e 25 28 32  |n%(2))=.(coin%(2|
00000760  29 2d 63 6f 69 6e 25 28  31 29 29 20 f2 6d 73 67  |)-coin%(1)) .msg|
00000770  28 37 29 3a e0 0d 01 d6  60 f1 27 bd 31 33 30 22  |(7):....`.'.130"|
00000780  54 75 72 6e 73 22 bd 31  33 35 3b 22 2d 22 3b bd  |Turns".135;"-";.|
00000790  31 33 31 3b 54 25 3a e7  20 54 25 3e 3d 31 30 30  |131;T%:. T%>=100|
000007a0  f1 27 22 27 53 6f 72 72  79 20 74 69 6d 65 20 75  |.'"'Sorry time u|
000007b0  70 27 20 73 61 79 73 20  61 20 67 68 6f 73 74 6c  |p' says a ghostl|
000007c0  79 20 76 6f 69 63 65 2e  22 27 3a f2 6d 73 67 28  |y voice."':.msg(|
000007d0  b3 28 34 29 29 0d 01 e0  0b 2a 46 58 31 35 2c 31  |.(4))....*FX15,1|
000007e0  0d 01 ea 45 47 24 3d 22  22 3a f1 27 22 59 6f 75  |...EG$="":.'"You|
000007f0  72 20 6d 6f 76 65 22 3b  bd 31 33 31 3b 3a 47 24  |r move";.131;:G$|
00000800  3d bf 28 31 38 30 30 29  3a e7 20 47 24 3d 22 22  |=.(1800):. G$=""|
00000810  20 47 24 3d 22 77 22 3a  f1 22 77 61 69 74 22 8b  | G$="w":."wait".|
00000820  20 f1 47 24 27 0d 01 f4  0a f7 20 8d 74 56 4a 0d  | .G$'..... .tVJ.|
00000830  01 fe 05 f5 0d 02 08 0d  f3 20 64 65 73 24 2c 4e  |......... des$,N|
00000840  25 0d 02 12 15 fd 64 65  73 24 3d 47 24 20 84 20  |%.....des$=G$ . |
00000850  4e 25 3d 32 35 35 0d 02  1c 1a e7 20 4e 25 3d 32  |N%=255..... N%=2|
00000860  35 35 f1 bd 31 33 33 22  68 75 68 20 3f 22 3a e1  |55..133"huh ?":.|
00000870  0d 02 26 0b 54 25 3d 54  25 2b 31 0d 02 30 13 e7  |..&.T%=T%+1..0..|
00000880  20 4e 25 3c 3d 36 20 f2  6d 6f 76 65 3a e1 0d 02  | N%<=6 .move:...|
00000890  3a 22 e7 20 4e 25 3d 37  20 f2 65 6e 74 65 72 28  |:". N%=7 .enter(|
000008a0  72 6f 6f 6d 25 29 3a 54  25 3d 54 25 2d 31 3a e1  |room%):T%=T%-1:.|
000008b0  0d 02 44 11 e7 20 4e 25  3d 38 20 f2 67 65 74 3a  |..D.. N%=8 .get:|
000008c0  e1 0d 02 4e 12 e7 20 4e  25 3d 39 20 f2 64 72 6f  |...N.. N%=9 .dro|
000008d0  70 3a e1 0d 02 58 12 e7  20 4e 25 3d 31 30 20 f2  |p:...X.. N%=10 .|
000008e0  69 6e 76 3a e1 0d 02 62  13 e7 20 4e 25 3d 31 31  |inv:...b.. N%=11|
000008f0  20 f2 71 75 69 74 3a e1  0d 02 6c 13 e7 20 4e 25  | .quit:...l.. N%|
00000900  3d 31 32 20 f2 77 61 69  74 3a e1 0d 02 76 13 e7  |=12 .wait:...v..|
00000910  20 4e 25 3d 31 33 20 f2  61 74 74 61 3a e1 0d 02  | N%=13 .atta:...|
00000920  80 13 e7 20 4e 25 3d 31  34 20 f2 68 65 6c 70 3a  |... N%=14 .help:|
00000930  e1 0d 02 8a 05 e1 0d 02  94 0a dd f2 68 65 6c 70  |............help|
00000940  0d 02 9e 0a f7 20 8d 64  7a 4a 0d 02 a8 0f f5 20  |..... .dzJ..... |
00000950  f3 20 53 25 2c 64 65 73  24 0d 02 b2 14 fd 20 53  |. S%,des$..... S|
00000960  25 3e 3d 54 25 20 84 20  53 25 3d 39 35 0d 02 bc  |%>=T% . S%=95...|
00000970  0f f1 20 bd 31 33 31 3b  64 65 73 24 0d 02 c6 05  |.. .131;des$....|
00000980  e1 0d 02 d0 0a dd f2 77  61 69 74 0d 02 da 49 f1  |.......wait...I.|
00000990  27 bd 31 33 34 22 59 6f  75 20 77 61 69 74 2c 22  |'.134"You wait,"|
000009a0  27 bd 31 33 34 22 54 69  6d 65 20 70 61 73 73 65  |'.134"Time passe|
000009b0  73 20 22 3b 3a e3 4e 3d  31 20 b8 20 31 30 3a f1  |s ";:.N=1 . 10:.|
000009c0  3b 22 2e 22 3b 3a d1 3d  30 3a f5 fd 91 3e 32 30  |;".";:.=0:...>20|
000009d0  3a ed 3a f1 0d 02 e4 0b  dd f2 6d 76 74 72 20 0d  |:.:.......mvtr .|
000009e0  02 ee 16 74 72 25 3d 74  72 6f 6c 6c 25 28 31 29  |...tr%=troll%(1)|
000009f0  3a 57 25 3d 31 0d 02 f8  0e f2 6d 76 3a f2 74 72  |:W%=1.....mv:.tr|
00000a00  6f 6c 6c 0d 03 02 65 e7  20 74 72 6f 6c 6c 25 28  |oll...e. troll%(|
00000a10  31 29 3d 72 6f 6f 6d 25  20 80 20 74 72 25 3c 3e  |1)=room% . tr%<>|
00000a20  72 6f 6f 6d 25 20 f1 27  bd 31 33 30 22 41 20 6c  |room% .'.130"A l|
00000a30  61 72 67 65 20 74 72 6f  6c 6c 20 65 6e 74 65 72  |arge troll enter|
00000a40  73 2c 20 68 6f 6c 64 69  6e 67 22 3b 3a e7 20 74  |s, holding";:. t|
00000a50  72 6f 6c 6c 25 28 32 29  3d 30 20 f1 3b 22 20 6e  |roll%(2)=0 .;" n|
00000a60  6f 74 68 69 6e 67 2e 22  0d 03 0c 54 e7 20 74 72  |othing."...T. tr|
00000a70  6f 6c 6c 25 28 31 29 3d  72 6f 6f 6d 25 20 80 20  |oll%(1)=room% . |
00000a80  74 72 25 3c 3e 72 6f 6f  6d 25 20 80 20 74 72 6f  |tr%<>room% . tro|
00000a90  6c 6c 25 28 32 29 3c 3e  30 20 f1 bd 28 31 33 30  |ll%(2)<>0 ..(130|
00000aa0  29 22 61 22 27 bd 31 33  30 22 67 6c 69 74 74 65  |)"a"'.130"glitte|
00000ab0  72 69 6e 67 20 6a 65 77  65 6c 2e 22 0d 03 16 40  |ring jewel."...@|
00000ac0  e7 20 74 72 6f 6c 6c 25  28 31 29 3c 3e 72 6f 6f  |. troll%(1)<>roo|
00000ad0  6d 25 20 80 20 74 72 25  3d 72 6f 6f 6d 25 20 f1  |m% . tr%=room% .|
00000ae0  27 bd 31 33 31 22 41 20  6c 61 72 67 65 20 74 72  |'.131"A large tr|
00000af0  6f 6c 6c 20 6c 65 61 76  65 73 2e 22 0d 03 20 05  |oll leaves.".. .|
00000b00  e1 0d 03 2a 0a dd f2 61  74 74 61 0d 03 34 5b e7  |...*...atta..4[.|
00000b10  20 63 74 73 25 28 72 6f  6f 6d 25 29 3d 30 20 f1  | cts%(room%)=0 .|
00000b20  bd 31 32 39 22 41 74 74  61 63 6b 69 6e 67 20 77  |.129"Attacking w|
00000b30  61 6c 6c 73 20 6d 61 79  20 62 65 20 73 65 65 6e  |alls may be seen|
00000b40  20 61 73 22 27 bd 31 32  39 22 69 6e 73 61 6e 69  | as"'.129"insani|
00000b50  74 79 20 61 6e 64 20 68  61 73 20 6e 6f 20 65 66  |ty and has no ef|
00000b60  66 65 63 74 2e 22 0d 03  3e 64 e7 20 28 63 74 73  |fect."..>d. (cts|
00000b70  25 28 72 6f 6f 6d 25 29  80 31 29 3d 31 20 84 20  |%(room%).1)=1 . |
00000b80  28 63 74 73 25 28 72 6f  6f 6d 25 29 80 32 29 3d  |(cts%(room%).2)=|
00000b90  32 20 f1 bd 31 33 34 22  59 6f 75 72 20 62 6c 6f  |2 ..134"Your blo|
00000ba0  77 73 20 62 6f 75 6e 63  65 20 63 6c 65 61 6e 6c  |ws bounce cleanl|
00000bb0  79 20 6f 66 66 20 74 68  65 22 27 bd 31 33 34 22  |y off the"'.134"|
00000bc0  70 65 64 65 73 74 61 6c  2e 22 0d 03 48 36 e7 20  |pedestal."..H6. |
00000bd0  28 63 74 73 25 28 72 6f  6f 6d 25 29 80 34 29 3d  |(cts%(room%).4)=|
00000be0  34 20 f1 bd 31 33 30 22  54 68 65 20 74 72 6f 6c  |4 ..130"The trol|
00000bf0  6c 20 6a 75 73 74 20 67  69 67 67 6c 65 73 21 22  |l just giggles!"|
00000c00  0d 03 52 5c e7 20 28 63  74 73 25 28 72 6f 6f 6d  |..R\. (cts%(room|
00000c10  25 29 80 38 29 3d 38 20  f1 bd 31 33 31 22 54 68  |%).8)=8 ..131"Th|
00000c20  65 20 61 6e 67 72 79 20  74 72 6f 6c 6c 20 74 68  |e angry troll th|
00000c30  72 6f 77 73 20 61 20 6c  61 72 67 65 20 6a 65 77  |rows a large jew|
00000c40  65 6c 22 27 bd 31 33 31  22 61 74 20 79 6f 75 2e  |el"'.131"at you.|
00000c50  22 3a f2 6d 73 67 28 b3  28 34 29 29 0d 03 5c 05  |":.msg(.(4))..\.|
00000c60  e1 0d 03 66 0a dd f2 6d  6f 76 65 0d 03 70 2c e7  |...f...move..p,.|
00000c70  20 64 69 72 25 28 4e 25  29 3d 30 20 f1 bd 31 32  | dir%(N%)=0 ..12|
00000c80  39 22 43 61 6e 27 74 20  67 6f 20 74 68 61 74 20  |9"Can't go that |
00000c90  77 61 79 2e 22 3a e1 0d  03 7a 12 72 6f 6f 6d 25  |way.":...z.room%|
00000ca0  3d 64 69 72 25 28 4e 25  29 0d 03 84 05 e1 0d 03  |=dir%(N%).......|
00000cb0  8e 08 dd f2 6d 76 0d 03  98 6d e7 20 28 6a 65 77  |....mv...m. (jew|
00000cc0  25 28 31 29 3c 3e 30 20  80 20 6a 65 77 25 28 32  |%(1)<>0 . jew%(2|
00000cd0  29 3c 3e 30 20 80 20 6a  65 77 25 28 33 29 3c 3e  |)<>0 . jew%(3)<>|
00000ce0  30 29 20 80 20 ac 20 28  58 25 20 82 20 30 29 8c  |0) . . (X% . 0).|
00000cf0  20 e7 20 94 28 6a 65 77  25 28 33 29 2d 6a 65 77  | . .(jew%(3)-jew|
00000d00  25 28 32 29 29 3d 94 28  6a 65 77 25 28 32 29 2d  |%(2))=.(jew%(2)-|
00000d10  6a 65 77 25 28 31 29 29  20 f2 6d 73 67 28 b3 28  |jew%(1)) .msg(.(|
00000d20  34 29 29 0d 03 a2 0b 52  25 3d b3 28 33 29 0d 03  |4))....R%=.(3)..|
00000d30  ac 20 e7 20 52 25 3c 3d  32 20 74 72 6f 6c 6c 25  |. . R%<=2 troll%|
00000d40  28 31 29 3d 6a 65 77 25  28 b3 28 33 29 29 0d 03  |(1)=jew%(.(3))..|
00000d50  b6 1a e7 20 52 25 3d 33  20 74 72 6f 6c 6c 25 28  |... R%=3 troll%(|
00000d60  31 29 3d 72 6f 6f 6d 25  0d 03 c0 21 e7 20 74 72  |1)=room%...!. tr|
00000d70  6f 6c 6c 25 28 31 29 3d  30 20 74 72 6f 6c 6c 25  |oll%(1)=0 troll%|
00000d80  28 31 29 3d b3 28 32 37  29 0d 03 ca 0a f2 74 72  |(1)=.(27).....tr|
00000d90  6f 6c 6c 0d 03 d4 a5 e7  20 74 72 6f 6c 6c 25 28  |oll..... troll%(|
00000da0  32 29 3e 30 20 80 20 28  63 74 73 25 28 74 72 6f  |2)>0 . (cts%(tro|
00000db0  6c 6c 25 28 31 29 29 80  20 33 29 3d 30 3a 63 74  |ll%(1)). 3)=0:ct|
00000dc0  73 25 28 74 72 6f 6c 6c  25 28 31 29 29 3d 63 74  |s%(troll%(1))=ct|
00000dd0  73 25 28 74 72 6f 6c 6c  25 28 31 29 29 20 84 20  |s%(troll%(1)) . |
00000de0  32 3a 6a 65 77 25 28 74  72 6f 6c 6c 25 28 32 29  |2:jew%(troll%(2)|
00000df0  2d 31 29 3d 74 72 6f 6c  6c 25 28 31 29 3a 74 72  |-1)=troll%(1):tr|
00000e00  6f 6c 6c 25 28 32 29 3d  74 72 6f 6c 6c 25 28 32  |oll%(2)=troll%(2|
00000e10  29 2d 31 3a f1 27 bd 31  33 32 22 59 6f 75 20 68  |)-1:.'.132"You h|
00000e20  65 61 72 20 61 20 64 69  73 74 61 6e 74 20 57 48  |ear a distant WH|
00000e30  4f 4f 4f 46 21 22 3a e1  0d 03 de 05 20 0d 03 e8  |OOOF!":..... ...|
00000e40  9c e7 20 74 72 6f 6c 6c  25 28 32 29 3c 34 80 20  |.. troll%(2)<4. |
00000e50  28 63 74 73 25 28 74 72  6f 6c 6c 25 28 31 29 29  |(cts%(troll%(1))|
00000e60  20 80 20 32 29 3d 32 20  8c 20 63 74 73 25 28 74  | . 2)=2 . cts%(t|
00000e70  72 6f 6c 6c 25 28 31 29  29 3d 63 74 73 25 28 74  |roll%(1))=cts%(t|
00000e80  72 6f 6c 6c 25 28 31 29  29 20 82 20 32 3a 6a 65  |roll%(1)) . 2:je|
00000e90  77 25 28 74 72 6f 6c 6c  25 28 32 29 29 3d 30 3a  |w%(troll%(2))=0:|
00000ea0  74 72 6f 6c 6c 25 28 32  29 3d 74 72 6f 6c 6c 25  |troll%(2)=troll%|
00000eb0  28 32 29 2b 31 3a f1 27  bd 31 33 32 22 59 6f 75  |(2)+1:.'.132"You|
00000ec0  20 68 65 61 72 20 61 20  64 69 73 74 61 6e 74 20  | hear a distant |
00000ed0  53 4c 55 55 55 52 50 21  22 0d 03 f2 05 e1 0d 03  |SLUUURP!".......|
00000ee0  fc 0b dd f2 74 72 6f 6c  6c 0d 04 06 0d e3 4e 25  |....troll.....N%|
00000ef0  3d 31 20 b8 20 33 0d 04  10 3c e7 20 6a 65 77 25  |=1 . 3...<. jew%|
00000f00  28 4e 25 29 3d 74 72 6f  6c 6c 25 28 31 29 20 63  |(N%)=troll%(1) c|
00000f10  74 73 25 28 74 72 6f 6c  6c 25 28 31 29 29 3d 63  |ts%(troll%(1))=c|
00000f20  74 73 25 28 74 72 6f 6c  6c 25 28 31 29 29 20 84  |ts%(troll%(1)) .|
00000f30  20 32 0d 04 1a 05 ed 0d  04 24 21 63 74 73 25 28  | 2.......$!cts%(|
00000f40  72 6f 6f 6d 25 29 3d 63  74 73 25 28 72 6f 6f 6d  |room%)=cts%(room|
00000f50  25 29 20 80 20 32 34 33  0d 04 2e 42 e7 20 72 6f  |%) . 243...B. ro|
00000f60  6f 6d 25 3d 74 72 6f 6c  6c 25 28 31 29 20 80 20  |om%=troll%(1) . |
00000f70  74 72 6f 6c 6c 25 28 32  29 3c 3e 30 20 63 74 73  |troll%(2)<>0 cts|
00000f80  25 28 72 6f 6f 6d 25 29  3d 63 74 73 25 28 72 6f  |%(room%)=cts%(ro|
00000f90  6f 6d 25 29 20 84 20 38  3a e1 0d 04 38 41 e7 20  |om%) . 8:...8A. |
00000fa0  72 6f 6f 6d 25 3d 74 72  6f 6c 6c 25 28 31 29 20  |room%=troll%(1) |
00000fb0  80 20 74 72 6f 6c 6c 25  28 32 29 3d 30 20 63 74  |. troll%(2)=0 ct|
00000fc0  73 25 28 72 6f 6f 6d 25  29 3d 63 74 73 25 28 72  |s%(room%)=cts%(r|
00000fd0  6f 6f 6d 25 29 20 84 20  34 3a e1 0d 04 42 05 e1  |oom%) . 4:...B..|
00000fe0  0d 04 4c 09 dd f2 69 6e  76 0d 04 56 1a f1 22 59  |..L...inv..V.."Y|
00000ff0  6f 75 20 61 72 65 20 63  61 72 72 79 69 6e 67 3a  |ou are carrying:|
00001000  2d 22 27 0d 04 60 24 e7  20 43 25 3d 30 20 f1 bd  |-"'..`$. C%=0 ..|
00001010  31 33 34 22 4e 6f 74 68  69 6e 67 20 6f 66 20 75  |134"Nothing of u|
00001020  73 65 2e 22 3a e1 20 0d  04 6a 0f e3 20 4e 25 3d  |se.":. ..j.. N%=|
00001030  31 20 b8 20 43 25 0d 04  74 23 f1 22 31 20 6c 61  |1 . C%..t#."1 la|
00001040  72 67 65 20 22 3b 63 6f  69 6e 24 28 4e 25 29 3b  |rge ";coin$(N%);|
00001050  22 20 63 6f 69 6e 2e 22  20 0d 04 7e 05 ed 0d 04  |" coin." ..~....|
00001060  88 05 e1 0d 04 92 14 dd  20 f2 65 6e 74 65 72 28  |........ .enter(|
00001070  65 6e 74 65 72 25 29 0d  04 9c 0a f2 74 72 6f 6c  |enter%).....trol|
00001080  6c 0d 04 a6 17 ef 32 36  2c 31 32 2c 32 38 2c 30  |l.....26,12,28,0|
00001090  2c 30 2c 33 39 2c 31 33  0d 04 b0 0a f7 20 8d 44  |,0,39,13..... .D|
000010a0  7a 48 0d 04 ba 05 f5 0d  04 c4 09 f2 66 69 6e 64  |zH..........find|
000010b0  0d 04 ce 12 fd 20 72 6f  6f 6d 25 3d 65 6e 74 65  |..... room%=ente|
000010c0  72 25 0d 04 d8 1d f1 22  59 6f 75 20 61 72 65 20  |r%....."You are |
000010d0  73 74 61 6e 64 69 6e 67  20 22 3b 64 65 73 24 0d  |standing ";des$.|
000010e0  04 e2 08 f2 63 74 73 0d  04 ec 05 f1 0d 04 f6 0f  |....cts.........|
000010f0  6c 61 73 74 25 3d 72 6f  6f 6d 25 0d 05 00 09 f2  |last%=room%.....|
00001100  64 69 72 73 0d 05 0a 05  e1 0d 05 14 0a dd f2 64  |dirs...........d|
00001110  69 72 73 0d 05 1e 24 e7  20 72 6f 6f 6d 25 3c 3e  |irs...$. room%<>|
00001120  31 34 20 f1 bd 31 33 34  22 49 20 73 65 65 20 61  |14 ..134"I see a|
00001130  20 77 61 79 20 22 3b 0d  05 28 0a f7 20 8d 74 74  | way ";..(.. .tt|
00001140  4a 0d 05 32 0e e3 20 4e  25 3d 31 20 b8 20 34 0d  |J..2.. N%=1 . 4.|
00001150  05 3c 0a f3 20 64 65 73  24 0d 05 46 29 e7 20 64  |.<.. des$..F). d|
00001160  69 72 25 28 4e 25 29 3c  3e 30 20 8c 20 f1 3b bd  |ir%(N%)<>0 . .;.|
00001170  28 31 32 39 2b 4e 25 29  3b 64 65 73 24 3b 22 2c  |(129+N%);des$;",|
00001180  22 3b 0d 05 50 05 ed 0d  05 5a 0b ef 31 32 37 3a  |";..P....Z..127:|
00001190  f1 27 0d 05 64 3e e7 20  64 69 72 25 28 35 29 3c  |.'..d>. dir%(5)<|
000011a0  3e 30 20 20 f1 bd 28 31  33 31 29 22 41 20 53 65  |>0  ..(131)"A Se|
000011b0  74 20 6f 66 20 6d 61 67  69 63 61 6c 20 73 74 65  |t of magical ste|
000011c0  70 73 20 6c 65 61 64 20  75 70 77 61 72 64 2e 22  |ps lead upward."|
000011d0  0d 05 6e 3a e7 20 64 69  72 25 28 36 29 3c 3e 30  |..n:. dir%(6)<>0|
000011e0  20 20 f1 bd 28 31 33 34  29 22 41 20 68 6f 6c 65  |  ..(134)"A hole|
000011f0  20 69 6e 20 74 68 65 20  66 6c 6f 6f 72 20 6c 65  | in the floor le|
00001200  61 64 73 20 64 6f 77 6e  2e 22 0d 05 78 13 f1 8a  |ads down."..x...|
00001210  30 2c 31 32 29 c4 33 39  2c 22 5f 22 29 0d 05 82  |0,12).39,"_")...|
00001220  12 ef 32 38 2c 30 2c 32  34 2c 33 39 2c 31 33 0d  |..28,0,24,39,13.|
00001230  05 8c 05 e1 0d 05 96 09  dd f2 67 65 74 0d 05 a0  |..........get...|
00001240  42 e7 20 72 6f 6f 6d 25  3c 3e 35 20 80 20 63 74  |B. room%<>5 . ct|
00001250  73 25 28 72 6f 6f 6d 25  29 3d 30 20 f1 bd 31 33  |s%(room%)=0 ..13|
00001260  34 22 4e 6f 74 68 69 6e  67 20 68 65 72 65 20 77  |4"Nothing here w|
00001270  6f 72 74 68 20 74 61 6b  69 6e 67 2e 22 3a e1 0d  |orth taking.":..|
00001280  05 aa 8c e7 20 28 63 74  73 25 28 72 6f 6f 6d 25  |.... (cts%(room%|
00001290  29 20 80 20 31 29 3d 31  20 8c 20 f1 22 47 65 74  |) . 1)=1 . ."Get|
000012a0  20 6c 61 72 67 65 20 63  6f 69 6e 2e 22 27 22 54  | large coin."'"T|
000012b0  61 6b 65 6e 2e 22 27 22  53 68 6c 6f 6f 70 2c 20  |aken."'"Shloop, |
000012c0  74 68 65 20 70 65 64 65  73 74 61 6c 20 76 61 6e  |the pedestal van|
000012d0  69 73 68 65 73 2e 22 3a  63 74 73 25 28 72 6f 6f  |ishes.":cts%(roo|
000012e0  6d 25 29 3d 63 74 73 25  28 72 6f 6f 6d 25 29 20  |m%)=cts%(room%) |
000012f0  80 20 32 35 34 3a 63 6f  69 6e 25 28 43 25 29 3d  |. 254:coin%(C%)=|
00001300  30 3a 43 25 3d 43 25 2b  31 3a e1 0d 05 b4 4c e7  |0:C%=C%+1:....L.|
00001310  20 28 63 74 73 25 28 72  6f 6f 6d 25 29 20 80 20  | (cts%(room%) . |
00001320  32 29 3d 32 20 8c 20 f1  22 47 65 74 20 6c 61 72  |2)=2 . ."Get lar|
00001330  67 65 20 6a 65 77 65 6c  2e 22 27 22 43 61 6e 27  |ge jewel."'"Can'|
00001340  74 20 74 68 65 20 74 68  69 6e 67 27 73 20 73 74  |t the thing's st|
00001350  75 63 6b 2e 22 3a e1 0d  05 be 52 e7 20 28 63 74  |uck.":....R. (ct|
00001360  73 25 28 72 6f 6f 6d 25  29 20 80 20 34 29 3d 34  |s%(room%) . 4)=4|
00001370  20 84 20 28 63 74 73 25  28 72 6f 6f 6d 25 29 20  | . (cts%(room%) |
00001380  80 20 38 29 3d 38 20 8c  20 f1 22 47 65 74 20 62  |. 8)=8 . ."Get b|
00001390  75 72 6c 79 20 74 72 6f  6c 6c 3f 22 27 22 4e 69  |urly troll?"'"Ni|
000013a0  63 65 20 74 72 79 2e 22  27 0d 05 c8 49 e7 20 28  |ce try."'...I. (|
000013b0  63 74 73 25 28 72 6f 6f  6d 25 29 20 80 20 38 29  |cts%(room%) . 8)|
000013c0  3d 38 20 8c 20 f1 22 47  65 74 20 6c 61 72 67 65  |=8 . ."Get large|
000013d0  20 6a 65 77 65 6c 2e 22  27 22 54 68 65 20 74 72  | jewel."'"The tr|
000013e0  6f 6c 6c 20 77 6f 6e 27  74 20 6c 65 74 20 6d 65  |oll won't let me|
000013f0  2e 22 0d 05 d2 42 e7 20  72 6f 6f 6d 25 3d 35 20  |."...B. room%=5 |
00001400  f1 22 47 65 74 20 73 6b  65 6c 65 74 6f 6e 2e 22  |."Get skeleton."|
00001410  27 22 4f 6e 65 20 73 6b  65 6c 65 74 6f 6e 20 74  |'"One skeleton t|
00001420  61 6b 65 6e 2e 22 27 3a  f2 6d 73 67 28 34 2b b3  |aken."':.msg(4+.|
00001430  28 32 29 29 0d 05 dc 05  e1 0d 05 e6 0a dd f2 64  |(2))...........d|
00001440  72 6f 70 0d 05 f0 20 e7  20 43 25 3d 30 20 8c 20  |rop... . C%=0 . |
00001450  f1 bd 31 33 33 22 44 72  6f 70 20 77 68 61 74 3f  |..133"Drop what?|
00001460  22 3a e1 0d 05 fa 17 f1  22 44 72 6f 70 20 6c 61  |":......"Drop la|
00001470  72 67 65 20 63 6f 69 6e  2e 22 0d 06 04 63 e7 20  |rge coin."...c. |
00001480  28 63 74 73 25 28 72 6f  6f 6d 25 29 20 80 20 32  |(cts%(room%) . 2|
00001490  29 3d 32 20 84 20 28 63  74 73 25 28 72 6f 6f 6d  |)=2 . (cts%(room|
000014a0  25 29 20 80 20 31 29 3d  31 20 f1 22 54 68 65 20  |%) . 1)=1 ."The |
000014b0  22 3b 63 6f 69 6e 24 28  43 25 29 3b 22 20 63 6f  |";coin$(C%);" co|
000014c0  69 6e 20 73 74 69 63 6b  73 20 74 6f 20 79 6f 75  |in sticks to you|
000014d0  72 20 66 69 6e 67 65 72  73 2e 22 3a e1 0d 06 0e  |r fingers.":....|
000014e0  2d e7 20 28 72 6f 6f 6d  25 3c 3e 32 33 20 80 20  |-. (room%<>23 . |
000014f0  72 6f 6f 6d 25 3c 3e 31  30 29 20 63 6f 69 6e 25  |room%<>10) coin%|
00001500  28 43 25 29 3d 72 6f 6f  6d 25 0d 06 18 1b e7 20  |(C%)=room%..... |
00001510  72 6f 6f 6d 25 3d 32 33  20 63 6f 69 6e 25 28 43  |room%=23 coin%(C|
00001520  25 29 3d 31 34 0d 06 22  1a e7 20 72 6f 6f 6d 25  |%)=14..".. room%|
00001530  3d 31 30 20 63 6f 69 6e  25 28 43 25 29 3d 30 0d  |=10 coin%(C%)=0.|
00001540  06 2c 17 f1 22 44 72 6f  70 70 65 64 2e 22 3a 43  |.,.."Dropped.":C|
00001550  25 3d 43 25 2d 31 0d 06  36 69 e7 20 72 6f 6f 6d  |%=C%-1..6i. room|
00001560  25 3d 32 33 20 80 20 63  74 73 25 28 31 34 29 3d  |%=23 . cts%(14)=|
00001570  30 20 f1 22 54 68 65 20  63 6f 69 6e 20 22 63 6f  |0 ."The coin "co|
00001580  69 6e 24 28 43 25 2b 31  29 3b 22 20 72 6f 6c 6c  |in$(C%+1);" roll|
00001590  73 20 61 77 61 79 20 64  6f 77 6e 20 61 20 68 6f  |s away down a ho|
000015a0  6c 65 20 20 69 6e 20 74  68 65 20 66 6c 6f 6f 72  |le  in the floor|
000015b0  2e 22 3a 63 74 73 25 28  31 34 29 3d 31 3a e1 0d  |.":cts%(14)=1:..|
000015c0  06 40 47 e7 20 72 6f 6f  6d 25 3d 31 30 20 80 20  |.@G. room%=10 . |
000015d0  28 63 74 73 25 28 31 30  29 80 20 32 29 3d 30 20  |(cts%(10). 2)=0 |
000015e0  8c 20 f1 22 42 75 75 75  75 75 72 70 2e 22 27 22  |. ."Buuuuurp."'"|
000015f0  4a 75 73 74 20 77 68 61  74 20 49 20 6e 65 65 64  |Just what I need|
00001600  65 64 2e 22 3a e1 0d 06  4a 53 e7 20 28 63 74 73  |ed.":...JS. (cts|
00001610  25 28 72 6f 6f 6d 25 29  20 80 20 34 29 3d 34 20  |%(room%) . 4)=4 |
00001620  f1 22 54 68 65 20 62 75  72 6c 79 20 74 72 6f 6c  |."The burly trol|
00001630  6c 20 73 68 72 69 65 6b  73 20 61 6e 64 20 72 75  |l shrieks and ru|
00001640  6e 73 20 61 77 61 79 2e  22 3a 74 72 6f 6c 6c 25  |ns away.":troll%|
00001650  28 31 29 3d b3 28 32 37  29 0d 06 54 56 e7 20 28  |(1)=.(27)..TV. (|
00001660  63 74 73 25 28 72 6f 6f  6d 25 29 20 80 20 38 29  |cts%(room%) . 8)|
00001670  3d 38 20 f1 22 54 68 65  20 62 75 72 6c 79 20 74  |=8 ."The burly t|
00001680  72 6f 6c 6c 20 77 61 6c  6b 73 20 6f 66 66 20 73  |roll walks off s|
00001690  75 6c 6b 69 6e 67 2e 22  3a 74 72 6f 6c 6c 25 28  |ulking.":troll%(|
000016a0  31 29 3d b3 28 32 37 29  3a f2 74 72 6f 6c 6c 0d  |1)=.(27):.troll.|
000016b0  06 5e 71 f1 22 57 68 6f  6f 73 68 21 20 41 73 20  |.^q."Whoosh! As |
000016c0  74 68 65 20 22 3b 63 6f  69 6e 24 28 43 25 2b 31  |the ";coin$(C%+1|
000016d0  29 3b 22 20 63 6f 69 6e  20 64 72 6f 70 73 20 61  |);" coin drops a|
000016e0  20 70 69 6e 6b 22 27 22  70 65 64 65 73 74 61 6c  | pink"'"pedestal|
000016f0  20 72 69 73 65 73 20 74  6f 20 63 61 74 63 68 20  | rises to catch |
00001700  69 74 2e 22 3a 63 74 73  25 28 72 6f 6f 6d 25 29  |it.":cts%(room%)|
00001710  3d 63 74 73 25 28 72 6f  6f 6d 25 29 20 82 20 31  |=cts%(room%) . 1|
00001720  0d 06 68 05 e1 0d 06 72  0a dd f2 66 69 6e 64 0d  |..h....r...find.|
00001730  06 7c 0b f3 20 72 6f 6f  6d 25 0d 06 86 0e e3 20  |.|.. room%..... |
00001740  4e 25 3d 31 20 b8 20 36  0d 06 90 0e f3 20 64 69  |N%=1 . 6..... di|
00001750  72 25 28 4e 25 29 0d 06  9a 05 ed 0d 06 a4 0a f3  |r%(N%)..........|
00001760  20 64 65 73 24 0d 06 ae  05 e1 0d 06 b8 09 dd f2  | des$...........|
00001770  63 74 73 0d 06 c2 0a f7  20 8d 74 7e 4a 0d 06 cc  |cts..... .t~J...|
00001780  0a 4e 25 3d 31 3a f5 0d  06 d6 0a f3 20 64 65 73  |.N%=1:...... des|
00001790  24 0d 06 e0 21 e7 20 28  63 74 73 25 28 72 6f 6f  |$...!. (cts%(roo|
000017a0  6d 25 29 20 80 20 4e 25  29 3d 4e 25 20 f1 64 65  |m%) . N%)=N% .de|
000017b0  73 24 0d 06 ea 0b 4e 25  3d 4e 25 2a 32 0d 06 f4  |s$....N%=N%*2...|
000017c0  0a fd 4e 25 3d 31 36 0d  06 fe 05 e1 0d 07 08 0a  |..N%=16.........|
000017d0  dd f2 71 75 69 74 0d 07  12 27 f1 20 bd 31 33 36  |..quit...'. .136|
000017e0  22 51 55 49 54 21 22 27  22 41 72 65 20 79 6f 75  |"QUIT!"'"Are you|
000017f0  20 72 65 61 6c 79 20 73  75 72 65 3f 22 0d 07 1c  | realy sure?"...|
00001800  20 e7 20 28 a5 20 80 20  26 44 46 29 3d 38 39 20  | . (. . &DF)=89 |
00001810  8c 20 db 3a f1 22 42 79  65 2e 22 3a e0 0d 07 26  |. .:."Bye.":...&|
00001820  05 e1 0d 07 30 0d dd f2  6d 73 67 28 4e 25 29 0d  |....0...msg(N%).|
00001830  07 3a 74 e7 20 4e 25 3d  31 20 f1 22 53 75 64 64  |.:t. N%=1 ."Sudd|
00001840  65 6e 6c 79 2c 20 61 20  6d 61 73 73 69 76 65 20  |enly, a massive |
00001850  68 6f 6c 65 20 6f 70 65  6e 73 20 75 70 20 69 6e  |hole opens up in|
00001860  22 27 22 74 68 65 20 67  72 6f 75 6e 64 20 62 65  |"'"the ground be|
00001870  6e 65 61 74 68 20 79 6f  75 72 20 66 65 65 74 2e  |neath your feet.|
00001880  20 54 68 65 20 73 68 6f  63 6b 22 27 22 6f 66 20  | The shock"'"of |
00001890  6c 61 6e 64 69 6e 67 20  6b 69 6c 6c 73 20 79 6f  |landing kills yo|
000018a0  75 2e 22 0d 07 44 57 e7  20 4e 25 3d 32 20 f1 22  |u."..DW. N%=2 ."|
000018b0  41 20 6c 61 72 67 65 20  70 65 6e 64 75 6c 75 6d  |A large pendulum|
000018c0  20 73 77 69 6e 67 73 20  69 6e 20 66 72 6f 6d 20  | swings in from |
000018d0  74 68 65 20 72 6f 6f 66  22 3b 22 61 6e 64 20 6e  |the roof";"and n|
000018e0  65 61 74 6c 79 20 63 6c  65 61 76 65 73 20 79 6f  |eatly cleaves yo|
000018f0  75 72 20 73 6b 75 6c 6c  2e 22 0d 07 4e 3c e7 20  |ur skull."..N<. |
00001900  4e 25 3d 33 20 f1 22 41  20 6d 61 73 73 69 76 65  |N%=3 ."A massive|
00001910  20 62 6f 75 6c 64 65 72  20 72 6f 6c 6c 73 20 69  | boulder rolls i|
00001920  6e 20 61 6e 64 20 66 6c  61 74 74 65 6e 73 22 27  |n and flattens"'|
00001930  22 79 6f 75 2e 22 0d 07  58 43 e7 20 4e 25 3d 34  |"you."..XC. N%=4|
00001940  20 f1 22 41 20 6c 61 72  67 65 20 73 70 65 61 72  | ."A large spear|
00001950  20 67 6c 69 64 65 73 20  64 6f 77 6e 20 66 72 6f  | glides down fro|
00001960  6d 20 61 62 6f 76 65 20  61 6e 64 22 3b 22 6b 69  |m above and";"ki|
00001970  6c 6c 73 20 79 6f 75 2e  22 0d 07 62 72 e7 20 4e  |lls you."..br. N|
00001980  25 3d 35 20 f1 27 22 54  68 65 20 73 6b 65 6c 65  |%=5 .'"The skele|
00001990  74 6f 6e 20 64 69 64 6e  27 74 20 6c 69 6b 65 20  |ton didn't like |
000019a0  62 65 65 6e 20 70 75 6c  6c 65 64 22 27 22 6f 66  |been pulled"'"of|
000019b0  66 20 74 68 65 20 77 61  6c 6c 2c 20 61 6e 64 20  |f the wall, and |
000019c0  79 6f 75 20 6e 6f 77 20  66 69 6e 64 20 79 6f 75  |you now find you|
000019d0  72 73 65 6c 66 22 27 22  63 68 61 69 6e 65 64 20  |rself"'"chained |
000019e0  74 68 65 72 65 20 74 6f  6f 21 22 0d 07 6c 4f e7  |there too!"..lO.|
000019f0  20 4e 25 3d 36 20 f1 27  22 54 68 65 20 73 6b 65  | N%=6 .'"The ske|
00001a00  6c 65 74 6f 6e 20 70 72  6f 6d 70 74 6c 79 20 67  |leton promptly g|
00001a10  72 61 62 73 20 79 6f 75  20 62 79 20 74 68 65 22  |rabs you by the"|
00001a20  27 22 6e 65 63 6b 20 61  6e 64 20 74 68 72 6f 74  |'"neck and throt|
00001a30  74 6c 65 73 20 79 6f 75  2e 22 0d 07 76 2c e7 20  |tles you."..v,. |
00001a40  4e 25 3c 3d 36 20 f1 27  22 53 6f 20 79 6f 75 20  |N%<=6 .'"So you |
00001a50  6c 6f 6f 73 65 20 61 67  61 69 6e 20 73 75 63 6b  |loose again suck|
00001a60  65 72 21 22 3a e0 0d 07  80 70 e7 20 4e 25 3d 37  |er!":....p. N%=7|
00001a70  20 f1 22 43 6f 6e 67 72  61 74 75 6c 61 74 69 6f  | ."Congratulatio|
00001a80  6e 73 2c 20 79 6f 75 20  77 69 6e 2c 20 74 68 65  |ns, you win, the|
00001a90  20 65 6c 76 69 65 73 22  27 22 6d 61 73 73 20 61  | elvies"'"mass a|
00001aa0  72 6f 75 6e 64 20 79 6f  75 20 61 6e 64 20 63 61  |round you and ca|
00001ab0  72 72 79 20 79 6f 75 20  61 77 61 79 20 74 6f 22  |rry you away to"|
00001ac0  27 22 61 20 68 65 72 6f  27 73 20 77 65 6c 63 6f  |'"a hero's welco|
00001ad0  6d 65 2e 22 3a e0 0d 07  8a 05 e1 0d 07 94 0a dd  |me.":...........|
00001ae0  f2 69 6e 69 74 0d 07 9e  1c 43 25 3d 30 3a 4e 25  |.init....C%=0:N%|
00001af0  3d 30 3a 54 25 3d 30 3a  58 25 3d 30 3a 59 25 3d  |=0:T%=0:X%=0:Y%=|
00001b00  30 0d 07 a8 15 72 6f 6f  6d 25 3d 31 33 3a 6c 61  |0....room%=13:la|
00001b10  73 74 25 3d 31 37 0d 07  b2 3a de 20 64 69 72 25  |st%=17...:. dir%|
00001b20  28 38 29 2c 63 74 73 25  28 32 37 29 2c 74 72 6f  |(8),cts%(27),tro|
00001b30  6c 6c 25 28 32 29 2c 6a  65 77 25 28 33 29 2c 63  |ll%(2),jew%(3),c|
00001b40  6f 69 6e 25 28 33 29 2c  63 6f 69 6e 24 28 33 29  |oin%(3),coin$(3)|
00001b50  0d 07 bc 12 64 65 73 24  3d c4 32 35 35 2c 22 20  |....des$=.255," |
00001b60  22 29 0d 07 c6 0a f7 20  8d 64 52 4a 0d 07 d0 0d  |")..... .dRJ....|
00001b70  e3 4e 25 3d 31 20 b8 20  33 0d 07 da 0f f3 20 63  |.N%=1 . 3..... c|
00001b80  6f 69 6e 24 28 4e 25 29  0d 07 e4 05 ed 0d 07 ee  |oin$(N%)........|
00001b90  23 6a 65 77 25 28 31 29  3d 33 3a 6a 65 77 25 28  |#jew%(1)=3:jew%(|
00001ba0  32 29 3d 31 30 3a 6a 65  77 25 28 33 29 3d 32 35  |2)=10:jew%(3)=25|
00001bb0  0d 07 f8 0f e3 20 4e 25  3d 31 20 b8 20 32 37 0d  |..... N%=1 . 27.|
00001bc0  08 02 0e f3 20 63 74 73  25 28 4e 25 29 0d 08 0c  |.... cts%(N%)...|
00001bd0  05 ed 0d 08 16 1c 74 72  6f 6c 6c 25 28 31 29 3d  |......troll%(1)=|
00001be0  31 37 3a 74 72 6f 6c 6c  25 28 32 29 3d 31 0d 08  |17:troll%(2)=1..|
00001bf0  20 05 e1 0d 08 2a 19 dd  f2 63 65 6e 74 28 6d 73  | ....*...cent(ms|
00001c00  67 24 2c 43 25 2c 59 25  2c 44 25 29 0d 08 34 15  |g$,C%,Y%,D%)..4.|
00001c10  58 25 3d 28 33 39 2d a9  28 6d 73 67 24 29 29 2f  |X%=(39-.(msg$))/|
00001c20  32 0d 08 3e 3b e7 20 44  25 3d 31 20 8c 20 e3 4e  |2..>;. D%=1 . .N|
00001c30  25 3d 30 20 b8 31 3a f1  8a 58 25 2d 31 2c 59 25  |%=0 .1:..X%-1,Y%|
00001c40  2b 4e 25 29 3b bd 31 34  31 3b bd 28 31 32 38 2b  |+N%);.141;.(128+|
00001c50  43 25 29 3b 6d 73 67 24  3a ed 3a e1 0d 08 48 1c  |C%);msg$:.:...H.|
00001c60  f1 8a 58 25 2c 59 25 29  3b bd 28 31 32 38 2b 43  |..X%,Y%);.(128+C|
00001c70  25 29 3b 6d 73 67 24 3b  0d 08 52 05 e1 0d 08 5c  |%);msg$;..R....\|
00001c80  18 dd f2 64 62 6c 28 6d  73 67 24 2c 58 25 2c 59  |...dbl(msg$,X%,Y|
00001c90  25 2c 43 25 29 0d 08 66  2f e3 4e 25 3d 30 b8 31  |%,C%)..f/.N%=0.1|
00001ca0  3a f1 8a 58 25 2d 32 2c  59 25 2d 31 2b 4e 25 29  |:..X%-2,Y%-1+N%)|
00001cb0  bd 31 34 31 bd 28 31 32  38 2b 43 25 29 3b 6d 73  |.141.(128+C%);ms|
00001cc0  67 24 3a ed 0d 08 70 05  e1 0d 08 7a 13 dc 20 31  |g$:...p....z.. 1|
00001cd0  2c 32 2c 30 2c 34 2c 30  2c 30 2c 30 0d 08 84 24  |,2,0,4,0,0,0...$|
00001ce0  dc 20 22 61 74 20 74 68  65 20 62 6f 74 74 6f 6d  |. "at the bottom|
00001cf0  20 6f 66 20 61 20 64 65  65 70 77 65 6c 6c 2e 22  | of a deepwell."|
00001d00  0d 08 8e 13 dc 20 32 2c  33 2c 31 2c 30 2c 30 2c  |..... 2,3,1,0,0,|
00001d10  30 2c 30 0d 08 98 1f dc  20 22 69 6e 20 61 20 6d  |0,0..... "in a m|
00001d20  69 73 74 79 20 4e 2f 53  20 70 61 73 73 61 67 65  |isty N/S passage|
00001d30  2e 22 0d 08 a2 13 dc 20  33 2c 30 2c 32 2c 36 2c  |."..... 3,0,2,6,|
00001d40  30 2c 30 2c 30 0d 08 ac  27 dc 20 22 61 74 20 74  |0,0,0...'. "at t|
00001d50  68 65 20 65 6e 64 20 6f  66 20 61 20 6d 69 73 74  |he end of a mist|
00001d60  79 20 20 70 61 73 73 61  67 65 2e 22 0d 08 b6 13  |y  passage."....|
00001d70  dc 20 34 2c 30 2c 30 2c  37 2c 31 2c 30 2c 30 0d  |. 4,0,0,7,1,0,0.|
00001d80  08 c0 31 dc 20 22 61 20  73 74 72 61 6e 67 65 20  |..1. "a strange |
00001d90  72 6f 6f 6d 20 77 69 74  68 20 61 20 20 76 65 72  |room with a  ver|
00001da0  79 20 68 69 67 68 20 63  65 69 6c 69 6e 67 2e 22  |y high ceiling."|
00001db0  0d 08 ca 13 dc 20 35 2c  30 2c 30 2c 38 2c 30 2c  |..... 5,0,0,8,0,|
00001dc0  30 2c 30 0d 08 d4 8e dc  20 22 69 6e 20 74 68 65  |0,0..... "in the|
00001dd0  20 74 6f 72 74 75 72 65  20 63 68 61 6d 62 65 72  | torture chamber|
00001de0  2e 54 68 65 20 72 6f 6f  6d 20 69 73 20 66 75 6c  |.The room is ful|
00001df0  6c 20 6f 66 20 77 65 69  72 64 20 65 71 75 69 70  |l of weird equip|
00001e00  6d 65 6e 74 2e 41 20 20  20 73 6b 65 6c 65 74 6f  |ment.A   skeleto|
00001e10  6e 20 68 61 6e 67 73 20  66 72 6f 6d 20 74 68 65  |n hangs from the|
00001e20  20 77 61 6c 6c 20 61 6e  64 20 74 68 65 20 20 20  | wall and the   |
00001e30  20 70 6c 61 63 65 20 69  73 20 6c 69 74 74 65 72  | place is litter|
00001e40  65 64 20 77 69 74 68 20  63 6f 62 77 65 62 73 2e  |ed with cobwebs.|
00001e50  22 0d 08 de 13 dc 20 36  2c 30 2c 30 2c 39 2c 33  |"..... 6,0,0,9,3|
00001e60  2c 30 2c 30 0d 08 e8 4c  dc 20 22 69 6e 20 61 20  |,0,0...L. "in a |
00001e70  64 61 6e 6b 20 45 2f 57  20 70 61 73 73 61 67 65  |dank E/W passage|
00001e80  2e 20 41 20 63 6c 6f 75  64 20 6f 66 20 67 72 65  |. A cloud of gre|
00001e90  65 6e 20 6d 69 73 74 20  65 6e 74 65 72 73 20 66  |en mist enters f|
00001ea0  72 6f 6d 20 74 68 65 20  20 20 77 65 73 74 2e 22  |rom the   west."|
00001eb0  0d 08 f2 14 dc 20 37 2c  38 2c 30 2c 30 2c 34 2c  |..... 7,8,0,0,4,|
00001ec0  31 36 2c 30 0d 08 fc 27  dc 20 22 69 6e 20 74 68  |16,0...'. "in th|
00001ed0  65 20 73 6f 75 74 68 65  61 73 74 20 63 6f 72 6e  |e southeast corn|
00001ee0  65 72 70 61 73 73 61 67  65 2e 22 0d 09 06 13 dc  |erpassage.".....|
00001ef0  20 38 2c 39 2c 37 2c 30  2c 35 2c 30 2c 30 0d 09  | 8,9,7,0,5,0,0..|
00001f00  10 27 dc 20 22 69 6e 20  61 20 73 6d 61 6c 6c 2c  |.'. "in a small,|
00001f10  20 64 61 6e 6b 20 61 6e  74 65 20 20 63 68 61 6d  | dank ante  cham|
00001f20  62 65 72 2e 22 0d 09 1a  13 dc 20 39 2c 30 2c 38  |ber."..... 9,0,8|
00001f30  2c 30 2c 36 2c 30 2c 30  0d 09 24 27 dc 20 22 61  |,0,6,0,0..$'. "a|
00001f40  74 20 6f 6e 65 20 65 6e  64 20 6f 66 20 61 20 64  |t one end of a d|
00001f50  61 6d 70 20 20 20 70 61  73 73 61 67 65 2e 22 0d  |amp   passage.".|
00001f60  09 2e 15 dc 20 31 30 2c  31 31 2c 30 2c 30 2c 30  |.... 10,11,0,0,0|
00001f70  2c 30 2c 31 0d 09 38 42  dc 20 22 69 6e 20 74 68  |,0,1..8B. "in th|
00001f80  65 20 66 6f 6f 64 20 73  74 6f 72 65 2c 20 61 20  |e food store, a |
00001f90  20 20 73 69 67 6e 20 6f  6e 20 74 68 65 20 77 61  |  sign on the wa|
00001fa0  6c 6c 20 66 6c 61 73 68  65 73 20 27 46 45 45 44  |ll flashes 'FEED|
00001fb0  20 4d 45 27 2e 22 0d 09  42 16 dc 20 31 31 2c 31  | ME'."..B.. 11,1|
00001fc0  32 2c 31 30 2c 30 2c 30  2c 30 2c 30 0d 09 4c 27  |2,10,0,0,0,0..L'|
00001fd0  dc 20 22 61 74 20 74 68  65 20 73 6f 75 74 68 20  |. "at the south |
00001fe0  65 6e 64 20 6f 66 20 74  68 65 6b 69 74 63 68 65  |end of thekitche|
00001ff0  6e 2e 22 0d 09 56 16 dc  20 31 32 2c 30 2c 31 31  |n."..V.. 12,0,11|
00002000  2c 31 35 2c 30 2c 30 2c  30 0d 09 60 27 dc 20 22  |,15,0,0,0..`'. "|
00002010  61 74 20 74 68 65 20 6e  6f 72 74 68 20 65 6e 64  |at the north end|
00002020  20 6f 66 20 74 68 65 6b  69 74 63 68 65 6e 2e 22  | of thekitchen."|
00002030  0d 09 6a 18 dc 20 31 33  2c 31 34 2c 30 2c 31 36  |..j.. 13,14,0,16|
00002040  2c 30 2c 32 32 2c 30 20  0d 09 74 58 dc 20 22 69  |,0,22,0 ..tX. "i|
00002050  6e 20 74 68 65 20 67 75  65 73 74 73 20 6c 6f 75  |n the guests lou|
00002060  6e 67 65 2c 20 61 73 69  67 6e 20 61 62 6f 76 65  |nge, asign above|
00002070  20 74 68 65 20 6e 6f 72  74 68 20 64 6f 6f 72 20  | the north door |
00002080  73 61 79 73 20 3a 2d 20  20 20 20 20 20 20 27 44  |says :-       'D|
00002090  4f 4e 27 54 20 47 4f 20  4e 4f 52 54 48 27 2e 22  |ON'T GO NORTH'."|
000020a0  0d 09 7e 14 dc 20 31 34  2c 30 2c 30 2c 30 2c 30  |..~.. 14,0,0,0,0|
000020b0  2c 30 2c 30 0d 09 88 47  dc 20 22 69 6e 20 74 68  |,0,0...G. "in th|
000020c0  65 20 74 72 61 70 20 72  6f 6f 6d 2e 20 41 20 20  |e trap room. A  |
000020d0  20 20 73 69 67 6e 20 6f  6e 20 74 68 65 20 77 61  |  sign on the wa|
000020e0  6c 6c 20 66 6c 61 73 68  65 73 2c 20 49 20 74 6f  |ll flashes, I to|
000020f0  6c 64 20 79 6f 75 20 73  6f 21 22 0d 09 92 16 dc  |ld you so!".....|
00002100  20 31 35 2c 30 2c 30 2c  31 38 2c 31 32 2c 30 2c  | 15,0,0,18,12,0,|
00002110  30 0d 09 9c 25 dc 20 22  69 6e 20 61 20 73 68 6f  |0...%. "in a sho|
00002120  72 74 20 63 6f 6e 6e 65  63 74 69 6e 67 20 20 68  |rt connecting  h|
00002130  61 6c 6c 2e 22 20 0d 09  a6 16 dc 20 31 36 2c 31  |all." ..... 16,1|
00002140  37 2c 30 2c 30 2c 31 33  2c 30 2c 30 0d 09 b0 30  |7,0,0,13,0,0...0|
00002150  dc 20 22 61 74 20 74 68  65 20 73 6f 75 74 68 20  |. "at the south |
00002160  65 6e 64 20 6f 66 20 74  68 65 6c 6f 6e 67 20 64  |end of thelong d|
00002170  69 6e 69 6e 67 20 72 6f  6f 6d 2e 22 0d 09 ba 16  |ining room."....|
00002180  dc 20 31 37 2c 31 38 2c  31 36 2c 30 2c 30 2c 30  |. 17,18,16,0,0,0|
00002190  2c 30 0d 09 c4 30 dc 20  22 69 6e 20 74 68 65 20  |,0...0. "in the |
000021a0  6d 69 64 64 6c 65 20 6f  66 20 74 68 65 20 20 20  |middle of the   |
000021b0  6c 6f 6e 67 20 64 69 6e  69 6e 67 20 72 6f 6f 6d  |long dining room|
000021c0  2e 22 0d 09 ce 16 dc 20  31 38 2c 30 2c 31 37 2c  |."..... 18,0,17,|
000021d0  30 2c 31 35 2c 30 2c 30  0d 09 d8 30 dc 20 22 61  |0,15,0,0...0. "a|
000021e0  74 20 74 68 65 20 6e 6f  72 74 68 20 65 6e 64 20  |t the north end |
000021f0  6f 66 20 74 68 65 6c 6f  6e 67 20 64 69 6e 69 6e  |of thelong dinin|
00002200  67 20 72 6f 6f 6d 2e 22  0d 09 e2 15 dc 20 31 39  |g room."..... 19|
00002210  2c 30 2c 30 2c 32 32 2c  30 2c 30 2c 30 0d 09 ec  |,0,0,22,0,0,0...|
00002220  2d dc 20 22 61 74 20 74  68 65 20 77 65 73 74 65  |-. "at the weste|
00002230  72 6e 20 65 6e 64 20 6f  66 20 61 6c 6f 6e 67 20  |rn end of along |
00002240  45 2f 57 20 68 61 6c 6c  2e 22 0d 09 f6 15 dc 20  |E/W hall."..... |
00002250  32 30 2c 32 31 2c 30 2c  30 2c 30 2c 30 2c 30 0d  |20,21,0,0,0,0,0.|
00002260  0a 00 2d dc 20 22 61 74  20 74 68 65 20 73 6f 75  |..-. "at the sou|
00002270  74 68 20 65 6e 64 20 6f  66 20 74 68 65 6b 69 6e  |th end of thekin|
00002280  67 27 73 20 62 65 64 72  6f 6f 6d 22 0d 0a 0a 16  |g's bedroom"....|
00002290  dc 20 32 31 2c 30 2c 32  30 2c 32 34 2c 30 2c 30  |. 21,0,20,24,0,0|
000022a0  2c 30 0d 0a 14 2d dc 20  22 61 74 20 74 68 65 20  |,0...-. "at the |
000022b0  6e 6f 72 74 68 20 65 6e  64 20 6f 66 20 74 68 65  |north end of the|
000022c0  6b 69 6e 67 27 73 20 62  65 64 72 6f 6f 6d 22 0d  |king's bedroom".|
000022d0  0a 1e 17 dc 20 32 32 2c  30 2c 30 2c 32 35 2c 31  |.... 22,0,0,25,1|
000022e0  39 2c 30 2c 31 33 0d 0a  28 2d dc 20 22 61 74 20  |9,0,13..(-. "at |
000022f0  74 68 65 20 65 61 73 74  65 72 6e 20 65 6e 64 20  |the eastern end |
00002300  6f 66 20 61 6c 6f 6e 67  20 45 2f 57 20 68 61 6c  |of along E/W hal|
00002310  6c 2e 22 0d 0a 32 15 dc  20 32 33 2c 30 2c 30 2c  |l."..2.. 23,0,0,|
00002320  32 36 2c 30 2c 30 2c 35  0d 0a 3c 28 dc 20 22 69  |26,0,0,5..<(. "i|
00002330  6e 20 74 68 65 20 71 75  65 65 6e 27 73 20 64 72  |n the queen's dr|
00002340  65 73 73 69 6e 67 20 63  68 61 6d 62 65 72 2e 22  |essing chamber."|
00002350  0d 0a 46 16 dc 20 32 34  2c 30 2c 30 2c 32 37 2c  |..F.. 24,0,0,27,|
00002360  32 31 2c 30 2c 30 0d 0a  50 1f dc 20 22 69 6e 20  |21,0,0..P.. "in |
00002370  74 68 65 20 71 75 65 65  6e 27 73 20 62 65 64 72  |the queen's bedr|
00002380  6f 6f 6d 2e 22 0d 0a 5a  16 dc 20 32 35 2c 32 36  |oom."..Z.. 25,26|
00002390  2c 30 2c 30 2c 32 32 2c  30 2c 30 0d 0a 64 18 dc  |,0,0,22,0,0..d..|
000023a0  20 22 69 6e 20 45 6c 69  7a 61 27 73 20 72 6f 6f  | "in Eliza's roo|
000023b0  6d 2e 22 0d 0a 6e 17 dc  20 32 36 2c 32 37 2c 32  |m."..n.. 26,27,2|
000023c0  35 2c 30 2c 32 33 2c 30  2c 30 0d 0a 78 32 dc 20  |5,0,23,0,0..x2. |
000023d0  22 61 74 20 74 68 65 20  73 6f 75 74 68 65 72 6e  |"at the southern|
000023e0  20 65 6e 64 20 6f 66 20  61 20 6c 6f 6e 67 20 4e  | end of a long N|
000023f0  2f 53 20 70 61 73 73 61  67 65 2e 22 0d 0a 82 16  |/S passage."....|
00002400  dc 20 32 37 2c 30 2c 32  36 2c 30 2c 32 34 2c 30  |. 27,0,26,0,24,0|
00002410  2c 30 0d 0a 8c 32 dc 20  22 61 74 20 74 68 65 20  |,0...2. "at the |
00002420  6e 6f 72 74 68 65 72 6e  20 65 6e 64 20 6f 66 20  |northern end of |
00002430  61 20 6c 6f 6e 67 20 4e  2f 53 20 70 61 73 73 61  |a long N/S passa|
00002440  67 65 2e 22 0d 0a 96 21  dc 20 4e 2c 31 2c 53 2c  |ge."...!. N,1,S,|
00002450  32 2c 45 2c 33 2c 57 2c  34 2c 55 2c 35 2c 44 2c  |2,E,3,W,4,U,5,D,|
00002460  36 2c 40 2c 37 0d 0a a0  21 dc 20 47 2c 38 2c 4c  |6,@,7...!. G,8,L|
00002470  2c 39 2c 49 2c 31 30 2c  51 2c 31 31 2c 77 2c 31  |,9,I,10,Q,11,w,1|
00002480  32 2c 50 2c 31 32 0d 0a  aa 15 dc 20 41 2c 31 33  |2,P,12..... A,13|
00002490  2c 48 2c 31 34 2c 3f 2c  32 35 35 0d 0a b4 1b dc  |,H,14,?,255.....|
000024a0  20 4e 6f 72 74 68 2c 53  6f 75 74 68 2c 45 61 73  | North,South,Eas|
000024b0  74 2c 57 65 73 74 0d 0a  be b1 dc 20 22 41 20 74  |t,West..... "A t|
000024c0  61 6c 6c 20 70 69 6e 6b  20 70 65 64 65 73 74 61  |all pink pedesta|
000024d0  6c 20 77 69 74 68 20 61  20 6c 61 72 67 65 20 63  |l with a large c|
000024e0  6f 69 6e 20 20 6f 6e 20  69 74 20 73 74 61 6e 64  |oin  on it stand|
000024f0  73 20 6f 6e 20 74 68 65  20 66 6c 6f 6f 72 2e 22  |s on the floor."|
00002500  2c 22 41 20 74 61 6c 6c  20 62 6c 75 65 20 70 65  |,"A tall blue pe|
00002510  64 65 73 74 61 6c 20 77  69 74 68 20 61 20 6c 61  |destal with a la|
00002520  72 67 65 20 6a 65 77 65  6c 20 6f 6e 20 69 74 20  |rge jewel on it |
00002530  73 74 61 6e 64 73 20 6f  6e 20 74 68 65 20 66 6c  |stands on the fl|
00002540  6f 6f 72 2e 22 2c 22 41  20 62 75 72 6c 79 20 74  |oor.","A burly t|
00002550  72 6f 6c 6c 20 69 73 20  67 61 7a 69 6e 67 20 61  |roll is gazing a|
00002560  74 20 79 6f 75 2e 22 0d  0a c8 46 dc 20 22 41 20  |t you."...F. "A |
00002570  62 75 72 6c 79 20 74 72  6f 6c 6c 20 63 61 72 72  |burly troll carr|
00002580  79 69 6e 67 20 61 20 6c  61 72 67 65 20 6a 65 77  |ying a large jew|
00002590  65 6c 2c 20 20 20 73 74  61 6e 64 73 20 6c 6f 6f  |el,   stands loo|
000025a0  6b 69 6e 67 20 61 74 20  79 6f 75 2e 22 0d 0a d2  |king at you."...|
000025b0  1a dc 20 42 72 6f 6e 7a  65 2c 53 69 6c 76 65 72  |.. Bronze,Silver|
000025c0  2c 47 6f 6c 64 65 6e 0d  0a dc 17 dc 20 31 2c 30  |,Golden..... 1,0|
000025d0  2c 30 2c 30 2c 30 2c 30  2c 30 2c 30 2c 30 0d 0a  |,0,0,0,0,0,0,0..|
000025e0  e6 17 dc 20 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |... 0,0,0,0,0,0,|
000025f0  31 2c 30 2c 30 0d 0a f0  17 dc 20 30 2c 30 2c 31  |1,0,0..... 0,0,1|
00002600  2c 30 2c 30 2c 30 2c 30  2c 30 2c 30 0d 0a fa 9a  |,0,0,0,0,0,0....|
00002610  dc 20 33 30 2c 22 59 6f  75 27 72 65 20 64 6f 69  |. 30,"You're doi|
00002620  6e 67 20 66 69 6e 65 2e  22 2c 34 30 2c 22 57 68  |ng fine.",40,"Wh|
00002630  79 20 64 6f 6e 27 74 20  79 6f 75 20 6d 61 6b 65  |y don't you make|
00002640  20 61 20 6d 61 70 3f 22  2c 36 30 2c 22 4e 6f 74  | a map?",60,"Not|
00002650  20 6d 75 63 68 20 74 69  6d 65 20 6c 65 66 74 20  | much time left |
00002660  6e 6f 77 2e 22 2c 38 30  2c 22 57 65 27 72 65 20  |now.",80,"We're |
00002670  61 6c 6c 20 67 6f 6e 6e  61 20 64 69 65 21 22 2c  |all gonna die!",|
00002680  39 35 2c 22 41 68 20 77  65 6c 6c 2c 20 74 68 65  |95,"Ah well, the|
00002690  72 65 20 67 6f 65 73 20  61 6e 6f 74 68 65 72 20  |re goes another |
000026a0  6c 69 66 65 2e 22 0d 0b  04 3f e7 20 9f 3d 31 37  |life."...?. .=17|
000026b0  20 8c 20 f1 27 bd 31 32  22 45 73 63 61 70 65 20  | . .'.12"Escape |
000026c0  69 73 20 69 6d 70 6f 73  73 69 62 6c 65 2e 22 27  |is impossible."'|
000026d0  22 48 69 74 20 61 20 6b  65 79 2e 22 3a f5 fd a5  |"Hit a key.":...|
000026e0  3c 3e 30 3a f8 0d 0b 0e  14 f6 3a f1 22 20 49 6e  |<>0:......:." In|
000026f0  20 6c 69 6e 65 20 22 3b  9e 0d 0b 18 05 e0 0d 0b  | line ";........|
00002700  22 0c e7 20 9f 3d 31 37  20 f8 0d 0b 2c 14 f6 3a  |".. .=17 ...,..:|
00002710  f1 22 20 49 6e 20 6c 69  6e 65 20 22 3b 9e 0d 0b  |." In line ";...|
00002720  36 05 e0 0d ff                                    |6....|
00002725

20-03-88/CASTLE.m0

20-03-88/CASTLE.m1

20-03-88/CASTLE.m2

20-03-88/CASTLE.m4

20-03-88/CASTLE.m5

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .