split out some more move effects

This commit is contained in:
yenatch
2013-12-01 14:19:57 -05:00
parent d7bf70f3c9
commit d7cdd0ac73
9 changed files with 489 additions and 445 deletions

View File

@@ -0,0 +1,41 @@
BattleCommand58: ; 376c2
; perishsong
ld hl, PlayerSubStatus1
ld de, EnemySubStatus1
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 [PlayerPerishCount], a
.enemy
ld a, [de]
bit SUBSTATUS_PERISH, a
jr nz, .done
set SUBSTATUS_PERISH, a
ld [de], a
ld a, 4
ld [EnemyPerishCount], a
.done
call Function0x37e01
ld hl, StartPerishText
jp StdBattleTextBox
.failed
call Function0x37e77
jp PrintButItFailed
; 376f8