kep-hack/home/overworld_text.asm
2023-09-25 12:44:36 +10:00

60 lines
875 B
NASM

TextScriptEndingText::
text_end
TextScriptEnd::
ld hl, TextScriptEndingText
ret
ExclamationText::
text_far _ExclamationText
text_end
GroundRoseText::
text_far _GroundRoseText
text_end
BoulderText::
text_far _BoulderText
text_asm
ld a, [wObtainedBadges]
bit 3, a ; RAINBOW BADGE
jr z, .done
ld d, STRENGTH
callfar HasPartyMove
ld a, [wWhichTrade]
and a
jr nz, .done
ld a, [wWhichPokemon]
push af
call ManualTextScroll
pop af
ld [wWhichPokemon], a
call GetPartyMonName2
ld a, [wWhichPokemon]
ld hl, wPartySpecies
ld c, a
ld a, l
add a, c
ld l, a
jr nc, .noCarry
inc h
.noCarry
ld a, [hl]
ld [wcf91], a
predef PrintStrengthTxt
.done
jp TextScriptEnd
MartSignText::
text_far _MartSignText
text_end
PokeCenterSignText::
text_far _PokeCenterSignText
text_end
PickUpItemText::
text_asm
predef PickUpItem
jp TextScriptEnd