mirror of
https://github.com/pret/pokered.git
synced 2024-10-22 22:55:31 +00:00
d001ced41b
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.
58 lines
1.3 KiB
NASM
58 lines
1.3 KiB
NASM
VermilionOldRodHouse_Script:
|
|
jp EnableAutoTextBoxDrawing
|
|
|
|
VermilionOldRodHouse_TextPointers:
|
|
def_text_pointers
|
|
dw_const VermilionOldRodHouseFishingGuruText, TEXT_VERMILIONOLDRODHOUSE_FISHING_GURU
|
|
|
|
VermilionOldRodHouseFishingGuruText:
|
|
text_asm
|
|
ld a, [wd728]
|
|
bit 3, a ; got old rod?
|
|
jr nz, .got_old_rod
|
|
ld hl, .DoYouLikeToFishText
|
|
call PrintText
|
|
call YesNoChoice
|
|
ld a, [wCurrentMenuItem]
|
|
and a
|
|
jr nz, .refused
|
|
lb bc, OLD_ROD, 1
|
|
call GiveItem
|
|
jr nc, .bag_full
|
|
ld hl, wd728
|
|
set 3, [hl] ; got old rod
|
|
ld hl, .TakeThisText
|
|
jr .print_text
|
|
.bag_full
|
|
ld hl, .NoRoomText
|
|
jr .print_text
|
|
.refused
|
|
ld hl, .ThatsSoDisappointingText
|
|
jr .print_text
|
|
.got_old_rod
|
|
ld hl, .HowAreTheFishBitingText
|
|
.print_text
|
|
call PrintText
|
|
jp TextScriptEnd
|
|
|
|
.DoYouLikeToFishText:
|
|
text_far _VermilionOldRodHouseFishingGuruDoYouLikeToFishText
|
|
text_end
|
|
|
|
.TakeThisText:
|
|
text_far _VermilionOldRodHouseFishingGuruTakeThisText
|
|
sound_get_item_1
|
|
text_far _VermilionOldRodHouseFishingGuruFishingIsAWayOfLifeText
|
|
text_end
|
|
|
|
.ThatsSoDisappointingText:
|
|
text_far _VermilionOldRodHouseFishingGuruThatsSoDisappointingText
|
|
text_end
|
|
|
|
.HowAreTheFishBitingText:
|
|
text_far _VermilionOldRodHouseFishingGuruHowAreTheFishBitingText
|
|
text_end
|
|
|
|
.NoRoomText:
|
|
text_far _VermilionOldRodHouseFishingGuruNoRoomText
|
|
text_end
|