pokecrystal/engine/pokedex/new_pokedex_entry.asm

51 lines
969 B
NASM
Raw Normal View History

2018-06-24 14:09:41 +00:00
NewPokedexEntry:
ldh a, [hMapAnims]
push af
xor a
ldh [hMapAnims], a
call LowVolume
call ClearBGPalettes
call ClearTilemap
call UpdateSprites
call ClearSprites
ld a, [wPokedexStatus]
push af
ldh a, [hSCX]
2018-01-21 21:53:19 +00:00
add POKEDEX_SCX
ldh [hSCX], a
xor a
ld [wPokedexStatus], a
2017-12-24 17:47:30 +00:00
farcall _NewPokedexEntry
call WaitPressAorB_BlinkCursor
2018-01-16 22:59:05 +00:00
ld a, 1 ; page 2
ld [wPokedexStatus], a
2017-12-24 17:47:30 +00:00
farcall DisplayDexEntry
call WaitPressAorB_BlinkCursor
pop af
ld [wPokedexStatus], a
call MaxVolume
call RotateThreePalettesRight
ldh a, [hSCX]
2018-01-21 21:53:19 +00:00
add -POKEDEX_SCX
ldh [hSCX], a
call .ReturnFromDexRegistration
pop af
ldh [hMapAnims], a
ret
2018-06-24 14:09:41 +00:00
.ReturnFromDexRegistration:
call ClearTilemap
call LoadFontsExtra
call LoadStandardFont
2017-12-24 17:47:30 +00:00
farcall Pokedex_PlaceFrontpicTopLeftCorner
call WaitBGMap2
2017-12-24 17:47:30 +00:00
farcall GetEnemyMonDVs
ld a, [hli]
2018-01-23 22:39:09 +00:00
ld [wTempMonDVs], a
ld a, [hl]
2018-01-23 22:39:09 +00:00
ld [wTempMonDVs + 1], a
ld b, SCGB_TRAINER_OR_MON_FRONTPIC_PALS
call GetSGBLayout
call SetDefaultBGPAndOBP
ret