diff options
author | mid-kid <esteve.varela@gmail.com> | 2020-02-22 12:52:13 +0100 |
---|---|---|
committer | mid-kid <esteve.varela@gmail.com> | 2020-02-22 12:52:13 +0100 |
commit | 7bd8d56ff93e14839d304cc3a3a2a182e992f909 (patch) | |
tree | dbf48363b85804dadedfbd59e3b5d9336e844804 /home/cry.asm | |
parent | 43eff93861b5b00473e567e6449c64f039f8f4ba (diff) |
Implement suggestions in PR #687
Merge mon_stats.asm, cry.asm, print_level.asm, and mon_data.asm into pokemon.asm
Merge mon_party.asm into battle.asm
Merge menu.asm, menu_window.asm, and menu2.asm into menu.asm
Diffstat (limited to 'home/cry.asm')
-rw-r--r-- | home/cry.asm | 101 |
1 files changed, 0 insertions, 101 deletions
diff --git a/home/cry.asm b/home/cry.asm deleted file mode 100644 index 856134b3e..000000000 --- a/home/cry.asm +++ /dev/null @@ -1,101 +0,0 @@ -PlayStereoCry:: - push af - ld a, 1 - ld [wStereoPanningMask], a - pop af - call _PlayMonCry - call WaitSFX - ret - -PlayStereoCry2:: -; Don't wait for the cry to end. -; Used during pic animations. - push af - ld a, 1 - ld [wStereoPanningMask], a - pop af - jp _PlayMonCry - -PlayMonCry:: - call PlayMonCry2 - call WaitSFX - ret - -PlayMonCry2:: -; Don't wait for the cry to end. - push af - xor a - ld [wStereoPanningMask], a - ld [wCryTracks], a - pop af - call _PlayMonCry - ret - -_PlayMonCry:: - push hl - push de - push bc - - call GetCryIndex - jr c, .done - - ld e, c - ld d, b - call PlayCry - -.done - pop bc - pop de - pop hl - ret - -LoadCry:: -; Load cry bc. - - call GetCryIndex - ret c - - ldh a, [hROMBank] - push af - ld a, BANK(PokemonCries) - rst Bankswitch - - ld hl, PokemonCries -rept 6 ; sizeof(mon_cry) - add hl, bc -endr - - ld e, [hl] - inc hl - ld d, [hl] - inc hl - - ld a, [hli] - ld [wCryPitch], a - ld a, [hli] - ld [wCryPitch + 1], a - ld a, [hli] - ld [wCryLength], a - ld a, [hl] - ld [wCryLength + 1], a - - pop af - rst Bankswitch - and a - ret - -GetCryIndex:: - and a - jr z, .no - cp NUM_POKEMON + 1 - jr nc, .no - - dec a - ld c, a - ld b, 0 - and a - ret - -.no - scf - ret |