summaryrefslogtreecommitdiff
blob: 255310adac5a0427315c6d6b670abbd9a901075d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
module Battlemap.Tile exposing
   (
      Type,
      get_location,
      get_icon_id,
      get_cost
   )

import Battlemap.Location

type alias Type =
   {
      location : Battlemap.Location.Type,
      icon_id : String,
      crossing_cost : Int
   }

get_location : Type -> Battlemap.Location.Type
get_location tile = tile.location

get_icon_id : Type -> String
get_icon_id tile = tile.icon_id

get_cost : Type -> Int
get_cost tile = tile.crossing_cost