More banners, starting work on victory/defeat...

1 files changed, 38 insertions, 0 deletions

diff --git a/src/battlemap/src/View/SubMenu/Timeline/PlayerTurnStart.elm b/src/battlemap/src/View/SubMenu/Timeline/PlayerTurnStart.elm
new file mode 100644
index 0000000..11f639e
--- /dev/null
+++ b/src/battlemap/src/View/SubMenu/Timeline/PlayerTurnStart.elm
@@ -0,0 +1,38 @@
+module View.SubMenu.Timeline.PlayerTurnStart exposing (get_html)
+
+-- Elm -------------------------------------------------------------------------
+import Html
+import Html.Attributes
+--import Html.Events
+
+-- Battlemap -------------------------------------------------------------------
+import Struct.Event
+import Struct.TurnResult
+
+--------------------------------------------------------------------------------
+-- LOCAL -----------------------------------------------------------------------
+--------------------------------------------------------------------------------
+
+--------------------------------------------------------------------------------
+-- EXPORTED --------------------------------------------------------------------
+--------------------------------------------------------------------------------
+get_html : (
+      Struct.TurnResult.PlayerTurnStart ->
+      (Html.Html Struct.Event.Type)
+   )
+get_html pturns =
+   (Html.div
+      [
+         (Html.Attributes.class "battlemap-timeline-element"),
+         (Html.Attributes.class "battlemap-timeline-turn-start")
+      ]
+      [
+         (Html.text
+            (
+               "Player "
+               ++ (toString pturns.player_index)
+               ++ "'s turn has started."
+            )
+         )
+      ]
+   )