Cleanup. Add room-wise random placement spots

2021-11-07 19:46:14 +00:00
parent f380e140e1
commit 5681a37953
18 changed files with 179 additions and 141 deletions
@@ -37,6 +37,11 @@ initialRoomTree = do
            ,[Corridor]
            ,[AirlockAno]
            ,[Corridor]
+            ,[Corridor]
+            ,[SpecificRoom $ fmap connectRoom glassSwitchBack]
+            ,[Corridor]
+            ,[SpecificRoom $ return $ connectRoom lasTunnel ]
+            ,[Corridor]
            ,[SpecificRoom $ fmap connectRoom slowDoorRoom ]
            ,[Corridor]
            ,[Corridor]