Attach terminal to analyser (these should rather be combined)

2022-03-21 19:20:58 +00:00
parent 51cc04799d
commit 9c46027711
11 changed files with 92 additions and 47 deletions
@@ -37,7 +37,7 @@ initialAnoTree :: RandomGen g => Tree [Annotation g]
 initialAnoTree = padSucWithDoors $ treeFromTrunk 
    [[AnoApplyInt 0 startRoom]
    , [AnoApplyInt 100 healthTest]
-    , [SpecificRoom $ (return . UseAll) <$> tanksRoom [] []]
+    , [SpecificRoom $ return . UseAll <$> tanksRoom [] []]
    , [PassthroughLockKeyLists 2 lockRoomKeyItems itemRooms]
    , [SpecificRoom randomChallenges]
    , [AnoApplyInt 1 lasSensorTurretTest]