Anubis / Xlib

style_tools.anubis 560 Bytes
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 
public define String
    format_rgba_to_style_color
    (
        RGBA color
    ) =
        if color is
        {
            rgba(r, g, b, a) then
                with alpha_str = 
                    if to_Float(word32(word16(a, 0), word16(0, 0))) / 255.0 is
                    {
                        failure then "1",
                        success(v) then
                            float_to_string(v, 8)
                    },

                "rgba(" + to_decimal(r) + "," + to_decimal(g) + "," + to_decimal(b) + "," + alpha_str + ");"
        }.