pokecrystal-board/engine/battle/move_effects/frustration.asm
vulcandth ef9b9bb437
Clean up bugs commented in the source code (#912)
Co-authored-by: Rangi <remy.oukaour+rangi42@gmail.com>
2022-07-09 16:12:02 -05:00

27 lines
528 B
NASM

BattleCommand_FrustrationPower:
; BUG: Return and Frustration deal no damage when the user's happiness is low or high, respectively (see docs/bugs_and_glitches.md)
push bc
ld hl, wBattleMonHappiness
ldh a, [hBattleTurn]
and a
jr z, .ok
ld hl, wEnemyMonHappiness
.ok
ld a, $ff
sub [hl]
ldh [hMultiplicand + 2], a
xor a
ldh [hMultiplicand + 0], a
ldh [hMultiplicand + 1], a
ld a, 10
ldh [hMultiplier], a
call Multiply
ld a, 25
ldh [hDivisor], a
ld b, 4
call Divide
ldh a, [hQuotient + 3]
ld d, a
pop bc
ret