pokered/scripts/Route12Gate2F.asm
vulcandth d001ced41b
Add macros, constants, and labels for map scripts and text (#367)
This introduces `def_script_pointers`, `def_text_pointers`, and `object_const_def` macros, and applies them to all maps. Most other map labels have also been identified.
2023-07-13 21:27:56 -04:00

79 lines
1.6 KiB
NASM

Route12Gate2F_Script:
jp DisableAutoTextBoxDrawing
Route12Gate2F_TextPointers:
def_text_pointers
dw_const Route12Gate2FBrunetteGirlText, TEXT_ROUTE12GATE2F_BRUNETTE_GIRL
dw_const Route12Gate2FLeftBinocularsText, TEXT_ROUTE12GATE2F_LEFT_BINOCULARS
dw_const Route12Gate2FRightBinocularsText, TEXT_ROUTE12GATE2F_RIGHT_BINOCULARS
Route12Gate2FBrunetteGirlText:
text_asm
CheckEvent EVENT_GOT_TM39, 1
jr c, .got_item
ld hl, .YouCanHaveThisText
call PrintText
lb bc, TM_SWIFT, 1
call GiveItem
jr nc, .bag_full
ld hl, .ReceivedTM39Text
call PrintText
SetEvent EVENT_GOT_TM39
jr .done
.bag_full
ld hl, .TM39NoRoomText
call PrintText
jr .done
.got_item
ld hl, .TM39ExplanationText
call PrintText
.done
jp TextScriptEnd
.YouCanHaveThisText:
text_far _Route12Gate2FBrunetteGirlYouCanHaveThisText
text_end
.ReceivedTM39Text:
text_far _Route12Gate2FBrunetteGirlReceivedTM39Text
sound_get_item_1
text_end
.TM39ExplanationText:
text_far _Route12Gate2FBrunetteGirlTM39ExplanationText
text_end
.TM39NoRoomText:
text_far _Route12Gate2FBrunetteGirlTM39NoRoomText
text_end
Route12Gate2FLeftBinocularsText:
text_asm
ld hl, .Text
jp GateUpstairsScript_PrintIfFacingUp
.Text:
text_far _Route12Gate2FLeftBinocularsText
text_end
Route12Gate2FRightBinocularsText:
text_asm
ld hl, .Text
jp GateUpstairsScript_PrintIfFacingUp
.Text:
text_far _Route12Gate2FRightBinocularsText
text_end
GateUpstairsScript_PrintIfFacingUp:
ld a, [wSpritePlayerStateData1FacingDirection]
cp SPRITE_FACING_UP
jr z, .up
ld a, TRUE
jr .done
.up
call PrintText
xor a
.done
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
jp TextScriptEnd