...

1 files changed, 38 insertions, 0 deletions

diff --git a/src/View/PlayerInput.elm b/src/View/PlayerInput.elm
index 01d926c..e8004f4 100644
--- a/src/View/PlayerInput.elm
+++ b/src/View/PlayerInput.elm
@@ -41,6 +41,44 @@ get_html model =
    then
       case model.ui.input of
          Struct.UI.NoInput -> (Html.div [] [])
+         Struct.UI.FloatInput ->
+            (Html.div
+               [
+                  (Html.Attributes.class "tonkadur-input")
+               ]
+               [
+                  (Html.div
+                     [
+                        (Html.Attributes.class "tonkadur-input-instruction")
+                     ]
+                     [
+                        (Html.text
+                           (
+                              "A number between "
+                              ++ (String.fromFloat model.ui.min_float)
+                              ++ " and "
+                              ++ (String.fromFloat model.ui.max_float)
+                              ++ " is expected:"
+                           )
+                        )
+                     ]
+                  ),
+                  (Html.input
+                     [
+                        (Html.Attributes.class "tonkadur-input-field"),
+                        (Html.Attributes.min
+                           (String.fromFloat model.ui.min_float)
+                        ),
+                        (Html.Attributes.max
+                           (String.fromFloat model.ui.max_float)
+                        )
+                     ]
+                     [
+                     ]
+                  )
+               ]
+            )
+
          Struct.UI.IntegerInput ->
             (Html.div
                [