justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Partial rethink of terminal text input

Browse Source
This commit is contained in:
justin
2025-08-14 21:48:02 +01:00
parent 5b720cb82c
commit 91d19e7c42
12 changed files with 142 additions and 167 deletions
Download Patch File Download Diff File Expand all files Collapse all files
saveSlot/LevelStart0
+1 -1
View File
File diff suppressed because one or more lines are too long
src/Dodge/Data/Terminal.hs
+5 -12
View File
@@ -13,32 +13,25 @@ import qualified Data.Map.Strict as M
import Dodge.Data.WorldEffect import Dodge.Data.WorldEffect
import Dodge.Data.BlBl import Dodge.Data.BlBl
data TerminalStatus = TerminalOff | TerminalBusy | TerminalReady data TerminalStatus = TerminalOff | TerminalBusy | TerminalTextInput {_tiText :: String}
-- | TerminalArgumentInput TerminalCommand
deriving Eq deriving Eq
--deriving (Eq, Ord, Show, Read) --Generic, Flat) --deriving (Eq, Ord, Show, Read) --Generic, Flat)
data TerminalInput = TerminalInput data TerminalInput = TerminalInput
{ _tiText :: String { --_tiText :: String
, _tiSel :: (Int, Int) _tiSel :: (Int, Int)
} }
--deriving (Eq, Ord, Show, Read) --Generic, Flat) --deriving (Eq, Ord, Show, Read) --Generic, Flat)
data TerminalBootProgram
= TerminalBootMempty
| TerminalBootLines [TerminalLine]
--deriving (Eq, Show, Read) --, Generic)
--h--deriving (Eq, Show, Read) --Generic, Flat)
data Terminal = Terminal data Terminal = Terminal
{ _tmID :: Int { _tmID :: Int
, _tmBootLines :: [TerminalLine] , _tmBootLines :: [TerminalLine]
, _tmButtonID :: Int , _tmButtonID :: Int
, _tmMachineID :: Int , _tmMachineID :: Int
, _tmName :: String
, _tmExternalColor :: Color , _tmExternalColor :: Color
, _tmDisplayedLines :: [(String, Color)] , _tmDisplayedLines :: [(String, Color)]
, _tmFutureLines :: [TerminalLine] , _tmFutureLines :: [TerminalLine]
, _tmTitle :: String
, _tmInput :: TerminalInput , _tmInput :: TerminalInput
, _tmScrollCommands :: [TerminalCommand] , _tmScrollCommands :: [TerminalCommand]
, _tmWriteCommands :: [TerminalCommand] , _tmWriteCommands :: [TerminalCommand]
@@ -124,13 +117,13 @@ makeLenses ''TerminalLine
makeLenses ''TerminalToggle makeLenses ''TerminalToggle
makeLenses ''EffectArguments makeLenses ''EffectArguments
makeLenses ''TerminalCommand makeLenses ''TerminalCommand
makeLenses ''TerminalStatus
concat <$> mapM (deriveJSON defaultOptions) concat <$> mapM (deriveJSON defaultOptions)
[ ''TerminalStatus [ ''TerminalStatus
, ''TerminalInput , ''TerminalInput
, ''TerminalLineString , ''TerminalLineString
, ''TmTm , ''TmTm
, ''TerminalLine , ''TerminalLine
, ''TerminalBootProgram
, ''TerminalToggle , ''TerminalToggle
, ''EffectArguments , ''EffectArguments
, ''TerminalCommandEffect , ''TerminalCommandEffect
src/Dodge/Default/Terminal.hs
+2 -4
View File
@@ -13,10 +13,8 @@ defaultTerminal =
, _tmBootLines = [] , _tmBootLines = []
, _tmButtonID = 0 , _tmButtonID = 0
, _tmMachineID = 0 , _tmMachineID = 0
, _tmName = "TESTTERMINAL"
, _tmDisplayedLines = [] , _tmDisplayedLines = []
, _tmFutureLines = [] , _tmFutureLines = []
, _tmTitle = "TERMINAL IN LOCATION"
, _tmInput = defaultTerminalInput , _tmInput = defaultTerminalInput
, _tmScrollCommands = [] , _tmScrollCommands = []
, _tmWriteCommands = [] , _tmWriteCommands = []
@@ -31,6 +29,6 @@ defaultTerminal =
defaultTerminalInput :: TerminalInput defaultTerminalInput :: TerminalInput
defaultTerminalInput = defaultTerminalInput =
TerminalInput TerminalInput
{ _tiText = "" { -- _tiText = ""
, _tiSel = (0, 0) _tiSel = (0, 0)
} }
src/Dodge/InputFocus.hs
+2 -2
View File
@@ -27,8 +27,8 @@ textInputFocus w = case w ^? hud . hudElement . subInventory of
_ -> Nothing _ -> Nothing
Just DisplayTerminal{_termID = tmid} -> do Just DisplayTerminal{_termID = tmid} -> do
connectionstatus <- w ^? cWorld . lWorld . terminals . ix tmid . tmStatus connectionstatus <- w ^? cWorld . lWorld . terminals . ix tmid . tmStatus
guard $ connectionstatus == TerminalReady -- guard $ connectionstatus == TerminalTextInput
return $ cWorld . lWorld . terminals . ix tmid . tmInput . tiText return $ cWorld . lWorld . terminals . ix tmid . tmStatus . tiText
_ -> Nothing _ -> Nothing
where where
he = w ^. hud . hudElement he = w ^. hud . hudElement
src/Dodge/Render/HUD.hs
+10 -7
View File
@@ -365,7 +365,7 @@ drawTerminalDisplay tid cfig w = fromMaybe mempty $ do
tm <- w ^? terminals . ix tid tm <- w ^? terminals . ix tid
let tsize = getMaxLinesTM + 1 let tsize = getMaxLinesTM + 1
return $ return $
invHead cfig (_tmTitle tm ++ ":T" ++ show tid) invHead cfig ("T-" ++ show tid)
<> drawSelectionList secondColumnParams cfig (thesellist tm) <> drawSelectionList secondColumnParams cfig (thesellist tm)
<> color <> color
(withAlpha 0.5 green) -- consider integrating termScreenColor somehow (withAlpha 0.5 green) -- consider integrating termScreenColor somehow
@@ -380,13 +380,16 @@ drawTerminalDisplay tid cfig w = fromMaybe mempty $ do
. reverse . reverse
. take getMaxLinesTM . take getMaxLinesTM
$ _tmDisplayedLines tm $ _tmDisplayedLines tm
displayTermInput tm = case _tmInput tm of displayTermInput tm = case _tmStatus tm of
TerminalInput{_tiText = s} -> TerminalOff -> id
(++ [(displayInputText tm s ++ [cFilledRect], white)]) TerminalBusy -> (++ [([cFilledRect], white)])
TerminalTextInput s ->
(++ [(getPromptTM ++ s ++ [cFilledRect], white)])
partcommand tm = maybe "" (++ " ") $ tm ^? tmPartialCommand . _Just . tcString partcommand tm = maybe "" (++ " ") $ tm ^? tmPartialCommand . _Just . tcString
displayInputText tm s -- displayInputText tm s
| _tmStatus tm == TerminalReady = partcommand tm ++ getPromptTM ++ s -- | TerminalTextInput <- _tmStatus tm = getPromptTM ++ s
| otherwise = "" ---- | _tmStatus tm == TerminalReady = partcommand tm ++ getPromptTM ++ s
-- | otherwise = ""
-- | hasfoc = clockCycle 10 (V.fromList [[cFilledRect] , "."]) w -- | hasfoc = clockCycle 10 (V.fromList [[cFilledRect] , "."]) w
src/Dodge/Terminal.hs
+9 -16
View File
@@ -18,7 +18,7 @@ module Dodge.Terminal (
) where ) where
import Color import Color
import Control.Monad --import Control.Monad
import Data.Char import Data.Char
import Data.Foldable import Data.Foldable
import qualified Data.Map.Strict as M import qualified Data.Map.Strict as M
@@ -37,7 +37,7 @@ basicTerminal =
defaultTerminal defaultTerminal
{ _tmDisplayedLines = [] { _tmDisplayedLines = []
, _tmFutureLines = [] , _tmFutureLines = []
, _tmTitle = "TERMINAL" -- , _tmTitle = "TERMINAL"
, _tmScrollCommands = [quitCommand] , _tmScrollCommands = [quitCommand]
, _tmWriteCommands = [helpCommand, commandsCommand] , _tmWriteCommands = [helpCommand, commandsCommand]
, _tmBootLines = connectionBlurb , _tmBootLines = connectionBlurb
@@ -47,12 +47,11 @@ basicTerminal =
connectionBlurbLines :: [TerminalLine] -> [TerminalLine] connectionBlurbLines :: [TerminalLine] -> [TerminalLine]
connectionBlurbLines tls = connectionBlurbLines tls =
[ termSoundLine computerBeepingS [ termSoundLine computerBeepingS
, TerminalLineDisplay 0 (TerminalLineConst "Connecting" termTextColor) , TerminalLineDisplay 0 (TerminalLineConst "LOADING TEXT INTERFACE..." termTextColor)
, TerminalLineDisplay 10 (TerminalLineConst "..." termTextColor)
, TerminalLineDisplay 10 (TerminalLineConst "Connected" termTextColor)
] ]
++ tls ++ tls
++ [TerminalLineTerminalEffect 0 (TmTmSetStatus TerminalReady)] ++ [ TerminalLineDisplay 10 (TerminalLineConst "READY FOR INPUT" termTextColor)]
++ [TerminalLineTerminalEffect 0 (TmTmSetStatus (TerminalTextInput ""))]
quitCommand :: TerminalCommand quitCommand :: TerminalCommand
quitCommand = quitCommand =
@@ -100,13 +99,7 @@ commandsCommand =
} }
connectionBlurb :: [TerminalLine] connectionBlurb :: [TerminalLine]
connectionBlurb = connectionBlurb = connectionBlurbLines []
[ termSoundLine computerBeepingS
, TerminalLineDisplay 0 (TerminalLineConst "Connecting" termTextColor)
, TerminalLineDisplay 10 (TerminalLineConst "..." termTextColor)
, TerminalLineDisplay 10 (TerminalLineConst "Connected" termTextColor)
, TerminalLineTerminalEffect 0 (TmTmSetStatus TerminalReady)
]
termSoundLine :: SoundID -> TerminalLine termSoundLine :: SoundID -> TerminalLine
termSoundLine sid = TerminalLineEffect 0 (TmWdWdTermSound sid) termSoundLine sid = TerminalLineEffect 0 (TmWdWdTermSound sid)
@@ -276,8 +269,8 @@ commandFutureLines s tm w = fromMaybe [errline "^ Invalid command"] $ do
terminalReturnEffect :: Int -> World -> World terminalReturnEffect :: Int -> World -> World
terminalReturnEffect tmid w = fromMaybe w $ do terminalReturnEffect tmid w = fromMaybe w $ do
tm <- w ^? cWorld . lWorld . terminals. ix tmid tm <- w ^? cWorld . lWorld . terminals. ix tmid
guard $ _tmStatus tm == TerminalReady -- guard $ _tmStatus tm == TerminalTextInput
s <- tm ^? tmInput . tiText s <- tm ^? tmStatus . tiText
let pc = maybe "" (++ " ") $ tm ^? tmPartialCommand . _Just . tcString let pc = maybe "" (++ " ") $ tm ^? tmPartialCommand . _Just . tcString
return $ return $
runTerminalString (pc ++ s) tm $ runTerminalString (pc ++ s) tm $
@@ -289,7 +282,7 @@ terminalReturnEffect tmid w = fromMaybe w $ do
runTerminalString :: String -> Terminal -> World -> World runTerminalString :: String -> Terminal -> World -> World
runTerminalString s tm w = runTerminalString s tm w =
w & cWorld . lWorld . terminals . ix (_tmID tm) w & cWorld . lWorld . terminals . ix (_tmID tm)
%~ ( (tmInput .~ TerminalInput{_tiText = mempty, _tiSel = (0, 0)}) %~ ( (tmInput .~ TerminalInput{ _tiSel = (0, 0)})
. (tmFutureLines ++.~ commandFutureLines s tm w) . (tmFutureLines ++.~ commandFutureLines s tm w)
. (tmCommandHistory %~ take 10 . (s :)) . (tmCommandHistory %~ take 10 . (s :))
) )
src/Dodge/Terminal/Color.hs
+1 -1
View File
@@ -9,5 +9,5 @@ import Control.Lens
termScreenColor :: Terminal -> Maybe Color termScreenColor :: Terminal -> Maybe Color
termScreenColor tm = case tm ^. tmStatus of termScreenColor tm = case tm ^. tmStatus of
TerminalOff -> Nothing TerminalOff -> Nothing
TerminalReady -> Just green TerminalTextInput _ -> Just green
TerminalBusy -> Just white TerminalBusy -> Just white
src/Dodge/Update.hs
+2 -2
View File
@@ -399,8 +399,8 @@ updateMouseContextGame cfig u = case u ^. uvWorld . input . mouseContext of
return $ return $
if isOverTerminalScreen cfig mpos if isOverTerminalScreen cfig mpos
then fromMaybe NoMouseContext $ do then fromMaybe NoMouseContext $ do
let s = tm ^. tmInput . tiText let s = tm ^. tmStatus . tiText
guard $ not (null s) && _tmStatus tm == TerminalReady guard $ not (null s) -- && _tmStatus tm == TerminalTextInput
return $ OverTerminalReturn tmid return $ OverTerminalReturn tmid
else OverTerminalEscape else OverTerminalEscape
src/Dodge/Update/Input/InGame.hs
+1 -1
View File
@@ -383,7 +383,7 @@ updateKeysInTerminal :: Int -> Universe -> Universe
updateKeysInTerminal tmid u = updateKeysInTerminal tmid u =
u u
& doTextInputOverUniverse & doTextInputOverUniverse
(uvWorld . cWorld . lWorld . terminals . ix tmid . tmInput . tiText) (uvWorld . cWorld . lWorld . terminals . ix tmid . tmStatus . tiText)
& checkEndStatus & checkEndStatus
where where
checkEndStatus checkEndStatus
src/Dodge/Update/Scroll.hs
+3 -3
View File
@@ -124,9 +124,9 @@ moveCombineSel yi =
terminalWheelEvent :: Int -> Int -> World -> World terminalWheelEvent :: Int -> Int -> World -> World
terminalWheelEvent yi tmid w terminalWheelEvent yi tmid w
| w & has (input . mouseButtons . ix ButtonRight) | w & has (input . mouseButtons . ix ButtonRight)
, Just TerminalReady <- w ^? cWorld . lWorld . terminals . ix tmid . tmStatus = , Just TerminalTextInput{} <- w ^? cWorld . lWorld . terminals . ix tmid . tmStatus =
w & cWorld . lWorld . terminals . ix tmid %~ updatetermsubsel w & cWorld . lWorld . terminals . ix tmid %~ updatetermsubsel
| Just TerminalReady <- w ^? cWorld . lWorld . terminals . ix tmid . tmStatus = | Just TerminalTextInput{} <- w ^? cWorld . lWorld . terminals . ix tmid . tmStatus =
w & cWorld . lWorld . terminals . ix tmid %~ updatetermsel w & cWorld . lWorld . terminals . ix tmid %~ updatetermsel
| otherwise = w | otherwise = w
where where
@@ -143,7 +143,7 @@ terminalWheelEvent yi tmid w
setInput i j tm = setInput i j tm =
tm tm
& tmInput . tiSel .~ (i, j) & tmInput . tiSel .~ (i, j)
& tmInput . tiText .~ comstr ++ arg & tmStatus . tiText .~ comstr ++ arg
where where
comstr = scrollCommandStrings w tm !! i comstr = scrollCommandStrings w tm !! i
tc = scrollCommands tm !! i tc = scrollCommands tm !! i
src/Dodge/WorldEffect.hs
+2 -7
View File
@@ -57,7 +57,7 @@ accessTerminal mtmid w = fromMaybe w $ do
& cWorld . lWorld . terminals . ix tmid %~ tryToBoot & cWorld . lWorld . terminals . ix tmid %~ tryToBoot
where where
tryToBoot tm = case _tmStatus tm of tryToBoot tm = case _tmStatus tm of
TerminalReady -> tm TerminalTextInput {} -> tm
TerminalBusy -> tm TerminalBusy -> tm
TerminalOff -> TerminalOff ->
tm tm
@@ -76,7 +76,7 @@ lineOutputTerminal tls =
defaultTerminal defaultTerminal
{ _tmDisplayedLines = [] { _tmDisplayedLines = []
, _tmFutureLines = [] , _tmFutureLines = []
, _tmTitle = "TERMINAL" -- , _tmTitle = "TERMINAL"
, _tmScrollCommands = [quitCommand] , _tmScrollCommands = [quitCommand]
, _tmWriteCommands = [helpCommand, commandsCommand] , _tmWriteCommands = [helpCommand, commandsCommand]
, _tmBootLines = connectionBlurbLines tls , _tmBootLines = connectionBlurbLines tls
@@ -91,11 +91,6 @@ doDeathTriggers tm = cWorld . lWorld . triggers %~ flip (foldl' $ flip doDeathTo
doDeathToggle :: TerminalToggle -> IM.IntMap Bool -> IM.IntMap Bool doDeathToggle :: TerminalToggle -> IM.IntMap Bool -> IM.IntMap Bool
doDeathToggle (TerminalToggle trid f) = ix trid %~ doBlBl f doDeathToggle (TerminalToggle trid f) = ix trid %~ doBlBl f
--doTerminalBootProgram :: TerminalBootProgram -> Terminal -> World -> [TerminalLine]
--doTerminalBootProgram tbp = case tbp of
-- TerminalBootMempty -> \_ _ -> []
-- TerminalBootLines ls -> \_ _ -> ls
doTmWdWd :: TmWdWd -> Terminal -> World -> World doTmWdWd :: TmWdWd -> Terminal -> World -> World
doTmWdWd tmwdwd = case tmwdwd of doTmWdWd tmwdwd = case tmwdwd of
TmWdId -> const id TmWdId -> const id
tags
+104 -111
View File
@@ -17,7 +17,7 @@
<$> src/Dodge/Data/Camera.hs 39;" o <$> src/Dodge/Data/Camera.hs 39;" o
<$> src/Dodge/Data/Creature.hs 80;" o <$> src/Dodge/Data/Creature.hs 80;" o
<$> src/Dodge/Data/LWorld.hs 184;" o <$> src/Dodge/Data/LWorld.hs 184;" o
<$> src/Dodge/Data/Terminal.hs 127;" o <$> src/Dodge/Data/Terminal.hs 121;" o
ABSOLUTE src/Dodge/Data/Item/Combine.hs 40;" C ABSOLUTE src/Dodge/Data/Item/Combine.hs 40;" C
AIUNIT src/Dodge/Data/Item/Combine.hs 75;" C AIUNIT src/Dodge/Data/Item/Combine.hs 75;" C
ALTERIFLE src/Dodge/Data/Item/Combine.hs 155;" C ALTERIFLE src/Dodge/Data/Item/Combine.hs 155;" C
@@ -337,7 +337,7 @@ DefaultCrGroupUpdate src/Dodge/Data/CrGroupParams.hs 22;" C
DefaultForceField src/Dodge/Data/Item/Use/Consumption/Ammo.hs 11;" C DefaultForceField src/Dodge/Data/Item/Use/Consumption/Ammo.hs 11;" C
DefaultLightSourceDraw src/Dodge/Data/LightSource.hs 13;" C DefaultLightSourceDraw src/Dodge/Data/LightSource.hs 13;" C
DefaultRoomType src/Dodge/Data/Room.hs 31;" C DefaultRoomType src/Dodge/Data/Room.hs 31;" C
DefaultTerminal src/Dodge/Data/Terminal.hs 55;" C DefaultTerminal src/Dodge/Data/Terminal.hs 48;" C
DestroyBeing src/Dodge/Data/Scenario.hs 8;" C DestroyBeing src/Dodge/Data/Scenario.hs 8;" C
DestroyBullet src/Dodge/Data/Bullet.hs 29;" C DestroyBullet src/Dodge/Data/Bullet.hs 29;" C
DestroyItem src/Dodge/Data/Scenario.hs 7;" C DestroyItem src/Dodge/Data/Scenario.hs 7;" C
@@ -393,7 +393,7 @@ Ears src/Dodge/Data/Creature/Perception.hs 47;" C
East src/Dodge/Data/CardinalPoint.hs 5;" C East src/Dodge/Data/CardinalPoint.hs 5;" C
East8 src/Dodge/Data/CardinalPoint.hs 13;" C East8 src/Dodge/Data/CardinalPoint.hs 13;" C
EdgeObstacle src/Dodge/Data/PathGraph.hs 48;" t EdgeObstacle src/Dodge/Data/PathGraph.hs 48;" t
EffectArguments src/Dodge/Data/Terminal.hs 90;" t EffectArguments src/Dodge/Data/Terminal.hs 83;" t
EighthRes src/Dodge/Data/Config.hs 97;" C EighthRes src/Dodge/Data/Config.hs 97;" C
Eldritch src/Dodge/Data/Scenario.hs 34;" C Eldritch src/Dodge/Data/Scenario.hs 34;" C
ElectricSensor src/Dodge/Data/Machine/Sensor/Type.hs 12;" C ElectricSensor src/Dodge/Data/Machine/Sensor/Type.hs 12;" C
@@ -847,7 +847,7 @@ NewIntMap src/NewInt.hs 18;" t
NewSideEffect src/Dodge/Data/Universe.hs 65;" C NewSideEffect src/Dodge/Data/Universe.hs 65;" C
NoAction src/Dodge/Data/ActionPlan.hs 152;" C NoAction src/Dodge/Data/ActionPlan.hs 152;" C
NoAmmoRequired src/Dodge/Data/Muzzle.hs 25;" C NoAmmoRequired src/Dodge/Data/Muzzle.hs 25;" C
NoArguments src/Dodge/Data/Terminal.hs 91;" C NoArguments src/Dodge/Data/Terminal.hs 84;" C
NoBeamCombine src/Dodge/Data/Beam.hs 43;" C NoBeamCombine src/Dodge/Data/Beam.hs 43;" C
NoConcurrentEffect src/Loop/Data.hs 7;" C NoConcurrentEffect src/Loop/Data.hs 7;" C
NoCrImp src/Dodge/Data/CreatureEffect.hs 24;" C NoCrImp src/Dodge/Data/CreatureEffect.hs 24;" C
@@ -947,7 +947,7 @@ OnRightWrist src/Dodge/Data/Equipment/Misc.hs 26;" C
OnSpecial src/Dodge/Data/Equipment/Misc.hs 28;" C OnSpecial src/Dodge/Data/Equipment/Misc.hs 28;" C
OnTurret src/Dodge/Data/Item/Location.hs 37;" C OnTurret src/Dodge/Data/Item/Location.hs 37;" C
OnceSound src/Dodge/Data/SoundOrigin.hs 16;" C OnceSound src/Dodge/Data/SoundOrigin.hs 16;" C
OneArgument src/Dodge/Data/Terminal.hs 92;" C OneArgument src/Dodge/Data/Terminal.hs 85;" C
OneHand src/Dodge/Data/AimStance.hs 9;" C OneHand src/Dodge/Data/AimStance.hs 9;" C
OnwardCluster src/Dodge/Data/RoomCluster.hs 14;" C OnwardCluster src/Dodge/Data/RoomCluster.hs 14;" C
OnwardList src/Dodge/Annotation/Data.hs 16;" C OnwardList src/Dodge/Annotation/Data.hs 16;" C
@@ -1340,35 +1340,32 @@ TargetingLaser src/Dodge/Data/Laser.hs 18;" C
TargetingType src/Dodge/Data/Item/Targeting.hs 11;" t TargetingType src/Dodge/Data/Item/Targeting.hs 11;" t
TeleSound src/Dodge/Data/SoundOrigin.hs 36;" C TeleSound src/Dodge/Data/SoundOrigin.hs 36;" C
TermSignal src/Dodge/Data/Input.hs 54;" t TermSignal src/Dodge/Data/Input.hs 54;" t
Terminal src/Dodge/Data/Terminal.hs 32;" t Terminal src/Dodge/Data/Terminal.hs 27;" t
TerminalBootLines src/Dodge/Data/Terminal.hs 28;" C
TerminalBootMempty src/Dodge/Data/Terminal.hs 27;" C
TerminalBootProgram src/Dodge/Data/Terminal.hs 26;" t
TerminalBusy src/Dodge/Data/Terminal.hs 16;" C TerminalBusy src/Dodge/Data/Terminal.hs 16;" C
TerminalCommand src/Dodge/Data/Terminal.hs 112;" t TerminalCommand src/Dodge/Data/Terminal.hs 105;" t
TerminalCommandArguments src/Dodge/Data/Terminal.hs 100;" C TerminalCommandArguments src/Dodge/Data/Terminal.hs 93;" C
TerminalCommandEffect src/Dodge/Data/Terminal.hs 99;" t TerminalCommandEffect src/Dodge/Data/Terminal.hs 92;" t
TerminalCommandEffectCommands src/Dodge/Data/Terminal.hs 106;" C TerminalCommandEffectCommands src/Dodge/Data/Terminal.hs 99;" C
TerminalCommandEffectDamageCoding src/Dodge/Data/Terminal.hs 101;" C TerminalCommandEffectDamageCoding src/Dodge/Data/Terminal.hs 94;" C
TerminalCommandEffectHelp src/Dodge/Data/Terminal.hs 104;" C TerminalCommandEffectHelp src/Dodge/Data/Terminal.hs 97;" C
TerminalCommandEffectLinkedObject src/Dodge/Data/Terminal.hs 103;" C TerminalCommandEffectLinkedObject src/Dodge/Data/Terminal.hs 96;" C
TerminalCommandEffectNoArgumentsStr src/Dodge/Data/Terminal.hs 105;" C TerminalCommandEffectNoArgumentsStr src/Dodge/Data/Terminal.hs 98;" C
TerminalCommandEffectNone src/Dodge/Data/Terminal.hs 108;" C TerminalCommandEffectNone src/Dodge/Data/Terminal.hs 101;" C
TerminalCommandEffectSensorParameter src/Dodge/Data/Terminal.hs 102;" C TerminalCommandEffectSensorParameter src/Dodge/Data/Terminal.hs 95;" C
TerminalCommandEffectSingleCommand src/Dodge/Data/Terminal.hs 107;" C TerminalCommandEffectSingleCommand src/Dodge/Data/Terminal.hs 100;" C
TerminalInput src/Dodge/Data/Terminal.hs 20;" t TerminalInput src/Dodge/Data/Terminal.hs 21;" t
TerminalLine src/Dodge/Data/Terminal.hs 67;" t TerminalLine src/Dodge/Data/Terminal.hs 60;" t
TerminalLineConst src/Dodge/Data/Terminal.hs 57;" C TerminalLineConst src/Dodge/Data/Terminal.hs 50;" C
TerminalLineDisplay src/Dodge/Data/Terminal.hs 68;" C TerminalLineDisplay src/Dodge/Data/Terminal.hs 61;" C
TerminalLineEffect src/Dodge/Data/Terminal.hs 76;" C TerminalLineEffect src/Dodge/Data/Terminal.hs 69;" C
TerminalLineString src/Dodge/Data/Terminal.hs 57;" t TerminalLineString src/Dodge/Data/Terminal.hs 50;" t
TerminalLineTerminalEffect src/Dodge/Data/Terminal.hs 72;" C TerminalLineTerminalEffect src/Dodge/Data/Terminal.hs 65;" C
TerminalOff src/Dodge/Data/Terminal.hs 16;" C TerminalOff src/Dodge/Data/Terminal.hs 16;" C
TerminalReady src/Dodge/Data/Terminal.hs 16;" C
TerminalSound src/Dodge/Data/SoundOrigin.hs 24;" C TerminalSound src/Dodge/Data/SoundOrigin.hs 24;" C
TerminalStatus src/Dodge/Data/Terminal.hs 16;" t TerminalStatus src/Dodge/Data/Terminal.hs 16;" t
TerminalToggle src/Dodge/Data/Terminal.hs 83;" t TerminalTextInput src/Dodge/Data/Terminal.hs 16;" C
TerminalType src/Dodge/Data/Terminal.hs 55;" t TerminalToggle src/Dodge/Data/Terminal.hs 76;" t
TerminalType src/Dodge/Data/Terminal.hs 48;" t
Terrestrial src/Dodge/Data/Scenario.hs 72;" C Terrestrial src/Dodge/Data/Scenario.hs 72;" C
TerrestrialBiome src/Dodge/Data/Scenario.hs 76;" t TerrestrialBiome src/Dodge/Data/Scenario.hs 76;" t
TeslaArc src/Dodge/Data/TeslaArc.hs 17;" t TeslaArc src/Dodge/Data/TeslaArc.hs 17;" t
@@ -1380,11 +1377,11 @@ Tile src/Data/Tile.hs 16;" t
Tiled src/Data/Tile.hs 14;" C Tiled src/Data/Tile.hs 14;" C
TimeFlowStatus src/Dodge/Data/World.hs 58;" t TimeFlowStatus src/Dodge/Data/World.hs 58;" t
Tiny src/Shape/Data.hs 32;" C Tiny src/Shape/Data.hs 32;" C
TmId src/Dodge/Data/Terminal.hs 61;" C TmId src/Dodge/Data/Terminal.hs 54;" C
TmTm src/Dodge/Data/Terminal.hs 60;" t TmTm src/Dodge/Data/Terminal.hs 53;" t
TmTmClearDisplayedLines src/Dodge/Data/Terminal.hs 62;" C TmTmClearDisplayedLines src/Dodge/Data/Terminal.hs 55;" C
TmTmSetPartialCommand src/Dodge/Data/Terminal.hs 64;" C TmTmSetPartialCommand src/Dodge/Data/Terminal.hs 57;" C
TmTmSetStatus src/Dodge/Data/Terminal.hs 63;" C TmTmSetStatus src/Dodge/Data/Terminal.hs 56;" C
TmWdId src/Dodge/Data/WorldEffect.hs 73;" C TmWdId src/Dodge/Data/WorldEffect.hs 73;" C
TmWdWd src/Dodge/Data/WorldEffect.hs 72;" t TmWdWd src/Dodge/Data/WorldEffect.hs 72;" t
TmWdWdDisconnectTerminal src/Dodge/Data/WorldEffect.hs 74;" C TmWdWdDisconnectTerminal src/Dodge/Data/WorldEffect.hs 74;" C
@@ -1569,8 +1566,8 @@ _apStrategy src/Dodge/Data/ActionPlan.hs 21;" f
_aps src/Dodge/Data/Muzzle.hs 22;" f _aps src/Dodge/Data/Muzzle.hs 22;" f
_arbitraryAction src/Dodge/Data/ActionPlan.hs 167;" f _arbitraryAction src/Dodge/Data/ActionPlan.hs 167;" f
_arcNode src/Dodge/Data/LWorld.hs 117;" f _arcNode src/Dodge/Data/LWorld.hs 117;" f
_argList src/Dodge/Data/Terminal.hs 94;" f _argList src/Dodge/Data/Terminal.hs 87;" f
_argType src/Dodge/Data/Terminal.hs 93;" f _argType src/Dodge/Data/Terminal.hs 86;" f
_asDir src/Dodge/Data/ArcStep.hs 16;" f _asDir src/Dodge/Data/ArcStep.hs 16;" f
_asObject src/Dodge/Data/ArcStep.hs 17;" f _asObject src/Dodge/Data/ArcStep.hs 17;" f
_asPos src/Dodge/Data/ArcStep.hs 15;" f _asPos src/Dodge/Data/ArcStep.hs 15;" f
@@ -1703,7 +1700,7 @@ _cloudEBO src/Data/Preload/Render.hs 51;" f
_cloudShader src/Data/Preload/Render.hs 50;" f _cloudShader src/Data/Preload/Render.hs 50;" f
_cloudVBO src/Data/Preload/Render.hs 49;" f _cloudVBO src/Data/Preload/Render.hs 49;" f
_clouds src/Dodge/Data/LWorld.hs 103;" f _clouds src/Dodge/Data/LWorld.hs 103;" f
_cmdEffect src/Dodge/Data/Terminal.hs 91;" f _cmdEffect src/Dodge/Data/Terminal.hs 84;" f
_colorBlurShader src/Data/Preload/Render.hs 22;" f _colorBlurShader src/Data/Preload/Render.hs 22;" f
_coolEnd src/Dodge/Data/TriggerType.hs 17;" f _coolEnd src/Dodge/Data/TriggerType.hs 17;" f
_coolSound src/Dodge/Data/Item/Params.hs 24;" f _coolSound src/Dodge/Data/Item/Params.hs 24;" f
@@ -2426,18 +2423,18 @@ _tbPos src/Dodge/Data/TractorBeam.hs 14;" f
_tbStartPos src/Dodge/Data/TractorBeam.hs 15;" f _tbStartPos src/Dodge/Data/TractorBeam.hs 15;" f
_tbTime src/Dodge/Data/TractorBeam.hs 17;" f _tbTime src/Dodge/Data/TractorBeam.hs 17;" f
_tbVel src/Dodge/Data/TractorBeam.hs 16;" f _tbVel src/Dodge/Data/TractorBeam.hs 16;" f
_tcAlias src/Dodge/Data/Terminal.hs 114;" f _tcAlias src/Dodge/Data/Terminal.hs 107;" f
_tcEffect src/Dodge/Data/Terminal.hs 116;" f _tcEffect src/Dodge/Data/Terminal.hs 109;" f
_tcHelp src/Dodge/Data/Terminal.hs 115;" f _tcHelp src/Dodge/Data/Terminal.hs 108;" f
_tcString src/Dodge/Data/Terminal.hs 113;" f _tcString src/Dodge/Data/Terminal.hs 106;" f
_termID src/Dodge/Data/HUD.hs 42;" f _termID src/Dodge/Data/HUD.hs 42;" f
_terminals src/Dodge/Data/LWorld.hs 128;" f _terminals src/Dodge/Data/LWorld.hs 128;" f
_teslaArcs src/Dodge/Data/LWorld.hs 116;" f _teslaArcs src/Dodge/Data/LWorld.hs 116;" f
_testFloat src/Dodge/Data/World.hs 43;" f _testFloat src/Dodge/Data/World.hs 43;" f
_textInput src/Dodge/Data/Input.hs 49;" f _textInput src/Dodge/Data/Input.hs 49;" f
_textureObject src/Shader/Data.hs 95;" f _textureObject src/Shader/Data.hs 95;" f
_tiSel src/Dodge/Data/Terminal.hs 22;" f _tiSel src/Dodge/Data/Terminal.hs 23;" f
_tiText src/Dodge/Data/Terminal.hs 21;" f _tiText src/Dodge/Data/Terminal.hs 16;" f
_tileArrayZ src/Data/Tile.hs 24;" f _tileArrayZ src/Data/Tile.hs 24;" f
_tilePoly src/Data/Tile.hs 17;" f _tilePoly src/Data/Tile.hs 17;" f
_tileTangentPos src/Data/Tile.hs 23;" f _tileTangentPos src/Data/Tile.hs 23;" f
@@ -2445,30 +2442,27 @@ _tileZero src/Data/Tile.hs 19;" f
_tiles src/Data/Tile.hs 14;" f _tiles src/Data/Tile.hs 14;" f
_timeFlow src/Dodge/Data/World.hs 38;" f _timeFlow src/Dodge/Data/World.hs 38;" f
_timeFlowCharge src/Dodge/Data/World.hs 78;" f _timeFlowCharge src/Dodge/Data/World.hs 78;" f
_tlEffect src/Dodge/Data/Terminal.hs 78;" f _tlEffect src/Dodge/Data/Terminal.hs 71;" f
_tlPause src/Dodge/Data/Terminal.hs 69;" f _tlPause src/Dodge/Data/Terminal.hs 62;" f
_tlPause src/Dodge/Data/Terminal.hs 73;" f _tlPause src/Dodge/Data/Terminal.hs 66;" f
_tlPause src/Dodge/Data/Terminal.hs 77;" f _tlPause src/Dodge/Data/Terminal.hs 70;" f
_tlString src/Dodge/Data/Terminal.hs 70;" f _tlString src/Dodge/Data/Terminal.hs 63;" f
_tlTermEffect src/Dodge/Data/Terminal.hs 74;" f _tlTermEffect src/Dodge/Data/Terminal.hs 67;" f
_tmBootProgram src/Dodge/Data/Terminal.hs 34;" f _tmBootLines src/Dodge/Data/Terminal.hs 29;" f
_tmButtonID src/Dodge/Data/Terminal.hs 35;" f _tmButtonID src/Dodge/Data/Terminal.hs 30;" f
_tmCommandHistory src/Dodge/Data/Terminal.hs 47;" f _tmCommandHistory src/Dodge/Data/Terminal.hs 40;" f
_tmDeathEffect src/Dodge/Data/Terminal.hs 45;" f _tmDeathEffect src/Dodge/Data/Terminal.hs 38;" f
_tmDisplayedLines src/Dodge/Data/Terminal.hs 39;" f _tmDisplayedLines src/Dodge/Data/Terminal.hs 33;" f
_tmExternalColor src/Dodge/Data/Terminal.hs 38;" f _tmExternalColor src/Dodge/Data/Terminal.hs 32;" f
_tmFutureLines src/Dodge/Data/Terminal.hs 40;" f _tmFutureLines src/Dodge/Data/Terminal.hs 34;" f
_tmID src/Dodge/Data/Terminal.hs 33;" f _tmID src/Dodge/Data/Terminal.hs 28;" f
_tmInput src/Dodge/Data/Terminal.hs 42;" f _tmInput src/Dodge/Data/Terminal.hs 35;" f
_tmMachineID src/Dodge/Data/Terminal.hs 36;" f _tmMachineID src/Dodge/Data/Terminal.hs 31;" f
_tmName src/Dodge/Data/Terminal.hs 37;" f _tmPartialCommand src/Dodge/Data/Terminal.hs 42;" f
_tmPartialCommand src/Dodge/Data/Terminal.hs 49;" f _tmScrollCommands src/Dodge/Data/Terminal.hs 36;" f
_tmScrollCommands src/Dodge/Data/Terminal.hs 43;" f _tmStatus src/Dodge/Data/Terminal.hs 39;" f
_tmStatus src/Dodge/Data/Terminal.hs 46;" f _tmToggles src/Dodge/Data/Terminal.hs 41;" f
_tmTitle src/Dodge/Data/Terminal.hs 41;" f _tmWriteCommands src/Dodge/Data/Terminal.hs 37;" f
_tmToggles src/Dodge/Data/Terminal.hs 48;" f
_tmType src/Dodge/Data/Terminal.hs 50;" f
_tmWriteCommands src/Dodge/Data/Terminal.hs 44;" f
_toPlaySoundChunkID src/Sound/Data.hs 41;" f _toPlaySoundChunkID src/Sound/Data.hs 41;" f
_toPlaySoundPos src/Sound/Data.hs 38;" f _toPlaySoundPos src/Sound/Data.hs 38;" f
_toPlaySoundStatus src/Sound/Data.hs 37;" f _toPlaySoundStatus src/Sound/Data.hs 37;" f
@@ -2481,8 +2475,8 @@ _tractorBeams src/Dodge/Data/LWorld.hs 123;" f
_trieChildren src/SimpleTrie.hs 11;" f _trieChildren src/SimpleTrie.hs 11;" f
_trieMVal src/SimpleTrie.hs 10;" f _trieMVal src/SimpleTrie.hs 10;" f
_triggers src/Dodge/Data/LWorld.hs 133;" f _triggers src/Dodge/Data/LWorld.hs 133;" f
_ttDeathEffect src/Dodge/Data/Terminal.hs 85;" f _ttDeathEffect src/Dodge/Data/Terminal.hs 78;" f
_ttTriggerID src/Dodge/Data/Terminal.hs 84;" f _ttTriggerID src/Dodge/Data/Terminal.hs 77;" f
_tuDir src/Dodge/Data/Machine.hs 61;" f _tuDir src/Dodge/Data/Machine.hs 61;" f
_tuFireTime src/Dodge/Data/Machine.hs 60;" f _tuFireTime src/Dodge/Data/Machine.hs 60;" f
_tuTurnSpeed src/Dodge/Data/Machine.hs 59;" f _tuTurnSpeed src/Dodge/Data/Machine.hs 59;" f
@@ -2710,7 +2704,7 @@ arcStepwisePositive src/Geometry.hs 343;" f
arcTest src/Picture/Test.hs 9;" f arcTest src/Picture/Test.hs 9;" f
arcTest' src/Picture/Test.hs 21;" f arcTest' src/Picture/Test.hs 21;" f
argV src/Geometry/Vector.hs 80;" f argV src/Geometry/Vector.hs 80;" f
argumentHelp src/Dodge/Terminal.hs 151;" f argumentHelp src/Dodge/Terminal.hs 144;" f
armourChaseCrit src/Dodge/Creature/ArmourChase.hs 35;" f armourChaseCrit src/Dodge/Creature/ArmourChase.hs 35;" f
armouredChasers src/Dodge/Room/Boss.hs 63;" f armouredChasers src/Dodge/Room/Boss.hs 63;" f
armouredCorridor src/Dodge/Room/RoadBlock.hs 20;" f armouredCorridor src/Dodge/Room/RoadBlock.hs 20;" f
@@ -2994,9 +2988,9 @@ combineList src/Dodge/Combine.hs 20;" f
combineRooms src/Dodge/Room/Procedural.hs 152;" f combineRooms src/Dodge/Room/Procedural.hs 152;" f
combineS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 480;" f combineS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 480;" f
combineTree src/Dodge/Tree/Compose.hs 66;" f combineTree src/Dodge/Tree/Compose.hs 66;" f
commandColor src/Dodge/Terminal.hs 132;" f commandColor src/Dodge/Terminal.hs 125;" f
commandFutureLines src/Dodge/Terminal.hs 256;" f commandFutureLines src/Dodge/Terminal.hs 249;" f
commandsCommand src/Dodge/Terminal.hs 93;" f commandsCommand src/Dodge/Terminal.hs 92;" f
commonPrefix src/Dodge/Debug/Terminal.hs 146;" f commonPrefix src/Dodge/Debug/Terminal.hs 146;" f
comp src/Quaternion.hs 65;" f comp src/Quaternion.hs 65;" f
compactDraw src/Dodge/LevelGen.hs 91;" f compactDraw src/Dodge/LevelGen.hs 91;" f
@@ -3010,7 +3004,7 @@ conEffects src/Dodge/Concurrent.hs 12;" f
conLDTToConDT src/Dodge/DoubleTree.hs 22;" f conLDTToConDT src/Dodge/DoubleTree.hs 22;" f
concurrentIS src/Dodge/Update/Input/InGame.hs 290;" f concurrentIS src/Dodge/Update/Input/InGame.hs 290;" f
connectItemS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 722;" f connectItemS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 722;" f
connectionBlurb src/Dodge/Terminal.hs 102;" f connectionBlurb src/Dodge/Terminal.hs 101;" f
connectionBlurbLines src/Dodge/Terminal.hs 47;" f connectionBlurbLines src/Dodge/Terminal.hs 47;" f
constructEdges src/Polyhedra.hs 34;" f constructEdges src/Polyhedra.hs 34;" f
constructEdgesList src/Polyhedra.hs 43;" f constructEdgesList src/Polyhedra.hs 43;" f
@@ -3136,7 +3130,7 @@ dShadCol src/Dodge/Render/List.hs 215;" f
damMatSideEffect src/Dodge/Material/Damage.hs 13;" f damMatSideEffect src/Dodge/Material/Damage.hs 13;" f
damThingHitWith src/Dodge/Damage.hs 72;" f damThingHitWith src/Dodge/Damage.hs 72;" f
damToExpBarrel src/Dodge/Barreloid.hs 49;" f damToExpBarrel src/Dodge/Barreloid.hs 49;" f
damageCodeCommand src/Dodge/Terminal.hs 232;" f damageCodeCommand src/Dodge/Terminal.hs 225;" f
damageCrWl src/Dodge/Damage.hs 29;" f damageCrWl src/Dodge/Damage.hs 29;" f
damageCrWlID src/Dodge/Damage.hs 23;" f damageCrWlID src/Dodge/Damage.hs 23;" f
damageDirection src/Dodge/Damage.hs 35;" f damageDirection src/Dodge/Damage.hs 35;" f
@@ -3177,7 +3171,7 @@ debugMenuOptions src/Dodge/Menu.hs 122;" f
debugOn src/Dodge/Data/Config.hs 151;" f debugOn src/Dodge/Data/Config.hs 151;" f
debugSelectCreatureList src/Dodge/Debug.hs 86;" f debugSelectCreatureList src/Dodge/Debug.hs 86;" f
debugSelectCreatureMessage src/Dodge/Debug.hs 77;" f debugSelectCreatureMessage src/Dodge/Debug.hs 77;" f
decodedtmap src/Dodge/Terminal.hs 205;" f decodedtmap src/Dodge/Terminal.hs 198;" f
decomposeSelfTree src/Dodge/Tree/Compose.hs 60;" f decomposeSelfTree src/Dodge/Tree/Compose.hs 60;" f
decomposeTree src/Dodge/Tree/Compose.hs 57;" f decomposeTree src/Dodge/Tree/Compose.hs 57;" f
decoratedBlock src/Dodge/Placement/Instance/Block.hs 10;" f decoratedBlock src/Dodge/Placement/Instance/Block.hs 10;" f
@@ -3237,7 +3231,7 @@ defaultRoom src/Dodge/Default/Room.hs 9;" f
defaultSensorWall src/Dodge/Default/Wall.hs 65;" f defaultSensorWall src/Dodge/Default/Wall.hs 65;" f
defaultSwitchWall src/Dodge/Default/Door.hs 22;" f defaultSwitchWall src/Dodge/Default/Door.hs 22;" f
defaultTerminal src/Dodge/Default/Terminal.hs 9;" f defaultTerminal src/Dodge/Default/Terminal.hs 9;" f
defaultTerminalInput src/Dodge/Default/Terminal.hs 32;" f defaultTerminalInput src/Dodge/Default/Terminal.hs 29;" f
defaultVision src/Dodge/Default/Creature.hs 85;" f defaultVision src/Dodge/Default/Creature.hs 85;" f
defaultWall src/Dodge/Default/Wall.hs 17;" f defaultWall src/Dodge/Default/Wall.hs 17;" f
defaultWindow src/Dodge/Default/Wall.hs 84;" f defaultWindow src/Dodge/Default/Wall.hs 84;" f
@@ -3278,7 +3272,7 @@ dim src/Color.hs 112;" f
dirtColor src/Dodge/Default/Wall.hs 81;" f dirtColor src/Dodge/Default/Wall.hs 81;" f
dirtPoly src/Dodge/Room/RoadBlock.hs 74;" f dirtPoly src/Dodge/Room/RoadBlock.hs 74;" f
disconnectItemS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 650;" f disconnectItemS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 650;" f
disconnectTerminal src/Dodge/Terminal.hs 217;" f disconnectTerminal src/Dodge/Terminal.hs 210;" f
displayConfig src/Dodge/Menu.hs 213;" f displayConfig src/Dodge/Menu.hs 213;" f
displayControls src/Dodge/Menu.hs 223;" f displayControls src/Dodge/Menu.hs 223;" f
displayFrameTicks src/Dodge/Render/Picture.hs 45;" f displayFrameTicks src/Dodge/Render/Picture.hs 45;" f
@@ -3362,15 +3356,14 @@ doScopeZoom src/Dodge/Update/Scroll.hs 84;" f
doSectionSize src/Dodge/DisplayInventory.hs 217;" f doSectionSize src/Dodge/DisplayInventory.hs 217;" f
doSideEffects appDodge/Main.hs 120;" f doSideEffects appDodge/Main.hs 120;" f
doStrategyActions src/Dodge/Creature/ReaderUpdate.hs 166;" f doStrategyActions src/Dodge/Creature/ReaderUpdate.hs 166;" f
doTerminalBootProgram src/Dodge/WorldEffect.hs 94;" f doTerminalCommandEffect src/Dodge/Terminal.hs 128;" f
doTerminalCommandEffect src/Dodge/Terminal.hs 135;" f
doTestDrawing src/Dodge/Render.hs 41;" f doTestDrawing src/Dodge/Render.hs 41;" f
doTextInputOver src/Dodge/Update/Input/Text.hs 15;" f doTextInputOver src/Dodge/Update/Input/Text.hs 15;" f
doTextInputOverUniverse src/Dodge/Update/Input/Text.hs 12;" f doTextInputOverUniverse src/Dodge/Update/Input/Text.hs 12;" f
doThrust src/Dodge/Projectile/Update.hs 183;" f doThrust src/Dodge/Projectile/Update.hs 183;" f
doTimeScroll src/Dodge/Update.hs 209;" f doTimeScroll src/Dodge/Update.hs 209;" f
doTmTm src/Dodge/TmTm.hs 6;" f doTmTm src/Dodge/TmTm.hs 6;" f
doTmWdWd src/Dodge/WorldEffect.hs 99;" f doTmWdWd src/Dodge/WorldEffect.hs 94;" f
doWallRotate src/Dodge/Update/Camera.hs 213;" f doWallRotate src/Dodge/Update/Camera.hs 213;" f
doWdBl src/Dodge/WorldBool.hs 10;" f doWdBl src/Dodge/WorldBool.hs 10;" f
doWdCrBl src/Dodge/CreatureEffect.hs 37;" f doWdCrBl src/Dodge/CreatureEffect.hs 37;" f
@@ -3589,7 +3582,7 @@ errorNormalizeV src/Geometry.hs 55;" f
errorPointInPolygon src/Geometry.hs 47;" f errorPointInPolygon src/Geometry.hs 47;" f
evaluateRandPS src/Dodge/Placement/PlaceSpot.hs 150;" f evaluateRandPS src/Dodge/Placement/PlaceSpot.hs 150;" f
evenOddSplit src/Dodge/Base.hs 160;" f evenOddSplit src/Dodge/Base.hs 160;" f
exitTerminalSubInv src/Dodge/Terminal.hs 225;" f exitTerminalSubInv src/Dodge/Terminal.hs 218;" f
expandLine src/Dodge/Picture.hs 30;" f expandLine src/Dodge/Picture.hs 30;" f
expandPolyBy src/Dodge/LevelGen/StaticWalls.hs 91;" f expandPolyBy src/Dodge/LevelGen/StaticWalls.hs 91;" f
expandPolyByFixed src/Dodge/LevelGen/StaticWalls.hs 97;" f expandPolyByFixed src/Dodge/LevelGen/StaticWalls.hs 97;" f
@@ -3727,10 +3720,10 @@ getAvailableListLines src/Dodge/SelectionList.hs 10;" f
getBulHitDams src/Dodge/Bullet.hs 169;" f getBulHitDams src/Dodge/Bullet.hs 169;" f
getBulletType src/Dodge/HeldUse.hs 943;" f getBulletType src/Dodge/HeldUse.hs 943;" f
getCloseObj src/Dodge/Update/Input/InGame.hs 515;" f getCloseObj src/Dodge/Update/Input/InGame.hs 515;" f
getCommands src/Dodge/Terminal.hs 117;" f getCommands src/Dodge/Terminal.hs 110;" f
getCommandsHelp src/Dodge/Terminal.hs 75;" f getCommandsHelp src/Dodge/Terminal.hs 74;" f
getCrMoveSpeed src/Dodge/Creature/Statistics.hs 45;" f getCrMoveSpeed src/Dodge/Creature/Statistics.hs 45;" f
getDamageCoding src/Dodge/Terminal.hs 177;" f getDamageCoding src/Dodge/Terminal.hs 170;" f
getDistortions src/Dodge/Render.hs 435;" f getDistortions src/Dodge/Render.hs 435;" f
getEquipmentAllocation src/Dodge/Inventory/RBList.hs 47;" f getEquipmentAllocation src/Dodge/Inventory/RBList.hs 47;" f
getGrenadeHitEffect src/Dodge/HeldUse.hs 1310;" f getGrenadeHitEffect src/Dodge/HeldUse.hs 1310;" f
@@ -3740,15 +3733,15 @@ getLaserColor src/Dodge/HeldUse.hs 706;" f
getLaserDamage src/Dodge/HeldUse.hs 703;" f getLaserDamage src/Dodge/HeldUse.hs 703;" f
getLaserPhaseV src/Dodge/HeldUse.hs 700;" f getLaserPhaseV src/Dodge/HeldUse.hs 700;" f
getLinksOfType src/Dodge/RoomLink.hs 39;" f getLinksOfType src/Dodge/RoomLink.hs 39;" f
getMaxLinesTM src/Dodge/Terminal/Type.hs 11;" f getMaxLinesTM src/Dodge/Terminal/Type.hs 9;" f
getMenuMouseContext src/Dodge/Update.hs 407;" f getMenuMouseContext src/Dodge/Update.hs 407;" f
getNodePos src/Dodge/Path.hs 31;" f getNodePos src/Dodge/Path.hs 31;" f
getPJStabiliser src/Dodge/HeldUse.hs 1297;" f getPJStabiliser src/Dodge/HeldUse.hs 1297;" f
getPretty src/AesonHelp.hs 8;" f getPretty src/AesonHelp.hs 8;" f
getPromptTM src/Dodge/Terminal/Type.hs 8;" f getPromptTM src/Dodge/Terminal/Type.hs 6;" f
getRootItemBounds src/Dodge/Render/HUD.hs 95;" f getRootItemBounds src/Dodge/Render/HUD.hs 95;" f
getSelectedCloseObj src/Dodge/SelectedClose.hs 14;" f getSelectedCloseObj src/Dodge/SelectedClose.hs 14;" f
getSensor src/Dodge/Terminal.hs 189;" f getSensor src/Dodge/Terminal.hs 182;" f
getSmoothScrollValue src/Dodge/SmoothScroll.hs 21;" f getSmoothScrollValue src/Dodge/SmoothScroll.hs 21;" f
getSplitString src/Dodge/Debug/Terminal.hs 126;" f getSplitString src/Dodge/Debug/Terminal.hs 126;" f
getTiles src/Dodge/Layout.hs 208;" f getTiles src/Dodge/Layout.hs 208;" f
@@ -3848,7 +3841,7 @@ heldItemWeight src/Dodge/Creature/Statistics.hs 72;" f
heldPositionInfo src/Dodge/Item/Info.hs 241;" f heldPositionInfo src/Dodge/Item/Info.hs 241;" f
heldTorqueAmount src/Dodge/HeldUse.hs 584;" f heldTorqueAmount src/Dodge/HeldUse.hs 584;" f
heldTriggerType src/Dodge/BaseTriggerType.hs 27;" f heldTriggerType src/Dodge/BaseTriggerType.hs 27;" f
helpCommand src/Dodge/Terminal.hs 66;" f helpCommand src/Dodge/Terminal.hs 65;" f
helpPoly3D src/Polyhedra.hs 125;" f helpPoly3D src/Polyhedra.hs 125;" f
heron src/Geometry.hs 221;" f heron src/Geometry.hs 221;" f
hiToFloat src/Dodge/Room/Modify/Girder.hs 171;" f hiToFloat src/Dodge/Room/Modify/Girder.hs 171;" f
@@ -3943,7 +3936,7 @@ invDP src/Dodge/ListDisplayParams.hs 30;" f
invDT src/Dodge/Item/Grammar.hs 215;" f invDT src/Dodge/Item/Grammar.hs 215;" f
invDT' src/Dodge/Item/Grammar.hs 220;" f invDT' src/Dodge/Item/Grammar.hs 220;" f
invDimColor src/Dodge/DisplayInventory.hs 192;" f invDimColor src/Dodge/DisplayInventory.hs 192;" f
invHead src/Dodge/Render/HUD.hs 404;" f invHead src/Dodge/Render/HUD.hs 405;" f
invIMDT src/Dodge/Item/Grammar.hs 248;" f invIMDT src/Dodge/Item/Grammar.hs 248;" f
invIndents src/Dodge/Item/Grammar.hs 255;" f invIndents src/Dodge/Item/Grammar.hs 255;" f
invItemEffs src/Dodge/Creature/State.hs 61;" f invItemEffs src/Dodge/Creature/State.hs 61;" f
@@ -4125,7 +4118,7 @@ listSelectionColorPicture src/Dodge/DisplayInventory.hs 308;" f
litCorridor90 src/Dodge/Room/RoadBlock.hs 26;" f litCorridor90 src/Dodge/Room/RoadBlock.hs 26;" f
lmt src/MatrixHelper.hs 43;" f lmt src/MatrixHelper.hs 43;" f
lnkBothAnd src/Dodge/Room/Procedural.hs 121;" f lnkBothAnd src/Dodge/Room/Procedural.hs 121;" f
lnkMidPosInvSelsCol src/Dodge/Render/HUD.hs 393;" f lnkMidPosInvSelsCol src/Dodge/Render/HUD.hs 394;" f
lnkPosDir src/Dodge/RoomLink.hs 97;" f lnkPosDir src/Dodge/RoomLink.hs 97;" f
loadDodgeConfig src/Dodge/Config/Load.hs 9;" f loadDodgeConfig src/Dodge/Config/Load.hs 9;" f
loadMusic src/Dodge/SoundLogic/LoadSound.hs 30;" f loadMusic src/Dodge/SoundLogic/LoadSound.hs 30;" f
@@ -4198,8 +4191,8 @@ makeBullet src/Dodge/HeldUse.hs 1021;" f
makeButton src/Dodge/LevelGen/Switch.hs 16;" f makeButton src/Dodge/LevelGen/Switch.hs 16;" f
makeByteStringShaderUsingVAO src/Shader/Compile.hs 128;" f makeByteStringShaderUsingVAO src/Shader/Compile.hs 128;" f
makeCloudAt src/Dodge/WorldEvent/Cloud.hs 7;" f makeCloudAt src/Dodge/WorldEvent/Cloud.hs 7;" f
makeColorTermLine src/Dodge/Terminal.hs 129;" f makeColorTermLine src/Dodge/Terminal.hs 122;" f
makeColorTermPara src/Dodge/Terminal.hs 126;" f makeColorTermPara src/Dodge/Terminal.hs 119;" f
makeCorpse src/Dodge/Corpse/Make.hs 13;" f makeCorpse src/Dodge/Corpse/Make.hs 13;" f
makeDebris src/Dodge/Block/Debris.hs 45;" f makeDebris src/Dodge/Block/Debris.hs 45;" f
makeDebrisDirected src/Dodge/Block/Debris.hs 48;" f makeDebrisDirected src/Dodge/Block/Debris.hs 48;" f
@@ -4235,8 +4228,8 @@ makeSourcedShader src/Shader/Compile.hs 167;" f
makeSpark src/Dodge/Spark.hs 45;" f makeSpark src/Dodge/Spark.hs 45;" f
makeSubmenuOption src/Dodge/Menu/OptionType.hs 19;" f makeSubmenuOption src/Dodge/Menu/OptionType.hs 19;" f
makeSwitch src/Dodge/LevelGen/Switch.hs 38;" f makeSwitch src/Dodge/LevelGen/Switch.hs 38;" f
makeTermLine src/Dodge/Terminal.hs 120;" f makeTermLine src/Dodge/Terminal.hs 113;" f
makeTermPara src/Dodge/Terminal.hs 123;" f makeTermPara src/Dodge/Terminal.hs 116;" f
makeTeslaArc src/Dodge/Tesla.hs 29;" f makeTeslaArc src/Dodge/Tesla.hs 29;" f
makeTeslaExplosionAt src/Dodge/WorldEvent/Explosion.hs 40;" f makeTeslaExplosionAt src/Dodge/WorldEvent/Explosion.hs 40;" f
makeTileFromPoly src/Tile.hs 34;" f makeTileFromPoly src/Tile.hs 34;" f
@@ -4717,7 +4710,7 @@ qToV2 src/Quaternion.hs 56;" f
qToV3 src/Quaternion.hs 53;" f qToV3 src/Quaternion.hs 53;" f
quarterRoomSquare src/Dodge/Room/Procedural.hs 213;" f quarterRoomSquare src/Dodge/Room/Procedural.hs 213;" f
quarterRoomTri src/Dodge/Room/Procedural.hs 177;" f quarterRoomTri src/Dodge/Room/Procedural.hs 177;" f
quitCommand src/Dodge/Terminal.hs 57;" f quitCommand src/Dodge/Terminal.hs 56;" f
qz src/Quaternion.hs 71;" f qz src/Quaternion.hs 71;" f
rLauncher src/Dodge/Item/Held/Launcher.hs 14;" f rLauncher src/Dodge/Item/Held/Launcher.hs 14;" f
rLauncherX src/Dodge/Item/Held/Launcher.hs 30;" f rLauncherX src/Dodge/Item/Held/Launcher.hs 30;" f
@@ -4825,8 +4818,8 @@ retreatFireLauncher src/Dodge/Humanoid.hs 270;" f
retreatPointForFrom src/Dodge/Creature/Impulse/Flee.hs 7;" f retreatPointForFrom src/Dodge/Creature/Impulse/Flee.hs 7;" f
reversePair src/Dodge/LevelGen.hs 82;" f reversePair src/Dodge/LevelGen.hs 82;" f
rewinder src/Dodge/Item/Held/Utility.hs 36;" f rewinder src/Dodge/Item/Held/Utility.hs 36;" f
rezBox src/Dodge/Room/RezBox.hs 23;" f rezBox src/Dodge/Room/RezBox.hs 24;" f
rezBox' src/Dodge/Room/RezBox.hs 31;" f rezBox' src/Dodge/Room/RezBox.hs 35;" f
rezBoxStart src/Dodge/Room/Start.hs 77;" f rezBoxStart src/Dodge/Room/Start.hs 77;" f
rezBoxes src/Dodge/Room/RezBox.hs 107;" f rezBoxes src/Dodge/Room/RezBox.hs 107;" f
rezBoxesWp src/Dodge/Room/RezBox.hs 45;" f rezBoxesWp src/Dodge/Room/RezBox.hs 45;" f
@@ -4905,7 +4898,7 @@ rprShift src/Dodge/PlacementSpot.hs 102;" f
rsObjectColor src/Dodge/RadarSweep/Draw.hs 34;" f rsObjectColor src/Dodge/RadarSweep/Draw.hs 34;" f
runPastStart src/Dodge/Room/Start.hs 71;" f runPastStart src/Dodge/Room/Start.hs 71;" f
runStateWorld src/Dodge/Randify.hs 17;" f runStateWorld src/Dodge/Randify.hs 17;" f
runTerminalString src/Dodge/Terminal.hs 289;" f runTerminalString src/Dodge/Terminal.hs 282;" f
sPS src/Dodge/LevelGen/PlacementHelper.hs 27;" f sPS src/Dodge/LevelGen/PlacementHelper.hs 27;" f
safeAngleVV src/Geometry/Vector.hs 68;" f safeAngleVV src/Geometry/Vector.hs 68;" f
safeArgV src/Geometry/Vector.hs 87;" f safeArgV src/Geometry/Vector.hs 87;" f
@@ -4965,11 +4958,11 @@ sectionsSizes src/Dodge/DisplayInventory.hs 207;" f
seedStartMenu src/Dodge/Menu.hs 82;" f seedStartMenu src/Dodge/Menu.hs 82;" f
seedStartOptions src/Dodge/Menu.hs 85;" f seedStartOptions src/Dodge/Menu.hs 85;" f
segOnCirc src/Geometry.hs 114;" f segOnCirc src/Geometry.hs 114;" f
selNumPos src/Dodge/Render/HUD.hs 453;" f selNumPos src/Dodge/Render/HUD.hs 454;" f
selNumPosCardinal src/Dodge/Render/HUD.hs 476;" f selNumPosCardinal src/Dodge/Render/HUD.hs 477;" f
selSecDrawCursor src/Dodge/Render/List.hs 126;" f selSecDrawCursor src/Dodge/Render/List.hs 126;" f
selSecDrawCursorAt src/Dodge/Render/List.hs 104;" f selSecDrawCursorAt src/Dodge/Render/List.hs 104;" f
selSecSelCol src/Dodge/Render/HUD.hs 507;" f selSecSelCol src/Dodge/Render/HUD.hs 508;" f
selSecSelSize src/Dodge/SelectionSections.hs 180;" f selSecSelSize src/Dodge/SelectionSections.hs 180;" f
selSecYint src/Dodge/SelectionSections.hs 189;" f selSecYint src/Dodge/SelectionSections.hs 189;" f
selectCreatureDebugItem src/Dodge/Debug.hs 55;" f selectCreatureDebugItem src/Dodge/Debug.hs 55;" f
@@ -4977,8 +4970,8 @@ selectedItemScroll src/Dodge/Update/Scroll.hs 46;" f
sensAboveDoor src/Dodge/Room/SensorDoor.hs 63;" f sensAboveDoor src/Dodge/Room/SensorDoor.hs 63;" f
sensInsideDoor src/Dodge/Room/SensorDoor.hs 69;" f sensInsideDoor src/Dodge/Room/SensorDoor.hs 69;" f
senseDamage src/Dodge/Machine/Update.hs 160;" f senseDamage src/Dodge/Machine/Update.hs 160;" f
sensorCommand src/Dodge/Terminal.hs 208;" f sensorCommand src/Dodge/Terminal.hs 201;" f
sensorInfoMap src/Dodge/Terminal.hs 180;" f sensorInfoMap src/Dodge/Terminal.hs 173;" f
sensorRoom src/Dodge/Room/SensorDoor.hs 27;" f sensorRoom src/Dodge/Room/SensorDoor.hs 27;" f
sensorRoomRunPast src/Dodge/Room/SensorDoor.hs 48;" f sensorRoomRunPast src/Dodge/Room/SensorDoor.hs 48;" f
sensorSPic src/Dodge/Machine/Draw.hs 70;" f sensorSPic src/Dodge/Machine/Draw.hs 70;" f
@@ -5114,7 +5107,7 @@ shuffleRoomPos src/Dodge/Layout.hs 78;" f
shuffleTail src/RandomHelp.hs 59;" f shuffleTail src/RandomHelp.hs 59;" f
sigmoid src/Dodge/Base.hs 151;" f sigmoid src/Dodge/Base.hs 151;" f
simpleCrSprings src/Dodge/Update.hs 892;" f simpleCrSprings src/Dodge/Update.hs 892;" f
simpleTermMessage src/Dodge/Terminal.hs 253;" f simpleTermMessage src/Dodge/Terminal.hs 246;" f
sineRaisePitchOneSecS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 680;" f sineRaisePitchOneSecS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 680;" f
sineRaisePitchTwoSecS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 472;" f sineRaisePitchTwoSecS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 472;" f
singleAmmo src/Dodge/Item/AmmoSlots.hs 62;" f singleAmmo src/Dodge/Item/AmmoSlots.hs 62;" f
@@ -5289,10 +5282,10 @@ telRoomLev src/Dodge/Room/Teleport.hs 14;" f
teleS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 528;" f teleS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 528;" f
termButton src/Dodge/Placement/Instance/Terminal.hs 51;" f termButton src/Dodge/Placement/Instance/Terminal.hs 51;" f
termScreenColor src/Dodge/Terminal/Color.hs 9;" f termScreenColor src/Dodge/Terminal/Color.hs 9;" f
termSoundLine src/Dodge/Terminal.hs 111;" f termSoundLine src/Dodge/Terminal.hs 104;" f
termTextColor src/Dodge/Terminal.hs 114;" f termTextColor src/Dodge/Terminal.hs 107;" f
terminalColor src/Dodge/Placement/Instance/Terminal.hs 61;" f terminalColor src/Dodge/Placement/Instance/Terminal.hs 61;" f
terminalReturnEffect src/Dodge/Terminal.hs 276;" f terminalReturnEffect src/Dodge/Terminal.hs 269;" f
terminalSPic src/Dodge/Machine/Draw.hs 29;" f terminalSPic src/Dodge/Machine/Draw.hs 29;" f
terminalScreenGlow src/Dodge/Machine/Update.hs 35;" f terminalScreenGlow src/Dodge/Machine/Update.hs 35;" f
terminalShape src/Dodge/Machine/Draw.hs 32;" f terminalShape src/Dodge/Machine/Draw.hs 32;" f
@@ -5359,12 +5352,12 @@ toV2 src/Geometry/Data.hs 54;" f
toV3 src/Geometry/Data.hs 57;" f toV3 src/Geometry/Data.hs 57;" f
toV4 src/Geometry/Data.hs 60;" f toV4 src/Geometry/Data.hs 60;" f
toggleCombineInv src/Dodge/DisplayInventory.hs 317;" f toggleCombineInv src/Dodge/DisplayInventory.hs 317;" f
toggleCommand src/Dodge/Terminal.hs 196;" f toggleCommand src/Dodge/Terminal.hs 189;" f
toggleEquipmentAt src/Dodge/Creature/Impulse/UseItem.hs 65;" f toggleEquipmentAt src/Dodge/Creature/Impulse/UseItem.hs 65;" f
toggleExamineInv src/Dodge/Creature/Impulse/UseItem.hs 103;" f toggleExamineInv src/Dodge/Creature/Impulse/UseItem.hs 103;" f
toggleJust src/MaybeHelp.hs 41;" f toggleJust src/MaybeHelp.hs 41;" f
toggleMapperInv src/Dodge/Creature/Impulse/UseItem.hs 108;" f toggleMapperInv src/Dodge/Creature/Impulse/UseItem.hs 108;" f
togglesToEffects src/Dodge/Terminal.hs 248;" f togglesToEffects src/Dodge/Terminal.hs 241;" f
tone440S src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 642;" f tone440S src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 642;" f
tone440raiseS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 664;" f tone440raiseS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 664;" f
tone440sawtoothS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 606;" f tone440sawtoothS src/Dodge/SoundLogic/ExternallyGeneratedSounds.hs 606;" f