From d70d44b67f086b117c856126210c521ddf91ff42 Mon Sep 17 00:00:00 2001 From: "nethack.rankin" Date: Sat, 3 Mar 2007 06:20:14 +0000 Subject: [PATCH] pets accompanying ascension or dungeon escape There was a report recently about " is still eating" coming out on the console at end of game for player using X11 or Qt. That happened because the end-of-game pet handling takes place after the message window has been closed. It won't happen with the dev code any more because eating no longer prevents pets from accompanying on final ascent or escape. But a pet carrying the Amulet should still fail to tag along and yield similar result. However, levl_follower() was changed (probably by me...) to have pets not attempt to follow when they carried the Amulet, rendering code in keepdogs()--which reported them as being confused--unreachable. This reverts levl_follower() to have Amulet-carrying monsters other than the Wizard try to accompany the hero during level changes (and keepdogs still prevents them from succeeding). It also reorganizes keepdogs() a bit, giving trapped followers an extra chance to escape from their trap and preventing those who fail that chance from tagging along (previously, non-pets ignored being trapped). After doing that, I got tty to behave similarly to the X11/Qt report: a message behaved strangely. In my case, it was delivered between a pair of clearings of the screen and only visible by using terminal emulator's scrolling buffer. I think there's a wait_synch() missing somewhere, but haven't tried to figure out where. Instead, this makes the end-of-game call to keepdogs() take place sooner, while pline() still works normally. --- doc/fixes34.4 | 1 + src/dog.c | 24 +++++++----------------- src/end.c | 4 +++- src/mondata.c | 10 +++++++--- 4 files changed, 18 insertions(+), 21 deletions(-) diff --git a/doc/fixes34.4 b/doc/fixes34.4 index 18e408055..ce9bea4d0 100644 --- a/doc/fixes34.4 +++ b/doc/fixes34.4 @@ -101,6 +101,7 @@ avoid giving extra information about things that break out of sight avoid giving away wand type for near misses while blind avoid excessive repetition of "monsters are aware of your presence" monster's aggravation spell now affects meditating monsters +handle pets sooner at end-of-game to avoid message delivery anomalies busy pet won't miss out upon ascension fix various places that "finally finished" could be displayed after the hero stopped doing something other than eating diff --git a/src/dog.c b/src/dog.c index cc7e81ead..f1f810b1a 100644 --- a/src/dog.c +++ b/src/dog.c @@ -1,4 +1,4 @@ -/* SCCS Id: @(#)dog.c 3.5 2006/10/20 */ +/* SCCS Id: @(#)dog.c 3.5 2007/03/02 */ /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */ /* NetHack may be freely redistributed. See license for details. */ @@ -524,9 +524,6 @@ boolean pets_only; /* true for ascension or final escape */ mtmp->mcanmove = 1; } if (((monnear(mtmp, u.ux, u.uy) && levl_follower(mtmp)) || -#ifdef STEED - (mtmp == u.usteed) || -#endif /* the wiz will level t-port from anywhere to chase the amulet; if you don't have it, will chase you only if in range. -3. */ @@ -541,32 +538,25 @@ boolean pets_only; /* true for ascension or final escape */ /* monster won't follow if it hasn't noticed you yet */ && !(mtmp->mstrategy & STRAT_WAITFORU)) { stay_behind = FALSE; + if (mtmp->mtrapped) (void)mintrap(mtmp); /* try to escape */ #ifdef STEED if (mtmp == u.usteed) { - /* make sure steed is eligible to accompany hero; - start by having mintrap() give a chance to escape - trap normally but if that fails, force the untrap - (note: handle traps first because normal escape - has the potential to set monster->meating) */ - if (mtmp->mtrapped && mintrap(mtmp)) - mtmp->mtrapped = 0; /* escape trap */ + /* make sure steed is eligible to accompany hero */ + mtmp->mtrapped = 0; /* escape trap */ mtmp->meating = 0; /* terminate eating */ mdrop_special_objs(mtmp); /* drop Amulet */ } else #endif - if (mtmp->mtame && mtmp->meating) { + if (mtmp->meating || mtmp->mtrapped) { if (canseemon(mtmp)) - pline("%s is still eating.", Monnam(mtmp)); + pline("%s is still %s.", Monnam(mtmp), + mtmp->meating ? "eating" : "trapped"); stay_behind = TRUE; } else if (mon_has_amulet(mtmp)) { if (canseemon(mtmp)) pline("%s seems very disoriented for a moment.", Monnam(mtmp)); stay_behind = TRUE; - } else if (mtmp->mtame && mtmp->mtrapped) { - if (canseemon(mtmp)) - pline("%s is still trapped.", Monnam(mtmp)); - stay_behind = TRUE; } if (stay_behind) { if (mtmp->mleashed) { diff --git a/src/end.c b/src/end.c index d359a71fe..98bbe545a 100644 --- a/src/end.c +++ b/src/end.c @@ -700,6 +700,9 @@ die: make_grave(u.ux, u.uy, pbuf); } } + /* if pets will contribute to score, populate mydogs list now + (bones creation isn't a factor, but pline() messaging is) */ + if (how == ESCAPED || how == ASCENDED) keepdogs(TRUE); if (how == QUIT) { killer.format = NO_KILLER_PREFIX; @@ -836,7 +839,6 @@ die: /* count the points for artifacts */ artifact_score(invent, TRUE, endwin); - keepdogs(TRUE); viz_array[0][0] |= IN_SIGHT; /* need visibility for naming */ mtmp = mydogs; if (!done_stopprint) Strcpy(pbuf, "You"); diff --git a/src/mondata.c b/src/mondata.c index a3a017e03..4e67fb096 100644 --- a/src/mondata.c +++ b/src/mondata.c @@ -1,4 +1,4 @@ -/* SCCS Id: @(#)mondata.c 3.5 2007/02/05 */ +/* SCCS Id: @(#)mondata.c 3.5 2007/03/02 */ /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */ /* NetHack may be freely redistributed. See license for details. */ @@ -662,8 +662,12 @@ boolean levl_follower(mtmp) struct monst *mtmp; { - /* monsters with the Amulet--even pets--won't follow across levels */ - if (mon_has_amulet(mtmp)) return FALSE; +#ifdef STEED + if (mtmp == u.usteed) return TRUE; +#endif + + /* Wizard with Amulet won't bother trying to follow across levels */ + if (mtmp->iswiz && mon_has_amulet(mtmp)) return FALSE; /* some monsters will follow even while intending to flee from you */ if (mtmp->mtame || mtmp->iswiz || is_fshk(mtmp)) return TRUE;