Make creature update an external function

2022-07-20 01:22:17 +01:00
parent db44d5d6ce
commit 1f79fe157f
31 changed files with 562 additions and 462 deletions
@@ -19,7 +19,6 @@ defaultCreature = Creature
    , _crTwist  = 0
    , _crID     = 1
    , _crType = defaultCreatureSkin
-    , _crUpdate = const id
    , _crRad    = 10
    , _crMass   = 10
    , _crHP     = 100
@@ -55,7 +54,7 @@ defaultCreature = Creature
    , _crCamouflage = FullyVisible
    }
 defaultCreatureSkin :: CreatureType
-defaultCreatureSkin = Humanoid (greyN 0.9) (light4 green) (greyN 0.3)
+defaultCreatureSkin = Humanoid (greyN 0.9) (light4 green) (greyN 0.3) InanimateAI

 defaultInanimate :: Creature
 defaultInanimate = defaultCreature & crActionPlan .~ Inanimate