From b320a735c123297368a854c39e17daa455ce953e Mon Sep 17 00:00:00 2001
From: Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org>
Date: Thu, 28 Jun 2018 18:30:31 +0200
Subject: More banners, starting work on victory/defeat...

---
 .../src/View/SubMenu/Timeline/PlayerTurnStart.elm  | 38 ++++++++++++++++++++++
 1 file changed, 38 insertions(+)
 create mode 100644 src/battlemap/src/View/SubMenu/Timeline/PlayerTurnStart.elm

(limited to 'src/battlemap/src/View/SubMenu/Timeline/PlayerTurnStart.elm')

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."
+            )
+         )
+      ]
+   )
-- 
cgit v1.2.3-70-g09d2