module Game.LambdaHack.Client.UI.ContentClientUI
( CCUI(..), emptyCCUI
) where
import Prelude ()
import qualified Data.EnumMap.Strict as EM
import qualified Data.Map.Strict as M
import Game.LambdaHack.Client.UI.Content.Input
import Game.LambdaHack.Client.UI.Content.Screen
data CCUI = CCUI
{ CCUI -> InputContent
coinput :: InputContent
, CCUI -> ScreenContent
coscreen :: ScreenContent
}
emptyCCUI :: CCUI
emptyCCUI :: CCUI
emptyCCUI = $WCCUI :: InputContent -> ScreenContent -> CCUI
CCUI
{ coinput :: InputContent
coinput = Map KM CmdTriple
-> [(KM, CmdTriple)] -> Map HumanCmd [KM] -> InputContent
InputContent Map KM CmdTriple
forall k a. Map k a
M.empty [] Map HumanCmd [KM]
forall k a. Map k a
M.empty
, coscreen :: ScreenContent
coscreen = $WScreenContent :: X
-> X
-> Text
-> [String]
-> [String]
-> EnumMap Char Text
-> ScreenContent
ScreenContent { rwidth :: X
rwidth = 0
, rheight :: X
rheight = 0
, rmainMenuArt :: Text
rmainMenuArt = ""
, rintroScreen :: [String]
rintroScreen = []
, rmoveKeysScreen :: [String]
rmoveKeysScreen = []
, rapplyVerbMap :: EnumMap Char Text
rapplyVerbMap = EnumMap Char Text
forall k a. EnumMap k a
EM.empty
}
}