pokecrystal/engine/pokemon/caught_data.asm

CheckPartyFullAfterContest:
	ld a, [wContestMonSpecies]
	and a
	jp z, .DidntCatchAnything
	ld [wCurPartySpecies], a
	ld [wCurSpecies], a
	call GetBaseData
	ld hl, wPartyCount
	ld a, [hl]
	cp PARTY_LENGTH
	jp nc, .TryAddToBox
	inc a
	ld [hl], a
	ld c, a
	ld b, 0
	add hl, bc
	ld a, [wContestMonSpecies]
	ld [hli], a
	ld [wCurSpecies], a
	ld a, -1
	ld [hl], a
	ld hl, wPartyMon1Species
	ld a, [wPartyCount]
	dec a
	ld bc, PARTYMON_STRUCT_LENGTH
	call AddNTimes
	ld d, h
	ld e, l
	ld hl, wContestMon
	ld bc, PARTYMON_STRUCT_LENGTH
	call CopyBytes
	ld a, [wPartyCount]
	dec a
	ld hl, wPartyMonOT
	call SkipNames
	ld d, h
	ld e, l
	ld hl, wPlayerName
	call CopyBytes
	ld a, [wCurPartySpecies]
	ld [wNamedObjectIndexBuffer], a
	call GetPokemonName
	ld hl, wStringBuffer1
	ld de, wMonOrItemNameBuffer
	ld bc, MON_NAME_LENGTH
	call CopyBytes
	call GiveANickname_YesNo
	jr c, .Party_SkipNickname
	ld a, [wPartyCount]
	dec a
	ld [wCurPartyMon], a
	xor a
	ld [wMonType], a
	ld de, wMonOrItemNameBuffer
	callfar InitNickname

.Party_SkipNickname:
	ld a, [wPartyCount]
	dec a
	ld hl, wPartyMonNicknames
	call SkipNames
	ld d, h
	ld e, l
	ld hl, wMonOrItemNameBuffer
	call CopyBytes
	ld a, [wPartyCount]
	dec a
	ld hl, wPartyMon1Level
	call GetPartyLocation
	ld a, [hl]
	ld [wCurPartyLevel], a
	call SetCaughtData
	ld a, [wPartyCount]
	dec a
	ld hl, wPartyMon1CaughtLocation
	call GetPartyLocation
	ld a, [hl]
	and CAUGHT_GENDER_MASK
	ld b, LANDMARK_NATIONAL_PARK
	or b
	ld [hl], a
	xor a
	ld [wContestMonSpecies], a
	and a ; BUGCONTEST_CAUGHT_MON
	ld [wScriptVar], a
	ret

.TryAddToBox:
	ld a, BANK(sBoxCount)
	call OpenSRAM
	ld hl, sBoxCount
	ld a, [hl]
	cp MONS_PER_BOX
	call CloseSRAM
	jr nc, .BoxFull
	xor a
	ld [wCurPartyMon], a
	ld hl, wContestMon
	ld de, wBufferMon
	ld bc, BOXMON_STRUCT_LENGTH
	call CopyBytes
	ld hl, wPlayerName
	ld de, wBufferMonOT
	ld bc, NAME_LENGTH
	call CopyBytes
	callfar InsertPokemonIntoBox
	ld a, [wCurPartySpecies]
	ld [wNamedObjectIndexBuffer], a
	call GetPokemonName
	call GiveANickname_YesNo
	ld hl, wStringBuffer1
	jr c, .Box_SkipNickname
	ld a, BOXMON
	ld [wMonType], a
	ld de, wMonOrItemNameBuffer
	callfar InitNickname
	ld hl, wMonOrItemNameBuffer

.Box_SkipNickname:
	ld a, BANK(sBoxMonNicknames)
	call OpenSRAM
	ld de, sBoxMonNicknames
	ld bc, MON_NAME_LENGTH
	call CopyBytes
	call CloseSRAM

.BoxFull:
	ld a, BANK(sBoxMon1Level)
	call OpenSRAM
	ld a, [sBoxMon1Level]
	ld [wCurPartyLevel], a
	call CloseSRAM
	call SetBoxMonCaughtData
	ld a, BANK(sBoxMon1CaughtLocation)
	call OpenSRAM
	ld hl, sBoxMon1CaughtLocation
	ld a, [hl]
	and CAUGHT_GENDER_MASK
	ld b, LANDMARK_NATIONAL_PARK
	or b
	ld [hl], a
	call CloseSRAM
	xor a
	ld [wContestMon], a
	ld a, BUGCONTEST_BOXED_MON
	ld [wScriptVar], a
	ret

.DidntCatchAnything:
	ld a, BUGCONTEST_NO_CATCH
	ld [wScriptVar], a
	ret

