minilight-0.4.1: A SDL2-based graphics library, batteries-included.

Safe Haskell	None
Language	Haskell2010

Data.Component.MessageEngine

Synopsis

data Config = Config {
- messages :: Vector Text
- static :: Bool
- font :: Config
}
_static :: Lens' Config Bool
_messages :: Lens' Config (Vector Text)
_font :: Lens' Config Config
data MessageEngine = MessageEngine {
- fontData :: Font
- counter :: Int
- page :: Int
- textCounter :: Int
- textTexture :: Figure
- finished :: Bool
- currentMessages :: Vector Text
- config :: Config
}
_textTexture :: Lens' MessageEngine Figure
_textCounter :: Lens' MessageEngine Int
_page :: Lens' MessageEngine Int
_fontData :: Lens' MessageEngine Font
_finished :: Lens' MessageEngine Bool
_currentMessages :: Lens' MessageEngine (Vector Text)
_counter :: Lens' MessageEngine Int
_config :: Lens' MessageEngine Config
data EngineEvent where
- NextPage :: EngineEvent
- SetMessage :: [Text] -> EngineEvent
new :: Config -> MiniLight MessageEngine
wrapSignal :: (HasLightEnv env, HasLoopEnv env, HasComponentEnv env, MonadIO m, MonadMask m) => Lens' c MessageEngine -> (Event -> c -> LightT env m c) -> Event -> c -> LightT env m c

Documentation

data Config Source #

MessageEngine configuration. If static enabled, only the first page will be rendered.

Constructors

Config
Fields messages :: Vector Text paged messages static :: Bool font :: Config

Instances

FromJSON Config Source #
Instance details Defined in Data.Component.MessageEngine Methods parseJSON :: Value -> Parser Config # parseJSONList :: Value -> Parser [Config] #

_static :: Lens' Config Bool Source #

_messages :: Lens' Config (Vector Text) Source #

_font :: Lens' Config Config Source #

data MessageEngine Source #

Constructors

MessageEngine
Fields fontData :: Font counter :: Int page :: Int textCounter :: Int textTexture :: Figure finished :: Bool currentMessages :: Vector Text config :: Config

Instances

ComponentUnit MessageEngine Source #

Instance details

Defined in Data.Component.MessageEngine

Methods

update :: (HasLightEnv env, HasLoopEnv env, HasComponentEnv env, MonadIO m, MonadMask m) => MessageEngine -> LightT env m MessageEngine Source #

figures :: (HasLightEnv env, MonadIO m, MonadMask m) => MessageEngine -> LightT env m [Figure] Source #

draw :: (HasLightEnv env, MonadIO m, MonadMask m) => MessageEngine -> LightT env m () Source #

onSignal :: (HasLightEnv env, HasLoopEnv env, HasComponentEnv env, MonadIO m, MonadMask m) => Event -> MessageEngine -> LightT env m MessageEngine Source #

useCache :: MessageEngine -> MessageEngine -> Bool Source #

beforeClearCache :: (HasLightEnv env, MonadIO m, MonadMask m) => MessageEngine -> [Figure] -> LightT env m () Source #

_textTexture :: Lens' MessageEngine Figure Source #

_textCounter :: Lens' MessageEngine Int Source #

_page :: Lens' MessageEngine Int Source #

_fontData :: Lens' MessageEngine Font Source #

_finished :: Lens' MessageEngine Bool Source #

_currentMessages :: Lens' MessageEngine (Vector Text) Source #

_counter :: Lens' MessageEngine Int Source #

_config :: Lens' MessageEngine Config Source #

data EngineEvent where Source #

Constructors

NextPage :: EngineEvent
SetMessage
Fields :: [Text] pages messages -> EngineEvent

Instances

EventType EngineEvent Source #
Instance details Defined in Data.Component.MessageEngine Methods getEventType :: EngineEvent -> Text Source # getEventProperties :: EngineEvent -> Object Source #

new :: Config -> MiniLight MessageEngine Source #

wrapSignal :: (HasLightEnv env, HasLoopEnv env, HasComponentEnv env, MonadIO m, MonadMask m) => Lens' c MessageEngine -> (Event -> c -> LightT env m c) -> Event -> c -> LightT env m c Source #