Safe Haskell	None
Language	Haskell2010

Cinema

Description

Module containing the base for animating scenes in lobbies

Synopsis

data Actor = Actor {
- actorName :: Maybe String
- actorState :: ActorState
}
data ActorKind
- = CreatureKind
- | TileKind
data ActorState = ActorState {
- direction :: Direction
- sprite :: Maybe Sprite
- telling :: Maybe String
- x :: Int
- y :: Int
}
data Direction
- = ToLeft
- | ToRight
data Element
newtype Frame = Frame {
- unFrame :: Map Element Actor
}
type Scene = Program SceneInstruction
data TimedFrame = TimedFrame {
- duration :: Duration
- frame :: Frame
}
(|||) :: Scene () -> Scene () -> Scene ()
creatureSprite :: CreatureID -> Sprite
defaultDirection :: Direction
dress :: Sprite -> Element -> Scene ()
down :: Element -> Scene ()
dot :: Element -> (ActorState -> a) -> Scene a
getActorState :: Element -> Scene ActorState
fork :: Scene () -> Scene ()
forkWithId :: Scene () -> Scene ThreadId
joinThread :: ThreadId -> Scene ()
hide :: Element -> Scene ()
left :: Element -> Scene ()
newActor :: Maybe String -> ActorState -> Scene Element
newActorAt :: String -> Sprite -> Int -> Int -> Scene Element
newActorAt' :: String -> Sprite -> Direction -> Int -> Int -> Scene Element
render :: Scene () -> [TimedFrame]
right :: Element -> Scene ()
setActorState :: Element -> ActorState -> Scene ()
shutup :: Element -> Scene ()
spriteToKind :: Sprite -> ActorKind
tell :: String -> Element -> Scene ()
tileSprite :: Tile -> Sprite
turnAround :: Element -> Scene ()
up :: Element -> Scene ()
during :: Duration -> Scene a -> Scene a
(=:) :: Element -> ActorState -> Scene ()
newHiddenActor :: String -> Scene Element
moveTo :: Int -> Int -> Element -> Scene ()
resetAt :: Sprite -> Int -> Int -> Element -> Scene ()
turnTo :: Direction -> Element -> Scene ()
resetAt' :: Sprite -> Direction -> Int -> Int -> Element -> Scene ()
wait :: Duration -> Scene ()

Documentation

data Actor #

Constructors

Actor
Fields actorName :: Maybe String actorState :: ActorState

Instances

Eq Actor #
Instance details Defined in Cinema Methods (==) :: Actor -> Actor -> Bool # (/=) :: Actor -> Actor -> Bool #
Ord Actor #
Instance details Defined in Cinema Methods compare :: Actor -> Actor -> Ordering # (<) :: Actor -> Actor -> Bool # (<=) :: Actor -> Actor -> Bool # (>) :: Actor -> Actor -> Bool # (>=) :: Actor -> Actor -> Bool # max :: Actor -> Actor -> Actor # min :: Actor -> Actor -> Actor #
Show Actor #
Instance details Defined in Cinema Methods showsPrec :: Int -> Actor -> ShowS # show :: Actor -> String # showList :: [Actor] -> ShowS #
Generic Actor #
Instance details Defined in Cinema Associated Types type Rep Actor :: Type -> Type # Methods from :: Actor -> Rep Actor x # to :: Rep Actor x -> Actor #
type Rep Actor #
Instance details Defined in Cinema type Rep Actor = D1 (MetaData "Actor" "Cinema" "main" False) (C1 (MetaCons "Actor" PrefixI True) (S1 (MetaSel (Just "actorName") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe String)) :*: S1 (MetaSel (Just "actorState") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 ActorState)))

data ActorKind #

Constructors

CreatureKind
TileKind

Instances

Eq ActorKind #
Instance details Defined in Cinema Methods (==) :: ActorKind -> ActorKind -> Bool # (/=) :: ActorKind -> ActorKind -> Bool #
Ord ActorKind #
Instance details Defined in Cinema Methods compare :: ActorKind -> ActorKind -> Ordering # (<) :: ActorKind -> ActorKind -> Bool # (<=) :: ActorKind -> ActorKind -> Bool # (>) :: ActorKind -> ActorKind -> Bool # (>=) :: ActorKind -> ActorKind -> Bool # max :: ActorKind -> ActorKind -> ActorKind # min :: ActorKind -> ActorKind -> ActorKind #
Show ActorKind #
Instance details Defined in Cinema Methods showsPrec :: Int -> ActorKind -> ShowS # show :: ActorKind -> String # showList :: [ActorKind] -> ShowS #

data ActorState #

Constructors

ActorState
Fields direction :: Direction In which direction the sprite is looking at sprite :: Maybe Sprite How to draw this actor telling :: Maybe String Whether the element says something x :: Int 0 means on the left y :: Int 0 means top

Instances

Eq ActorState #
Instance details Defined in Cinema Methods (==) :: ActorState -> ActorState -> Bool # (/=) :: ActorState -> ActorState -> Bool #
Ord ActorState #
Instance details Defined in Cinema Methods compare :: ActorState -> ActorState -> Ordering # (<) :: ActorState -> ActorState -> Bool # (<=) :: ActorState -> ActorState -> Bool # (>) :: ActorState -> ActorState -> Bool # (>=) :: ActorState -> ActorState -> Bool # max :: ActorState -> ActorState -> ActorState # min :: ActorState -> ActorState -> ActorState #
Show ActorState #
Instance details Defined in Cinema Methods showsPrec :: Int -> ActorState -> ShowS # show :: ActorState -> String # showList :: [ActorState] -> ShowS #
Generic ActorState #
Instance details Defined in Cinema Associated Types type Rep ActorState :: Type -> Type # Methods from :: ActorState -> Rep ActorState x # to :: Rep ActorState x -> ActorState #
type Rep ActorState #
Instance details Defined in Cinema type Rep ActorState

