Adds controls for the UI scaling.

10 files changed, 385 insertions, 30 deletions

diff --git a/src/battlemap/src/Event.elm b/src/battlemap/src/Event.elm
index 5debff1..96d4dfa 100644
--- a/src/battlemap/src/Event.elm
+++ b/src/battlemap/src/Event.elm
@@ -10,3 +10,4 @@ type Type =
    | TileSelected Battlemap.Location.Ref
    | CharacterSelected Character.Ref
    | TurnEnded
+   | ScaleChangeRequested Float
diff --git a/src/battlemap/src/Model.elm b/src/battlemap/src/Model.elm
index ed067d3..160e8cc 100644
--- a/src/battlemap/src/Model.elm
+++ b/src/battlemap/src/Model.elm
@@ -35,7 +35,8 @@ type alias Type =
       battlemap: Battlemap.Type,
       characters: (Dict.Dict Character.Ref Character.Type),
       error: (Maybe Error.Type),
-      selection: Selection
+      selection: Selection,
+      ui_scale: Float
    }
 
 get_state : Type -> State
@@ -48,7 +49,8 @@ reset model characters =
       battlemap = (Battlemap.reset model.battlemap),
       characters = characters,
       error = Nothing,
-      selection = None
+      selection = None,
+      ui_scale = model.ui_scale -- TODO: move this into its own module.
    }
 
 invalidate : Type -> Error.Type -> Type
diff --git a/src/battlemap/src/Shim/Battlemap.elm b/src/battlemap/src/Shim/Battlemap.elm
index 5a2e29b..3c444db 100644
--- a/src/battlemap/src/Shim/Battlemap.elm
+++ b/src/battlemap/src/Shim/Battlemap.elm
@@ -5,8 +5,8 @@ import Shim.Battlemap.Tile
 --generate : Battlemap.Type
 generate =
    {
-      width = 16,
-      height = 16,
-      content = (Shim.Battlemap.Tile.generate 16),
+      width = 64,
+      height = 64,
+      content = (Shim.Battlemap.Tile.generate 64),
       navigator = Nothing
    }
diff --git a/src/battlemap/src/Shim/Battlemap/Tile.elm b/src/battlemap/src/Shim/Battlemap/Tile.elm
index 1e11cb5..dac2ecb 100644
--- a/src/battlemap/src/Shim/Battlemap/Tile.elm
+++ b/src/battlemap/src/Shim/Battlemap/Tile.elm
@@ -21,24 +21,327 @@ generate : Int -> (Array.Array Battlemap.Tile.Type)
 generate map_width =
    let
       as_int_list =
-         [
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1),  
-            (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)
-         ]
+         (
+               [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (1, 2), (1, 2), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (1, 2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (2, 99), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0,  1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+            ++ [(0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1), (1,  2), (0, 1), (0, 1), (0, 1), (0, 1), (0, 1)]
+         )
       as_list = (List.indexedMap (from_int map_width) as_int_list)
    in
       (Array.fromList as_list)
diff --git a/src/battlemap/src/Shim/Model.elm b/src/battlemap/src/Shim/Model.elm
index f82a0d3..d9bd280 100644
--- a/src/battlemap/src/Shim/Model.elm
+++ b/src/battlemap/src/Shim/Model.elm
@@ -50,5 +50,6 @@ generate =
                   Dict.empty
                )
             )
-         )
+         ),
+      ui_scale = 1.0
    }
diff --git a/src/battlemap/src/Update.elm b/src/battlemap/src/Update.elm
index 7ee61a3..754f7d4 100644
--- a/src/battlemap/src/Update.elm
+++ b/src/battlemap/src/Update.elm
@@ -25,3 +25,10 @@ update event model =
 
       Event.TurnEnded ->
          ((Model.EndTurn.apply_to new_model), Cmd.none)
