Implement basic attention and awareness

src/Dodge/Default.hs

@@ -11,6 +11,7 @@ import Dodge.Data
 import Dodge.Creature.Stance.Data
 import Dodge.Creature.State.Data
 import Dodge.Creature.Rationality.Data
+import Dodge.Creature.AlertLevel.Data
 import Dodge.Data.Menu
 import Dodge.SoundLogic
 import Dodge.Base
@@ -92,6 +93,9 @@ defaultCreature = Creature
     , _crStance = Stance {_carriage=Walking 0 0,_posture=AtEase}
     , _crRationality = ImpulseRat []
     , _crMeleeCooldown = Nothing
+    , _crAwakeLevel = Vigilant
+    , _crAttentionDir = AttentiveTo []
+    , _crAwarenessLevel = IM.empty
     }
 defaultState = CrSt 
     { _goals = []