pokered/scripts/CeruleanBadgeHouse.asm

124 lines
2.6 KiB
NASM
Raw Permalink Normal View History

CeruleanBadgeHouse_Script:
2024-09-24 03:51:44 +00:00
ld a, 1 << BIT_NO_AUTO_TEXT_BOX
2014-09-13 07:50:56 +00:00
ld [wAutoTextBoxDrawingControl], a
2014-05-18 18:19:10 +00:00
dec a
2014-09-13 07:50:56 +00:00
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
2014-05-18 18:19:10 +00:00
ret
CeruleanBadgeHouse_TextPointers:
def_text_pointers
dw_const CeruleanBadgeHouseMiddleAgedManText, TEXT_CERULEANBADGEHOUSE_MIDDLE_AGED_MAN
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseMiddleAgedManText:
text_asm
ld hl, .Text
2014-05-18 18:19:10 +00:00
call PrintText
xor a
ld [wCurrentMenuItem], a
ld [wListScrollOffset], a
2023-11-19 00:44:03 +00:00
.loop
ld hl, .WhichBadgeText
2014-05-18 18:19:10 +00:00
call PrintText
ld hl, .BadgeItemList
2014-05-18 18:19:10 +00:00
call LoadItemList
2015-07-15 06:16:06 +00:00
ld hl, wItemList
2014-05-18 18:19:10 +00:00
ld a, l
2015-07-15 06:16:06 +00:00
ld [wListPointer], a
2014-05-18 18:19:10 +00:00
ld a, h
2015-07-15 06:16:06 +00:00
ld [wListPointer + 1], a
2014-05-18 18:19:10 +00:00
xor a
2015-07-13 06:00:48 +00:00
ld [wPrintItemPrices], a
2014-08-09 05:39:13 +00:00
ld [wMenuItemToSwap], a
2014-05-18 18:19:10 +00:00
ld a, SPECIALLISTMENU
ld [wListMenuID], a
call DisplayListMenuID
2023-11-19 00:44:03 +00:00
jr c, .done
ld hl, CeruleanBadgeHouseBadgeTextPointers
ld a, [wCurItem]
sub BOULDERBADGE
2014-05-18 18:19:10 +00:00
add a
ld d, $0
ld e, a
add hl, de
ld a, [hli]
ld h, [hl]
ld l, a
call PrintText
2023-11-19 00:44:03 +00:00
jr .loop
.done
2014-05-18 18:19:10 +00:00
xor a
ld [wListScrollOffset], a
ld hl, .VisitAnyTimeText
2014-05-18 18:19:10 +00:00
call PrintText
jp TextScriptEnd
.BadgeItemList:
table_width 1, .BadgeItemList
2023-11-19 00:44:03 +00:00
db NUM_BADGES ; #
db BOULDERBADGE
db CASCADEBADGE
db THUNDERBADGE
db RAINBOWBADGE
db SOULBADGE
db MARSHBADGE
db VOLCANOBADGE
db EARTHBADGE
db -1 ; end
assert_table_length NUM_BADGES + 2
2014-05-18 18:19:10 +00:00
.Text:
text_far _CeruleanBadgeHouseMiddleAgedManText
text_end
2014-05-18 18:19:10 +00:00
.WhichBadgeText:
text_far _CeruleanBadgeHouseMiddleAgedManWhichBadgeText
text_end
2014-05-18 18:19:10 +00:00
.VisitAnyTimeText:
text_far _CeruleanBadgeHouseMiddleAgedManVisitAnyTimeText
text_end
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseBadgeTextPointers:
table_width 2, CeruleanBadgeHouseBadgeTextPointers
dw CeruleanBadgeHouseBoulderBadgeText
dw CeruleanBadgeHouseCascadeBadgeText
dw CeruleanBadgeHouseThunderBadgeText
dw CeruleanBadgeHouseRainbowBadgeText
dw CeruleanBadgeHouseSoulBadgeText
dw CeruleanBadgeHouseMarshBadgeText
dw CeruleanBadgeHouseVolcanoBadgeText
dw CeruleanBadgeHouseEarthBadgeText
assert_table_length NUM_BADGES
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseBoulderBadgeText:
text_far _CeruleanBadgeHouseBoulderBadgeText
text_end
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseCascadeBadgeText:
text_far _CeruleanBadgeHouseCascadeBadgeText
text_end
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseThunderBadgeText:
text_far _CeruleanBadgeHouseThunderBadgeText
text_end
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseRainbowBadgeText:
text_far _CeruleanBadgeHouseRainbowBadgeText
text_end
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseSoulBadgeText:
text_far _CeruleanBadgeHouseSoulBadgeText
text_end
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseMarshBadgeText:
text_far _CeruleanBadgeHouseMarshBadgeText
text_end
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseVolcanoBadgeText:
text_far _CeruleanBadgeHouseVolcanoBadgeText
text_end
2014-05-18 18:19:10 +00:00
CeruleanBadgeHouseEarthBadgeText:
text_far _CeruleanBadgeHouseEarthBadgeText
text_end