summaryrefslogtreecommitdiff |
diff options
author | nsensfel <SpamShield0@noot-noot.org> | 2017-11-16 17:06:17 +0100 |
---|---|---|
committer | nsensfel <SpamShield0@noot-noot.org> | 2017-11-16 17:06:17 +0100 |
commit | efaf3ee3f4b2478079c7b9dde8f9e879956a460f (patch) | |
tree | 809dba1496ddd1c3058df0722a9fd962fd11f34b /src/shim_battlemap_battlemap.erl | |
parent | 3cc9f85a8b84f6cb69b828a6510ece7f716a6b28 (diff) |
Starting changes in the structure.
Diffstat (limited to 'src/shim_battlemap_battlemap.erl')
-rw-r--r-- | src/shim_battlemap_battlemap.erl | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/src/shim_battlemap_battlemap.erl b/src/shim_battlemap_battlemap.erl deleted file mode 100644 index a6adc83..0000000 --- a/src/shim_battlemap_battlemap.erl +++ /dev/null @@ -1,37 +0,0 @@ --module(shim_battlemap_battlemap). - --export( - [ - generate/2 - ] -). - -generate_tile (0) -> - {0, 1}; -generate_tile (1) -> - {1, 2}; -generate_tile (2) -> - {2, 99}. - -generate(_Prev, Result, _X, 0, _BaseWidth) -> - Result; -generate(Prev, Result, 0, Y, BaseWidth) -> - generate(Prev, Result, BaseWidth, (Y - 1), BaseWidth); -generate(Prev, Result, X, Y, BaseWidth) -> - case rand:uniform(6) of - N when (N > 3) -> - generate(Prev, [generate_tile(Prev)|Result], (X - 1), Y, BaseWidth); - - N -> - NewTileType = (N - 1), - generate( - NewTileType, - [generate_tile(NewTileType)|Result], - (X - 1), - Y, - BaseWidth - ) - end. - -generate (Width, Height) -> - {Width, Height, generate(0, [], Width, Height, Width)}. |