gleamy_lights

-module(gleamy_lights).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([by_rgb/4, green/1, ok_green/1, lime/1, red/1, error_red/1, bright_red/1, black/1, bright_black/1, white/1, bright_white/1, yellow/1, bright_yellow/1, cyan/1, bright_cyan/1, magenta/1, pink/1, blue/1, lightblue/1, orange/1, bright_orange/1, purple/1, lilac/1]).

-spec by_rgb(binary(), integer(), integer(), integer()) -> binary().
by_rgb(Msg, R, G, B) ->
    <<<<<<<<<<<<<<<<"\x{001b}[38;2;"/utf8, (gleam@int:to_string(R))/binary>>/binary,
                                ";"/utf8>>/binary,
                            (gleam@int:to_string(G))/binary>>/binary,
                        ";"/utf8>>/binary,
                    (gleam@int:to_string(B))/binary>>/binary,
                "m"/utf8>>/binary,
            Msg/binary>>/binary,
        "\x{001b}[0m"/utf8>>.

-spec green(binary()) -> binary().
green(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 0, 255, 0).

-spec ok_green(binary()) -> binary().
ok_green(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 116, 204, 140).

-spec lime(binary()) -> binary().
lime(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 66, 245, 78).

-spec red(binary()) -> binary().
red(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 255, 0, 0).

-spec error_red(binary()) -> binary().
error_red(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 184, 28, 74).

-spec bright_red(binary()) -> binary().
bright_red(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 237, 68, 62).

-spec black(binary()) -> binary().
black(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 41, 40, 40).

-spec bright_black(binary()) -> binary().
bright_black(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 0, 0, 0).

-spec white(binary()) -> binary().
white(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 240, 240, 240).

-spec bright_white(binary()) -> binary().
bright_white(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 255, 255, 255).

-spec yellow(binary()) -> binary().
yellow(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 243, 201, 35).

-spec bright_yellow(binary()) -> binary().
bright_yellow(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 255, 234, 150).

-spec cyan(binary()) -> binary().
cyan(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 16, 227, 227).

-spec bright_cyan(binary()) -> binary().
bright_cyan(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 0, 255, 255).

-spec magenta(binary()) -> binary().
magenta(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 255, 0, 255).

-spec pink(binary()) -> binary().
pink(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 243, 154, 245).

-spec blue(binary()) -> binary().
blue(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 0, 0, 255).

-spec lightblue(binary()) -> binary().
lightblue(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 145, 220, 255).

-spec orange(binary()) -> binary().
orange(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 255, 165, 0).

-spec bright_orange(binary()) -> binary().
bright_orange(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 255, 157, 0).

-spec purple(binary()) -> binary().
purple(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 97, 18, 181).

-spec lilac(binary()) -> binary().
lilac(Msg) ->
    _pipe = Msg,
    by_rgb(_pipe, 200, 162, 200).