shithub: pokecrystal

Download patch

ref: 306c85750e0686f9af104249ca3000e717aee0e2
parent: 5a546068a84d57454c7f95395250346ac14da81e
author: Rangi <remy.oukaour+rangi42@gmail.com>
date: Sun Oct 4 15:43:28 EDT 2020

Identify some more unnamed labels

--- a/engine/battle/move_effects/metronome.asm
+++ b/engine/battle/move_effects/metronome.asm
@@ -3,7 +3,7 @@
 
 	call ClearLastMove
 	call CheckUserIsCharging
-	jr nz, .asm_3742b
+	jr nz, .charging
 
 	ld a, [wBattleAnimParam]
 	push af
@@ -11,7 +11,7 @@
 	pop af
 	ld [wBattleAnimParam], a
 
-.asm_3742b
+.charging
 	call LoadMoveAnim
 
 .GetMove:
--- a/engine/battle/move_effects/protect.asm
+++ b/engine/battle/move_effects/protect.asm
@@ -16,9 +16,9 @@
 	ld de, wPlayerProtectCount
 	ldh a, [hBattleTurn]
 	and a
-	jr z, .asm_37637
+	jr z, .got_count
 	ld de, wEnemyProtectCount
-.asm_37637
+.got_count
 
 	call CheckOpponentWentFirst
 	jr nz, .failed
--- a/engine/battle/move_effects/spikes.asm
+++ b/engine/battle/move_effects/spikes.asm
@@ -4,9 +4,9 @@
 	ld hl, wEnemyScreens
 	ldh a, [hBattleTurn]
 	and a
-	jr z, .asm_3768e
+	jr z, .got_screens
 	ld hl, wPlayerScreens
-.asm_3768e
+.got_screens
 
 ; Fails if spikes are already down!
 
--- a/engine/events/overworld.asm
+++ b/engine/events/overworld.asm
@@ -1089,7 +1089,7 @@
 WhirlpoolFunction:
 	call FieldMoveJumptableReset
 .loop
-	ld hl, Jumptable_cdae
+	ld hl, .Jumptable
 	call FieldMoveJumptable
 	jr nc, .loop
 	and $7f
@@ -1096,7 +1096,7 @@
 	ld [wFieldMoveSucceeded], a
 	ret
 
-Jumptable_cdae:
+.Jumptable:
 	dw .TryWhirlpool
 	dw .DoWhirlpool
 	dw .FailWhirlpool
--- a/engine/events/pokecenter_pc.asm
+++ b/engine/events/pokecenter_pc.asm
@@ -211,7 +211,7 @@
 	ld b, PLAYERSPC_HOUSE
 	call _PlayersPC
 	and a
-	jr nz, .asm_156f9
+	jr nz, .changed_deco_tiles
 	call OverworldTextModeSwitch
 	call ApplyTilemap
 	call UpdateSprites
@@ -219,7 +219,7 @@
 	ld c, FALSE
 	ret
 
-.asm_156f9
+.changed_deco_tiles
 	call ClearBGPalettes
 	ld c, TRUE
 	ret
--- a/engine/gfx/sgb_layouts.asm
+++ b/engine/gfx/sgb_layouts.asm
@@ -134,7 +134,7 @@
 	ret
 
 .SGB_MoveList:
-	ld hl, PalPacket_Routes
+	ld hl, PalPacket_AllPal0
 	ld de, wSGBPals
 	ld bc, PALPACKET_LENGTH
 	call CopyBytes
@@ -341,7 +341,7 @@
 	ret
 
 .SGB_MapPals:
-	ld hl, PalPacket_Routes
+	ld hl, PalPacket_AllPal0
 	ld de, wSGBPals
 	ld bc, PALPACKET_LENGTH
 	call CopyBytes
@@ -409,7 +409,7 @@
 	ret
 
 .SGB_Pokepic:
-	ld hl, PalPacket_Routes
+	ld hl, PalPacket_AllPal0
 	ld de, wSGBPals
 	ld bc, PALPACKET_LENGTH
 	call CopyBytes
--- a/engine/items/item_effects.asm
+++ b/engine/items/item_effects.asm
@@ -1377,17 +1377,16 @@
 	jp c, StatusHealer_ExitMenu
 
 	call UseStatusHealer
+	cp FALSE
+	jr nz, .not_used
 
-	cp $0
-	jr nz, .asm_efc9
 	ld c, HAPPINESS_BITTERPOWDER
 	farcall ChangeHappiness
