Various improvements, metal debris

2022-06-23 18:53:26 +01:00
parent e3d5c4eb4b
commit 8d266a6770
18 changed files with 147 additions and 82 deletions
@@ -23,6 +23,11 @@ defaultWall = Wall
    , _wlHeight = 100
    , _wlMaterial = Stone
    }
+defaultDoorWall' :: Wall
+defaultDoorWall' = defaultWall
+    { _wlPathable = True
+    , _wlMaterial = Metal
+    }
 {- Indestructible see-through wall.  -}
 defaultCrystalWall :: Wall
 defaultCrystalWall = defaultWall