mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
51 lines
1 KiB
NASM
51 lines
1 KiB
NASM
AerodactylFossil:
|
|
ld a, FOSSIL_AERODACTYL
|
|
ld [wCurPartySpecies], a
|
|
call DisplayMonFrontSpriteInBox
|
|
call EnableAutoTextBoxDrawing
|
|
tx_pre AerodactylFossilText
|
|
ret
|
|
|
|
AerodactylFossilText::
|
|
text_far _AerodactylFossilText
|
|
text_end
|
|
|
|
KabutopsFossil:
|
|
ld a, FOSSIL_KABUTOPS
|
|
ld [wCurPartySpecies], a
|
|
call DisplayMonFrontSpriteInBox
|
|
call EnableAutoTextBoxDrawing
|
|
tx_pre KabutopsFossilText
|
|
ret
|
|
|
|
KabutopsFossilText::
|
|
text_far _KabutopsFossilText
|
|
text_end
|
|
|
|
DisplayMonFrontSpriteInBox:
|
|
; Displays a pokemon's front sprite in a pop-up window.
|
|
ld a, 1
|
|
ldh [hAutoBGTransferEnabled], a
|
|
call Delay3
|
|
xor a
|
|
ldh [hWY], a
|
|
call SaveScreenTilesToBuffer1
|
|
ld a, MON_SPRITE_POPUP
|
|
ld [wTextBoxID], a
|
|
call DisplayTextBoxID
|
|
call UpdateSprites
|
|
ld a, [wCurPartySpecies]
|
|
ld [wCurSpecies], a
|
|
call GetMonHeader
|
|
ld de, vChars1 tile $31
|
|
call LoadMonFrontSprite
|
|
ld a, $80
|
|
ldh [hStartTileID], a
|
|
hlcoord 10, 11
|
|
predef AnimateSendingOutMon
|
|
call WaitForTextScrollButtonPress
|
|
call LoadScreenTilesFromBuffer1
|
|
call Delay3
|
|
ld a, $90
|
|
ldh [hWY], a
|
|
ret
|