Increased Pokémon storage (12 boxes -> 14 boxes)

This commit is contained in:
BlueZangoose 2023-06-21 19:42:13 +01:00
parent beab109a16
commit c0306c1653
3 changed files with 38 additions and 31 deletions

View file

@ -58,7 +58,7 @@ DEF PARTYMON_STRUCT_LENGTH EQU _RS
DEF PARTY_LENGTH EQU 6 DEF PARTY_LENGTH EQU 6
DEF MONS_PER_BOX EQU 20 DEF MONS_PER_BOX EQU 20
DEF NUM_BOXES EQU 12 DEF NUM_BOXES EQU 14
DEF HOF_MON EQU $10 DEF HOF_MON EQU $10
DEF HOF_TEAM EQU PARTY_LENGTH * HOF_MON DEF HOF_TEAM EQU PARTY_LENGTH * HOF_MON

View file

@ -328,12 +328,13 @@ GetBoxSRAMLocation:
ret ret
BoxSRAMPointerTable: BoxSRAMPointerTable:
dw sBox1 ; sBox7 dw sBox1 ; sBox8
dw sBox2 ; sBox8 dw sBox2 ; sBox9
dw sBox3 ; sBox9 dw sBox3 ; sBox10
dw sBox4 ; sBox10 dw sBox4 ; sBox11
dw sBox5 ; sBox11 dw sBox5 ; sBox12
dw sBox6 ; sBox12 dw sBox6 ; sBox13
dw sBox7 ; sBox14
ChangeBox:: ChangeBox::
ld hl, WhenYouChangeBoxText ld hl, WhenYouChangeBoxText
@ -404,7 +405,7 @@ CopyBoxToOrFromSRAM:
dec a dec a
ld [hl], a ld [hl], a
ld hl, sBox1 ; sBox7 ld hl, sBox1 ; sBox8
ld bc, sBank2AllBoxesChecksum - sBox1 ld bc, sBank2AllBoxesChecksum - sBox1
call SAVCheckSum call SAVCheckSum
ld [sBank2AllBoxesChecksum], a ; sBank3AllBoxesChecksum ld [sBank2AllBoxesChecksum], a ; sBank3AllBoxesChecksum
@ -419,11 +420,11 @@ DisplayChangeBoxMenu:
ldh [hAutoBGTransferEnabled], a ldh [hAutoBGTransferEnabled], a
ld a, A_BUTTON | B_BUTTON ld a, A_BUTTON | B_BUTTON
ld [wMenuWatchedKeys], a ld [wMenuWatchedKeys], a
ld a, 11 ld a, 13 ; # of items in list (0-indexed)
ld [wMaxMenuItem], a ld [wMaxMenuItem], a
ld a, 1 ld a, 1 ; Y position of cursor
ld [wTopMenuItemY], a ld [wTopMenuItemY], a
ld a, 12 ld a, 12 ; X position of cursor
ld [wTopMenuItemX], a ld [wTopMenuItemX], a
xor a xor a
ld [wMenuWatchMovingOutOfBounds], a ld [wMenuWatchMovingOutOfBounds], a
@ -438,7 +439,7 @@ DisplayChangeBoxMenu:
ld hl, ChooseABoxText ld hl, ChooseABoxText
call PrintText call PrintText
hlcoord 11, 0 hlcoord 11, 0
ld b, 12 ld b, 14 ; box list textbox height
ld c, 7 ld c, 7
call TextBoxBorder call TextBoxBorder
ld hl, hUILayoutFlags ld hl, hUILayoutFlags
@ -468,7 +469,7 @@ DisplayChangeBoxMenu:
hlcoord 18, 1 hlcoord 18, 1
ld de, wBoxMonCounts ld de, wBoxMonCounts
ld bc, SCREEN_WIDTH ld bc, SCREEN_WIDTH
ld a, $c ld a, 15 ; Number of loops
.loop .loop
push af push af
ld a, [de] ld a, [de]
@ -501,7 +502,9 @@ BoxNames:
next "BOX 9" next "BOX 9"
next "BOX10" next "BOX10"
next "BOX11" next "BOX11"
next "BOX12@" next "BOX12"
next "BOX13"
next "BOX14@"
BoxNoText: BoxNoText:
db "BOX No.@" db "BOX No.@"
@ -526,19 +529,21 @@ EmptyAllSRAMBoxes:
EmptySRAMBoxesInBank: EmptySRAMBoxesInBank:
; marks every box in the current SRAM bank as empty ; marks every box in the current SRAM bank as empty
ld hl, sBox1 ; sBox7 ld hl, sBox1 ; sBox8
call EmptySRAMBox call EmptySRAMBox
ld hl, sBox2 ; sBox8 ld hl, sBox2 ; sBox9
call EmptySRAMBox call EmptySRAMBox
ld hl, sBox3 ; sBox9 ld hl, sBox3 ; sBox10
call EmptySRAMBox call EmptySRAMBox
ld hl, sBox4 ; sBox10 ld hl, sBox4 ; sBox11
call EmptySRAMBox call EmptySRAMBox
ld hl, sBox5 ; sBox11 ld hl, sBox5 ; sBox12
call EmptySRAMBox call EmptySRAMBox
ld hl, sBox6 ; sBox12 ld hl, sBox6 ; sBox13
call EmptySRAMBox call EmptySRAMBox
ld hl, sBox1 ; sBox7 ld hl, sBox7 ; sBox14
call EmptySRAMBox
ld hl, sBox1 ; sBox8
ld bc, sBank2AllBoxesChecksum - sBox1 ld bc, sBank2AllBoxesChecksum - sBox1
call SAVCheckSum call SAVCheckSum
ld [sBank2AllBoxesChecksum], a ; sBank3AllBoxesChecksum ld [sBank2AllBoxesChecksum], a ; sBank3AllBoxesChecksum
@ -582,17 +587,19 @@ GetMonCountsForAllBoxes:
ret ret
GetMonCountsForBoxesInBank: GetMonCountsForBoxesInBank:
ld a, [sBox1] ; sBox7 ld a, [sBox1] ; sBox8
ld [hli], a ld [hli], a
ld a, [sBox2] ; sBox8 ld a, [sBox2] ; sBox9
ld [hli], a ld [hli], a
ld a, [sBox3] ; sBox9 ld a, [sBox3] ; sBox10
ld [hli], a ld [hli], a
ld a, [sBox4] ; sBox10 ld a, [sBox4] ; sBox11
ld [hli], a ld [hli], a
ld a, [sBox5] ; sBox11 ld a, [sBox5] ; sBox12
ld [hli], a ld [hli], a
ld a, [sBox6] ; sBox12 ld a, [sBox6] ; sBox13
ld [hli], a
ld a, [sBox7] ; sBox14
ld [hli], a ld [hli], a
ret ret

View file

@ -37,16 +37,16 @@ ENDM
SECTION "Saved Boxes 1", SRAM SECTION "Saved Boxes 1", SRAM
; sBox1 - sBox6 ; sBox1 - sBox6
boxes 6 boxes 7
sBank2AllBoxesChecksum:: db sBank2AllBoxesChecksum:: db
sBank2IndividualBoxChecksums:: ds 6 sBank2IndividualBoxChecksums:: ds 7
SECTION "Saved Boxes 2", SRAM SECTION "Saved Boxes 2", SRAM
; sBox7 - sBox12 ; sBox7 - sBox12
boxes 6 boxes 7
sBank3AllBoxesChecksum:: db sBank3AllBoxesChecksum:: db
sBank3IndividualBoxChecksums:: ds 6 sBank3IndividualBoxChecksums:: ds 7
; All 12 boxes fit within 2 SRAM banks ; All 12 boxes fit within 2 SRAM banks
ASSERT box_n == NUM_BOXES, \ ASSERT box_n == NUM_BOXES, \