+
+      (Event.ScaleChangeRequested mod) ->
+         if (mod == 0.0)
+         then
+            ({model | ui_scale = 1.0}, Cmd.none)
+         else
+            ({model | ui_scale = (mod * model.ui_scale)}, Cmd.none)
diff --git a/src/battlemap/src/View.elm b/src/battlemap/src/View.elm
index 480abd3..22b617b 100644
--- a/src/battlemap/src/View.elm
+++ b/src/battlemap/src/View.elm
@@ -32,7 +32,7 @@ view model =
             [
                (View.Battlemap.get_html
                   model.battlemap
-                  1
+                  model.ui_scale
                   (Dict.values model.characters)
                )
             ]
diff --git a/src/battlemap/src/View/Battlemap.elm b/src/battlemap/src/View/Battlemap.elm
index 81c13f7..071cce4 100644
--- a/src/battlemap/src/View/Battlemap.elm
+++ b/src/battlemap/src/View/Battlemap.elm
@@ -7,8 +7,10 @@ import List
 import Html
 import Html.Attributes
 import Html.Events
+import Html.Lazy
 
 import Battlemap
+import Battlemap.Tile
 
 import Character
 
@@ -53,6 +55,20 @@ char_on_map char =
          ]
       )
 
+get_tiles_html : (
+      (Array.Array Battlemap.Tile.Type) ->
+      (Html.Html Event.Type)
+   )
+get_tiles_html tiles_array =
+   (Html.div
+      [
+         (Html.Attributes.class "battlemap-tiles-layer")
+      ]
+      (List.map
+         (View.Battlemap.Tile.get_html)
+         (Array.toList tiles_array)
+      )
+   )
 --------------------------------------------------------------------------------
 -- EXPORTED --------------------------------------------------------------------
 --------------------------------------------------------------------------------
@@ -76,11 +92,11 @@ get_html battlemap scale characters =
          )
       ]
       (
-         (List.map
-            (View.Battlemap.Tile.get_html)
-            (Array.toList (Battlemap.get_tiles battlemap))
+         (Html.Lazy.lazy
+            (get_tiles_html)
+            (Battlemap.get_tiles battlemap)
          )
-         ++
+         ::
          (List.map
             (char_on_map)
             characters
diff --git a/src/battlemap/src/View/Controls.elm b/src/battlemap/src/View/Controls.elm
index f5851a9..a664ffe 100644
--- a/src/battlemap/src/View/Controls.elm
+++ b/src/battlemap/src/View/Controls.elm
@@ -7,6 +7,9 @@ import Battlemap.Direction
 
 import Event
 
+--------------------------------------------------------------------------------
+-- LOCAL -----------------------------------------------------------------------
+--------------------------------------------------------------------------------
 direction_button : Battlemap.Direction.Type -> String -> (Html.Html Event.Type)
 direction_button dir label =
    (Html.button
@@ -25,6 +28,20 @@ end_turn_button =
       [ (Html.text "End Turn") ]
    )
 
+scale_button : Float -> String -> (Html.Html Event.Type)
+scale_button mod label =
+   (Html.button
+      [
+         (Html.Events.onClick
+            (Event.ScaleChangeRequested mod)
+         )
+      ]
+      [ (Html.text label) ]
+   )
+
+--------------------------------------------------------------------------------
+-- EXPORTED --------------------------------------------------------------------
+--------------------------------------------------------------------------------
 view : (List (Html.Html Event.Type))
 view =
    [
@@ -32,5 +49,8 @@ view =
       (direction_button Battlemap.Direction.Down "Down"),
       (direction_button Battlemap.Direction.Up "Up"),
       (direction_button Battlemap.Direction.Right "Right"),
-      (end_turn_button)
+      (end_turn_button),
+      (scale_button (0.75) "Zoom -"),
+      (scale_button 0 "Zoom Reset"),
+      (scale_button (1.15) "Zoom +")
    ]
diff --git a/src/battlemap/www/index.html b/src/battlemap/www/index.html
index a7308e5..82e2cef 100644
--- a/src/battlemap/www/index.html
+++ b/src/battlemap/www/index.html
@@ -24,6 +24,11 @@
          height: 70%;
       }
 
+      .battlemap-actual
+      {
+         display: inline-block;
+      }
+
       .battlemap-tiled
       {
          position: absolute;