Working dynamic shadows using shape vertices buffer

2021-09-22 10:34:39 +01:00
parent 07e128bb04
commit 952ec1c579
16 changed files with 42 additions and 67 deletions
@@ -1,4 +1,4 @@
-{-# LANGUAGE TupleSections #-}
+--{-# LANGUAGE TupleSections #-}
 {- |
 Drawing of creatures. 
 Takes into account damage etc. -}
@@ -55,6 +55,7 @@ basicCrShape col cr = tr $ mconcat
    , translateSHz 25 . dm . rotdir $ scalp cr
    , dm . rotmdir $ feet cr
    , dm . rotdir $ upperBody col cr
+    , rotdir $ _spShape $ drawEquipment cr
    ]
  where 
    dm = damageModSH cr