Make "tanks" into Blocks

2022-06-18 23:28:17 +01:00
parent cc93fc83d7
commit bae0f7dcad
10 changed files with 38 additions and 19 deletions
@@ -924,6 +924,7 @@ data Block = Block
    , _blShadows    :: [Int]   -- a list of blocks/walls? that are not shown when this block exists
    , _blFootprint  :: [Point2]
    , _blPos        :: Point2
+    , _blRot        :: Float
    , _blDraw       :: Block -> SPic
    , _blDeath      :: Block -> World -> World
    }