GiveANickname_YesNo:
	ld hl, CaughtAskNicknameText
	call PrintText
	jp YesNoBox

CaughtAskNicknameText:
	text_far _CaughtAskNicknameText
	text_end

SetCaughtData:
	ld a, [wPartyCount]
	dec a
	ld hl, wPartyMon1CaughtLevel
	call GetPartyLocation
SetBoxmonOrEggmonCaughtData:
	ld a, [wTimeOfDay]
	inc a
	rrca
	rrca
	ld b, a
	ld a, [wCurPartyLevel]
	or b
	ld [hli], a
	ld a, [wMapGroup]
	ld b, a
	ld a, [wMapNumber]
	ld c, a
	cp MAP_POKECENTER_2F
	jr nz, .NotPokecenter2F
	ld a, b
	cp GROUP_POKECENTER_2F
	jr nz, .NotPokecenter2F

	ld a, [wBackupMapGroup]
	ld b, a
	ld a, [wBackupMapNumber]
	ld c, a

.NotPokecenter2F:
	call GetWorldMapLocation
	ld b, a
	ld a, [wPlayerGender]
	rrca ; shift bit 0 (PLAYERGENDER_FEMALE_F) to bit 7 (CAUGHT_GENDER_MASK)
	or b
	ld [hl], a
	ret

SetBoxMonCaughtData:
	ld a, BANK(sBoxMon1CaughtLevel)
	call OpenSRAM
	ld hl, sBoxMon1CaughtLevel
	call SetBoxmonOrEggmonCaughtData
	call CloseSRAM
	ret

SetGiftBoxMonCaughtData:
	push bc
	ld a, BANK(sBoxMon1CaughtLevel)
	call OpenSRAM
	ld hl, sBoxMon1CaughtLevel
	pop bc
	call SetGiftMonCaughtData
	call CloseSRAM
	ret

SetGiftPartyMonCaughtData:
	ld a, [wPartyCount]
	dec a
	ld hl, wPartyMon1CaughtLevel
	push bc
	call GetPartyLocation
	pop bc
SetGiftMonCaughtData:
	xor a
	ld [hli], a
	ld a, LANDMARK_GIFT
	rrc b
	or b
	ld [hl], a
	ret

SetEggMonCaughtData:
	ld a, [wCurPartyMon]
	ld hl, wPartyMon1CaughtLevel
	call GetPartyLocation
	ld a, [wCurPartyLevel]
	push af
	ld a, CAUGHT_EGG_LEVEL
	ld [wCurPartyLevel], a
	call SetBoxmonOrEggmonCaughtData
	pop af
	ld [wCurPartyLevel], a
	ret
Remove all address comments 2018-06-24 14:09:41 +00:00			`CheckPartyFullAfterContest:`
Harmonize engine/{movie, pokemon} with pokegold (renames GetSRAMBank to OpenSRAM) To do: engine/{menus, overworld} 2020-06-17 21:03:38 +00:00			`ld a, [wContestMonSpecies]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`and a`
			`jp z, .DidntCatchAnything`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wCurPartySpecies], a`
			`ld [wCurSpecies], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call GetBaseData`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPartyCount`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld a, [hl]`
Use maskbits some more 2018-01-11 17:00:01 +00:00			`cp PARTY_LENGTH`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`jp nc, .TryAddToBox`
			`inc a`
			`ld [hl], a`
			`ld c, a`
Use maskbits some more 2018-01-11 17:00:01 +00:00			`ld b, 0`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`add hl, bc`
Harmonize engine/{movie, pokemon} with pokegold (renames GetSRAMBank to OpenSRAM) To do: engine/{menus, overworld} 2020-06-17 21:03:38 +00:00			`ld a, [wContestMonSpecies]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld [hli], a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wCurSpecies], a`
Use maskbits some more 2018-01-11 17:00:01 +00:00			`ld a, -1`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld [hl], a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPartyMon1Species`
			`ld a, [wPartyCount]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`dec a`
			`ld bc, PARTYMON_STRUCT_LENGTH`
			`call AddNTimes`
			`ld d, h`
			`ld e, l`
			`ld hl, wContestMon`
			`ld bc, PARTYMON_STRUCT_LENGTH`
			`call CopyBytes`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wPartyCount]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`dec a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPartyMonOT`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call SkipNames`
			`ld d, h`
			`ld e, l`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPlayerName`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call CopyBytes`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wCurPartySpecies]`
