Tweak creature awareness
This commit is contained in:
@@ -107,7 +107,7 @@ viewTarget w cr = do
|
||||
& crActionPlan . crAction %~ replaceNullWith (TurnToA p)
|
||||
& crIntention . viewPoint .~ Nothing
|
||||
| otherwise -> cr' & crActionPlan . crAction %~ replaceNullWith (PathTo p)
|
||||
Nothing -> cr & crPerception . crAwakeLevel .~ Lethargic
|
||||
Nothing -> cr-- & crPerception . crAwakeLevel .~ Lethargic
|
||||
where
|
||||
cr' = cr & crPerception . crAwakeLevel .~ Vigilant
|
||||
|
||||
|
||||
Reference in New Issue
Block a user