Imj.Graphics.Color

8-bits colors

There are several types of colors we can use to draw in a terminal. Here, we support 8-bit colors.

8-bit colors have 6*6*6 = 216 rgb colors, 24 grays and are represented by Color8. You can create a Color8 ny using rgb or gray.

It is possible to interpolate between two colors in RGB space using the DiscreteInterpolation instance of Color8.

We also have LayeredColor because when drawing in the terminal, we can change both the Background and the Foreground color.

data Color8 a

ANSI allows for a palette of up to 256 8-bit colors.

Instances

Enum (Color8 a)

Methods

succ :: Color8 a -> Color8 a

pred :: Color8 a -> Color8 a

toEnum :: Int -> Color8 a

fromEnum :: Color8 a -> Int

enumFrom :: Color8 a -> [Color8 a]

enumFromThen :: Color8 a -> Color8 a -> [Color8 a]

enumFromTo :: Color8 a -> Color8 a -> [Color8 a]

enumFromThenTo :: Color8 a -> Color8 a -> Color8 a -> [Color8 a]

Eq (Color8 a)

Methods

(==) :: Color8 a -> Color8 a -> Bool

(/=) :: Color8 a -> Color8 a -> Bool

Read (Color8 a)

Methods

readsPrec :: Int -> ReadS (Color8 a)

readList :: ReadS [Color8 a]

readPrec :: ReadPrec (Color8 a)

readListPrec :: ReadPrec [Color8 a]

Show (Color8 a)

Methods

showsPrec :: Int -> Color8 a -> ShowS

show :: Color8 a -> String

showList :: [Color8 a] -> ShowS

DiscreteDistance (Color8 a)

Using bresenham 3D algorithm in RGB space.

Methods

distance :: Color8 a -> Color8 a -> Int

distanceSuccessive :: Successive (Color8 a) -> Int

DiscreteInterpolation (Color8 a)

Using bresenham 3D algorithm in RGB space.

Methods

interpolate :: Color8 a -> Color8 a -> Int -> Color8 a

interpolateSuccessive :: Successive (Color8 a) -> Int -> Color8 a

Create a single color

rgb

Arguments

:: Word8

red component in [0..5]

-> Word8

green component in [0..5]

-> Word8

blue component in [0..5]

-> Color8 a

Creates a rgb Color8 as defined in ANSI 8-bit colors

Input components are expected to be in range [0..5]

gray

Arguments

:: Word8

gray value in [0..23]

-> Color8 a

Creates a gray Color8 as defined in ANSI 8-bit colors

Input is expected to be in the range [0..23] (from darkest to lightest)

Create a LayeredColor

data LayeredColor

A background and a foreground Color8.

Constructors

LayeredColor

Fields

• _colorsBackground :: !(Color8 Background)
• _colorsForeground :: !(Color8 Foreground)

Instances

Eq LayeredColor

Methods

(==) :: LayeredColor -> LayeredColor -> Bool

(/=) :: LayeredColor -> LayeredColor -> Bool

Show LayeredColor

Methods

showsPrec :: Int -> LayeredColor -> ShowS

show :: LayeredColor -> String

showList :: [LayeredColor] -> ShowS

DiscreteDistance LayeredColor

First interpolate background color, then foreground color

Methods

distance :: LayeredColor -> LayeredColor -> Int

distanceSuccessive :: Successive LayeredColor -> Int

DiscreteInterpolation LayeredColor

First interpolate background color, then foreground color

Methods

interpolate :: LayeredColor -> LayeredColor -> Int -> LayeredColor

interpolateSuccessive :: Successive LayeredColor -> Int -> LayeredColor

data Background

data Foreground

onBlack :: Color8 Foreground -> LayeredColor

Creates a LayeredColor with a black background color.

whiteOnBlack :: LayeredColor

Creates a LayeredColor with white foreground and black background color.

Predefined colors

white :: Color8 a

black :: Color8 a

red :: Color8 a

green :: Color8 a

magenta :: Color8 a

cyan :: Color8 a

yellow :: Color8 a

blue :: Color8 a