summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'src/shim_battlemap_character.erl')
-rw-r--r--src/shim_battlemap_character.erl26
1 files changed, 16 insertions, 10 deletions
diff --git a/src/shim_battlemap_character.erl b/src/shim_battlemap_character.erl
index 80e91b0..5d28c53 100644
--- a/src/shim_battlemap_character.erl
+++ b/src/shim_battlemap_character.erl
@@ -22,16 +22,22 @@ generate_char (N, X, Y, Team) ->
generate (0, Result, _MaxX, _MaxY) ->
Result;
generate (N, Prev, MaxX, MaxY) ->
- [
- generate_char
- (
- N,
- (rand:uniform(MaxX) - 1),
- (rand:uniform(MaxY) - 1),
- (N rem 2)
- )
- | Prev
- ].
+ generate
+ (
+ (N - 1),
+ [
+ generate_char
+ (
+ N,
+ (rand:uniform(MaxX) - 1),
+ (rand:uniform(MaxY) - 1),
+ (N rem 2)
+ )
+ | Prev
+ ],
+ MaxX,
+ MaxY
+ ).
generate (MaxX, MaxY) ->
generate(rand:uniform(14) + 2, [], MaxX, MaxY).