Start more sensibly separating avatar from ai creatures

src/Dodge/Creature/Update.hs

@@ -1,7 +1,9 @@
-module Dodge.Creature.Update 
-    ( updateCreature
-    ) where
+module Dodge.Creature.Update (
+    updateCreature,
+) where
 
+import Dodge.Creature.YourControl
+import Dodge.Creature.State
 import Dodge.Barreloid
 import Dodge.Data.World
 import Dodge.Humanoid
@@ -9,6 +11,7 @@ import Dodge.Lampoid
 
 updateCreature :: Creature -> World -> World
 updateCreature cr = case _crType cr of
+    Avatar{} -> crUpdate yourControl cr
     Lampoid{} -> updateLampoid cr
     Humanoid{} -> updateHumanoid cr
     Barreloid{} -> updateBarreloid cr