data Direction #

Constructors

ToLeft
ToRight

Instances

Eq Direction #
Instance details Defined in Cinema Methods (==) :: Direction -> Direction -> Bool # (/=) :: Direction -> Direction -> Bool #
Ord Direction #
Instance details Defined in Cinema Methods compare :: Direction -> Direction -> Ordering # (<) :: Direction -> Direction -> Bool # (<=) :: Direction -> Direction -> Bool # (>) :: Direction -> Direction -> Bool # (>=) :: Direction -> Direction -> Bool # max :: Direction -> Direction -> Direction # min :: Direction -> Direction -> Direction #
Show Direction #
Instance details Defined in Cinema Methods showsPrec :: Int -> Direction -> ShowS # show :: Direction -> String # showList :: [Direction] -> ShowS #
Generic Direction #
Instance details Defined in Cinema Associated Types type Rep Direction :: Type -> Type # Methods from :: Direction -> Rep Direction x # to :: Rep Direction x -> Direction #
type Rep Direction #
Instance details Defined in Cinema type Rep Direction = D1 (MetaData "Direction" "Cinema" "main" False) (C1 (MetaCons "ToLeft" PrefixI False) (U1 :: Type -> Type) :+: C1 (MetaCons "ToRight" PrefixI False) (U1 :: Type -> Type))

data Element #

Instances

Eq Element #
Instance details Defined in Cinema Methods (==) :: Element -> Element -> Bool # (/=) :: Element -> Element -> Bool #
Ord Element #
Instance details Defined in Cinema Methods compare :: Element -> Element -> Ordering # (<) :: Element -> Element -> Bool # (<=) :: Element -> Element -> Bool # (>) :: Element -> Element -> Bool # (>=) :: Element -> Element -> Bool # max :: Element -> Element -> Element # min :: Element -> Element -> Element #
Show Element #
Instance details Defined in Cinema Methods showsPrec :: Int -> Element -> ShowS # show :: Element -> String # showList :: [Element] -> ShowS #
Generic Element #
Instance details Defined in Cinema Associated Types type Rep Element :: Type -> Type # Methods from :: Element -> Rep Element x # to :: Rep Element x -> Element #
type Rep Element #
Instance details Defined in Cinema type Rep Element = D1 (MetaData "Element" "Cinema" "main" True) (C1 (MetaCons "Element" PrefixI False) (S1 (MetaSel (Nothing :: Maybe Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)))

newtype Frame #

Constructors

Frame
Fields unFrame :: Map Element Actor

Instances

Eq Frame #
Instance details Defined in Cinema Methods (==) :: Frame -> Frame -> Bool # (/=) :: Frame -> Frame -> Bool #
Ord Frame #
Instance details Defined in Cinema Methods compare :: Frame -> Frame -> Ordering # (<) :: Frame -> Frame -> Bool # (<=) :: Frame -> Frame -> Bool # (>) :: Frame -> Frame -> Bool # (>=) :: Frame -> Frame -> Bool # max :: Frame -> Frame -> Frame # min :: Frame -> Frame -> Frame #
Show Frame #
Instance details Defined in Cinema Methods showsPrec :: Int -> Frame -> ShowS # show :: Frame -> String # showList :: [Frame] -> ShowS #
Generic Frame #
Instance details Defined in Cinema Associated Types type Rep Frame :: Type -> Type # Methods from :: Frame -> Rep Frame x # to :: Rep Frame x -> Frame #
type Rep Frame #
Instance details Defined in Cinema type Rep Frame = D1 (MetaData "Frame" "Cinema" "main" True) (C1 (MetaCons "Frame" PrefixI True) (S1 (MetaSel (Just "unFrame") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Map Element Actor))))

type Scene = Program SceneInstruction #

data TimedFrame #

Constructors

TimedFrame
Fields duration :: Duration The duration of a frame, in tenth of seconds frame :: Frame The frame

Instances

Eq TimedFrame #
Instance details Defined in Cinema Methods (==) :: TimedFrame -> TimedFrame -> Bool # (/=) :: TimedFrame -> TimedFrame -> Bool #
Ord TimedFrame #
Instance details Defined in Cinema Methods compare :: TimedFrame -> TimedFrame -> Ordering # (<) :: TimedFrame -> TimedFrame -> Bool # (<=) :: TimedFrame -> TimedFrame -> Bool # (>) :: TimedFrame -> TimedFrame -> Bool # (>=) :: TimedFrame -> TimedFrame -> Bool # max :: TimedFrame -> TimedFrame -> TimedFrame # min :: TimedFrame -> TimedFrame -> TimedFrame #
Show TimedFrame #
Instance details Defined in Cinema Methods showsPrec :: Int -> TimedFrame -> ShowS # show :: TimedFrame -> String # showList :: [TimedFrame] -> ShowS #
Generic TimedFrame #
Instance details Defined in Cinema Associated Types type Rep TimedFrame :: Type -> Type # Methods from :: TimedFrame -> Rep TimedFrame x # to :: Rep TimedFrame x -> TimedFrame #
type Rep TimedFrame #
Instance details Defined in Cinema type Rep TimedFrame