Work on grid for room placements

2025-10-27 17:08:16 +00:00
parent 0946ee1310
commit 329fcc237b
3 changed files with 30 additions and 49 deletions
@@ -1,6 +1,7 @@
 {-# OPTIONS_GHC -Wno-unused-imports #-}
 module Dodge.Room.Tutorial where

+import Dodge.Room.Pillar
 import Dodge.Room.Boss
 import Dodge.Room.Tanks
 import Dodge.Room.LongDoor
@@ -46,6 +47,8 @@ tutAnoTree = do
    foldMTRS
        [ tToBTree "TutStartRez" . return . cleatOnward <$> tutRezBox
        , corDoor
+        , tToBTree "cor" . return . cleatOnward <$> roomPillarsSquare
+        , corDoor
 --        , return $ tToBTree "cor" $ return $ cleatOnward $ corridor & rmPmnts .~ mempty
 --        , return $ tToBTree "cor" $ return $ cleatOnward $ roomGlassOctogon 200
 --        , corDoor