-
Notifications
You must be signed in to change notification settings - Fork 26
/
dungeon.zil
2541 lines (2269 loc) · 57.2 KB
/
dungeon.zil
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
"DUNGEON for
DEADLINE
Copyright 1982 Infocom, Inc. All rights reserved.
"
"Directions"
<DIRECTIONS NORTH SOUTH EAST WEST NE NW SE SW UP DOWN IN OUT>
"The usual globals"
<OBJECT GLOBAL-OBJECTS
(FLAGS INVISIBLE TOUCHBIT SURFACEBIT OPENBIT TRANSBIT
SEARCHBIT)>
<OBJECT LOCAL-GLOBALS
(IN GLOBAL-OBJECTS)
(SYNONYM ZZKJLK ;"This synonym is necessary - God knows")>
<OBJECT ROOMS>
<OBJECT PSEUDO-OBJECT
(IN LOCAL-GLOBALS)
(DESC "FROBNO" ;"Place holder (MUST BE 6 CHARACTERS!!!!!)")
(ACTION LIBRARY-F ;"Place holder")>
<OBJECT IT
(IN GLOBAL-OBJECTS)
(SYNONYM IT THEM)
(DESC "X")
(FLAGS NDESCBIT)>
<OBJECT HIM-HER
(IN GLOBAL-OBJECTS)
(SYNONYM HE SHE HIM HER)
(DESC "X")
(FLAGS NDESCBIT)>
"Necessary Flags"
<GLOBAL LOAD-MAX 100>
<GLOBAL LOAD-ALLOWED 100>
"Grounds of Robner Estate"
<ROOM SOUTH-LAWN
(IN ROOMS)
(LDESC
"You are on a wide lawn just north of the entrance to the Robner estate.
Directly north at the end of a pebbled path is the Robner house, flanked
to the northeast and northwest by a vast expanse of well-kept lawn.
Beyond the house can be seen the lakefront.")
(DESC "South Lawn")
(SYNONYM LAWN)
(ADJECTIVE SOUTH)
(FLAGS RLANDBIT ONBIT)
(NORTH TO FRONT-PATH)
(SOUTH "Leaving the estate would mean quitting the case and, most
probably, your job.")
(NW TO WEST-LAWN)
(NE TO EAST-LAWN)
(GLOBAL LAWN HOUSE)
(LINE 2)
(STATION FRONT-PATH)
(CORRIDOR 64)>
<ROOM FRONT-PATH
(IN ROOMS)
(DESC "Front Path")
(SYNONYM PATH)
(ADJECTIVE FRONT)
(FLAGS RLANDBIT ONBIT)
(ACTION FRONT-PATH-F)
(IN TO FOYER IF FRONT-DOOR IS OPEN)
(NORTH TO FOYER IF FRONT-DOOR IS OPEN)
(SOUTH TO SOUTH-LAWN)
(SE TO SOUTH-LAWN)
(SW TO SOUTH-LAWN)
(WEST TO WEST-OF-DOOR)
(EAST TO EAST-OF-DOOR)
(GLOBAL HOUSE FRONT-DOOR)
(LINE 2)
(STATION FRONT-PATH)
(CORRIDOR 32)>
<ROOM WEST-OF-DOOR
(IN ROOMS)
(LDESC
"You are in front of the Robner house just west of the front door. To the
north is a large bay window through which can be seen part of the living
room. To the northwest is the west side of the house.")
(DESC "West of Front Door")
(FLAGS RLANDBIT ONBIT)
(NORTH TO LIVING-ROOM IF BAY-WINDOW IS OPEN)
(NE TO LIVING-ROOM IF BAY-WINDOW IS OPEN)
(EAST TO FRONT-PATH)
(WEST TO WEST-LAWN)
(SOUTH TO SOUTH-LAWN)
(SE TO SOUTH-LAWN)
(SW TO SOUTH-LAWN)
(NW TO WEST-SIDE)
(GLOBAL BAY-WINDOW HOUSE)
(ACTION WEST-DOOR-F)
(LINE 2)
(STATION WEST-OF-DOOR)
(CORRIDOR 32)>
<ROOM EAST-OF-DOOR
(IN ROOMS)
(LDESC
"You are in front of the Robner house just east of the front door. A small
window, closed and securely locked, is the only thing of note here. To the
northeast is the east side of the house.")
(DESC "East of Front Door")
(FLAGS RLANDBIT ONBIT)
(NORTH "The window is closed and locked.")
(WEST TO FRONT-PATH)
(EAST TO EAST-LAWN)
(SOUTH TO SOUTH-LAWN)
(SE TO SOUTH-LAWN)
(SW TO SOUTH-LAWN)
(NE TO EAST-SIDE)
(GLOBAL WINDOW HOUSE)
(LINE 2)
(STATION EAST-OF-DOOR)
(CORRIDOR 96)>
<ROOM WEST-LAWN
(IN ROOMS)
(LDESC
"This is a sprawling lawn west of the Robner house. To the west and north is
the lake shore. To the northeast is a rose garden, and to the south another
wide lawn.")
(DESC "West Lawn")
(SYNONYM LAWN)
(ADJECTIVE WEST)
(FLAGS RLANDBIT ONBIT)
(NORTH "You can't go into the lake.")
(NW "You can't go into the lake.")
(WEST "You can't go into the lake.")
(NE TO ROSE-GARDEN)
(EAST TO WEST-SIDE)
(SE TO WEST-OF-DOOR)
(SOUTH TO SOUTH-LAWN)
(GLOBAL LAWN HOUSE LAKE)
(LINE 2)
(STATION WEST-LAWN)
(CORRIDOR 32)>
<ROOM EAST-LAWN
(IN ROOMS)
(LDESC
"You are on a neatly manicured lawn, east of the house, which extends north
and east to the shore of a lake. To the northwest is a peaceful orchard, and
toward the south another wide lawn. Southeast, beside the lake, is a small
shed with a solitary dirty window.")
(DESC "East Lawn")
(SYNONYM LAWN)
(ADJECTIVE EAST)
(FLAGS RLANDBIT ONBIT)
(NORTH "You can't go into the lake.")
(NE "You can't go into the lake.")
(EAST "You can't go into the lake.")
(NW TO ORCHARD)
(WEST TO EAST-SIDE)
(SW TO EAST-OF-DOOR)
(SOUTH TO SOUTH-LAWN)
(SE TO SHED-ROOM)
(IN TO SHED-ROOM)
(GLOBAL HOUSE LAWN SHED LAKE SHED-WINDOW)
(LINE 2)
(STATION EAST-LAWN)
(CORRIDOR 672)>
<ROOM EAST-SIDE
(IN ROOMS)
(LDESC
"There are no windows or entries of any kind here at the east side of the
house. To the north is the orchard, and the front lawn lies to the south.
A lawn also slopes down toward the shore of a lake to the east.")
(DESC "East Side of House")
(FLAGS RLANDBIT ONBIT)
(NORTH TO ORCHARD)
(NE TO EAST-LAWN)
(SOUTH TO EAST-OF-DOOR)
(SE TO EAST-LAWN)
(EAST TO EAST-LAWN)
(WEST "You can't enter the house here.")
(GLOBAL HOUSE)
(LINE 2)
(STATION EAST-SIDE)
(CORRIDOR 64)>
<ROOM WEST-SIDE
(IN ROOMS)
(LDESC
"There are no doors or windows at ground level here on the west side of the
house. A beautiful rose garden, separated by a tall fence, lies to the north,
and the front of the house is to your south. A large lawn bordering the lake
lies to the west.")
(DESC "West Side of House")
(FLAGS RLANDBIT ONBIT)
(SW TO WEST-LAWN)
(WEST TO WEST-LAWN)
(NW TO WEST-LAWN)
(NORTH "A fence prevents your mucking up the rose garden.")
(SE TO WEST-OF-DOOR)
(SOUTH TO WEST-OF-DOOR)
(EAST "You can't enter the house here.")
(GLOBAL HOUSE)
(PSEUDO "FENCE" RANDOM-PSEUDO)
(LINE 2)
(STATION WEST-SIDE)>
<ROOM SHED-ROOM
(IN ROOMS)
(LDESC
"This small garden shed is filled with implements of gardening and lawn care.
Shelves filled with various tools line the walls and a filthy window looks out
on the lawn.")
(DESC "Shed")
(SYNONYM SHED CABIN)
(ADJECTIVE TOOL GARDEN WOODEN)
(FLAGS RLANDBIT ONBIT)
(OUT TO EAST-LAWN)
(NORTH TO EAST-LAWN)
(NW TO EAST-LAWN)
(GLOBAL SHED SHED-WINDOW)
(LINE 2)
(STATION EAST-LAWN)>
<ROOM BEHIND-SHED
(IN ROOMS)
(LDESC
"You are now between the shed and the lake, a position invisible from the
house or the adjacent lawns. There are no windows here, but you can easily
enter the shed via the door around the corner.")
(DESC "Behind the Shed")
(OUT TO EAST-LAWN)
(IN TO SHED-ROOM)
(EAST "You can't go into the lake.")
(WEST TO EAST-LAWN)
(NORTH TO EAST-LAWN)
(SOUTH TO SOUTH-LAWN)
(FLAGS RLANDBIT ONBIT)
(GLOBAL SHED)
(LINE 2)
(STATION EAST-LAWN)>
<ROOM ROSE-GARDEN
(IN ROOMS)
(DESC "Garden Path")
(SYNONYM PATH)
(ADJECTIVE GARDEN ROSE FLOWER)
(FLAGS RLANDBIT ONBIT)
(ACTION ROSE-GARDEN-F)
(NORTH TO NORTH-LAWN)
(NE TO NORTH-LAWN)
(NW TO NORTH-LAWN)
(SW TO WEST-LAWN)
(WEST TO WEST-LAWN)
(EAST TO ORCHARD)
(SOUTH TO IN-ROSES)
(SE TO IN-ROSES)
(GLOBAL ROSE HOUSE DINING-ROOM-WINDOW)
(LINE 2)
(STATION ROSE-GARDEN)
(CORRIDOR 2048)>
<ROOM IN-ROSES
(IN ROOMS)
(DESC "Among the Roses")
(FLAGS RLANDBIT ONBIT)
(ACTION IN-ROSES-F)
(UP TO LIBRARY-BALCONY IF LADDER-FLAG)
(NORTH TO ROSE-GARDEN)
(NE TO ROSE-GARDEN)
(NW TO ROSE-GARDEN)
(WEST TO WEST-LAWN)
(EAST TO IN-ORCHARD)
(SOUTH "You can't enter the house here.")
(GLOBAL DINING-ROOM-WINDOW HOUSE ROSE BALCONY)
(LINE 2)
(STATION ROSE-GARDEN)>
<ROOM ORCHARD
(IN ROOMS)
(LDESC
"You are on a path at the edge of a small orchard of fruit trees which abuts
the eastern side of the back of the house. The orchard is obviously intended
more to display the beauty of the blossoms in spring than to produce
significant amounts of fruit. The windows of the kitchen look out onto the
orchard, although your view of them is blocked by the trees and a small grape
arbor. To the west is a path along a rose garden, and lawns sweep out to the
north and east.")
(DESC "Orchard Path")
(SYNONYM PATH)
(ADJECTIVE ORCHARD)
(FLAGS RLANDBIT ONBIT)
(EAST TO EAST-LAWN)
(SE TO EAST-LAWN)
(NORTH TO NORTH-LAWN)
(NW TO NORTH-LAWN)
(NE TO NORTH-LAWN)
(WEST TO ROSE-GARDEN)
(SOUTH TO IN-ORCHARD)
(SW TO IN-ORCHARD)
(GLOBAL KITCHEN-WINDOW HOUSE FRUIT-TREES)
(LINE 2)
(STATION ORCHARD)
(CORRIDOR 2176)>
<ROOM IN-ORCHARD
(IN ROOMS)
(DESC "In the Orchard")
(FLAGS RLANDBIT ONBIT)
(NORTH TO ORCHARD)
(WEST TO IN-ROSES)
(NW TO ORCHARD)
(NE TO ORCHARD)
(UP TO BEDROOM-BALCONY IF LADDER-FLAG-2)
(SOUTH TO EAST-SIDE)
(ACTION IN-ORCHARD-F)
(GLOBAL KITCHEN-WINDOW HOUSE FRUIT-TREES BALCONY)
(LINE 2)
(STATION ORCHARD)>
<ROOM NORTH-LAWN
(IN ROOMS)
(LDESC
"This idyllic spot lies on a jut of land well north of the house and is
surrounded on three sides by lake shore. Its charm includes the sweet smell
of roses blown on a southwest breeze from the rose garden and by the sound
of the leaves rustling in the orchard to the southeast.")
(DESC "North Lawn")
(SYNONYM LAWN)
(ADJECTIVE NORTH)
(FLAGS RLANDBIT ONBIT)
(NE "You can't go into the lake.")
(NW "You can't go into the lake.")
(NORTH "You can't go into the lake.")
(EAST "You can't go into the lake.")
(WEST "You can't go into the lake.")
(SW TO ROSE-GARDEN)
(SE TO ORCHARD)
(SOUTH TO ROSE-GARDEN)
(GLOBAL LAWN HOUSE LAKE)
(LINE 2)
(STATION NORTH-LAWN)
(CORRIDOR 128)>
"The First Floor"
<ROOM FOYER
(IN ROOMS)
(DESC "Foyer")
(SYNONYM FOYER)
(FLAGS RLANDBIT ONBIT)
(ACTION FOYER-F)
(SOUTH TO FRONT-PATH IF FRONT-DOOR IS OPEN)
(NORTH TO NFOYER)
(OUT TO FRONT-PATH IF FRONT-DOOR IS OPEN)
(GLOBAL FRONT-DOOR)
(LINE 1)
(STATION FOYER)
(CORRIDOR 8)>
<ROOM NFOYER
(IN ROOMS)
(LDESC
"This is a hallway north of the foyer. To the west is an open doorway, and to
the east is the foot of a staircase. The hall continues north.")
(DESC "North of Foyer")
(FLAGS RLANDBIT ONBIT)
(SOUTH TO FOYER)
(WEST TO LIVING-ROOM)
(EAST TO STAIR-BOTTOM)
(NORTH TO CORNER)
(LINE 1)
(STATION NFOYER)
(CORRIDOR 264)>
<ROOM SHALL-1
(IN ROOMS)
(DESC "South Hallway")
(FLAGS RLANDBIT ONBIT)
(ACTION SHALL-1-F)
(EAST TO SHALL-2)
(NORTH TO STAIR-BOTTOM)
(SOUTH TO ROURKE-ROOM IF ROURKE-DOOR IS OPEN)
(GLOBAL ROURKE-DOOR)
(LINE 1)
(STATION SHALL-1)
(CORRIDOR 16)>
<ROOM SHALL-2
(IN ROOMS)
(DESC "South Hallway")
(FLAGS RLANDBIT ONBIT)
(ACTION SHALL-2-F)
(EAST TO ROURKE-BATH IF ROURKE-BATH-DOOR IS OPEN)
(WEST TO SHALL-1)
(SOUTH TO SOUTH-CLOSET IF SOUTH-CLOSET-DOOR IS OPEN)
(GLOBAL ROURKE-BATH-DOOR SOUTH-CLOSET-DOOR)
(LINE 1)
(STATION SHALL-2)>
<ROOM ROURKE-ROOM
(IN ROOMS)
(DESC "Mrs. Rourke's Room")
(SYNONYM BEDROOM ROOM)
(ADJECTIVE ROURKE)
(ACTION ROURKE-ROOM-F)
(FLAGS RLANDBIT ONBIT)
(NORTH TO SHALL-1 IF ROURKE-DOOR IS OPEN)
(OUT TO SHALL-1 IF ROURKE-DOOR IS OPEN)
(GLOBAL ROURKE-DOOR END-TABLE CHAIR BED WINDOW)
(LINE 1)
(STATION SHALL-1)>
<ROOM ROURKE-BATH
(IN ROOMS)
(DESC "Mrs. Rourke's Bathroom")
(FLAGS RLANDBIT ONBIT)
(ACTION ROURKE-BATH-F)
(WEST TO SHALL-2 IF ROURKE-BATH-DOOR IS OPEN)
(GLOBAL ROURKE-BATH-DOOR TOILET SHOWER SINK)
(LINE 1)
(STATION SHALL-2)>
<ROOM SOUTH-CLOSET
(IN ROOMS)
(LDESC
"This is a little-used storage closet containing odds and ends of no interest
whatsoever. The exit is to the north.")
(DESC "South Closet")
(SYNONYM CLOSET)
(ADJECTIVE SOUTH)
(FLAGS RLANDBIT ONBIT)
(NORTH TO SHALL-2 IF SOUTH-CLOSET-DOOR IS OPEN)
(OUT TO SHALL-2 IF SOUTH-CLOSET-DOOR IS OPEN)
(GLOBAL SOUTH-CLOSET-DOOR CLOSET)
(LINE 1)
(STATION SHALL-2)
(SIZE 1)>
<ROOM STAIR-BOTTOM
(IN ROOMS)
(LDESC
"You are at the foot of the stairs to the second floor. Open archways lead
west and south.")
(DESC "Bottom of Stairs")
(FLAGS RLANDBIT ONBIT)
(UP TO STAIRS)
(SOUTH TO SHALL-1)
(WEST TO NFOYER)
(GLOBAL STAIRS)
(LINE 1)
(STATION STAIR-BOTTOM)
(CORRIDOR 272)>
<ROOM LIVING-ROOM
(IN ROOMS)
(DESC "Living Room")
(SYNONYM ROOM)
(ADJECTIVE LIVING)
(FLAGS RLANDBIT ONBIT)
(ACTION LIVING-ROOM-F)
(EAST TO NFOYER)
(OUT TO NFOYER)
(SOUTH TO WEST-OF-DOOR IF BAY-WINDOW IS OPEN)
(GLOBAL BAY-WINDOW TELEPHONE SOFA CHAIR LGTABLE)
(LINE 1)
(STATION NFOYER)>
<ROOM CORNER
(IN ROOMS)
(DESC "Corner")
(LDESC
"You are at the corner of two halls, one a short hallway to the west ending
with a set of doors, and the other a long hall leading south toward the front
door. To the north are swinging double doors leading into the kitchen.")
(FLAGS RLANDBIT ONBIT)
(SOUTH TO NFOYER)
(WEST TO DINING-ROOM)
(NORTH TO KITCHEN)
(LINE 3)
(STATION CORNER)
(CORRIDOR 8)>
<ROOM DINING-ROOM
(IN ROOMS)
(LDESC
"You have entered the dining room. A long table seating twelve is in the
center of the room and a large trestle table is against the south wall. A
large picture window to the north allows a view of the rose garden. Hanging
on the wall are several cheerful paintings, including one by Seurat which
appears to be an original.")
(DESC "Dining Room")
(SYNONYM ROOM)
(ADJECTIVE DINING)
(FLAGS RLANDBIT ONBIT)
(EAST TO CORNER)
(OUT TO CORNER)
(GLOBAL DINING-ROOM-WINDOW)
(LINE 3)
(STATION DINING-ROOM)>
<ROOM KITCHEN
(IN ROOMS)
(LDESC
"This is the Robner kitchen, quite large and with a full complement of
appliances and labor-saving devices. On one wall, a beautifully-crafted
shelf unit contains rare china, a unique hand-painted family heirloom
depicting scenes from Greek mythology. The china consists of many place
settings of plates, teacups, and saucers. There are several cabinets which
likely contain silverware, glasses, and the like. To the east is a pantry.")
(DESC "Kitchen")
(SYNONYM KITCHEN)
(FLAGS RLANDBIT ONBIT)
(SOUTH TO CORNER)
(EAST TO PANTRY)
(GLOBAL KITCHEN-WINDOW SINK)
(LINE 3)
(STATION KITCHEN)>
<ROOM PANTRY
(IN ROOMS)
(LDESC
"This is the pantry with shelves containing a large selection of canned and
packaged foods, such as fruits, vegetables, and dry goods.")
(DESC "Pantry")
(SYNONYM PANTRY)
(FLAGS RLANDBIT ONBIT)
(WEST TO KITCHEN)
(LINE 3)
(STATION PANTRY)>
"Staircase"
<ROOM STAIRS
(IN ROOMS)
(LDESC
"You are on a landing halfway up the flight of stairs. You notice that the
stairs do indeed make quite a noise when stepped upon.")
(DESC "Stairs")
(SYNONYM STAIRS)
(FLAGS RLANDBIT ONBIT)
(UP TO STAIR-TOP)
(DOWN TO STAIR-BOTTOM)
(GLOBAL STAIRS)
(LINE 1)
(STATION STAIRS)
(CORRIDOR 256)>
"Second Floor of Robner House"
<ROOM STAIR-TOP
(IN ROOMS)
(LDESC
"You are at the top of the staircase where short hallways run north and south
and a corridor the length of the house heads west.")
(DESC "Top of Stairs")
(FLAGS RLANDBIT ONBIT)
(DOWN TO STAIRS)
(NORTH TO NORTH-HALL)
(SOUTH TO SHALL-11)
(WEST TO CORRIDOR-1)
(GLOBAL STAIRS)
(LINE 0)
(STATION STAIR-TOP)
(CORRIDOR 3)>
<ROOM CORRIDOR-1
(IN ROOMS)
(DESC "Hallway")
(FLAGS RLANDBIT ONBIT)
(ACTION CORRIDOR-1-F)
(EAST TO STAIR-TOP)
(WEST TO CORRIDOR-2)
(SOUTH TO DUNBAR-ROOM IF DUNBAR-DOOR IS OPEN)
(NORTH TO MASTER-BEDROOM IF MASTER-BEDROOM-DOOR IS OPEN)
(GLOBAL DUNBAR-DOOR MASTER-BEDROOM-DOOR)
(LINE 0)
(STATION CORRIDOR-1)
(CORRIDOR 1)>
<ROOM CORRIDOR-2
(IN ROOMS)
(LDESC
"This is approximately the middle of the corridor, a convenient place for a
closet full of linens. Stairs to the east and a window to the west are about
equidistant. The closet, to the north, is open and rather shallow.")
(DESC "Hallway")
(FLAGS RLANDBIT ONBIT)
(NORTH TO UPSTAIRS-CLOSET)
(EAST TO CORRIDOR-1)
(WEST TO CORRIDOR-3)
(GLOBAL CLOSET)
(LINE 0)
(STATION CORRIDOR-2)
(CORRIDOR 1025)>
<ROOM CORRIDOR-3
(IN ROOMS)
(DESC "Hallway")
(FLAGS RLANDBIT ONBIT)
(ACTION CORRIDOR-3-F)
(EAST TO CORRIDOR-2)
(WEST TO CORRIDOR-4)
(SOUTH TO GEORGE-ROOM IF GEORGE-DOOR IS OPEN)
(GLOBAL GEORGE-DOOR)
(LINE 0)
(STATION CORRIDOR-3)
(CORRIDOR 1)>
<ROOM CORRIDOR-4
(IN ROOMS)
(DESC "End of Hallway")
(FLAGS RLANDBIT ONBIT)
(ACTION CORRIDOR-4-F)
(EAST TO CORRIDOR-3)
(WEST "The hall ends here.")
(NORTH TO LIBRARY)
(GLOBAL LIBRARY-DOOR)
(LINE 0)
(STATION CORRIDOR-4)
(CORRIDOR 1)>
<ROOM LIBRARY
(IN ROOMS)
(DESC "Library")
(SYNONYM LIBRARY)
(FLAGS RLANDBIT ONBIT)
(ACTION LIBRARY-F)
(EAST TO HIDDEN-CLOSET IF HIDDEN-DOOR-L IS OPEN)
(SOUTH TO CORRIDOR-4)
(NORTH TO LIBRARY-BALCONY IF LIBRARY-BALCONY-DOOR IS OPEN)
(GLOBAL HIDDEN-DOOR-L LIBRARY-BALCONY-DOOR TELEPHONE LIBRARY-DOOR)
(LINE 0)
(STATION LIBRARY)>
<ROOM LIBRARY-BALCONY
(IN ROOMS)
(DESC "Library Balcony")
(SYNONYM BALCONY)
(ADJECTIVE LIBRARY)
(FLAGS RLANDBIT ONBIT)
(ACTION LIBRARY-BALCONY-F)
(SOUTH TO LIBRARY IF LIBRARY-BALCONY-DOOR IS OPEN)
(DOWN TO IN-ROSES IF LADDER-FLAG
ELSE "The fall would probably kill you.")
(GLOBAL LIBRARY-BALCONY-DOOR)
(LINE 0)
(STATION LIBRARY-BALCONY)>
<ROOM UPSTAIRS-CLOSET
(IN ROOMS)
(LDESC
"The closet is rather shallow and has some shelves full of assorted linens,
towels, and uninteresting toilet articles.")
(DESC "Upstairs Closet")
(SYNONYM CLOSET)
(ADJECTIVE UPSTAIRS)
(FLAGS RLANDBIT ONBIT)
(OUT TO CORRIDOR-2)
(SOUTH TO CORRIDOR-2)
(GLOBAL CLOSET)
(LINE 0)
(STATION CORRIDOR-2)
(CORRIDOR 1024)>
<ROOM HIDDEN-CLOSET
(IN ROOMS)
(DESC "Hidden Closet")
(SYNONYM CLOSET)
(ADJECTIVE HIDDEN)
(FLAGS RLANDBIT ONBIT)
(ACTION HIDDEN-CLOSET-F)
(EAST TO MASTER-BEDROOM IF HIDDEN-DOOR-B IS OPEN)
(WEST TO LIBRARY IF HIDDEN-DOOR-L IS OPEN)
(GLOBAL HIDDEN-DOOR-B HIDDEN-DOOR-L CLOSET)
(LINE 0)
(STATION LIBRARY)>
<ROOM MASTER-BEDROOM
(IN ROOMS)
(DESC "Master Bedroom")
(SYNONYM BEDROOM ROOM)
(ADJECTIVE MASTER ROBNER)
(FLAGS RLANDBIT ONBIT)
(ACTION MASTER-BEDROOM-F)
(WEST TO HIDDEN-CLOSET IF HIDDEN-DOOR-B IS OPEN)
(NORTH TO BEDROOM-BALCONY IF BEDROOM-BALCONY-DOOR IS OPEN)
(SOUTH TO CORRIDOR-1 IF MASTER-BEDROOM-DOOR IS OPEN)
(EAST TO MASTER-BATH)
(GLOBAL HIDDEN-DOOR-B BEDROOM-BALCONY-DOOR MASTER-BEDROOM-DOOR
END-TABLE CHAIR TELEPHONE)
(LINE 0)
(STATION CORRIDOR-1)>
<ROOM MASTER-BATH
(IN ROOMS)
(LDESC
"This is Mr. and Mrs. Robner's private bathroom, accessible only from
the bedroom through a door to the west. On one wall is a mirror over a long
counter containing two sinks, and in addition to the usual bathroom fixtures
is a jacuzzi. Hanging plants give the room an almost tropical atmosphere.")
(DESC "Master Bathroom")
(SYNONYM BATH BATHROOM)
(ADJECTIVE MASTER)
(FLAGS RLANDBIT ONBIT)
(WEST TO MASTER-BEDROOM)
(OUT TO MASTER-BEDROOM)
(GLOBAL SHOWER TOILET SINK)
(PSEUDO "TOOTHPASTE" RANDOM-PSEUDO)>
<ROOM BEDROOM-BALCONY
(IN ROOMS)
(DESC "Bedroom Balcony")
(SYNONYM BALCONY)
(ADJECTIVE BEDROOM)
(FLAGS RLANDBIT ONBIT)
(ACTION BEDROOM-BALCONY-F)
(SOUTH TO MASTER-BEDROOM IF BEDROOM-BALCONY-DOOR IS OPEN)
(DOWN TO IN-ORCHARD IF LADDER-FLAG-2 ELSE "The jump is inadvisable.")
(GLOBAL BEDROOM-BALCONY-DOOR)>
<ROOM NORTH-HALL
(IN ROOMS)
(LDESC
"This is the end of a short north-south hallway. To the east is a small room.")
(DESC "North Upstairs Hall")
(FLAGS RLANDBIT ONBIT)
(EAST TO GUEST-ROOM)
(SOUTH TO STAIR-TOP)
(LINE 0)
(STATION STAIR-TOP)>
<ROOM GUEST-ROOM
(IN ROOMS)
(DESC "Guest Room")
(LDESC
"This room contains the bare essentials for a guest room: bed, tables, and a
chair. A window looks out toward the east.")
(FLAGS RLANDBIT ONBIT)
(WEST TO NORTH-HALL)
(GLOBAL END-TABLE CHAIR BED)
(LINE 0)
(CORRIDOR 0)
(STATION STAIR-TOP)>
<ROOM SHALL-11
(IN ROOMS)
(DESC "South Upstairs Hall")
(FLAGS RLANDBIT ONBIT)
(ACTION SHALL-11-F)
(NORTH TO STAIR-TOP)
(EAST TO SHALL-12)
(SOUTH TO DUNBAR-BATH IF DUNBAR-BATH-DOOR IS OPEN)
(GLOBAL DUNBAR-BATH-DOOR)
(LINE 0)
(STATION SHALL-11)
(CORRIDOR 6)>
<ROOM SHALL-12
(IN ROOMS)
(LDESC
"The hall ends here. To the south is a walk-in closet.")
(DESC "End of South Hall")
(FLAGS RLANDBIT ONBIT)
(WEST TO SHALL-11)
(SOUTH TO CLOSET-11)
(IN TO CLOSET-11)
(LINE 0)
(STATION SHALL-12)
(CORRIDOR 4)>
<ROOM CLOSET-11
(IN ROOMS)
(LDESC
"This large closet has many shelves containing various cleaning equipment
and supplies.")
(DESC "Closet")
(FLAGS RLANDBIT ONBIT)
(OUT TO SHALL-12)
(NORTH TO SHALL-12)
(GLOBAL CLOSET)>
<ROOM DUNBAR-BATH
(IN ROOMS)
(DESC "Dunbar's Bathroom")
(SYNONYM BATHROOM BATH)
(ADJECTIVE DUNBAR)
(FLAGS RLANDBIT ONBIT)
(ACTION DUNBAR-BATH-F)
(NORTH TO SHALL-11 IF DUNBAR-BATH-DOOR IS OPEN)
(GLOBAL DUNBAR-BATH-DOOR SHOWER TOILET SINK)
(PSEUDO "POLISH" RANDOM-PSEUDO "NAILPOLISH" RANDOM-PSEUDO)
(LINE 0)
(STATION SHALL-11)>
<ROOM DUNBAR-ROOM
(IN ROOMS)
(DESC "Dunbar's Bedroom")
(SYNONYM BEDROOM ROOM)
(ADJECTIVE DUNBAR)
(FLAGS RLANDBIT ONBIT)
(ACTION DUNBAR-ROOM-F)
(NORTH TO CORRIDOR-1 IF DUNBAR-DOOR IS OPEN)
(GLOBAL DUNBAR-DOOR END-TABLE CHAIR BED)
(LINE 0)
(STATION CORRIDOR-1)>
<ROOM GEORGE-BATH
(IN ROOMS)
(DESC "George's Bathroom")
(SYNONYM BATHROOM ROOM)
(ADJECTIVE GEORGE)
(FLAGS RLANDBIT ONBIT)
(ACTION GEORGE-BATH-F)
(WEST TO GEORGE-ROOM IF GEORGE-BATH-DOOR IS OPEN)
(GLOBAL GEORGE-BATH-DOOR TOILET SHOWER SINK)
(LINE 0)
(STATION CORRIDOR-3)>
<ROOM GEORGE-ROOM
(IN ROOMS)
(DESC "George's Bedroom")
(SYNONYM BEDROOM ROOM)
(ADJECTIVE GEORGE)
(FLAGS RLANDBIT ONBIT)
(ACTION GEORGE-ROOM-F)
(NORTH TO CORRIDOR-3 IF GEORGE-DOOR IS OPEN)
(EAST TO GEORGE-BATH IF GEORGE-BATH-DOOR IS OPEN)
(GLOBAL GEORGE-DOOR GEORGE-BATH-DOOR END-TABLE CHAIR BED)
(LINE 0)
(STATION CORRIDOR-3)>
"Doors"
<OBJECT SOUTH-CLOSET-DOOR
(IN LOCAL-GLOBALS)
(ADJECTIVE CLOSET)
(SYNONYM DOOR)
(DESC "south closet door")
(FLAGS DOORBIT CONTBIT OPENBIT)
(ACTION DOOR-F)>
<OBJECT FRONT-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(ADJECTIVE FRONT)
(DESC "front door")
(FLAGS DOORBIT CONTBIT)
(ACTION DOOR-F)>
<OBJECT ROURKE-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(DESC "door")
(FLAGS DOORBIT CONTBIT)
(ACTION DOOR-F)>
<OBJECT DUNBAR-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(ADJECTIVE DUNBAR SOUTH SOUTHE)
(DESC "south door")
(FLAGS DOORBIT CONTBIT)
(ACTION DOOR-F)>
<OBJECT DUNBAR-BATH-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(DESC "door")
(FLAGS DOORBIT CONTBIT OPENBIT)>
<OBJECT ROURKE-BATH-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(ADJECTIVE BATHROOM)
(DESC "bathroom door")
(FLAGS DOORBIT CONTBIT)>
<OBJECT MASTER-BEDROOM-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(ADJECTIVE BEDROOM MASTER NORTH)
(DESC "bedroom door")
(FLAGS DOORBIT CONTBIT)
(ACTION MASTER-BEDROOM-DOOR-F)>
<OBJECT GEORGE-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(ADJECTIVE BEDROOM SOUTH SOUTHE)
(DESC "bedroom door")
(FLAGS DOORBIT CONTBIT)
(ACTION DOOR-F)>
<OBJECT GEORGE-BATH-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(ADJECTIVE BATHROOM EAST)
(DESC "bathroom door")
(FLAGS DOORBIT CONTBIT OPENBIT)>
<OBJECT HIDDEN-DOOR-L
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(ADJECTIVE HIDDEN)
(DESC "hidden door")
(FLAGS DOORBIT CONTBIT INVISIBLE)>
<OBJECT HIDDEN-DOOR-B
(IN LOCAL-GLOBALS)
(SYNONYM DOOR)
(ADJECTIVE HIDDEN)
(DESC "hidden door")
(FLAGS DOORBIT CONTBIT INVISIBLE)>
<OBJECT LIBRARY-BALCONY-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR DOORS WINDOW)
(ADJECTIVE BALCONY)
(DESC "balcony door")
(FLAGS DOORBIT CONTBIT)
(ACTION BALCONY-DOOR-F)>
<OBJECT BEDROOM-BALCONY-DOOR
(IN LOCAL-GLOBALS)
(SYNONYM DOOR DOORS WINDOW)
(ADJECTIVE GLASS BALCONY)
(DESC "balcony door")
(FLAGS DOORBIT CONTBIT)
(ACTION BALCONY-DOOR-F)>
"Objects start here...."
<OBJECT ROSE
(IN LOCAL-GLOBALS)
(DESC "roses")
(SYNONYM BED ROSE ROSES)
(ADJECTIVE RED WHITE PINK YELLOW)
(ACTION ROSE-F)>
<OBJECT HOUSE
(IN LOCAL-GLOBALS)
(DESC "house")
(SYNONYM HOUSE WALL)
(ADJECTIVE ROBNER)
(ACTION HOUSE-F)>
<OBJECT LAWN
(IN LOCAL-GLOBALS)
(DESC "lawn")
(SYNONYM LAWN GRASS)
(ADJECTIVE GREEN)
(ACTION LAWN-F)>
<OBJECT GROUND
(IN GLOBAL-OBJECTS)
(DESC "ground")
(SYNONYM GROUND DIRT MUD SOIL ;AREA)
(ADJECTIVE HARD)
(ACTION GROUND-F)>
<OBJECT AIR
(IN GLOBAL-OBJECTS)
(DESC "air")
(SYNONYM AIR WIND BREEZE)
(ACTION AIR-F)>
<OBJECT SHED
(IN LOCAL-GLOBALS)
(DESC "shed")
(SYNONYM SHED CABIN)
(ADJECTIVE LOG WOODEN WOOD)
(ACTION SHED-F)>
<OBJECT LAKE
(IN LOCAL-GLOBALS)
(DESC "lake")
(SYNONYM LAKE WATER)
(ACTION LAKE-F)>
<OBJECT BALCONY
(IN LOCAL-GLOBALS)
(DESC "balcony")
(SYNONYM BALCONY)>
<OBJECT BAY-WINDOW
(IN LOCAL-GLOBALS)
(DESC "bay window")
(SYNONYM WINDOW)
(ADJECTIVE BAY)
(FLAGS DOORBIT CONTBIT)
(ACTION BAY-WINDOW-F)>