Simplify block drawing

2025-10-24 19:09:23 +01:00
parent ccb809a090
commit ffea3a1694
7 changed files with 16 additions and 30 deletions
@@ -1,5 +1,6 @@
 module Dodge.Room.Tutorial where

+import Dodge.Room.Tanks
 import Dodge.Room.LongDoor
 import Dodge.Layout
 import Dodge.Item.Held.Utility
@@ -43,6 +44,7 @@ tutAnoTree = do
    foldMTRS
        [ tToBTree "TutStartRez" . return . cleatOnward <$> tutRezBox
        , corDoor
+        , tToBTree "lastun" . return . cleatOnward <$> tanksRoom [] []
 --        , return $ tToBTree "cor" $ return $ cleatOnward corridor
 --        , return $ tToBTree "cor" $ return $ cleatOnward corridor
 --        , tToBTree "lastun" . return . cleatOnward <$> cenLasTur