Wumpus.Basic.Graphic.Query

Querying the Drawing Context.

Documentation

textAttr :: DrawingCtxM m => m (RGBi, FontAttr)

withTextAttr :: DrawingCtxM m => (RGBi -> FontAttr -> a) -> m a

Because textAttr is so commonly used here is a functional version that avoids tupling.

strokeAttr :: DrawingCtxM m => m (RGBi, StrokeAttr)

withStrokeAttr :: DrawingCtxM m => (RGBi -> StrokeAttr -> a) -> m a

fillAttr :: DrawingCtxM m => m RGBi

withFillAttr :: DrawingCtxM m => (RGBi -> a) -> m a

borderedAttr :: DrawingCtxM m => m (RGBi, StrokeAttr, RGBi)

withBorderedAttr :: DrawingCtxM m => (RGBi -> StrokeAttr -> RGBi -> a) -> m a

lineWidth :: DrawingCtxM m => m Double

fontSize :: DrawingCtxM m => m Int

markHeight :: (DrawingCtxM m, FromPtSize u) => m u

The mark height is the height of a lowercase letter in the current font.

Arrowheads, dots etc. should generally be drawn at the mark height.

markHalfHeight :: (DrawingCtxM m, Fractional u, FromPtSize u) => m u

baselineSpacing :: (DrawingCtxM m, Fractional u) => m u

Vertical distance between baselines of consecutive text lines.

monoCharWidth :: (DrawingCtxM m, FromPtSize u) => m u

monoSpacerWidth :: (DrawingCtxM m, FromPtSize u) => m u

monoTextWidth :: (DrawingCtxM m, FromPtSize u) => Int -> m u

monoTextLength :: (DrawingCtxM m, FromPtSize u) => String -> m u

monoTextHeight :: (DrawingCtxM m, FromPtSize u) => m u

monoNumeralHeight :: (DrawingCtxM m, FromPtSize u) => m u

monoLowerxHeight :: (DrawingCtxM m, FromPtSize u) => m u

Height of a lower case 'x' in Courier.

'x' has no ascenders or descenders.

monoDescenderDepth :: (DrawingCtxM m, FromPtSize u) => m u

monoTextDimensions :: (DrawingCtxM m, Num u, Ord u, FromPtSize u) => String -> m (u, u)

Query the dimensions of the text using the current font size but using metrics derived from Courier.

Note - the width will generally be a over-estimate for non-monospaced fonts.

monoMultiLineTextHeight :: (DrawingCtxM m, Fractional u, FromPtSize u) => Int -> m u

monoDefaultPadding :: (DrawingCtxM m, Fractional u, FromPtSize u) => m u

The default padding is half of the char width.

monoVecToCenter :: (DrawingCtxM m, Fractional u, Ord u, FromPtSize u) => String -> m (Vec2 u)

Vector from baseline left to center