Add various capabilities for generating graphs, fixes to lasgun

2022-07-06 11:54:29 +01:00
parent cd3463d3d8
commit d63495e335
29 changed files with 1801 additions and 178 deletions
@@ -41,6 +41,7 @@ initialAnoTree :: Annotation
 initialAnoTree = OnwardList 
        $ intersperse (AnTree corDoor)
    [ IntAnno $ AnTree . startRoom
+    , AnRoom $ roomCCrits 0
    , AnRoom $ return airlock0
    , AnRoom slowDoorRoom
    , AnRoom $ roomCCrits 10