From 0b9096ed0c66db403c244a4720bac60326a40394 Mon Sep 17 00:00:00 2001
From: Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org>
Date: Mon, 18 Sep 2017 18:15:59 +0200
Subject: Character-focused navigators.

---
 client/elm/battlemap/src/Model.elm | 49 ++++++++++++++++++++++++++++++++++----
 1 file changed, 45 insertions(+), 4 deletions(-)

(limited to 'client/elm/battlemap/src/Model.elm')

diff --git a/client/elm/battlemap/src/Model.elm b/client/elm/battlemap/src/Model.elm
index 3d69c7d..61d827b 100644
--- a/client/elm/battlemap/src/Model.elm
+++ b/client/elm/battlemap/src/Model.elm
@@ -1,19 +1,60 @@
 module Model exposing (Model, model)
 
-import Battlemap as Bp exposing (Battlemap, random)
-import Battlemap.Location exposing (..)
+import Battlemap as Bp exposing (Battlemap, random, apply_to_all_tiles)
 import Battlemap.Navigator as Nr exposing (Navigator, new_navigator)
 
+import Character exposing (Character, CharacterRef)
+
+import Dict exposing (Dict, empty, insert)
+
 -- MODEL
 type alias Model =
    {
       battlemap: Bp.Battlemap,
-      navigator: (Maybe Nr.Navigator)
+      navigator: (Maybe Nr.Navigator),
+      selection: (Maybe String),
+      characters: (Dict CharacterRef Character)
    }
 
 model : Model
 model =
    {
       battlemap = (Bp.random),
-      navigator = (Just (Nr.new_navigator {x=2, y=4}))
+      navigator = Nothing,
+      selection = Nothing,
+      characters =
+         (insert
+            "2"
+            {
+               id = "2",
+               name = "Char2",
+               icon = "Icon2",
+               portrait = "Portrait2",
+               x = 1,
+               y = 4
+            }
+            (insert
+               "1"
+               {
+                  id = "1",
+                  name = "Char1",
+                  icon = "Icon1",
+                  portrait = "Portrait1",
+                  x = 4,
+                  y = 1
+               }
+               (insert
+                  "0"
+                  {
+                     id = "0",
+                     name = "Char0",
+                     icon = "Icon0",
+                     portrait = "Portrait0",
+                     x = 0,
+                     y = 0
+                  }
+                  empty
+               )
+            )
+         )
    }
-- 
cgit v1.2.3-70-g09d2