nethack-gwaa-kiwi/nethack
1
0
Fork 0
Code Pull Requests Activity

Make BARGETHROUGH unconditional.

Browse Source
This commit is contained in:
Sean Hunt
2015-02-27 19:06:01 -05:00
parent 6e9fa71b05
commit b138d380ea
10 changed files with 0 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
src/dogmove.c
View File

@@ -109,19 +109,11 @@ struct monst *mon;
static NEARDATA const char nofetch[] = { BALL_CLASS, CHAIN_CLASS, ROCK_CLASS, 0 };
#ifndef BARGETHROUGH
STATIC_OVL boolean FDECL(cursed_object_at, (int, int));
#endif /* not BARGETHROUGH */
STATIC_VAR xchar gtyp, gx, gy; /* type and position of dog's current goal */
STATIC_PTR void FDECL(wantdoor, (int, int, genericptr_t));
#ifdef BARGETHROUGH
boolean
#else
STATIC_OVL boolean
#endif
cursed_object_at(x, y)
int x, y;
{
@@ -584,9 +576,7 @@ register int after; /* this is extra fast monster movement */
struct obj *obj = (struct obj *) 0;
xchar otyp;
boolean has_edog, cursemsg[9], do_eat = FALSE;
#ifdef BARGETHROUGH
boolean better_with_displacing = FALSE;
#endif
xchar nix, niy; /* position mtmp is (considering) moving to */
register int nx, ny; /* temporary coordinates */
xchar cnt, uncursedcnt, chcnt;
@@ -642,9 +632,7 @@ register int after; /* this is extra fast monster movement */
if (passes_walls(mtmp->data)) allowflags |= (ALLOW_ROCK | ALLOW_WALL);
if (passes_bars(mtmp->data)) allowflags |= ALLOW_BARS;
if (throws_rocks(mtmp->data)) allowflags |= ALLOW_ROCK;
#ifdef BARGETHROUGH
if (is_displacer(mtmp->data)) allowflags |= ALLOW_MDISP;
#endif
if (Conflict && !resist(mtmp, RING_CLASS, 0, 0)) {
allowflags |= ALLOW_U;
if (!has_edog) {
@@ -681,19 +669,13 @@ register int after; /* this is extra fast monster movement */
uncursedcnt = 0;
for (i = 0; i < cnt; i++) {
nx = poss[i].x; ny = poss[i].y;
#ifdef BARGETHROUGH
if (MON_AT(nx,ny) && !((info[i] & ALLOW_M) || info[i] & ALLOW_MDISP))
continue;
#else
if (MON_AT(nx,ny) && !(info[i] & ALLOW_M)) continue;
#endif
if (cursed_object_at(nx, ny)) continue;
uncursedcnt++;
}
#ifdef BARGETHROUGH
better_with_displacing = should_displace(mtmp,poss,info,cnt,gx,gy);
#endif
chcnt = 0;
chi = -1;
@@ -747,7 +729,6 @@ register int after; /* this is extra fast monster movement */
}
return 0;
}
#ifdef BARGETHROUGH
if ((info[i] & ALLOW_MDISP) && MON_AT(nx, ny) &&
better_with_displacing &&
!undesirable_disp(mtmp,nx,ny)) {
@@ -757,7 +738,6 @@ register int after; /* this is extra fast monster movement */
if (mstatus & MM_DEF_DIED) return 2;
return 0;
}
#endif /* BARGETHROUGH */
{ /* Dog avoids harmful traps, but perhaps it has to pass one
* in order to follow player. (Non-harmful traps do not

2
src/mhitm.c
View File

@@ -168,7 +168,6 @@ fightm(mtmp) /* have monsters fight each other */
return 0;
}
#ifdef BARGETHROUGH
/*
* mdisplacem() -- attacker moves defender out of the way;
* returns same results as mattackm().
@@ -244,7 +243,6 @@ boolean quietly;
return MM_HIT;
}
#endif /* BARGETHROUGH */
/*
* mattackm() -- a monster attacks another monster.

12
src/mon.c
View File

@@ -14,9 +14,7 @@
STATIC_DCL boolean FDECL(restrap,(struct monst *));
STATIC_DCL long FDECL(mm_aggression, (struct monst *,struct monst *));
#ifdef BARGETHROUGH
STATIC_DCL long FDECL(mm_displacement, (struct monst *,struct monst *));
#endif
STATIC_DCL int NDECL(pick_animal);
STATIC_DCL void FDECL(kill_eggs, (struct obj *));
STATIC_DCL void FDECL(dealloc_mextra, (struct mextra *));
@@ -1083,13 +1081,6 @@ nexttry: /* eels prefer the water, but if there is no water nearby,
struct monst *mtmp2 = m_at(nx, ny);
long mmflag = flag | mm_aggression(mon, mtmp2);
#ifndef BARGETHROUGH
if (!(mmflag & ALLOW_M)) continue;
info[cnt] |= ALLOW_M;
if (mtmp2->mtame) {
if (!(mmflag & ALLOW_TM)) continue;
info[cnt] |= ALLOW_TM;
#else /* BARGETHROUGH */
if (mmflag & ALLOW_M) {
info[cnt] |= ALLOW_M;
if (mtmp2->mtame) {
@@ -1100,7 +1091,6 @@ nexttry: /* eels prefer the water, but if there is no water nearby,
mmflag = flag | mm_displacement(mon, mtmp2);
if (!(mmflag & ALLOW_MDISP)) continue;
info[cnt] |= ALLOW_MDISP;
#endif /* BARGETHROUGH */
}
}
/* Note: ALLOW_SANCT only prevents movement, not */
@@ -1206,7 +1196,6 @@ struct monst *magr, /* monster that is currently deciding where to move */
return 0L;
}
#ifdef BARGETHROUGH
/* Monster displacing another monster out of the way */
STATIC_OVL long
mm_displacement(magr, mdef)
@@ -1232,7 +1221,6 @@ struct monst *magr, /* monster that is currently deciding where to move */
return ALLOW_MDISP;
return 0L;
}
#endif /* BARGETHROUGH */
boolean
monnear(mon, x, y)