-
 	call LooksBitterMessage
 
 	ld a, $0
 
-.asm_efc9
+.not_used
 	jp StatusHealer_Jumptable
 
 StatusHealingEffect:
@@ -1401,7 +1400,7 @@
 
 UseStatusHealer:
 	call IsMonFainted
-	ld a, $1
+	ld a, TRUE
 	ret z
 	call GetItemHealingAction
 	ld a, MON_STATUS
@@ -1410,7 +1409,7 @@
 	and c
 	jr nz, .good
 	call IsItemUsedOnConfusedMon
-	ld a, $1
+	ld a, TRUE
 	ret nc
 	ld b, PARTYMENUTEXT_HEAL_CONFUSION
 .good
@@ -1422,7 +1421,7 @@
 	call Play_SFX_FULL_HEAL
 	call ItemActionTextWaitButton
 	call UseDisposableItem
-	ld a, $0
+	ld a, FALSE
 	ret
 
 IsItemUsedOnConfusedMon:
@@ -1512,15 +1511,16 @@
 	jp c, StatusHealer_ExitMenu
 
 	call RevivePokemon
-	cp 0
-	jr nz, .asm_f0c5
+	cp FALSE
+	jr nz, .not_used
 
 	ld c, HAPPINESS_REVIVALHERB
 	farcall ChangeHappiness
 	call LooksBitterMessage
-	ld a, 0
 
-.asm_f0c5
+	ld a, $0
+
+.not_used
 	jp StatusHealer_Jumptable
 
 ReviveEffect:
@@ -1533,7 +1533,7 @@
 
 RevivePokemon:
 	call IsMonFainted
-	ld a, 1
+	ld a, TRUE
 	ret nz
 	ld a, [wBattleMode]
 	and a
@@ -1574,7 +1574,7 @@
 	ld [wPartyMenuActionText], a
 	call ItemActionTextWaitButton
 	call UseDisposableItem
-	ld a, 0
+	ld a, FALSE
 	ret
 
 FullRestoreEffect:
--- a/engine/link/link.asm
+++ b/engine/link/link.asm
@@ -1435,7 +1435,7 @@
 	call DelayFrames
 	farcall ValidateOTTrademon
 	jr c, .abnormal
-	farcall Functionfb5dd
+	farcall CheckAnyOtherAliveMonsForTrade
 	jp nc, LinkTrade
 	xor a
 	ld [wcf57], a
--- a/engine/link/time_capsule.asm
+++ b/engine/link/time_capsule.asm
@@ -64,7 +64,7 @@
 	scf
 	ret
 
-Functionfb5dd:
+CheckAnyOtherAliveMonsForTrade:
 	ld a, [wd002]
 	ld d, a
 	ld a, [wPartyCount]
--- a/engine/menus/menu.asm
+++ b/engine/menus/menu.asm
@@ -690,7 +690,7 @@
 	dec [hl]
 	ret
 
-Function24423: ; unreferenced
+RestoreOverworldMapTiles: ; unreferenced
 	ld a, [wVramState]
 	bit 0, a
 	ret z
--- a/engine/menus/menu_2.asm
+++ b/engine/menus/menu_2.asm
@@ -28,17 +28,17 @@
 	ret
 
 PlaceMoneyTopRight:
-	ld hl, MenuHeader_0x24b15
+	ld hl, MoneyTopRightMenuHeader
 	call CopyMenuHeader
 	jr PlaceMoneyTextbox
 
 PlaceMoneyBottomLeft:
-	ld hl, MenuHeader_0x24b1d
+	ld hl, MoneyBottomLeftMenuHeader
 	call CopyMenuHeader
 	jr PlaceMoneyTextbox
 
 PlaceMoneyAtTopLeftOfTextbox:
-	ld hl, MenuHeader_0x24b15
+	ld hl, MoneyTopRightMenuHeader
 	lb de, 0, 11
 	call OffsetMenuHeader
 
@@ -52,13 +52,13 @@
 	call PrintNum
 	ret
 
-MenuHeader_0x24b15:
+MoneyTopRightMenuHeader:
 	db MENU_BACKUP_TILES ; flags
 	menu_coords 11, 0, SCREEN_WIDTH - 1, 2
 	dw NULL
 	db 1 ; default option
 
-MenuHeader_0x24b1d:
+MoneyBottomLeftMenuHeader:
 	db MENU_BACKUP_TILES ; flags
 	menu_coords 0, 11, 8, 13
 	dw NULL