Add meaningful aliases for wd265 Introduce MONICON_* constants Introduce BATTLEPLAYERACTION_* constants 2018-07-28 23:27:34 +00:00			`ld [wNamedObjectIndexBuffer], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call GetPokemonName`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wStringBuffer1`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld de, wMonOrItemNameBuffer`
PARTY_LENGTH; MON_NAME; sgb_border.bin 2018-01-20 17:25:55 +00:00			`ld bc, MON_NAME_LENGTH`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call CopyBytes`
			`call GiveANickname_YesNo`
			`jr c, .Party_SkipNickname`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wPartyCount]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`dec a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wCurPartyMon], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`xor a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wMonType], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld de, wMonOrItemNameBuffer`
callba/callab → farcall/callfar 2017-12-24 17:47:30 +00:00			`callfar InitNickname`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00
			`.Party_SkipNickname:`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wPartyCount]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`dec a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPartyMonNicknames`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call SkipNames`
			`ld d, h`
			`ld e, l`
			`ld hl, wMonOrItemNameBuffer`
			`call CopyBytes`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wPartyCount]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`dec a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPartyMon1Level`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call GetPartyLocation`
			`ld a, [hl]`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wCurPartyLevel], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call SetCaughtData`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wPartyCount]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`dec a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPartyMon1CaughtLocation`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call GetPartyLocation`
			`ld a, [hl]`
Use maskbits some more 2018-01-11 17:00:01 +00:00			`and CAUGHT_GENDER_MASK`
Add a `LANDMARK_` prefix to landmark constants Resolves #697 2020-03-15 21:26:10 +00:00			`ld b, LANDMARK_NATIONAL_PARK`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`or b`
			`ld [hl], a`
			`xor a`
Harmonize engine/{movie, pokemon} with pokegold (renames GetSRAMBank to OpenSRAM) To do: engine/{menus, overworld} 2020-06-17 21:03:38 +00:00			`ld [wContestMonSpecies], a`
Use more constants in scripts 2018-01-12 06:40:20 +00:00			`and a ; BUGCONTEST_CAUGHT_MON`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wScriptVar], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`.TryAddToBox:`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld a, BANK(sBoxCount)`
Harmonize engine/{movie, pokemon} with pokegold (renames GetSRAMBank to OpenSRAM) To do: engine/{menus, overworld} 2020-06-17 21:03:38 +00:00			`call OpenSRAM`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld hl, sBoxCount`
			`ld a, [hl]`
			`cp MONS_PER_BOX`
			`call CloseSRAM`
			`jr nc, .BoxFull`
			`xor a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wCurPartyMon], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld hl, wContestMon`
			`ld de, wBufferMon`
			`ld bc, BOXMON_STRUCT_LENGTH`
			`call CopyBytes`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPlayerName`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld de, wBufferMonOT`
			`ld bc, NAME_LENGTH`
			`call CopyBytes`
callba/callab → farcall/callfar 2017-12-24 17:47:30 +00:00			`callfar InsertPokemonIntoBox`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wCurPartySpecies]`
Add meaningful aliases for wd265 Introduce MONICON_* constants Introduce BATTLEPLAYERACTION_* constants 2018-07-28 23:27:34 +00:00			`ld [wNamedObjectIndexBuffer], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call GetPokemonName`
			`call GiveANickname_YesNo`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wStringBuffer1`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`jr c, .Box_SkipNickname`
			`ld a, BOXMON`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wMonType], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld de, wMonOrItemNameBuffer`
callba/callab → farcall/callfar 2017-12-24 17:47:30 +00:00			`callfar InitNickname`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld hl, wMonOrItemNameBuffer`

			`.Box_SkipNickname:`
			`ld a, BANK(sBoxMonNicknames)`
Harmonize engine/{movie, pokemon} with pokegold (renames GetSRAMBank to OpenSRAM) To do: engine/{menus, overworld} 2020-06-17 21:03:38 +00:00			`call OpenSRAM`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld de, sBoxMonNicknames`
PARTY_LENGTH; MON_NAME; sgb_border.bin 2018-01-20 17:25:55 +00:00			`ld bc, MON_NAME_LENGTH`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call CopyBytes`
			`call CloseSRAM`

			`.BoxFull:`
			`ld a, BANK(sBoxMon1Level)`
Harmonize engine/{movie, pokemon} with pokegold (renames GetSRAMBank to OpenSRAM) To do: engine/{menus, overworld} 2020-06-17 21:03:38 +00:00			`call OpenSRAM`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld a, [sBoxMon1Level]`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wCurPartyLevel], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call CloseSRAM`
			`call SetBoxMonCaughtData`
			`ld a, BANK(sBoxMon1CaughtLocation)`
