diff --git a/engine/battle/core.asm b/engine/battle/core.asm
index d9bcdddb..5cb4fa13 100644
--- a/engine/battle/core.asm
+++ b/engine/battle/core.asm
@@ -6308,6 +6308,7 @@ LoadPlayerBackPic:
 	ld de, OldManPicBack
 .next
 	ld a, BANK(RedPicBack)
+	assert BANK(RedPicBack) == BANK(OldManPicBack)
 	call UncompressSpriteFromDE
 	predef ScaleSpriteByTwo
 	ld hl, wOAMBuffer
@@ -6880,7 +6881,7 @@ _LoadTrainerPic:
 	ld d, a ; de contains pointer to trainer pic
 	ld a, [wLinkState]
 	and a
-	ld a, BANK(TrainerPics) ; this is where all the trainer pics are (not counting Red's)
+	ld a, BANK("Pics 6") ; this is where all the trainer pics are (not counting Red's)
 	jr z, .loadSprite
 	ld a, BANK(RedPicFront)
 .loadSprite
diff --git a/gfx/pics.asm b/gfx/pics.asm
index 94286c9a..134516cd 100644
--- a/gfx/pics.asm
+++ b/gfx/pics.asm
@@ -327,7 +327,6 @@ VictreebelPicBack::    INCBIN "gfx/pokemon/back/victreebelb.pic"
 
 SECTION "Pics 6", ROMX
 
-TrainerPics::
 YoungsterPic::     INCBIN "gfx/trainers/youngster.pic"
 BugCatcherPic::    INCBIN "gfx/trainers/bugcatcher.pic"
 LassPic::          INCBIN "gfx/trainers/lass.pic"
diff --git a/home/pics.asm b/home/pics.asm
index ef668620..3bce1532 100644
--- a/home/pics.asm
+++ b/home/pics.asm
@@ -9,14 +9,14 @@ UncompressMonSprite::
 	ld a, [hl]
 	ld [wSpriteInputPtr+1], a
 ; define (by index number) the bank that a pokemon's image is in
-; index = Mew, bank 1
-; index = Kabutops fossil, bank $B
-; index < $1F, bank 9
-; $1F ≤ index < $4A, bank $A
-; $4A ≤ index < $74, bank $B
-; $74 ≤ index < $99, bank $C
-; $99 ≤ index,       bank $D
-	ld a, [wcf91] ; XXX name for this ram location
+; index = MEW:             bank $1
+; index = FOSSIL_KABUTOPS: bank $B
+;       index < $1F:       bank $9 ("Pics 1")
+; $1F ≤ index < $4A:       bank $A ("Pics 2")
+; $4A ≤ index < $74:       bank $B ("Pics 3")
+; $74 ≤ index < $99:       bank $C ("Pics 4")
+; $99 ≤ index:             bank $D ("Pics 5")
+	ld a, [wcf91]
 	ld b, a
 	cp MEW
 	ld a, BANK(MewPicFront)
@@ -27,21 +27,21 @@ UncompressMonSprite::
 	jr z, .GotBank
 	ld a, b
 	cp TANGELA + 1
-	ld a, BANK(TangelaPicFront)
+	ld a, BANK("Pics 1")
 	jr c, .GotBank
 	ld a, b
 	cp MOLTRES + 1
-	ld a, BANK(MoltresPicFront)
+	ld a, BANK("Pics 2")
 	jr c, .GotBank
 	ld a, b
 	cp BEEDRILL + 2
-	ld a, BANK(BeedrillPicFront)
+	ld a, BANK("Pics 3")
 	jr c, .GotBank
 	ld a, b
 	cp STARMIE + 1
-	ld a, BANK(StarmiePicFront)
+	ld a, BANK("Pics 4")
 	jr c, .GotBank
-	ld a, BANK(VictreebelPicFront)
+	ld a, BANK("Pics 5")
 .GotBank
 	jp UncompressSpriteData