Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

make the fast eye the monster focused on a single (not the closest) foe

  • Loading branch information...
commit 5fd0b2cac25626fab5b33859977e95a8bb889d83 1 parent d7d8f0d
@Mikolaj Mikolaj authored
Showing with 4 additions and 5 deletions.
  1. +3 −3 src/MovableKind.hs
  2. +1 −2  src/StrategyState.hs
View
6 src/MovableKind.hs
@@ -65,7 +65,7 @@ hero = MovableKind
ncolor = Color.BrWhite, -- Heroes white, monsters colorful.
nsight = True,
nsmell = False,
- niq = 13, -- Can see that secret doors under alien control.
+ niq = 13, -- Can see secret doors under alien control.
nregen = 1500,
nfreq = 0
}
@@ -79,7 +79,7 @@ eye = MovableKind
nname = "the reducible eye",
nsight = True,
nsmell = False,
- niq = 12,
+ niq = 8,
nregen = 1500,
nfreq = 6
}
@@ -92,7 +92,7 @@ fastEye = MovableKind
nname = "the super-fast eye",
nsight = True,
nsmell = False,
- niq = 8,
+ niq = 12,
nregen = 1500,
nfreq = 1
}
View
3  src/StrategyState.hs
@@ -74,8 +74,7 @@ strategy actor
else hs
foes = if L.null hsAndTraitor then ms else hsAndTraitor
-- We assume monster sight is infravision, so light has no effect.
- foeVisible =
- L.filter (\ (a, l) -> enemyVisible a l) foes
+ foeVisible = L.filter (\ (a, l) -> enemyVisible a l) foes
foeDist = L.map (\ (a, l) -> (distance (me, l), l, a)) foeVisible
in case foeDist of
[] -> (TCursor, Nothing)
Please sign in to comment.
Something went wrong with that request. Please try again.