aboutsummaryrefslogtreecommitdiffstats
path: root/scripts/CeladonMartElevator.asm
diff options
context:
space:
mode:
authorRangi42 <remy.oukaour+rangi42@gmail.com>2023-11-18 19:44:03 -0500
committerRangi42 <remy.oukaour+rangi42@gmail.com>2023-11-18 19:44:03 -0500
commit26a342b104e48bede16b9e2324c2f8f57df5bd50 (patch)
tree47dc8ca18fa2bbc8aee0f52c99d710d50ef45bd6 /scripts/CeladonMartElevator.asm
parent.calculateHPBarCoords incorrectly referenced OAM (diff)
downloadpokeyellow-26a342b104e48bede16b9e2324c2f8f57df5bd50.tar.gz
pokeyellow-26a342b104e48bede16b9e2324c2f8f57df5bd50.tar.xz
pokeyellow-26a342b104e48bede16b9e2324c2f8f57df5bd50.zip
Identify more map script labels
Diffstat (limited to 'scripts/CeladonMartElevator.asm')
-rw-r--r--scripts/CeladonMartElevator.asm22
1 files changed, 11 insertions, 11 deletions
diff --git a/scripts/CeladonMartElevator.asm b/scripts/CeladonMartElevator.asm
index c13ecd73..9a2842f3 100644
--- a/scripts/CeladonMartElevator.asm
+++ b/scripts/CeladonMartElevator.asm
@@ -3,26 +3,26 @@ CeladonMartElevator_Script:
bit 5, [hl]
res 5, [hl]
push hl
- call nz, CeladonMartElevatorScript_4861c
+ call nz, CeladonMartElevatorStoreWarpEntriesScript
pop hl
bit 7, [hl]
res 7, [hl]
- call nz, CeladonMartElevatorScript_48654
+ call nz, CeladonMartElevatorShakeScript
xor a
ld [wAutoTextBoxDrawingControl], a
inc a
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
ret
-CeladonMartElevatorScript_4861c:
+CeladonMartElevatorStoreWarpEntriesScript:
ld hl, wWarpEntries
ld a, [wWarpedFromWhichWarp]
ld b, a
ld a, [wWarpedFromWhichMap]
ld c, a
- call CeladonMartElevatorScript_4862a
-
-CeladonMartElevatorScript_4862a:
+ call .StoreWarpEntry
+ ; fallthrough
+.StoreWarpEntry:
inc hl
inc hl
ld a, b
@@ -31,12 +31,12 @@ CeladonMartElevatorScript_4862a:
ld [hli], a
ret
-CeladonMartElevatorScript_48631:
+CeladonMartElevatorCopyWarpMapsScript:
ld hl, CeladonMartElevatorFloors
call LoadItemList
ld hl, CeladonMartElevatorWarpMaps
ld de, wElevatorWarpMaps
- ld bc, CeladonMartElevatorWarpMapsEnd - CeladonMartElevatorWarpMaps
+ ld bc, CeladonMartElevatorWarpMaps.End - CeladonMartElevatorWarpMaps
jp CopyData
CeladonMartElevatorFloors:
@@ -56,9 +56,9 @@ CeladonMartElevatorWarpMaps:
db 2, CELADON_MART_3F
db 2, CELADON_MART_4F
db 2, CELADON_MART_5F
-CeladonMartElevatorWarpMapsEnd:
+.End:
-CeladonMartElevatorScript_48654:
+CeladonMartElevatorShakeScript:
farjp ShakeElevator
CeladonMartElevator_TextPointers:
@@ -67,7 +67,7 @@ CeladonMartElevator_TextPointers:
CeladonMartElevatorText:
text_asm
- call CeladonMartElevatorScript_48631
+ call CeladonMartElevatorCopyWarpMapsScript
ld hl, CeladonMartElevatorWarpMaps
predef DisplayElevatorFloorMenu
jp TextScriptEnd