mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
63 lines
815 B
NASM
Executable File
63 lines
815 B
NASM
Executable File
GetPokeBallWobble: ; f971 (3:7971)
|
|
; Returns whether a Poke Ball will wobble in the catch animation.
|
|
; Whether a Pokemon is caught is determined beforehand.
|
|
|
|
push de
|
|
|
|
ld a, [rSVBK]
|
|
ld d, a
|
|
push de
|
|
|
|
ld a, BANK(Buffer2)
|
|
ld [rSVBK], a
|
|
|
|
ld a, [Buffer2]
|
|
inc a
|
|
ld [Buffer2], a
|
|
|
|
; Wobble up to 3 times.
|
|
cp 3 + 1
|
|
jr z, .finished
|
|
|
|
ld a, [wWildMon]
|
|
and a
|
|
ld c, 0 ; next
|
|
jr nz, .done
|
|
|
|
ld hl, WobbleProbabilities
|
|
ld a, [Buffer1]
|
|
ld b, a
|
|
.loop
|
|
ld a, [hli]
|
|
cp b
|
|
jr nc, .checkwobble
|
|
inc hl
|
|
jr .loop
|
|
|
|
.checkwobble
|
|
ld b, [hl]
|
|
call Random
|
|
cp b
|
|
ld c, 0 ; next
|
|
jr c, .done
|
|
ld c, 2 ; escaped
|
|
jr .done
|
|
|
|
.finished
|
|
ld a, [wWildMon]
|
|
and a
|
|
ld c, 1 ; caught
|
|
jr nz, .done
|
|
ld c, 2 ; escaped
|
|
|
|
.done
|
|
pop de
|
|
ld e, a
|
|
ld a, d
|
|
ld [rSVBK], a
|
|
ld a, e
|
|
pop de
|
|
ret
|
|
|
|
INCLUDE "data/battle/wobble_probabilities.asm"
|