From: nethack.rankin <nethack.rankin>
Date: Wed, 19 Feb 2003 09:55:17 +0000 (+0000)
Subject: teleporting monster strategy
X-Git-Tag: MOVE2GIT~2154
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=8d6d715f8d00ac0fe3d80c074004cbf9408d21e2;p=nethack

teleporting monster strategy

     Reported last spring and again last week:  monsters who teleport to
your location (named demons, master liches, and so forth) continue to do
that even if they've just used a scroll or wand of teleportation to get
away from you.  This doesn't prevent that situation but does make it be
much less likely to occur.
---

diff --git a/doc/fixes34.1 b/doc/fixes34.1
index 4b84dc4e4..e9437ad5c 100644
--- a/doc/fixes34.1
+++ b/doc/fixes34.1
@@ -393,6 +393,8 @@ character inflicted with lycanthropy is vulnerable to Werebane when in
 shopkeeper could get angry without remembering the customer name
 any object held by ghost during recorporealization would cease to exist
 	including the Amulet of Yendor
+harassing monsters will be less likely to teleport to your location while
+	they're running away from you
 
 
 Platform- and/or Interface-Specific Fixes
diff --git a/src/wizard.c b/src/wizard.c
index a1fc1b022..6c39f52eb 100644
--- a/src/wizard.c
+++ b/src/wizard.c
@@ -1,4 +1,4 @@
-/*	SCCS Id: @(#)wizard.c	3.4	2002/04/09	*/
+/*	SCCS Id: @(#)wizard.c	3.4	2003/02/18	*/
 /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
 /* NetHack may be freely redistributed.  See license for details. */
 
@@ -325,7 +325,7 @@ tactics(mtmp)
 		/* fall through :-) */
 
 	    case STRAT_NONE:	/* harrass */
-	        if(!rn2(5)) mnexto(mtmp);
+		if (!rn2(!mtmp->mflee ? 5 : 33)) mnexto(mtmp);
 		return(0);
 
 	    default:		/* kill, maim, pillage! */