| summaryrefslogtreecommitdiff | 
diff options
Diffstat (limited to 'src/battle/movement.erl')
| -rw-r--r-- | src/battle/movement.erl | 58 | 
1 files changed, 0 insertions, 58 deletions
| diff --git a/src/battle/movement.erl b/src/battle/movement.erl deleted file mode 100644 index 588fad9..0000000 --- a/src/battle/movement.erl +++ /dev/null @@ -1,58 +0,0 @@ --module(movement). - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% EXPORTS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% --export([cross/4]). - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% LOCAL FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% --spec cross -   ( -      battlemap:struct(), -      list(location:type()), -      list(direction:enum()), -      non_neg_integer(), -      location:type() -   ) -   -> {location:type(), non_neg_integer()}. -cross (_Battlemap, _ForbiddenLocations, [], Cost, Location) -> -   {Location, Cost}; -cross (Battlemap, ForbiddenLocations, [Step|NextSteps], Cost, Location) -> -   NextLocation = location:apply_direction(Step, Location), -   NextTile = battlemap:get_tile_id(NextLocation, Battlemap), -   NextCost = (Cost + tile:get_cost(NextTile)), -   IsForbidden = -      lists:foldl -      ( -         fun (ForbiddenLocation, Prev) -> -            (Prev or (NextLocation == ForbiddenLocation)) -         end, -         false, -         ForbiddenLocations -      ), - -   IsForbidden = false, - -   cross(Battlemap, ForbiddenLocations, NextSteps, NextCost, NextLocation). - --spec cross -   ( -      battlemap:struct(), -      list(location:type()), -      list(direction:enum()), -      location:type() -   ) -   -> {location:type(), non_neg_integer()}. -cross (Battlemap, ForbiddenLocations, Path, Location) -> -   cross(Battlemap, ForbiddenLocations, Path, 0, Location). | 


