ref: a71b28e5b724564fe19f329f5cbb474f8b111acb
dir: /engine/battle/move_effects/perish_song.asm/
BattleCommand_PerishSong: ; perishsong ld hl, wPlayerSubStatus1 ld de, wEnemySubStatus1 bit SUBSTATUS_PERISH, [hl] jr z, .ok ld a, [de] bit SUBSTATUS_PERISH, a jr nz, .failed .ok bit SUBSTATUS_PERISH, [hl] jr nz, .enemy set SUBSTATUS_PERISH, [hl] ld a, 4 ld [wPlayerPerishCount], a .enemy ld a, [de] bit SUBSTATUS_PERISH, a jr nz, .done set SUBSTATUS_PERISH, a ld [de], a ld a, 4 ld [wEnemyPerishCount], a .done call AnimateCurrentMove ld hl, StartPerishText jp StdBattleTextBox .failed call AnimateFailedMove jp PrintButItFailed