12
src/monmove.c
View File

@@ -579,7 +579,6 @@ register struct monst *mtmp;
return(FALSE);
}
#ifdef BARGETHROUGH
/*
* should_displace()
*
@@ -623,7 +622,6 @@ xchar gx, gy;
return TRUE;
return FALSE;
}
#endif /* BARGETHROUGH */
/* Return values:
* 0: did not move, but can still attack and do other stuff.
@@ -644,9 +642,7 @@ register int after;
boolean can_open=0, can_unlock=0, doorbuster=0;
boolean uses_items=0, setlikes=0;
boolean avoid=FALSE;
#ifdef BARGETHROUGH
boolean better_with_displacing = FALSE;
#endif
struct permonst *ptr;
struct monst *mtoo;
schar mmoved = 0; /* not strictly nec.: chi >= 0 will do */
@@ -956,19 +952,15 @@ not_special:
for(i = 0; i < cnt; i++)
if(!(info[i] & NOTONL)) avoid=TRUE;
}
#ifdef BARGETHROUGH
better_with_displacing = should_displace(mtmp,poss,info,cnt,gx,gy);
#endif
for(i=0; i < cnt; i++) {
if (avoid && (info[i] & NOTONL)) continue;
nx = poss[i].x;
ny = poss[i].y;
#ifdef BARGETHROUGH
if (MON_AT(nx,ny) &&
(info[i] & ALLOW_MDISP) && !(info[i] & ALLOW_M) &&
!better_with_displacing) continue;
#endif
if (appr != 0) {
mtrk = &mtmp->mtrack[0];
for(j=0; j < jcnt; mtrk++, j++)
@@ -1064,7 +1056,6 @@ not_special:
return 3;
}
#ifdef BARGETHROUGH
if((info[chi] & ALLOW_MDISP)) {
struct monst *mtmp2;
int mstatus;
@@ -1075,7 +1066,6 @@ not_special:
if (mstatus & MM_HIT) return 1;
return 3;
}
#endif /* BARGETHROUGH */
if (!m_in_out_region(mtmp,nix,niy))
return 3;
@@ -1369,7 +1359,6 @@ found_you:
mtmp->muy = my;
}
#ifdef BARGETHROUGH
/*
* mon-to-mon displacement is a deliberate "get out of my way" act,
* not an accidental bump, so we don't consider mstun or mconf in
@@ -1401,7 +1390,6 @@ xchar x,y;
return FALSE;
}
#endif /* BARGETHROUGH */
/*
* Inventory prevents passage under door.