FWGL.Graphics.Draw

Documentation

data Draw a

A state monad on top of GL.

Instances

Monad Draw

Functor Draw

Applicative Draw

MonadIO Draw

data DrawState

The state of the Draw monad.

runDraw :: Draw a -> DrawState -> GL (a, DrawState)

Run a Draw action.

execDraw

Arguments

:: Draw a

Action.

-> DrawState

State.

-> GL DrawState

Execute a Draw action.

drawInit

Arguments

:: (BackendIO, GLES)

=> Int

Viewport width

-> Int

Viewport height

-> Canvas

Canvas

-> GL DrawState

Create a DrawState.

drawBegin :: GLES => Draw ()

Clear the buffers.

drawLayer :: (GLES, BackendIO) => Layer -> Draw ()

Draw a Layer.

drawGroup :: (GLES, BackendIO) => Group gs is -> Draw ()

Draw a Group.

drawObject :: (GLES, BackendIO) => Object gs is -> Draw ()

Draw an Object.

drawEnd :: GLES => Draw ()

removeGeometry :: (GLES, BackendIO) => Geometry is -> Draw Bool

Delete a Geometry from the GPU.

removeTexture :: BackendIO => Texture -> Draw Bool

Delete a Texture from the GPU.

removeProgram :: (GLES, BackendIO) => Program gs is -> Draw Bool

Delete a Program from the GPU.

textureUniform :: (GLES, BackendIO) => Texture -> Draw ActiveTexture

This helps you set the uniforms of type Sampler2D.

textureSize :: (GLES, BackendIO, Num a) => Texture -> Draw (a, a)

Get the dimensions of a Texture.

setProgram :: (GLES, BackendIO) => Program g i -> Draw ()

Set the program.

resizeViewport

Arguments

:: GLES

=> Int

Width.

-> Int

Height.

-> Draw ()

Viewport.

gl :: GL a -> Draw a

Perform a GL action in the Draw monad.

renderLayer :: BackendIO => RenderLayer a -> Draw (a, [Texture])

Realize a RenderLayer. It returns the list of allocated Textures so that you can free them if you want.

layerToTexture

Arguments

:: (GLES, BackendIO, Integral a)

=> [LayerType]

Textures contents.

-> a

Width

-> a

Height

-> Layer

Layer to draw

-> Either b ([Color] -> Draw b, Int, Int, Int, Int)

Color inspecting function, start x, start y, width, height

-> Either c ([Word8] -> Draw c, Int, Int, Int, Int)

Depth inspecting, function, etc.

-> Draw ([Texture], b, c)

Draw a Layer on some textures.

drawState :: Draw DrawState

Get the DrawState.