summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authoryenatch <yenatch@gmail.com>2014-05-03 21:44:18 -0400
committeryenatch <yenatch@gmail.com>2014-05-03 21:44:18 -0400
commitdbb7431cdef600603252385b8b007e154c4cf220 (patch)
tree3883d28313b1648b7e267b24c4acdab40d60aae4
parenta7a95e59f7fb9d36d8efdb4cbee4b7fb12775be5 (diff)
Give a name to RandomRange.
-rw-r--r--home/random.asm19
-rw-r--r--main.asm24
2 files changed, 26 insertions, 17 deletions
diff --git a/home/random.asm b/home/random.asm
index 100b4d37b..2ec490cc1 100644
--- a/home/random.asm
+++ b/home/random.asm
@@ -50,26 +50,35 @@ BattleRandom:: ; 2f9f
; 2fb1
-Function2fb1:: ; 2fb1
+RandomRange:: ; 2fb1
+; Return a random number between 0 and a (non-inclusive).
+
push bc
ld c, a
+
+ ; b = $100 % c
xor a
sub c
-.asm_2fb5
+.mod
sub c
- jr nc, .asm_2fb5
+ jr nc, .mod
add c
ld b, a
+
+ ; Get a random number
+ ; from 0 to $ff - b.
push bc
-.asm_2fbb
+.loop
call Random
ld a, [hRandomAdd]
ld c, a
add b
- jr c, .asm_2fbb
+ jr c, .loop
ld a, c
pop bc
+
call SimpleDivide
+
pop bc
ret
; 2fcb
diff --git a/main.asm b/main.asm
index 733c9541d..752afa91f 100644
--- a/main.asm
+++ b/main.asm
@@ -87348,7 +87348,7 @@ Functionb8219: ; b8219
jr nc, .quit
ld a, 10
- call Function2fb1
+ call RandomRange
cp 4
jr nc, .quit
@@ -87631,23 +87631,23 @@ Functionb83e5: ; b83e5
ret
.asm_b83f6
- ld a, $a
- call Function2fb1
+ ld a, 10
+ call RandomRange
and a
jr nz, Functionb843b
jr Functionb841f
.asm_b8400
- ld a, $a
- call Function2fb1
- cp $5
+ ld a, 10
+ call RandomRange
+ cp 5
jr nc, Functionb843b
jr Functionb841f
.asm_b840b
- ld a, $a
- call Function2fb1
- cp $8
+ ld a, 10
+ call RandomRange
+ cp 8
jr nc, Functionb843b
jr .asm_b8416
@@ -87663,7 +87663,7 @@ Functionb841f: ; b841f
; Read a TreeMons table.
ld a, 100
- call Function2fb1
+ call RandomRange
.asm_b8424
sub [hl]
jr c, .asm_b842c
@@ -99806,8 +99806,8 @@ Functionfd044: ; fd044
.asm_fd08b
call Functionfd099
- ld a, $5
- call Function2fb1
+ ld a, 5
+ call RandomRange
inc a
ld [$dc18], a
scf