summaryrefslogtreecommitdiff
path: root/engine/battle/move_effects/frustration.asm
diff options
context:
space:
mode:
Diffstat (limited to 'engine/battle/move_effects/frustration.asm')
-rw-r--r--engine/battle/move_effects/frustration.asm29
1 files changed, 29 insertions, 0 deletions
diff --git a/engine/battle/move_effects/frustration.asm b/engine/battle/move_effects/frustration.asm
new file mode 100644
index 000000000..3f8456ced
--- /dev/null
+++ b/engine/battle/move_effects/frustration.asm
@@ -0,0 +1,29 @@
+BattleCommand_FrustrationPower: ; 3790e
+; frustrationpower
+
+ push bc
+ ld hl, wBattleMonHappiness
+ ld a, [hBattleTurn]
+ and a
+ jr z, .got_happiness
+ ld hl, wEnemyMonHappiness
+.got_happiness
+ ld a, $ff
+ sub [hl]
+ ld [hMultiplicand + 2], a
+ xor a
+ ld [hMultiplicand + 0], a
+ ld [hMultiplicand + 1], a
+ ld a, 10
+ ld [hMultiplier], a
+ call Multiply
+ ld a, 25
+ ld [hDivisor], a
+ ld b, 4
+ call Divide
+ ld a, [hQuotient + 2]
+ ld d, a
+ pop bc
+ ret
+
+; 37939