Tweak fullscreen texture shaders

2021-05-01 15:03:17 +02:00
parent 7711738b3b
commit 30c09d3403
11 changed files with 89 additions and 30 deletions
@@ -22,7 +22,7 @@ defaultInanimate = defaultCreature & crState . crIsAnimate .~ False
 lamp :: Creature
 lamp = defaultInanimate
    { _crUpdate = initialiseLamp
-    , _crHP = 500
+    , _crHP = 100
    , _crPict = \ _ -> onLayer CrLayer $ color white $ circleSolid 3
    , _crRad = 3
    }