website/frontend/src/Config/Helpers/StrengthBar.elm

module Config.Helpers.StrengthBar exposing (..)

import Config.Helpers.ToolTip exposing (..)
import Config.Style.Colour exposing (..)
import Element as E exposing (..)
import Element.Background as B
import Element.Border as D


barMaker : (Int -> String) -> Int -> Element msg
barMaker getTooltip num =
    el
        ([ E.height <| px 12
         , E.width fill
         , D.rounded 10
         , D.color colourTheme.textDarkGrey
         , D.width 2
         , B.gradient
            { angle = 1.57
            , steps =
                List.concat
                    [ List.repeat num colourTheme.barGreen
                    , List.repeat (10 - num) colourTheme.barRed
                    ]
            }
         ]
            ++ [ tooltip (getTooltip num) ]
        )
        none


barPadding : List (Element msg) -> Element msg
barPadding =
    column
        [ E.width fill
        , E.alignLeft
        ]