--- a/engine/overworld/cmd_queue.asm
+++ b/engine/overworld/cmd_queue.asm
@@ -158,7 +158,7 @@
 	ret
 
 CmdQueue_Type1:
-	call Function2f3e
+	call SetXYCompareFlags
 	ret
 
 CmdQueue_Type4:
--- a/engine/overworld/decorations.asm
+++ b/engine/overworld/decorations.asm
@@ -834,7 +834,7 @@
 
 DecoAction_AskWhichSide:
 	call MenuTextbox
-	ld hl, MenuHeader_0x26eab
+	ld hl, DecoSideMenuHeader
 	call GetMenu2
 	call ExitMenu
 	call CopyMenuData
@@ -867,13 +867,13 @@
 	pop de
 	ret
 
-MenuHeader_0x26eab:
+DecoSideMenuHeader:
 	db MENU_BACKUP_TILES ; flags
 	menu_coords 0, 0, 13, 7
-	dw MenuData_0x26eb3
+	dw .MenuData
 	db 1 ; default option
 
-MenuData_0x26eb3:
+.MenuData:
 	db STATICMENU_CURSOR ; flags
 	db 3 ; items
 	db "RIGHT SIDE@"
--- a/engine/overworld/events.asm
+++ b/engine/overworld/events.asm
@@ -399,7 +399,7 @@
 Dummy_CheckScriptFlags3Bit5:
 	call CheckBit5_ScriptFlags3
 	ret z
-	call Function2f3e
+	call SetXYCompareFlags
 	ret
 
 RunSceneScript:
@@ -975,7 +975,7 @@
 
 PlayerEventScriptPointers:
 ; entries correspond to PLAYEREVENT_* constants
-	dba Invalid_0x96c2d         ; PLAYEREVENT_NONE
+	dba InvalidEventScript      ; PLAYEREVENT_NONE
 	dba SeenByTrainerScript     ; PLAYEREVENT_SEENBYTRAINER
 	dba TalkToTrainerScript     ; PLAYEREVENT_TALKTOTRAINER
 	dba FindItemInBallScript    ; PLAYEREVENT_ITEMBALL
@@ -985,12 +985,12 @@
 	dba OverworldWhiteoutScript ; PLAYEREVENT_WHITEOUT
 	dba HatchEggScript          ; PLAYEREVENT_HATCH
 	dba ChangeDirectionScript   ; PLAYEREVENT_JOYCHANGEFACING
-	dba Invalid_0x96c2d         ; (NUM_PLAYER_EVENTS)
+	dba InvalidEventScript      ; (NUM_PLAYER_EVENTS)
 
-Invalid_0x96c2d:
+InvalidEventScript:
 	end
 
-; unused
+UnusedPlayerEventScript: ; unreferenced
 	end
 
 HatchEggScript:
@@ -1005,12 +1005,12 @@
 FallIntoMapScript:
 	newloadmap MAPSETUP_FALL
 	playsound SFX_KINESIS
-	applymovement PLAYER, MovementData_0x96c48
+	applymovement PLAYER, .SkyfallMovement
 	playsound SFX_STRENGTH
 	scall LandAfterPitfallScript
 	end
 
-MovementData_0x96c48:
+.SkyfallMovement:
 	skyfall
 	step_end
 
@@ -1018,10 +1018,10 @@
 	earthquake 16
 	end
 
-EdgeWarpScript: ; 4
+EdgeWarpScript:
 	reloadend MAPSETUP_CONNECTION
 
-ChangeDirectionScript: ; 9
+ChangeDirectionScript:
 	deactivatefacing 3
 	callasm EnableWildEncounters
 	end
--- a/engine/overworld/player_movement.asm
+++ b/engine/overworld/player_movement.asm
@@ -364,7 +364,7 @@
 	and 7
 	ld e, a
 	ld d, 0
-	ld hl, .data_8021e
+	ld hl, .ledge_table
 	add hl, de
 	ld a, [wFacingDirection]
 	and [hl]
@@ -382,7 +382,7 @@
 	xor a
 	ret
 
-.data_8021e
+.ledge_table
 	db FACE_RIGHT             ; COLL_HOP_RIGHT
 	db FACE_LEFT              ; COLL_HOP_LEFT
 	db FACE_UP                ; COLL_HOP_UP
