summaryrefslogtreecommitdiff |
diff options
Diffstat (limited to 'src/battle/src/Comm/SetMap.elm')
-rw-r--r-- | src/battle/src/Comm/SetMap.elm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/battle/src/Comm/SetMap.elm b/src/battle/src/Comm/SetMap.elm index d26ca74..81a4a73 100644 --- a/src/battle/src/Comm/SetMap.elm +++ b/src/battle/src/Comm/SetMap.elm @@ -17,14 +17,14 @@ type alias MapData = { w : Int, h : Int, - t : (List (List Int)) + t : (List (List String)) } -------------------------------------------------------------------------------- -- LOCAL ----------------------------------------------------------------------- -------------------------------------------------------------------------------- deserialize_tile_borders : ( - (List Int) -> + (List String) -> (List Struct.Tile.Border) -> (List Struct.Tile.Border) ) @@ -39,7 +39,7 @@ deserialize_tile_borders rem_ints current_borders = _ -> [] -deserialize_tile_instance : Int -> Int -> (List Int) -> Struct.Tile.Instance +deserialize_tile_instance : Int -> Int -> (List String) -> Struct.Tile.Instance deserialize_tile_instance map_width index t = case t of (a :: (b :: c)) -> @@ -60,8 +60,8 @@ deserialize_tile_instance map_width index t = x = (index % map_width), y = (index // map_width) } - 0 - 0 + "0" + "0" Constants.Movement.cost_when_out_of_bounds [] ) @@ -91,7 +91,7 @@ decode = (Json.Decode.field "h" Json.Decode.int) (Json.Decode.field "t" - (Json.Decode.list (Json.Decode.list Json.Decode.int)) + (Json.Decode.list (Json.Decode.list Json.Decode.string)) ) ) ) |