Graphics.Glapple

data MouseButton

Constructors

• Left
• Center
• Right

Instances

• Eq MouseButton
• Ord MouseButton

data KeyState

Constructors

• KeyDown
• KeyUp

Instances

• Eq KeyState
• Ord KeyState

data KeyCode

Constructors

• Keyboard String
• Mouse MouseButton

Instances

• Eq KeyCode
• Ord KeyCode

data Event

Constructors

• KeyEvent { keyCode :: KeyCode, keyState :: KeyState }
• Update { deltaTime :: Number }
• MouseMove { mouseX :: Number, mouseY :: Number }

Instances

• Eq Event
• Ord Event

data GameId s i

Used for input from outside the game.

Constructors

• GameId { inputEmitter :: EmitterId Effect i, renderEmitter :: EmitterId Aff { canvasImageSources :: s -> Maybe CanvasImageSource, context2D :: Context2D } }

tell :: forall s i m. MonadEffect m => GameId s i -> i -> m Unit

Tell input to the game.

renderGame :: forall s i. GameId s i -> Picture s

Draw the game.

null :: forall s i m. MonadEffect m => GameId s i -> m Boolean

Returns True if GameId is empty.

emptyGameId :: forall m s i. Bind m => MonadEffect m => m (GameId s i)

Empty GameId.

newtype GameSpec sprite gameState input

A pure version of GameSpecM.

Constructors

• GameSpec { eventHandler :: Event -> gameState -> gameState, initGameState :: gameState, inputHandler :: input -> gameState -> gameState, render :: { globalTime :: Number, localTime :: Number } -> gameState -> Picture sprite }

mkRenderM :: forall sprite gameState i output. ({ globalTime :: Number, localTime :: Number } -> gameState -> Picture sprite) -> GlappleM sprite gameState i output (Picture sprite)

mkInitGameStateM :: forall f a. Applicative f => a -> f a

mkHandlerM :: forall a sprite gameState i output. (a -> gameState -> gameState) -> a -> GlappleM sprite gameState i output Unit

mkGameSpecM :: forall gameState sprite input output. GameSpec sprite gameState input -> GameSpecM sprite gameState input output

Convert GameSpec to GameSpecM.

newtype GameSpecM s g i o

runGameM to run the game.

Constructors

• GameSpecM { eventHandler :: Event -> GlappleM s g i o Unit, initGameState :: GlappleM s g i o g, inputHandler :: i -> GlappleM s g i o Unit, render :: GlappleM s g i o (Picture s) }

type CanvasSpec = { height :: Number, width :: Number }

defaultRender :: forall m s. Applicative m => m (Picture s)

defaultHandler :: forall m a. Applicative m => a -> m Unit

runGame :: forall sprite gameState input. Ord sprite => Number -> CanvasElement -> CanvasSpec -> Array (SpriteData sprite) -> GameSpec sprite gameState input -> Effect (GameId sprite input)

A pure version of runGame.

runChildGame :: forall s g i o childG childI. GameSpec s childG childI -> GlappleM s g i o (GameId s childI)

A pure version of runChildGame.

runGameWithM_ :: forall s g i o childG childI childO. GameId s childI -> GameSpecM s childG childI childO -> GlappleM s g i o Unit

runGameWithM without outputHandler

runGameWithM :: forall s g i o childG childI childO. GameId s childI -> GameSpecM s childG childI childO -> (childO -> GlappleM s g i o Unit) -> GlappleM s g i o Unit

Add a Game to the GameId.

runGameM_ :: forall s g i o. Ord s => Number -> CanvasElement -> CanvasSpec -> Array (SpriteData s) -> GameSpecM s g i o -> Effect (GameId s i)

runGameM without outputHandler

runGameM :: forall s g i o. Ord s => Number -> CanvasElement -> CanvasSpec -> Array (SpriteData s) -> GameSpecM s g i o -> (o -> Effect Unit) -> Effect (GameId s i)

Making Games at the Top Level.

runChildGameM_ :: forall s g i o childG childI childO. GameSpecM s childG childI childO -> GlappleM s g i o (GameId s childI)

runChildGameM :: forall s g i o childG childI childO. GameSpecM s childG childI childO -> (childO -> GlappleM s g i o Unit) -> GlappleM s g i o (GameId s childI)

Create a new child game within the current game.

newtype GlappleM s g i o a

Instances

• Functor (GlappleM s g i o)
• Apply (GlappleM s g i o)
• Applicative (GlappleM s g i o)
• Bind (GlappleM s g i o)
• Monad (GlappleM s g i o)
• MonadAsk (InternalState s g i o) (GlappleM s g i o)
• MonadEffect (GlappleM s g i o)

raise :: forall s g i o. o -> GlappleM s g i o Unit

Raise output to the parent game.

putGameState :: forall s g i o. g -> GlappleM s g i o Unit

Put game state

modifyGameState :: forall s g i o. (g -> g) -> GlappleM s g i o Unit

Modify function to game state

getMousePosition :: forall s g i o. GlappleM s g i o (Maybe { mouseX :: Number, mouseY :: Number })

Gets the current mouse position. Returns Nothing if the mouse position cannot be obtained because the user has not moved the mouse yet.

getLocalTime :: forall s g i o. GlappleM s g i o Number

Get the time since the current game was started.

getKeyState :: forall s g i o. KeyCode -> GlappleM s g i o Boolean

Gets the current key press state.

getGlobalTime :: forall s g i o. GlappleM s g i o Number

Get the time since the root game was started.

getGameState :: forall s g i o. GlappleM s g i o g

Get current game state.

destroy :: forall s g i o. GlappleM s g i o Unit

Destroy the game.

break :: forall s g i o a. GlappleM s g i o a

Stop the current process.