about summary refs log tree commit diff
path: root/website/sandbox/learnpianochords/src/Tempo.elm
diff options
context:
space:
mode:
authorWilliam Carroll <wpcarro@gmail.com>2020-04-18T12·30+0100
committerWilliam Carroll <wpcarro@gmail.com>2020-04-18T12·30+0100
commitf0803547e47827a3fb3b9fb1f89949fa270b6d8e (patch)
tree1eb84a865896fafa0c07e8c45396c5d4ffebf3ab /website/sandbox/learnpianochords/src/Tempo.elm
parent39d084e493c80952d59cbcc92ea67f344e543298 (diff)
"Chord Drill Sergeant" -> "Learn Piano Chords"
In the spirit of "keep it simple, stupid", I am naming this application as
closely to the functionality as I can imagine.
Diffstat (limited to 'website/sandbox/learnpianochords/src/Tempo.elm')
-rw-r--r--website/sandbox/learnpianochords/src/Tempo.elm24
1 files changed, 24 insertions, 0 deletions
diff --git a/website/sandbox/learnpianochords/src/Tempo.elm b/website/sandbox/learnpianochords/src/Tempo.elm
new file mode 100644
index 000000000000..50485c4c0aba
--- /dev/null
+++ b/website/sandbox/learnpianochords/src/Tempo.elm
@@ -0,0 +1,24 @@
+module Tempo exposing (render)
+
+import Html exposing (..)
+import Html.Attributes exposing (..)
+import Html.Events exposing (..)
+import UI
+
+
+type alias Props msg =
+    { tempo : Int
+    , handleInput : String -> msg
+    }
+
+
+render : Props msg -> Html msg
+render { tempo, handleInput } =
+    div [ class "text-center" ]
+        [ p [ class "text-5xl py-10" ] [ text (String.fromInt tempo ++ " BPM") ]
+        , UI.textField
+            { placeholderText = "Set tempo..."
+            , handleInput = handleInput
+            , classes = []
+            }
+        ]