pokecrystal-board/engine/battle/move_effects/fury_cutter.asm
2018-06-25 12:24:18 -04:00

56 lines
666 B
NASM

BattleCommand_FuryCutter:
; furycutter
ld hl, wPlayerFuryCutterCount
ld a, [hBattleTurn]
and a
jr z, .go
ld hl, wEnemyFuryCutterCount
.go
ld a, [wAttackMissed]
and a
jp nz, ResetFuryCutterCount
inc [hl]
; Damage capped at 5 turns' worth (16x).
ld a, [hl]
ld b, a
cp 6
jr c, .checkdouble
ld b, 5
.checkdouble
dec b
ret z
; Double the damage
ld hl, wCurDamage + 1
sla [hl]
dec hl
rl [hl]
jr nc, .checkdouble
; No overflow
ld a, $ff
ld [hli], a
ld [hl], a
ret
ResetFuryCutterCount:
push hl
ld hl, wPlayerFuryCutterCount
ld a, [hBattleTurn]
and a
jr z, .reset
ld hl, wEnemyFuryCutterCount
.reset
xor a
ld [hl], a
pop hl
ret