Add sounds, move data types out into separate folders

src/Dodge/Default/Creature.hs

@@ -1,7 +1,6 @@
 module Dodge.Default.Creature where
 import Dodge.Data
 import Dodge.Creature.Picture
-import Dodge.Creature.Damage
 import Geometry.Data
 import Picture
 
@@ -19,7 +18,6 @@ defaultCreature = Creature
     , _crMvDir  = 0
     , _crTwist  = 0
     , _crID     = 1
---    , _crPict   = basicCrPict
     , _crType = defaultCreatureSkin
     , _crUpdate = const id
     , _crRad    = 10
@@ -34,7 +32,7 @@ defaultCreature = Creature
     , _crLeftInvSel = Nothing
     , _crState  = defaultState
     , _crCorpse = basicCrCorpse
-    , _crApplyDamage = defaultApplyDamage
+    , _crMaterial = Flesh
     , _crPastDamage = 0
     , _crEquipment = M.empty
     , _crStance = Stance