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

Moving a monster with telekinesis hurles it through the air

Browse Source 
... and at the end of the flight, it can't avoid a trap, if it
lands on one.
This commit is contained in:
Pasi Kallinen
2022-02-24 19:27:56 +02:00
parent 9ae2ec1f98
commit 0c20bf116c
3 changed files with 9 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
include/hack.h
View File

@@ -390,6 +390,7 @@ typedef struct sortloot_item Loot;
#define TOOKPLUNGE 0x10 /* used '>' to enter pit below you */
#define VIASITTING 0x20 /* #sit while at trap location (affects message) */
#define FAILEDUNTRAP 0x40 /* trap activated by failed untrap attempt */
#define HURTLING 0x80 /* monster is hurtling through air */
/* Flags to control test_move in hack.c */
#define DO_MOVE 0 /* really doing the move */

7
src/dothrow.c
View File

@@ -921,7 +921,7 @@ mhurtle_step(genericptr_t arg, int x, int y)
set_apparxy(mon);
if (is_waterwall(x, y))
return FALSE;
res = mintrap(mon, NO_TRAP_FLAGS); /* TODO: TEMPFLIGHT? */
res = mintrap(mon, HURTLING);
if (res == Trap_Killed_Mon
|| res == Trap_Caught_Mon
|| res == Trap_Moved_Mon)
@@ -1039,7 +1039,10 @@ mhurtle(struct monst *mon, int dx, int dy, int range)
cc.x = mon->mx + (dx * range);
cc.y = mon->my + (dy * range);
(void) walk_path(&mc, &cc, mhurtle_step, (genericptr_t) mon);
(void) minliquid(mon);
if (!DEADMONSTER(mon) && t_at(mon->mx, mon->my))
mintrap(mon, FORCEBUNGLE);
else
(void) minliquid(mon);
return;
}

4
src/trap.c
View File

@@ -965,6 +965,7 @@ check_in_air(struct monst *mtmp, unsigned trflags)
return (is_floater(mtmp->data)
|| (is_flyer(mtmp->data) && !plunged)
|| (trflags & HURTLING) != 0
|| (mtmp == &g.youmonst ?
(Levitation || (Flying && !plunged)) : 0));
}
@@ -3171,6 +3172,7 @@ mintrap(register struct monst *mtmp, long mintrapflags)
} else {
register int tt = trap->ttyp;
boolean forcetrap = ((mintrapflags & FORCETRAP) != 0);
boolean forcebungle = (mintrapflags & FORCEBUNGLE) != 0;
/* monster has seen such a trap before */
boolean already_seen = ((mtmp->mtrapseen & (1 << (tt - 1))) != 0
|| (tt == HOLE && !mindless(mptr)));
@@ -3183,7 +3185,7 @@ mintrap(register struct monst *mtmp, long mintrapflags)
if (floor_trigger(tt) && check_in_air(mtmp, mintrapflags)) {
return Trap_Effect_Finished;
}
if (already_seen && rn2(4))
if (already_seen && rn2(4) && !forcebungle)
return Trap_Effect_Finished;
}