advent.h

   1 #include <stdio.h>
   2 #include <stdbool.h>
   3
   4 #include "sizes.h"
   5
   6 #define LINESIZE        100
   7 #define NDWARVES        6
   8 #define PIRATE          NDWARVES        /* must be NDWARVES-1 when zero-origin */
   9 #define DALTLC          18              /* alternate dwarf location; low room */
  10 #define MINTRS          50
  11 #define MAXTRS          79
  12
  13 typedef struct lcg_state
  14 {
  15   unsigned long a, c, m, x;
  16 } lcg_state;
  17
  18 typedef long token_t;   /* word token - someday this will be char[TOKLEN+1] */
  19 typedef long vocab_t;   /* index into a vocabulary array */
  20
  21 struct game_t {
  22     long abbnum;
  23     long blklin;
  24     long bonus;
  25     long chloc;
  26     long chloc2;
  27     long clock1;
  28     long clock2;
  29     long clshnt;
  30     long closed;
  31     long closng;
  32     long conds;
  33     long detail;
  34     long dflag;
  35     long dkill;
  36     long dtotal;
  37     long foobar;
  38     long holdng;
  39     long iwest;
  40     long knfloc;
  41     long limit;
  42     long lmwarn;
  43     long loc;
  44     long newloc;
  45     long novice;
  46     long numdie;
  47     long oldloc;
  48     long oldlc2;
  49     long oldobj;
  50     long panic;
  51     long saved;
  52     long setup;
  53     long tally;
  54     long thresh;
  55     long trndex;
  56     long trnluz;
  57     long turns;
  58     long wzdark;
  59     long zzword;
  60     long abbrev[LOCSIZ+1];
  61     long atloc[LOCSIZ+1];
  62     long dseen[NDWARVES+1];
  63     long dloc[NDWARVES+1];
  64     long odloc[NDWARVES+1];
  65     long fixed[NOBJECTS+1];
  66     long link[NOBJECTS*2 + 1];
  67     long place[NOBJECTS+1];
  68     long hinted[HNTSIZ+1];
  69     long hintlc[HNTSIZ+1];
  70     long prop[NOBJECTS+1];
  71 };
  72
  73 extern struct game_t game;
  74
  75 extern long LNLENG, LNPOSN, PARMS[];
  76 extern char rawbuf[LINESIZE], INLINE[LINESIZE+1], MAP1[], MAP2[];
  77 extern FILE *logfp;
  78 extern bool oldstyle;
  79 extern lcg_state lcgstate;
  80
  81 /* b is not needed for POSIX but harmless */
  82 #define READ_MODE "rb"
  83 #define WRITE_MODE "wb"
  84
  85 extern void SPEAK(vocab_t);
  86 extern void PSPEAK(vocab_t,int);
  87 extern void RSPEAK(vocab_t);
  88 extern void SETPRM(long,long,long);
  89
  90 extern bool fGETIN(FILE *,token_t*,token_t*,token_t*,token_t*);
  91 #define GETIN(input,WORD1,WORD1X,WORD2,WORD2X) fGETIN(input,&WORD1,&WORD1X,&WORD2,&WORD2X)
  92
  93 extern long YES(FILE *,vocab_t,vocab_t,vocab_t);
  94 extern long GETTXT(bool,bool,bool);
  95 extern token_t MAKEWD(long);
  96
  97 extern void fPUTTXT(token_t,long*,long);
  98 #define PUTTXT(WORD,STATE,CASE) fPUTTXT(WORD,&STATE,CASE)
  99
 100 extern void SHFTXT(long,long);
 101 extern void TYPE0(void);
 102
 103 extern void fSAVWDS(long*,long*,long*,long*,long*,long*,long*);
 104 #define SAVWDS(W1,W2,W3,W4,W5,W6,W7) fSAVWDS(&W1,&W2,&W3,&W4,&W5,&W6,&W7)
 105 extern void fSAVARR(long*,long);
 106 #define SAVARR(ARR,N) fSAVARR(ARR,N)
 107 extern void fSAVWRD(long,long*);
 108 #define SAVWRD(OP,WORD) fSAVWRD(OP,&WORD)
 109
 110 extern long VOCAB(long,long);
 111 extern void DSTROY(long);
 112 extern void JUGGLE(long);
 113 extern void MOVE(long,long);
 114 extern long PUT(long,long,long);
 115 extern void CARRY(long,long);
 116 extern void DROP(long,long);
 117 extern long ATDWRF(long);
 118 extern long SETBIT(long);
 119 extern bool TSTBIT(long,int);
 120 extern long RNDVOC(long,long);
 121 extern void BUG(long);
 122 extern void MAPLIN(FILE *);
 123 extern void TYPE(void);
 124 extern void MPINIT(void);
 125
 126 extern void fSAVEIO(long,long,long*);
 127 #define SAVEIO(OP,IN,ARR) fSAVEIO(OP,IN,ARR)
 128 extern void DATIME(long*, long*);
 129
 130 extern long MOD(long,long);
 131
 132 extern void set_seed(long);
 133 extern unsigned long get_next_lcg_value(void);
 134 extern long randrange(long);
 135 extern void score(long);
 136
 137 /* vocabulary items */
 138 extern long AMBER, ATTACK, AXE, BACK, BATTER, BEAR,
 139    BIRD, BLOOD, BOTTLE, CAGE, CAVE, CAVITY, CHAIN, CHASM, CHEST,
 140    CLAM, COINS, DOOR, DPRSSN, DRAGON, DWARF, EGGS,
 141    EMRALD, ENTER, ENTRNC, FIND, FISSUR, FOOD, GRATE, HINT, INVENT,
 142    JADE, KEYS, KNIFE, LAMP, LOCK, LOOK, MAGZIN, MESSAG, MIRROR, NUGGET, NUL,
 143    OGRE, OIL, OYSTER, PANIC, PEARL, PILLOW, PLANT, PLANT2, PYRAM,
 144    RESER, ROD, ROD2, RUBY, RUG, SAPPH, SAY, SCORE, SECT, SIGN, SNAKE,
 145    STEPS, STICK, STREAM, THROW, TRIDNT, TROLL, TROLL2,
 146    URN, VASE, VEND, VOLCAN, WATER;
 147 /* evrything else */
 148 extern long I, J, K, L, MAXDIE, SPK, V1, V2, VRSION, WD1, WD1X, WD2, WD2X;
 149