feat: init

This commit is contained in:
Nick 2024-11-11 00:43:03 -06:00
parent 7145b8a9fa
commit 718a9ecaa7
11 changed files with 320 additions and 207 deletions

View file

@ -14,6 +14,15 @@ type alias Theme =
}
topLevelContainer : Element msg -> Element msg
topLevelContainer =
el
[ width fill
, height fill
, B.color colourTheme.backgroundColour
]
colourTheme : Theme
colourTheme =
{ nonHighlightedText = rgb255 212 212 212
@ -22,3 +31,49 @@ colourTheme =
, backgroundColour = rgb255 40 40 40
, debugColour = rgb255 227 28 121
}
spartanFont : F.Font
spartanFont =
F.typeface "League Spartan"
imageSpacer : Attribute msg
imageSpacer =
spacing 20
titleFormat : List (Attr () msg)
titleFormat =
[ F.size 23
, F.bold
, F.color colourTheme.highlightText
]
paragraphFontSize : Attr decorative msg
paragraphFontSize =
F.size 17
paragraphLinkFormat : { url : String, label : Element msg } -> Element msg
paragraphLinkFormat =
newTabLink
[ paragraphFontSize
, F.color colourTheme.highlightText
]
paragraphFormat : List (Attr () msg)
paragraphFormat =
[ spacing 8
, paragraphFontSize
, F.color colourTheme.nonHighlightedText
]
paragraphColumnFormat : List (Attribute msg)
paragraphColumnFormat =
[ spacing 20
, width <| px 700
]