Final Revision

m5.zil

@@ -0,0 +1,48 @@
+"COMPILE/LOAD FILE for MOONMIST
+Copyright (C) 1986 Infocom, Inc.  All rights reserved."
+
+<SETG ZDEBUGGING? <>>
+<DEFINE DEBUG-CODE ('X "OPTIONAL" ('Y T))
+	<COND (,ZDEBUGGING? .X) (ELSE .Y)>>
+
+<SETG NEW-VOC? T>
+<FREQUENT-WORDS?>
+<VERSION ZIP TIME>
+
+<COND (<GASSIGNED? PREDGEN>
+       <PRINC "Compiling">
+       <ID 0>)
+      (T <PRINC "Loading">)>
+
+<PRINC " MOONMIST: interactive fiction from Infocom!
+">
+
+ON!-INITIAL	"for DEBUGR"
+OFF!-INITIAL
+ENABLE!-INITIAL
+DISABLE!-INITIAL
+
+<SET REDEFINE T>
+
+<OR <GASSIGNED? ZILCH>
+    <SETG WBREAKS <STRING !\" !,WBREAKS>>>
+
+<DIRECTIONS ;"Do not change the order of the first eight
+	      without consulting Marc! -- per ENCHANTER"
+ 	    NORTH NE EAST SE SOUTH SW WEST NW UP DOWN IN OUT>
+
+<INSERT-FILE "MACROS">
+<INSERT-FILE "MISC">
+<INSERT-FILE "SYNTAX">
+<INSERT-FILE "PARSER">
+<INSERT-FILE "VERBS">
+<INSERT-FILE "GOAL">
+<INSERT-FILE "PEOPLE">
+<INSERT-FILE "CASTLE">
+<INSERT-FILE "TOWER">
+<INSERT-FILE "THINGS">
+<INSERT-FILE "PLACES">
+<INSERT-FILE "GLOBAL">
+<INSERT-FILE "COLORS">
+
+<PROPDEF SIZE 5>