long TRVS;
long TRNVLS;
long TABNDX;
-long KEY[NLOCATIONS + 1];
+long TKEY[NLOCATIONS + 1];
long LINES[LINSIZ + 1];
long TRAVEL[TRVSIZ + 1];
long KTAB[TABSIZ + 1];
while ((loc = GETNUM(database)) != -1) {
long newloc = GETNUM(NULL);
long L;
- if (KEY[loc] == 0) {
- KEY[loc] = TRVS;
+ if (TKEY[loc] == 0) {
+ TKEY[loc] = TRVS;
} else {
TRAVEL[TRVS - 1] = -TRAVEL[TRVS - 1];
}
* message for game.prop(N)=0. Successive prop messages are
* found by chasing pointers. */
for (int I = 1; I <= NLOCATIONS; I++) {
- KEY[I] = 0;
+ TKEY[I] = 0;
}
LINUSE = 1;
fprintf(header_file, "\n");
// content variables
- write_1d(header_file, KEY, NLOCATIONS + 1, "KEY");
+ write_1d(header_file, TKEY, NLOCATIONS + 1, "TKEY");
write_1d(header_file, TRAVEL, TRVSIZ + 1, "TRAVEL");
write_1d(header_file, KTAB, TABSIZ + 1, "KTAB");
write_1d(header_file, ATAB, TABSIZ + 1, "ATAB");
for (int i = 1; i <= NLOCATIONS; i++) {
game.abbrev[i] = 0;
- if (!(locations[i].description.big == 0 || KEY[i] == 0)) {
- int k = KEY[i];
+ if (!(locations[i].description.big == 0 || TKEY[i] == 0)) {
+ int k = TKEY[i];
if (MOD(labs(TRAVEL[k]), 1000) == 1)
conditions[i] |= (1 << COND_FORCED);
}
continue;
/* Fill tk array with all the places this dwarf might go. */
int j = 1;
- kk = KEY[game.dloc[i]];
+ kk = TKEY[game.dloc[i]];
if (kk != 0)
do {
game.newloc = T_DESTINATION(TRAVEL[kk]);
static bool playermove(token_t verb, int motion)
{
- int scratchloc, k2, kk = KEY[game.loc];
+ int scratchloc, k2, kk = TKEY[game.loc];
game.newloc = game.loc;
if (kk == 0)
BUG(LOCATION_HAS_NO_TRAVEL_ENTRIES);
scratchloc = T_DESTINATION(TRAVEL[kk]);
if (scratchloc != motion) {
if (!SPECIAL(scratchloc)) {
- if (FORCED(scratchloc) && T_DESTINATION(TRAVEL[KEY[scratchloc]]) == motion)
+ if (FORCED(scratchloc) && T_DESTINATION(TRAVEL[TKEY[scratchloc]]) == motion)
k2 = kk;
}
if (TRAVEL[kk] >= 0) {
}
motion = T_MOTION(TRAVEL[kk]);
- kk = KEY[game.loc];
+ kk = TKEY[game.loc];
break; /* fall through to ordinary travel */
}
} else {