X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=advent.h;h=6e3c56b2649e56116499195569e656f123380e89;hb=a02b3879998e78555852f4a81a19e80694e38cdc;hp=945543ce488e84cd6428b22eb263cfa480f7d005;hpb=a2e0c55fb4b435c3aff243421114364e164f0fc9;p=open-adventure.git

diff --git a/advent.h b/advent.h
index 945543c..6e3c56b 100644
--- a/advent.h
+++ b/advent.h
@@ -169,11 +169,25 @@ extern long AMBER, ATTACK, AXE, BACK, BATTER, BEAR,
    RESER, ROD, ROD2, RUBY, RUG, SAPPH, SAY, SIGN, SNAKE,
    STEPS, STICK, STREAM, THROW, TRIDNT, TROLL, TROLL2,
    URN, VASE, VEND, VOLCAN, WATER;
-/* everything else */
-extern long K, SPK, WD1, WD1X, WD2, WD2X;
 
 enum speechpart {unknown, intransitive, transitive};
 
+/* Phase codes for action returns. 
+ * These were at one time FORTRAN line numbers.
+ */
+#define GO_TERMINATE	2
+#define GO_MOVE		8
+#define GO_TOP		2000
+#define GO_CLEAROBJ	2012
+#define GO_CHECKHINT	2600
+#define GO_CHECKFOO	2607
+#define GO_DIRECTION	2620
+#define GO_LOOKUP	2630
+#define GO_WORD2	2800
+#define GO_UNKNOWN	8000
+#define GO_DWARFWAKE	19000
+#define GO_ACTION	40000
+
 /* hack to ignore GCC Unused Result */
 #define IGNORE(r) do{if (r){}}while(0)