pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2024-11-16 11:27:33 -08:00
Code Issues Packages Projects Releases Wiki Activity

SimpleMultiply and SimpleDivide

Browse Source
This commit is contained in:
yenatch 2013-05-02 22:45:34 -04:00
parent 993eecdc4a
commit ec3f279d53
1 changed files with 30 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
main.asm
View File

@ -2699,14 +2699,14 @@ Function2fb1: ; 2fb1
ld b, a ld b, a
push bc push bc
.asm_2fbb .asm_2fbb
call $2f8c call RNG
ld a, [hRandomAdd] ld a, [hRandomAdd]
ld c, a ld c, a
add b add b
jr c, .asm_2fbb jr c, .asm_2fbb
ld a, c ld a, c
pop bc pop bc
call $3110 call SimpleDivide
pop bc pop bc
ret ret
; 2fcb ; 2fcb
@ -2933,7 +2933,34 @@ AddNTimes: ; 0x30fe
; 0x3105 ; 0x3105
INCBIN "baserom.gbc", $3105, $3119 - $3105 SimpleMultiply: ; 3105
; Return a * c.
and a
ret z
push bc
ld b, a
xor a
.loop
add c
dec b
jr nz, .loop
pop bc
ret
; 3110
SimpleDivide: ; 3110
; Divide a by c. Return quotient b and remainder a.
ld b, 0
.loop
inc b
sub c
jr nc, .loop
dec b
add c
ret
; 3119
Multiply: ; 3119 Multiply: ; 3119