X-Git-Url: https://jxself.org/git/?p=open-adventure.git;a=blobdiff_plain;f=advent.h;h=c545f048f2f67a943957a10a26b994083ef3c851;hp=0193f68fce9e192374d56ddfdcf13b35081e298b;hb=39cc166979588a4b3c435aaea6abafa238dfc076;hpb=1cbc3d827bda4a29085302ba64af9486552a17cf diff --git a/advent.h b/advent.h index 0193f68..c545f04 100644 --- a/advent.h +++ b/advent.h @@ -6,11 +6,11 @@ #include "dungeon.h" #define LINESIZE 1024 -#define TOKLEN 5 // # sigificant character sin a token */ +#define TOKLEN 5 // № sigificant characters in a token */ #define NDWARVES 6 // number of dwarves #define PIRATE NDWARVES // must be NDWARVES-1 when zero-origin #define DALTLC LOC_NUGGET // alternate dwarf location -#define INVLIMIT 7 // inverntory limit (# of objects) +#define INVLIMIT 7 // inverntory limit (№ of objects) #define INTRANSITIVE -1 // illegal object number #define GAMELIMIT 330 // base limit of turns #define NOVICELIMIT 1000 // limit of turns for novice @@ -60,19 +60,14 @@ #define LIQUID() (game.prop[BOTTLE] == WATER_BOTTLE? WATER : game.prop[BOTTLE] == OIL_BOTTLE ? OIL : NO_OBJECT ) #define LIQLOC(LOC) (CNDBIT((LOC),COND_FLUID)? CNDBIT((LOC),COND_OILY) ? OIL : WATER : NO_OBJECT) #define FORCED(LOC) CNDBIT(LOC, COND_FORCED) -#define DARK(DUMMY) ((!tstbit(conditions[game.loc],COND_LIT)) && (game.prop[LAMP] == LAMP_DARK || !HERE(LAMP))) +#define DARK(DUMMY) (!CNDBIT(game.loc,COND_LIT) && (game.prop[LAMP] == LAMP_DARK || !HERE(LAMP))) #define PCT(N) (randrange(100) < (N)) #define GSTONE(OBJ) ((OBJ) == EMERALD || (OBJ) == RUBY || (OBJ) == AMBER || (OBJ) == SAPPH) #define FOREST(LOC) CNDBIT(LOC, COND_FOREST) #define OUTSID(LOC) (CNDBIT(LOC, COND_ABOVE) || FOREST(LOC)) +#define INSIDE(LOC) (!OUTSID(LOC) || LOC == LOC_BUILDING) #define INDEEP(LOC) ((LOC) >= LOC_MISTHALL && !OUTSID(LOC)) #define BUG(x) bug(x, #x) -#define MOTION_WORD(n) ((n) + 0) -#define OBJECT_WORD(n) ((n) + 1000) -#define ACTION_WORD(n) ((n) + 2000) -#define SPECIAL_WORD(n) ((n) + 3000) -#define PROMOTE_WORD(n) ((n) + 1000) -#define DEMOTE_WORD(n) ((n) - 1000) enum bugtype { SPECIAL_TRAVEL_500_GT_L_GT_300_EXCEEDS_GOTO_LIST, @@ -92,6 +87,8 @@ enum termination {endgame, quitgame, scoregame}; enum speechpart {unknown, intransitive, transitive}; +enum wordtype {NO_WORD_TYPE, MOTION, OBJECT, ACTION, SPECIAL}; + /* Phase codes for action returns. * These were at one time FORTRAN line numbers. * The values don't matter, but perturb their order at your peril. @@ -144,6 +141,7 @@ struct game_t { long dtotal; long foobar; // current progress in saying "FEE FIE FOE FOO". long holdng; // number of objects being carried + long igo; // How many times he's said "go" instead of the direction long iwest; // How many times he's said "west" instead of "w" long knfloc; // 0 if no knife here, loc if knife , -1 after caveat long limit; // lifetime of lamp (not set here) @@ -160,7 +158,7 @@ struct game_t { long tally; long thresh; long trndex; - long trnluz; // # points lost so far due to number of turns used + long trnluz; // № points lost so far due to number of turns used long turns; // how many commands he's given (ignores yes/no) bool wzdark; // whether the loc he's leaving was dark char zzword[TOKLEN + 1]; // randomly generated magic word from bird @@ -197,6 +195,8 @@ struct command_t { long id1; long id2; char raw1[LINESIZE], raw2[LINESIZE]; + enum wordtype type1; + enum wordtype type2; }; extern struct game_t game; @@ -222,7 +222,7 @@ extern int get_motion_vocab_id(const char*); extern int get_object_vocab_id(const char*); extern int get_action_vocab_id(const char*); extern int get_special_vocab_id(const char*); -extern long get_vocab_id(const char*); +extern void get_vocab_metadata(const char*, long*, enum wordtype*); extern void juggle(obj_t); extern void move(obj_t, loc_t); extern long put(obj_t, long, long);