Remove all AI code from AI file

2021-05-15 14:59:35 +02:00
parent e658fdcd0b
commit 0798cc0b0e
13 changed files with 121 additions and 122 deletions
@@ -78,7 +78,10 @@ smallChaseCrit = defaultCreature
    }
 chaseCrit :: Creature
 chaseCrit = defaultCreature
-    { _crUpdate = stateUpdate $ meleeCooldown $ impulsiveAI $ chaseTarget targetYouLOS
+    { _crUpdate = stateUpdate $ impulsiveAI $ composeInternalAIs
+        [ chaseTarget targetYouLOS
+        , \ _ -> crMeleeCooldown . _Just %~ (max 0 . subtract 1)
+        ]
    , _crHP = 300
    , _crPict = basicCrPict green
    , _crInv = IM.empty