Add flavour text, start smoke, support for different reload sounds

2021-06-22 14:42:23 +02:00
parent 52eaeead5d
commit 39218ed3b5
31 changed files with 128 additions and 57 deletions
@@ -142,7 +142,8 @@ startCr :: Creature
 startCr = defaultCreature
    { _crPos = (0,0)
    , _crOldPos = (0,0)
-    , _crDir = 0
+    , _crDir = (pi/2)
+    , _crMvDir  = (pi/2)
    , _crID = 0
    , _crPict = basicCrPict black
    , _crUpdate = stateUpdate yourControl