Add Sokoban penalty for dismounting onto a boulder

Because landing_spot will select a square containing a boulder as a
last-resort option, provided no other squares are accessible, it is
possible for the player to maneuver into a place where this could be
exploited when completing Sokoban (e.g. to get into a corner that would
normally be inaccessible, from which position an otherwise-blocked
boulder can be pushed away). This behavior should incur the same penalty
as exploitation of other Sokoban 'loopholes'.

diff --git a/src/steed.c b/src/steed.c
index 941a2292f5a74db9343026b1174801f186cb9414..c7fb2f329fa7fe77c19be9ec4b139b8d8b8ad757 100644 (file)
--- a/src/steed.c
+++ b/src/steed.c
@@ -650,6 +650,8 @@ int reason; /* Player was thrown off etc. */
                  */
                 g.in_steed_dismounting = TRUE;
                 teleds(cc.x, cc.y, TELEDS_ALLOW_DRAG);
+                if (sobj_at(BOULDER, cc.x, cc.y))
+                    sokoban_guilt();
                 g.in_steed_dismounting = FALSE;
 
                 /* Put your steed in your trap */