summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authornsensfel <SpamShield0@noot-noot.org>2019-11-25 18:05:46 +0100
committernsensfel <SpamShield0@noot-noot.org>2019-11-25 18:05:46 +0100
commit4094b24940779d298a3ff97525ac40deac093cab (patch)
tree43584afa8b22e571c4de0a0876381a1de7e96e06 /src/shared/battle-map/BattleMap/Struct/TileInstance.elm
parenta2bac44a4c8abc064de55d0779edcb07aaa86e62 (diff)
...
Diffstat (limited to 'src/shared/battle-map/BattleMap/Struct/TileInstance.elm')
-rw-r--r--src/shared/battle-map/BattleMap/Struct/TileInstance.elm27
1 files changed, 8 insertions, 19 deletions
diff --git a/src/shared/battle-map/BattleMap/Struct/TileInstance.elm b/src/shared/battle-map/BattleMap/Struct/TileInstance.elm
index 87d2762..aca7f49 100644
--- a/src/shared/battle-map/BattleMap/Struct/TileInstance.elm
+++ b/src/shared/battle-map/BattleMap/Struct/TileInstance.elm
@@ -36,6 +36,7 @@ import Json.Decode
import Json.Decode.Pipeline
-- Battle Map ------------------------------------------------------------------
+import BattleMap.Struct.DataSet
import BattleMap.Struct.Tile
import BattleMap.Struct.Location
@@ -147,25 +148,13 @@ get_local_variant_ix tile_inst =
)
)
-solve : (
- (Dict.Dict BattleMap.Struct.Tile.Ref BattleMap.Struct.Tile.Type) ->
- Type ->
- Type
- )
-solve tiles tile_inst =
- case (Dict.get tile_inst.class_id tiles) of
- (Just tile) ->
- {tile_inst |
- crossing_cost = (BattleMap.Struct.Tile.get_cost tile),
- family = (BattleMap.Struct.Tile.get_family tile)
- }
-
- Nothing ->
- {tile_inst |
- crossing_cost = -1,
- family = "-1"
- }
-
+solve : BattleMap.Struct.DataSet.Type -> Type -> Type
+solve dataset tile_inst =
+ let tile = (BattleMap.Struct.DataSet.get_tile tile_inst.class_id dataset) in
+ {tile_inst |
+ crossing_cost = (BattleMap.Struct.Tile.get_cost tile),
+ family = (BattleMap.Struct.Tile.get_family tile)
+ }
list_to_borders : (
(List String) ->