Add fix bug in terminal destruction effects

2022-06-07 01:25:36 +01:00
parent 1fe41889fe
commit d42538e3c0
13 changed files with 111 additions and 93 deletions
@@ -83,9 +83,7 @@ sensInsideDoor senseType outplid rm = rm
            thinHighBar 0 (V2 20 (-1)) (V2 20 (-100))
            <> thinHighBar 0 (V2 0 (-100)) (V2 20 (-100))
            <> barPP 1.5 (V3 20 (-1) 0) (V3 20 (-1) 80))
-        , putTerminal terminalColor (defaultTermParams & addInputLine [damageCodeCommand,quitCommand]
-                [helpCommand,commandsCommand]
-                )
+        , putTerminal terminalColor (basicTerminal & tmScrollCommands .:~ damageCodeCommand)
            & plSpot .~ rprBoolShift isUnusedLnk (shiftInBy 10)
        ]
    & rmOutPmnt .~ [OutPlacement (sensAboveDoor senseType 10 (atFstLnkOutShiftInward 100)) outplid]