Cleanup creature update slightly, add show instance for impulses

2022-03-26 08:08:16 +00:00
parent ae7fbe29c2
commit 3698a738f3
17 changed files with 158 additions and 198 deletions
@@ -33,16 +33,16 @@ smallChaseCrit = chaseCrit
    }
 chaseCrit :: Creature
 chaseCrit = defaultCreature
-    { _crUpdate =  stateUpdate $ impulsiveAI $ chainCreatureUpdatesLR
-        [ Right doStrategyActions
-        , Left performActions
-        , Right overrideMeleeCloseTarget
-        , Right setViewPos
-        , Right setMvPos
-        , Left goToTarget
-        , Left $ perceptionUpdate' [0]
-        , Left targetYouWhenCognizant
-        , Right (crMeleeCooldown %~ max 0 . subtract 1)
+    { _crUpdate =  stateUpdate $ impulsiveAI $ chainCreatureUpdates
+        [ const doStrategyActions
+        , performActions
+        , const overrideMeleeCloseTarget
+        , const setViewPos
+        , const setMvPos
+        , goToTarget
+        , perceptionUpdate [0]
+        , targetYouWhenCognizant
+        , const (crMeleeCooldown %~ max 0 . subtract 1)
        ]
    , _crHP = 150
    , _crPict = basicCrPict green