Harmonize engine/{movie, pokemon} with pokegold (renames GetSRAMBank to OpenSRAM) To do: engine/{menus, overworld} 2020-06-17 21:03:38 +00:00			`call OpenSRAM`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld hl, sBoxMon1CaughtLocation`
			`ld a, [hl]`
Use maskbits some more 2018-01-11 17:00:01 +00:00			`and CAUGHT_GENDER_MASK`
Add a `LANDMARK_` prefix to landmark constants Resolves #697 2020-03-15 21:26:10 +00:00			`ld b, LANDMARK_NATIONAL_PARK`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`or b`
			`ld [hl], a`
			`call CloseSRAM`
			`xor a`
			`ld [wContestMon], a`
Use more constants in scripts 2018-01-12 06:40:20 +00:00			`ld a, BUGCONTEST_BOXED_MON`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wScriptVar], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`.DidntCatchAnything:`
Use more constants in scripts 2018-01-12 06:40:20 +00:00			`ld a, BUGCONTEST_NO_CATCH`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wScriptVar], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`GiveANickname_YesNo:`
#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`ld hl, CaughtAskNicknameText`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call PrintText`
			`jp YesNoBox`

#641 fixes and additions. (#646) Name a lot of text labels according to our conventions 2019-10-20 22:24:17 +00:00			`CaughtAskNicknameText:`
			`text_far _CaughtAskNicknameText`
Resolve issue #575: Rename text commands 2018-11-17 18:33:03 +00:00			`text_end`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00
Remove all address comments 2018-06-24 14:09:41 +00:00			`SetCaughtData:`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wPartyCount]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`dec a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPartyMon1CaughtLevel`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call GetPartyLocation`
Remove all address comments 2018-06-24 14:09:41 +00:00			`SetBoxmonOrEggmonCaughtData:`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wTimeOfDay]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`inc a`
			`rrca`
			`rrca`
			`ld b, a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wCurPartyLevel]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`or b`
			`ld [hli], a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wMapGroup]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld b, a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wMapNumber]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld c, a`
			`cp MAP_POKECENTER_2F`
			`jr nz, .NotPokecenter2F`
			`ld a, b`
			`cp GROUP_POKECENTER_2F`
			`jr nz, .NotPokecenter2F`

Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wBackupMapGroup]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld b, a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wBackupMapNumber]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld c, a`

			`.NotPokecenter2F:`
			`call GetWorldMapLocation`
			`ld b, a`
Prefix engine_flags wram addresses with w 2017-12-28 12:15:46 +00:00			`ld a, [wPlayerGender]`
More engine flag constants 2018-01-22 19:34:55 +00:00			`rrca ; shift bit 0 (PLAYERGENDER_FEMALE_F) to bit 7 (CAUGHT_GENDER_MASK)`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`or b`
			`ld [hl], a`
			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`SetBoxMonCaughtData:`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld a, BANK(sBoxMon1CaughtLevel)`
Harmonize engine/{movie, pokemon} with pokegold (renames GetSRAMBank to OpenSRAM) To do: engine/{menus, overworld} 2020-06-17 21:03:38 +00:00			`call OpenSRAM`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld hl, sBoxMon1CaughtLevel`
			`call SetBoxmonOrEggmonCaughtData`
			`call CloseSRAM`
			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`SetGiftBoxMonCaughtData:`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`push bc`
			`ld a, BANK(sBoxMon1CaughtLevel)`
Harmonize engine/{movie, pokemon} with pokegold (renames GetSRAMBank to OpenSRAM) To do: engine/{menus, overworld} 2020-06-17 21:03:38 +00:00			`call OpenSRAM`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ld hl, sBoxMon1CaughtLevel`
			`pop bc`
			`call SetGiftMonCaughtData`
			`call CloseSRAM`
			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`SetGiftPartyMonCaughtData:`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wPartyCount]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`dec a`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld hl, wPartyMon1CaughtLevel`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`push bc`
			`call GetPartyLocation`
			`pop bc`
Remove all address comments 2018-06-24 14:09:41 +00:00			`SetGiftMonCaughtData:`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`xor a`
			`ld [hli], a`
Add a `LANDMARK_` prefix to landmark constants Resolves #697 2020-03-15 21:26:10 +00:00			`ld a, LANDMARK_GIFT`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`rrc b`
			`or b`
			`ld [hl], a`
			`ret`

Remove all address comments 2018-06-24 14:09:41 +00:00			`SetEggMonCaughtData:`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wCurPartyMon]`
			`ld hl, wPartyMon1CaughtLevel`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call GetPartyLocation`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld a, [wCurPartyLevel]`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`push af`
Use maskbits some more 2018-01-11 17:00:01 +00:00			`ld a, CAUGHT_EGG_LEVEL`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wCurPartyLevel], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`call SetBoxmonOrEggmonCaughtData`
			`pop af`
Prefix wram labels with w, part 2. 2018-01-23 22:39:09 +00:00			`ld [wCurPartyLevel], a`
Move more contiguous related code blocks from main.asm to engine/ and events/ 2017-12-16 01:10:54 +00:00			`ret`