mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-09-09 09:51:34 -07:00
27 lines
319 B
NASM
27 lines
319 B
NASM
|
BattleCommand_Pursuit: ; 37b1d
|
||
|
; pursuit
|
||
|
; Double damage if the opponent is switching.
|
||
|
|
||
|
ld hl, wEnemyIsSwitching
|
||
|
ld a, [hBattleTurn]
|
||
|
and a
|
||
|
jr z, .ok
|
||
|
ld hl, wPlayerIsSwitching
|
||
|
.ok
|
||
|
ld a, [hl]
|
||
|
and a
|
||
|
ret z
|
||
|
|
||
|
ld hl, CurDamage + 1
|
||
|
sla [hl]
|
||
|
dec hl
|
||
|
rl [hl]
|
||
|
ret nc
|
||
|
|
||
|
ld a, $ff
|
||
|
ld [hli], a
|
||
|
ld [hl], a
|
||
|
ret
|
||
|
|
||
|
; 37b39
|