--- a/engine/phone/scripts/mom.asm
+++ b/engine/phone/scripts/mom.asm
@@ -1,6 +1,6 @@
 MomPhoneCalleeScript:
 	checkevent EVENT_TALKED_TO_MOM_AFTER_MYSTERY_EGG_QUEST
-	iftrue .bcec5
+	iftrue .started_quest
 	checkevent EVENT_DUDE_TALKED_TO_YOU
 	iftrue MomPhoneLectureScript
 	checkevent EVENT_GAVE_MYSTERY_EGG_TO_ELM
@@ -9,7 +9,7 @@
 	iftrue MomPhoneNoPokedexScript
 	sjump MomPhoneNoPokemonScript
 
-.bcec5
+.started_quest
 	checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_8
 	iftrue MomPhoneHangUpScript
 	farwritetext MomPhoneGreetingText
--- a/engine/pokemon/bills_pc.asm
+++ b/engine/pokemon/bills_pc.asm
@@ -513,16 +513,16 @@
 	inc a
 	ld [wBillsPC_LoadedBox], a
 	call DelayFrame
-.asm_e2781
+.loop
 	call JoyTextDelay
 	ld a, [wJumptableIndex]
 	bit 7, a
-	jr nz, .asm_e2793
+	jr nz, .done
 	call .RunJumptable
 	call DelayFrame
-	jr .asm_e2781
+	jr .loop
 
-.asm_e2793
+.done
 	call ClearSprites
 	pop af
 	ldh [hInMenu], a
--- a/engine/pokemon/mon_submenu.asm
+++ b/engine/pokemon/mon_submenu.asm
@@ -245,7 +245,7 @@
 	ret
 
 BattleMonMenu:
-	ld hl, MenuHeader_0x24ed4
+	ld hl, .MenuHeader
 	call CopyMenuHeader
 	xor a
 	ldh [hBGMapMode], a
@@ -276,13 +276,13 @@
 	and a
 	ret
 
-MenuHeader_0x24ed4:
+.MenuHeader:
 	db 0 ; flags
 	menu_coords 11, 11, SCREEN_WIDTH - 1, SCREEN_HEIGHT - 1
-	dw MenuData_0x24edc
+	dw .MenuData
 	db 1 ; default option
 
-MenuData_0x24edc:
+.MenuData:
 	db STATICMENU_CURSOR | STATICMENU_NO_TOP_SPACING ; flags
 	db 3 ; items
 	db "SWITCH@"
--- a/engine/printer/printer.asm
+++ b/engine/printer/printer.asm
@@ -907,7 +907,7 @@
 .loop
 	push bc
 	push hl
-	ld de, String84a25
+	ld de, .EmptyBoxSlotString
 	call PlaceString
 	pop hl
 	ld bc, 3 * SCREEN_WIDTH
@@ -917,5 +917,5 @@
 	jr nz, .loop
 	ret
 
-String84a25:
+.EmptyBoxSlotString:
 	db "  ------@"
--- a/gfx/sgb/pal_packets.asm
+++ b/gfx/sgb/pal_packets.asm
@@ -28,7 +28,7 @@
 PalPacket_UnownPuzzle:
 	sgb_pal_set UNOWN_PUZZLE, UNOWN_PUZZLE, UNOWN_PUZZLE, UNOWN_PUZZLE
 
-PalPacket_Routes:
+PalPacket_AllPal0:
 	sgb_pal_set ROUTES, ROUTES, ROUTES, ROUTES
 
 PalPacket_GSIntroShellderLapras:
--- a/home/region.asm
+++ b/home/region.asm
@@ -31,5 +31,5 @@
 	ld a, KANTO_REGION
 	ret
 
-Function2f3e:: ; dummied out
+SetXYCompareFlags:: ; dummied out
 	ret
--- a/mobile/mobile_40.asm
+++ b/mobile/mobile_40.asm
@@ -5276,7 +5276,7 @@
 	call Function102b9c
 	call Function102bdc
 	jr c, .asm_10256d
-	farcall Functionfb5dd
+	farcall CheckAnyOtherAliveMonsForTrade
 	jr c, .asm_102568
 	ld hl, wcd4b
 	set 1, [hl]
--- a/wram.asm
+++ b/wram.asm
@@ -2448,8 +2448,8 @@
 	dw
 	ds 1
 wWildEncounterCooldown:: db
-wXYComparePointer:: dw
 
+wXYComparePointer:: dw
 	ds 4
 
 wBattleScriptFlags:: db