Implement foreground correctly, not with shadows though

2021-06-10 13:53:03 +02:00
parent 21a4393ad9
commit aa30f6b969
7 changed files with 34 additions and 74 deletions
@@ -74,7 +74,6 @@ data World = World
    , _sounds               :: M.Map SoundOrigin Sound
    , _decorations          :: IM.IntMap Picture
    , _foregroundDecorations :: [Picture]
-    , _midgroundDecorations :: [Picture]
    , _corpses              :: IM.IntMap (IM.IntMap [Corpse])
    , _clickMousePos        :: (Float,Float)
    , _pathGraph            :: ~(Gr Point2 Float)