X-Git-Url: https://jxself.org/git/?p=open-adventure.git;a=blobdiff_plain;f=main.c;h=b7219d1d3b63f934c755c1375a62b0411a176ec9;hp=a8fbfc35c1239b6e4f4e563957189ce47e46e8ec;hb=1e643da216737e148839f463c10594bbb8ac246b;hpb=d612b0e6ca7b7cf81daaac830d7a7ed9ddc16874 diff --git a/main.c b/main.c index a8fbfc3..b7219d1 100644 --- a/main.c +++ b/main.c @@ -30,7 +30,7 @@ /* Abstract out the encoding of words in the travel array. Gives us * some hope of getting to a less cryptic representation than we * inherited from FORTRAN, someday. To understand these, read the - * encoding description for TRAVEL. + * encoding description for travel. */ #define T_DESTINATION(entry) MOD(labs(entry) / 1000, 1000) #define T_NODWARVES(entry) labs(entry) / 1000000 == 100 @@ -43,18 +43,6 @@ struct game_t game; long LNLENG, LNPOSN; char rawbuf[LINESIZE], INLINE[LINESIZE + 1]; -long AMBER, AXE, BACK, BATTERY, BEAR, BIRD, BLOOD, - BOTTLE, CAGE, CAVE, CAVITY, CHAIN, CHASM, CHEST, - CLAM, COINS, DOOR, DPRSSN, DRAGON, DWARF, EGGS, - EMERALD, ENTER, ENTRNC, FIND, FISSURE, FOOD, - GRATE, HINT, INVENT, JADE, KEYS, - KNIFE, LAMP, LOCK, LOOK, MAGAZINE, - MESSAG, MIRROR, NUGGET, NUL, OGRE, OIL, OYSTER, - PEARL, PILLOW, PLANT, PLANT2, PYRAMID, RESER, ROD, ROD2, - RUBY, RUG, SAPPH, SAY, SIGN, SNAKE, - STEPS, STREAM, THROW, TRIDENT, TROLL, TROLL2, - URN, VASE, VEND, VOLCANO, WATER; - FILE *logfp = NULL, *rfp = NULL; bool oldstyle = false; bool editline = true; @@ -303,11 +291,11 @@ static bool spotted_by_pirate(int i) int snarfed = 0; bool movechest = false, robplayer = false; for (int treasure = 1; treasure <= NOBJECTS; treasure++) { - if (!object_descriptions[treasure].is_treasure) + if (!objects[treasure].is_treasure) continue; /* Pirate won't take pyramid from plover room or dark * room (too easy!). */ - if (treasure == PYRAMID && (game.loc == object_descriptions[PYRAMID].plac || game.loc == object_descriptions[EMERALD].plac)) { + if (treasure == PYRAMID && (game.loc == objects[PYRAMID].plac || game.loc == objects[EMERALD].plac)) { continue; } if (TOTING(treasure) || HERE(treasure)) @@ -339,9 +327,9 @@ static bool spotted_by_pirate(int i) if (robplayer) { rspeak(PIRATE_POUNCES); for (int treasure = 1; treasure <= NOBJECTS; treasure++) { - if (!object_descriptions[treasure].is_treasure) + if (!objects[treasure].is_treasure) continue; - if (!(treasure == PYRAMID && (game.loc == object_descriptions[PYRAMID].plac || game.loc == object_descriptions[EMERALD].plac))) { + if (!(treasure == PYRAMID && (game.loc == objects[PYRAMID].plac || game.loc == objects[EMERALD].plac))) { if (AT(treasure) && game.fixed[treasure] == 0) carry(treasure, game.loc); if (TOTING(treasure)) @@ -417,11 +405,11 @@ static bool dwarfmove(void) if (game.dloc[i] == 0) continue; /* Fill tk array with all the places this dwarf might go. */ - int j = 1; - kk = TKEY[game.dloc[i]]; + unsigned int j = 1; + kk = tkey[game.dloc[i]]; if (kk != 0) do { - game.newloc = T_DESTINATION(TRAVEL[kk]); + game.newloc = T_DESTINATION(travel[kk]); /* Have we avoided a dwarf encounter? */ bool avoided = (SPECIAL(game.newloc) || !INDEEP(game.newloc) || @@ -431,13 +419,13 @@ static bool dwarfmove(void) game.newloc == game.dloc[i] || FORCED(game.newloc) || (i == PIRATE && CNDBIT(game.newloc, COND_NOARRR)) || - T_NODWARVES(TRAVEL[kk])); + T_NODWARVES(travel[kk])); if (!avoided) { tk[j++] = game.newloc; } ++kk; } while - (TRAVEL[kk - 1] >= 0); + (travel[kk - 1] >= 0); tk[j] = game.odloc[i]; if (j >= 2) --j; @@ -541,7 +529,7 @@ static void croak(void) static bool playermove(token_t verb, int motion) { - int scratchloc, k2, kk = TKEY[game.loc]; + int scratchloc, k2, kk = tkey[game.loc]; game.newloc = game.loc; if (kk == 0) BUG(LOCATION_HAS_NO_TRAVEL_ENTRIES); @@ -561,13 +549,13 @@ static bool playermove(token_t verb, int motion) if (CNDBIT(game.loc, COND_NOBACK))k2 = TWIST_TURN; if (k2 == 0) { for (;;) { - scratchloc = T_DESTINATION(TRAVEL[kk]); + scratchloc = T_DESTINATION(travel[kk]); if (scratchloc != motion) { if (!SPECIAL(scratchloc)) { - if (FORCED(scratchloc) && T_DESTINATION(TRAVEL[TKEY[scratchloc]]) == motion) + if (FORCED(scratchloc) && T_DESTINATION(travel[tkey[scratchloc]]) == motion) k2 = kk; } - if (TRAVEL[kk] >= 0) { + if (travel[kk] >= 0) { ++kk; /* go to next travel entry for this location */ continue; } @@ -579,8 +567,8 @@ static bool playermove(token_t verb, int motion) } } - motion = T_MOTION(TRAVEL[kk]); - kk = TKEY[game.loc]; + motion = T_MOTION(travel[kk]); + kk = tkey[game.loc]; break; /* fall through to ordinary travel */ } } else { @@ -610,9 +598,9 @@ static bool playermove(token_t verb, int motion) /* Look for a way to fulfil the motion - kk indexes the beginning * of the motion entries for here (game.loc). */ for (;;) { - if (T_TERMINATE(TRAVEL[kk]) || T_MOTION(TRAVEL[kk]) == motion) + if (T_TERMINATE(travel[kk]) || T_MOTION(travel[kk]) == motion) break; - if (TRAVEL[kk] < 0) { + if (travel[kk] < 0) { /* FIXME: Magic numbers! */ /* Couldn't find an entry matching the motion word passed * in. Various messages depending on word given. */ @@ -629,7 +617,7 @@ static bool playermove(token_t verb, int motion) } ++kk; } - scratchloc = labs(TRAVEL[kk]) / 1000; + scratchloc = labs(travel[kk]) / 1000; do { /* @@ -654,10 +642,10 @@ static bool playermove(token_t verb, int motion) } else if (game.prop[motion] != game.newloc / 100 - 3) break; do { - if (TRAVEL[kk] < 0) + if (travel[kk] < 0) BUG(CONDITIONAL_TRAVEL_ENTRY_WITH_NO_ALTERATION); ++kk; - game.newloc = labs(TRAVEL[kk]) / 1000; + game.newloc = labs(travel[kk]) / 1000; } while (game.newloc == scratchloc); scratchloc = game.newloc; @@ -688,10 +676,10 @@ static bool playermove(token_t verb, int motion) * pretend he wasn't carrying it after all. */ drop(EMERALD, game.loc); do { - if (TRAVEL[kk] < 0) + if (travel[kk] < 0) BUG(CONDITIONAL_TRAVEL_ENTRY_WITH_NO_ALTERATION); ++kk; - game.newloc = labs(TRAVEL[kk]) / 1000; + game.newloc = labs(travel[kk]) / 1000; } while (game.newloc == scratchloc); scratchloc = game.newloc; @@ -709,13 +697,13 @@ static bool playermove(token_t verb, int motion) game.prop[TROLL] = 0; move(TROLL2, 0); move(TROLL2 + NOBJECTS, 0); - move(TROLL, object_descriptions[TROLL].plac); - move(TROLL + NOBJECTS, object_descriptions[TROLL].fixd); + move(TROLL, objects[TROLL].plac); + move(TROLL + NOBJECTS, objects[TROLL].fixd); juggle(CHASM); game.newloc = game.loc; return true; } else { - game.newloc = object_descriptions[TROLL].plac + object_descriptions[TROLL].fixd - game.loc; + game.newloc = objects[TROLL].plac + objects[TROLL].fixd - game.loc; if (game.prop[TROLL] == 0)game.prop[TROLL] = 1; if (!TOTING(BEAR)) return true; rspeak(BRIDGE_COLLAPSE); @@ -788,8 +776,8 @@ static bool closecheck(void) } move(TROLL, 0); move(TROLL + NOBJECTS, 0); - move(TROLL2, object_descriptions[TROLL].plac); - move(TROLL2 + NOBJECTS, object_descriptions[TROLL].fixd); + move(TROLL2, objects[TROLL].plac); + move(TROLL2 + NOBJECTS, objects[TROLL].fixd); juggle(CHASM); if (game.prop[BEAR] != 3)DESTROY(BEAR); game.prop[CHAIN] = 0;