More pokemon storage

3 files changed, 200 insertions, 569 deletions

diff --git a/asm/pokemon_storage_system.s b/asm/pokemon_storage_system.s
index 4848eef41..1823b9e94 100644
--- a/asm/pokemon_storage_system.s
+++ b/asm/pokemon_storage_system.s
@@ -8,560 +8,6 @@
 
 
 
-
-	thumb_func_start sub_80CA230
-sub_80CA230: @ 80CA230
-	push {lr}
-	ldr r0, =gUnknown_02039D08
-	ldr r1, [r0]
-	ldr r2, =0x00000ce4
-	adds r0, r1, r2
-	ldrh r0, [r0]
-	subs r2, 0x4
-	adds r1, r2
-	ldr r1, [r1]
-	bl sub_80CA44C
-	bl sub_80CA4FC
-	bl sub_80CA65C
-	movs r0, 0
-	bl schedule_bg_copy_tilemap_to_vram
-	pop {r0}
-	bx r0
-	.pool
-	thumb_func_end sub_80CA230
-
-	thumb_func_start BoxSetMosaic
-BoxSetMosaic: @ 80CA260
-	push {lr}
-	bl sub_80CA230
-	ldr r3, =gUnknown_02039D08
-	ldr r0, [r3]
-	movs r1, 0x89
-	lsls r1, 6
-	adds r0, r1
-	ldr r2, [r0]
-	cmp r2, 0
-	beq _080CA2AC
-	ldrb r0, [r2, 0x1]
-	movs r1, 0x10
-	orrs r0, r1
-	strb r0, [r2, 0x1]
-	ldr r1, [r3]
-	movs r0, 0x89
-	lsls r0, 6
-	adds r1, r0
-	ldr r2, [r1]
-	movs r0, 0xA
-	strh r0, [r2, 0x2E]
-	ldr r2, [r1]
-	movs r0, 0x1
-	strh r0, [r2, 0x30]
-	ldr r2, [r1]
-	ldr r0, =BoxSetMosaic2
-	str r0, [r2, 0x1C]
-	ldr r0, [r1]
-	ldrh r0, [r0, 0x2E]
-	lsls r1, r0, 12
-	lsls r0, 8
-	orrs r1, r0
-	lsls r1, 16
-	lsrs r1, 16
-	movs r0, 0x4C
-	bl SetGpuReg
-_080CA2AC:
-	pop {r0}
-	bx r0
-	.pool
-	thumb_func_end BoxSetMosaic
-
-	thumb_func_start sub_80CA2B8
-sub_80CA2B8: @ 80CA2B8
-	ldr r0, =gUnknown_02039D08
-	ldr r0, [r0]
-	movs r1, 0x89
-	lsls r1, 6
-	adds r0, r1
-	ldr r0, [r0]
-	ldrb r0, [r0, 0x1]
-	lsls r0, 27
-	lsrs r0, 31
-	bx lr
-	.pool
-	thumb_func_end sub_80CA2B8
-
-	thumb_func_start BoxSetMosaic2
-BoxSetMosaic2: @ 80CA2D0
-	push {r4,lr}
-	adds r4, r0, 0
-	ldrh r0, [r4, 0x2E]
-	ldrh r1, [r4, 0x30]
-	subs r0, r1
-	strh r0, [r4, 0x2E]
-	lsls r0, 16
-	cmp r0, 0
-	bge _080CA2E6
-	movs r0, 0
-	strh r0, [r4, 0x2E]
-_080CA2E6:
-	ldrh r0, [r4, 0x2E]
-	lsls r1, r0, 12
-	lsls r0, 8
-	orrs r1, r0
-	lsls r1, 16
-	lsrs r1, 16
-	movs r0, 0x4C
-	bl SetGpuReg
-	movs r1, 0x2E
-	ldrsh r0, [r4, r1]
-	cmp r0, 0
-	bne _080CA30E
-	ldrb r0, [r4, 0x1]
-	movs r1, 0x11
-	negs r1, r1
-	ands r1, r0
-	strb r1, [r4, 0x1]
-	ldr r0, =SpriteCallbackDummy
-	str r0, [r4, 0x1C]
-_080CA30E:
-	pop {r4}
-	pop {r0}
-	bx r0
-	.pool
-	thumb_func_end BoxSetMosaic2
-
-	thumb_func_start sub_80CA318
-sub_80CA318: @ 80CA318
-	push {r4-r7,lr}
-	sub sp, 0x28
-	ldr r0, =gUnknown_02039D08
-	mov r12, r0
-	ldr r1, [r0]
-	ldr r4, =0x000022c4
-	adds r0, r1, r4
-	str r0, [sp, 0x18]
-	add r3, sp, 0x18
-	movs r0, 0x82
-	lsls r0, 10
-	str r0, [r3, 0x4]
-	ldr r5, =0x00002244
-	adds r1, r5
-	str r1, [sp, 0x20]
-	ldr r0, =0x0000dac6
-	add r2, sp, 0x20
-	str r0, [r2, 0x4]
-	mov r1, sp
-	ldr r0, =gUnknown_08572754
-	ldm r0!, {r5-r7}
-	stm r1!, {r5-r7}
-	ldm r0!, {r5-r7}
-	stm r1!, {r5-r7}
-	movs r6, 0
-	adds r7, r2, 0
-	mov r5, r12
-	movs r2, 0
-	ldr r1, =0x000007ff
-_080CA352:
-	ldr r0, [r5]
-	adds r0, r4
-	adds r0, r6
-	strb r2, [r0]
-	adds r0, r6, 0x1
-	lsls r0, 16
-	lsrs r6, r0, 16
-	cmp r6, r1
-	bls _080CA352
-	movs r6, 0
-	ldr r5, =gUnknown_02039D08
-	ldr r4, =0x00002244
-	movs r2, 0
-_080CA36C:
-	ldr r0, [r5]
-	lsls r1, r6, 1
-	adds r0, r4
-	adds r0, r1
-	strh r2, [r0]
-	adds r0, r6, 0x1
-	lsls r0, 16
-	lsrs r6, r0, 16
-	cmp r6, 0xF
-	bls _080CA36C
-	ldr r0, =gUnknown_02039D08
-	ldr r0, [r0]
-	movs r6, 0x89
-	lsls r6, 6
-	adds r0, r6
-	movs r1, 0
-	str r1, [r0]
-	adds r0, r3, 0
-	bl LoadSpriteSheet
-	lsls r0, 16
-	lsrs r5, r0, 16
-	cmp r5, 0
-	beq _080CA420
-	adds r0, r7, 0
-	bl LoadSpritePalette
-	lsls r0, 24
-	lsrs r4, r0, 24
-	cmp r4, 0xFF
-	beq _080CA420
-	b _080CA40C
-	.pool
-_080CA3C4:
-	ldr r0, =gUnknown_02039D08
-	ldr r2, [r0]
-	movs r7, 0x89
-	lsls r7, 6
-	adds r3, r2, r7
-	lsls r0, r1, 4
-	adds r0, r1
-	lsls r0, 2
-	ldr r1, =gSprites
-	adds r0, r1
-	str r0, [r3]
-	lsls r0, r4, 4
-	movs r1, 0x80
-	lsls r1, 1
-	adds r0, r1
-	ldr r3, =0x0000223a
-	adds r1, r2, r3
-	strh r0, [r1]
-	ldr r6, =0x0000223c
-	adds r2, r6
-	lsls r0, r5, 5
-	ldr r7, =0x06010000
-	adds r0, r7
-	str r0, [r2]
-	b _080CA420
-	.pool
-_080CA40C:
-	mov r0, sp
-	movs r1, 0x28
-	movs r2, 0x30
-	movs r3, 0
-	bl CreateSprite
-	lsls r0, 24
-	lsrs r1, r0, 24
-	cmp r1, 0x40
-	bne _080CA3C4
-_080CA420:
-	ldr r0, =gUnknown_02039D08
-	ldr r0, [r0]
-	movs r1, 0x89
-	lsls r1, 6
-	adds r0, r1
-	ldr r0, [r0]
-	cmp r0, 0
-	bne _080CA43C
-	movs r0, 0x2
-	bl FreeSpriteTilesByTag
-	ldr r0, =0x0000dac6
-	bl FreeSpritePaletteByTag
-_080CA43C:
-	add sp, 0x28
-	pop {r4-r7}
-	pop {r0}
-	bx r0
-	.pool
-	thumb_func_end sub_80CA318
-
-	thumb_func_start sub_80CA44C
-sub_80CA44C: @ 80CA44C
-	push {r4-r7,lr}
-	sub sp, 0x4
-	adds r3, r1, 0
-	lsls r0, 16
-	lsrs r4, r0, 16
-	ldr r6, =gUnknown_02039D08
-	ldr r2, [r6]
-	movs r7, 0x89
-	lsls r7, 6
-	adds r0, r2, r7
-	ldr r0, [r0]
-	cmp r0, 0
-	beq _080CA4F2
-	cmp r4, 0
-	beq _080CA4E8
-	lsls r0, r4, 3
-	ldr r1, =gMonFrontPicTable
-	adds r0, r1
-	ldr r5, =0x000022c4
-	adds r1, r2, r5
-	movs r2, 0x1
-	str r2, [sp]
-	adds r2, r4, 0
-	bl LoadSpecialPokePic
-	ldr r1, [r6]
-	ldr r2, =0x00000cdc
-	adds r0, r1, r2
-	ldr r0, [r0]
-	ldr r4, =0x00002244
-	adds r1, r4
-	bl LZ77UnCompWram
-	ldr r0, [r6]
-	adds r5, r0, r5
-	ldr r1, =0x0000223c
-	adds r0, r1
-	ldr r1, [r0]
-	ldr r2, =0x04000200
-	adds r0, r5, 0
-	bl CpuSet
-	ldr r0, [r6]
-	adds r4, r0, r4
-	ldr r2, =0x0000223a
-	adds r0, r2
-	ldrh r1, [r0]
-	adds r0, r4, 0
-	movs r2, 0x20
-	bl LoadPalette
-	ldr r0, [r6]
-	adds r0, r7
-	ldr r1, [r0]
-	adds r1, 0x3E
-	ldrb r2, [r1]
-	movs r0, 0x5
-	negs r0, r0
-	ands r0, r2
-	strb r0, [r1]
-	b _080CA4F2
-	.pool
-_080CA4E8:
-	adds r0, 0x3E
-	ldrb r1, [r0]
-	movs r2, 0x4
-	orrs r1, r2
-	strb r1, [r0]
-_080CA4F2:
-	add sp, 0x4
-	pop {r4-r7}
-	pop {r0}
-	bx r0
-	thumb_func_end sub_80CA44C
-
-	thumb_func_start sub_80CA4FC
-sub_80CA4FC: @ 80CA4FC
-	push {r4-r6,lr}
-	sub sp, 0xC
-	movs r0, 0
-	movs r1, 0x11
-	bl FillWindowPixelBuffer
-	ldr r6, =gUnknown_02039D08
-	ldr r2, [r6]
-	ldrb r0, [r2, 0x1]
-	cmp r0, 0x3
-	beq _080CA588
-	ldr r0, =0x00000cf9
-	adds r2, r0
-	movs r4, 0
-	str r4, [sp]
-	movs r5, 0xFF
-	str r5, [sp, 0x4]
-	str r4, [sp, 0x8]
-	movs r0, 0
-	movs r1, 0x1
-	movs r3, 0x6
-	bl AddTextPrinterParameterized
-	ldr r2, [r6]
-	ldr r1, =0x00000d1d
-	adds r2, r1
-	movs r0, 0xF
-	str r0, [sp]
-	str r5, [sp, 0x4]
-	str r4, [sp, 0x8]
-	movs r0, 0
-	movs r1, 0x2
-	movs r3, 0x6
-	bl AddTextPrinterParameterized
-	ldr r2, [r6]
-	ldr r0, =0x00000d41
-	adds r2, r0
-	movs r0, 0x1D
-	str r0, [sp]
-	str r5, [sp, 0x4]
-	str r4, [sp, 0x8]
-	movs r0, 0
-	movs r1, 0x2
-	movs r3, 0xA
-	bl AddTextPrinterParameterized
-	ldr r2, [r6]
-	ldr r1, =0x00000d65
-	adds r2, r1
-	movs r0, 0x2B
-	str r0, [sp]
-	str r5, [sp, 0x4]
-	str r4, [sp, 0x8]
-	movs r0, 0
-	movs r1, 0
-	movs r3, 0x6
-	bl AddTextPrinterParameterized
-	b _080CA5E8
-	.pool
-_080CA588:
-	ldr r0, =0x00000d65
-	adds r2, r0
-	movs r4, 0
-	str r4, [sp]
-	movs r5, 0xFF
-	str r5, [sp, 0x4]
-	str r4, [sp, 0x8]
-	movs r0, 0
-	movs r1, 0
-	movs r3, 0x6
-	bl AddTextPrinterParameterized
-	ldr r2, [r6]
-	ldr r1, =0x00000cf9
-	adds r2, r1
-	movs r0, 0xD
-	str r0, [sp]
-	str r5, [sp, 0x4]
-	str r4, [sp, 0x8]
-	movs r0, 0
-	movs r1, 0x1
-	movs r3, 0x6
-	bl AddTextPrinterParameterized
-	ldr r2, [r6]
-	ldr r0, =0x00000d1d
-	adds r2, r0
-	movs r0, 0x1C
-	str r0, [sp]
-	str r5, [sp, 0x4]
-	str r4, [sp, 0x8]
-	movs r0, 0
-	movs r1, 0x2
-	movs r3, 0x6
-	bl AddTextPrinterParameterized
-	ldr r2, [r6]
-	ldr r1, =0x00000d41
-	adds r2, r1
-	movs r0, 0x2A
-	str r0, [sp]
-	str r5, [sp, 0x4]
-	str r4, [sp, 0x8]
-	movs r0, 0
-	movs r1, 0x2
-	movs r3, 0xA
-	bl AddTextPrinterParameterized
-_080CA5E8:
-	movs r0, 0
-	movs r1, 0x2
-	bl CopyWindowToVram
-	ldr r4, =gUnknown_02039D08
-	ldr r1, [r4]
-	ldr r2, =0x00000ce4
-	adds r0, r1, r2
-	ldrh r0, [r0]
-	cmp r0, 0
-	beq _080CA640
-	adds r2, 0x7
-	adds r0, r1, r2
-	ldrb r0, [r0]
-	adds r2, 0xB5
-	adds r1, r2
-	ldr r1, [r1]
-	bl sub_8120084
-	ldr r0, [r4]
-	ldr r1, =0x00000d94
-	adds r0, r1
-	ldr r1, [r0]
-	adds r1, 0x3E
-	ldrb r2, [r1]
-	movs r0, 0x5
-	negs r0, r0
-	ands r0, r2
-	b _080CA64E
-	.pool
-_080CA640:
-	ldr r2, =0x00000d94
-	adds r0, r1, r2
-	ldr r1, [r0]
-	adds r1, 0x3E
-	ldrb r0, [r1]
-	movs r2, 0x4
-	orrs r0, r2
-_080CA64E:
-	strb r0, [r1]
-	add sp, 0xC
-	pop {r4-r6}
-	pop {r0}
-	bx r0
-	.pool
-	thumb_func_end sub_80CA4FC
-
-	thumb_func_start sub_80CA65C
-sub_80CA65C: @ 80CA65C
-	push {r4,lr}
-	sub sp, 0x4
-	ldr r0, =gUnknown_02039D08
-	ldr r0, [r0]
-	ldr r1, =0x00000ce4
-	adds r0, r1
-	ldrh r0, [r0]
-	cmp r0, 0
-	beq _080CA6B4
-	movs r0, 0x2
-	str r0, [sp]
-	movs r0, 0
-	movs r1, 0
-	movs r2, 0
-	movs r3, 0x8
-	bl sub_80D27AC
-	movs r4, 0
-_080CA680:
-	ldr r0, =gUnknown_02039D08
-	ldr r0, [r0]
-	lsls r1, r4, 2
-	ldr r2, =0x00000d98
-	adds r0, r2
-	adds r0, r1
-	ldr r0, [r0]
-	lsls r1, r4, 1
-	adds r1, 0x1
-	lsls r1, 24
-	lsrs r1, 24
-	bl StartSpriteAnimIfDifferent
-	adds r0, r4, 0x1
-	lsls r0, 16
-	lsrs r4, r0, 16
-	cmp r4, 0x1
-	bls _080CA680
-	b _080CA6E6
-	.pool
-_080CA6B4:
-	movs r0, 0x2
-	str r0, [sp]
-	movs r0, 0
-	movs r1, 0
-	movs r2, 0x2
-	movs r3, 0x8
-	bl sub_80D27AC
-	movs r4, 0
-_080CA6C6:
-	ldr r0, =gUnknown_02039D08
-	ldr r0, [r0]
-	lsls r1, r4, 2
-	ldr r2, =0x00000d98
-	adds r0, r2
-	adds r0, r1
-	ldr r0, [r0]
-	lsls r1, r4, 25
-	lsrs r1, 24
-	bl StartSpriteAnim
-	adds r0, r4, 0x1
-	lsls r0, 16
-	lsrs r4, r0, 16
-	cmp r4, 0x1
-	bls _080CA6C6
-_080CA6E6:
-	movs r0, 0
-	bl sub_80D2918
-	movs r0, 0x1
-	bl schedule_bg_copy_tilemap_to_vram
-	add sp, 0x4
-	pop {r4}
-	pop {r0}
-	bx r0
-	.pool
-	thumb_func_end sub_80CA65C
-
 	thumb_func_start sub_80CA704
 sub_80CA704: @ 80CA704
 	push {r4,lr}
diff --git a/include/pokemon_storage_system.h b/include/pokemon_storage_system.h
index f582c2dc4..d3beb88ab 100644
--- a/include/pokemon_storage_system.h
+++ b/include/pokemon_storage_system.h
@@ -91,7 +91,10 @@ struct PokemonStorageSystemData
     u8 field_A67;
     u8 *wallpaperTilemapPtr;
     u8 field_A6C;
-    u8 field_A6D[633];
+    u8 field_A6D[623];
+    u32 *field_CDC;
+    u32 cursorMonPersonality;
+    u16 cursorMonSpecies;
     u16 selectedItem;
     u16 field_CE8;
     u8 field_CEA;
@@ -99,7 +102,20 @@ struct PokemonStorageSystemData
     u8 field_CEC;
     u8 field_CED;
     u8 field_CEE;
-    u8 field_CEF[165];
+    u8 field_CEF;
+    u8 field_CF0;
+    u8 field_CF1;
+    u8 field_CF2;
+    u8 field_CF3;
+    u8 field_CF4;
+    u8 field_CF5;
+    u8 field_CF6;
+    u8 field_CF7;
+    u8 field_CF8;
+    u8 cursorMonNick[36];
+    u8 cursorMonSpeciesName[36];
+    u8 cursorMonGenderLvlText[36];
+    u8 cursorMonItemName[47];
     struct Sprite *field_D94;
     struct Sprite *field_D98[2];
     u16 *field_DA0;
@@ -118,7 +134,17 @@ struct PokemonStorageSystemData
     struct BoxPokemon *field_218C;
     u8 field_2190[164];
     u16 movingItem;
-    u8 field_2236[14478];
+    u8 field_2236;
+    u8 field_2237;
+    u8 field_2238;
+    u8 field_2239;
+    u16 field_223A;
+    u16 *field_223C;
+    struct Sprite *cursorMonSprite;
+    u16 field_2244[16];
+    u8 field_2264[96];
+    u8 field_22C4[0x800];
+    u8 field_2AC4[12288];
     u8 field_5AC4[0x800];
 };
 
diff --git a/src/pokemon_storage_system.c b/src/pokemon_storage_system.c
index 9e0944257..edf322235 100644
--- a/src/pokemon_storage_system.c
+++ b/src/pokemon_storage_system.c
@@ -99,10 +99,6 @@ enum
 
 IWRAM_DATA u8 gUnknown_03000F78[0x188];
 
-extern const u8 gText_PartyFull[];
-extern const u8 gText_Box[];
-extern const u8 gText_JustOnePkmn[];
-
 extern u8 gUnknown_02039D00;
 extern u8 sBoxOption;
 extern u8 gUnknown_02039D10;
@@ -117,6 +113,12 @@ extern void sub_80F9BF4(u16, u16, u8);
 extern bool8 sub_80F9C1C(void);
 extern bool8 sub_80F9C30(void);
 
+extern const struct CompressedSpriteSheet gMonFrontPicTable[];
+
+extern const u8 gText_PartyFull[];
+extern const u8 gText_Box[];
+extern const u8 gText_JustOnePkmn[];
+
 // This file's functions.
 void CreatePCMenu(u8 whichMenu, s16 *windowIdPtr);
 void Cb2_EnterPSS(u8 boxOption);
@@ -161,7 +163,7 @@ void sub_80D01B8(void);
 void sub_80CE2D8(void);
 void sub_80D25F0(void);
 void sub_80CA230(void);
-void sub_80CA318(void);
+void LoadCursorMonSprite(void);
 void sub_80CA154(void);
 void sub_80CA1C4(void);
 void sub_80CC064(void);
@@ -171,7 +173,8 @@ void sub_80CA704(void);
 void sub_80D013C(void);
 void sub_80CE00C(void);
 void sub_80D1194(void);
-void sub_80CA4FC(void);
+void PrintCursorMonInfo(void);
+void sub_80CA65C(void);
 void sub_80CADD8(void);
 void sub_80D1818(void);
 void sub_80D17B4(void);
@@ -247,6 +250,7 @@ void sub_80D2A90(struct UnkStruct_2000020 *arg0, struct UnkStruct_2000028 *arg1,
 void sub_80D259C(u8 arg0);
 void sub_80CC464(u8 arg0);
 void sub_80CFE54(u8 arg0);
+void sub_80D2918(u8 arg0);
 void sub_80CC0D4(u8 arg0);
 void sub_80CDC38(u8 arg0);
 void sub_80CE9A8(u8 markings);
@@ -269,6 +273,9 @@ void SetWallpaperForCurrentBox(u8 wallpaperId);
 void sub_80CAE0C(u8 arg0);
 u16 GetMovingItem(void);
 void SetCurrentBoxMonData(s32 monId, s32 request, const void *value);
+void LoadCursorMonGfx(u16 species, u32 pid);
+void sub_80CA2D0(struct Sprite *sprite);
+void sub_80D27AC(u8 arg0, u16 arg1, u16 arg2, u16 arg3, u16 arg4);
 
 // const rom data
 const struct PSS_MenuStringPtrs gUnknown_085716C0[] =
@@ -459,7 +466,7 @@ const struct SpriteSheet gWaveformSpriteSheet =
 };
 
 const struct OamData sOamData_857286C;
-const struct SpriteTemplate gUnknown_08572754 =
+const struct SpriteTemplate sSpriteTemplate_CursorMon =
 {
     .tileTag = TAG_TILE_2,
     .paletteTag = TAG_PAL_DAC6,
@@ -2275,7 +2282,7 @@ void Cb_TakeItemForMoving(u8 taskId)
             sub_80CFE54(3);
             ClearBottomWindow();
             sub_80CE00C();
-            sub_80CA4FC();
+            PrintCursorMonInfo();
             gUnknown_02039D08->state++;
         }
         break;
@@ -2304,7 +2311,7 @@ void Cb_GiveMovingItemToMon(u8 taskId)
         {
             sub_80CFE54(0);
             sub_80CE00C();
-            sub_80CA4FC();
+            PrintCursorMonInfo();
             PrintStorageActionText(PC_TEXT_ITEM_IS_HELD);
             gUnknown_02039D08->state++;
         }
@@ -2353,7 +2360,7 @@ void Cb_ItemToBag(u8 taskId)
         {
             ClearBottomWindow();
             sub_80CE00C();
-            sub_80CA4FC();
+            PrintCursorMonInfo();
             gUnknown_02039D08->state = 4;
         }
         break;
@@ -2396,7 +2403,7 @@ void Cb_SwitchSelectedItem(u8 taskId)
         {
             sub_80CFE54(3);
             sub_80CE00C();
-            sub_80CA4FC();
+            PrintCursorMonInfo();
             PrintStorageActionText(PC_TEXT_CHANGED_TO_ITEM);
             gUnknown_02039D08->state++;
         }
@@ -3029,7 +3036,7 @@ void sub_80CA0D8(void)
         LoadPalette(gUnknown_0857243C, 0x30, 0x20);
 
     SetGpuReg(REG_OFFSET_BG1CNT, BGCNT_PRIORITY(1) | BGCNT_CHARBASE(1) | BGCNT_16COLOR | BGCNT_SCREENBASE(30));
-    sub_80CA318();
+    LoadCursorMonSprite();
     sub_80CA154();
     sub_80CA1C4();
     sub_80CA230();
@@ -3057,3 +3064,155 @@ void sub_80CA1C4(void)
         gUnknown_02039D08->field_D98[i] = &gSprites[spriteId];
     }
 }
+
+void sub_80CA230(void)
+{
+    LoadCursorMonGfx(gUnknown_02039D08->cursorMonSpecies, gUnknown_02039D08->cursorMonPersonality);
+    PrintCursorMonInfo();
+    sub_80CA65C();
+    schedule_bg_copy_tilemap_to_vram(0);
+}
+
+void BoxSetMosaic(void)
+{
+    sub_80CA230();
+    if (gUnknown_02039D08->cursorMonSprite)
+    {
+        gUnknown_02039D08->cursorMonSprite->oam.mosaic = TRUE;
+        gUnknown_02039D08->cursorMonSprite->data[0] = 10;
+        gUnknown_02039D08->cursorMonSprite->data[1] = 1;
+        gUnknown_02039D08->cursorMonSprite->callback = sub_80CA2D0;
+        SetGpuReg(REG_OFFSET_MOSAIC, (gUnknown_02039D08->cursorMonSprite->data[0] << 12) | (gUnknown_02039D08->cursorMonSprite->data[0] << 8));
+    }
+}
+
+u8 sub_80CA2B8(void)
+{
+    return gUnknown_02039D08->cursorMonSprite->oam.mosaic;
+}
+
+void sub_80CA2D0(struct Sprite *sprite)
+{
+    sprite->data[0] -= sprite->data[1];
+    if (sprite->data[0] < 0)
+        sprite->data[0] = 0;
+    SetGpuReg(REG_OFFSET_MOSAIC, (sprite->data[0] << 12) | (sprite->data[0] << 8));
+    if (sprite->data[0] == 0)
+    {
+        sprite->oam.mosaic = FALSE;
+        sprite->callback = SpriteCallbackDummy;
+    }
+}
+
+void LoadCursorMonSprite(void)
+{
+    u16 i;
+    u16 tileStart;
+    u8 palSlot;
+    u8 spriteId;
+    struct SpriteSheet sheet = {gUnknown_02039D08->field_22C4, 0x800, TAG_TILE_2};
+    struct SpritePalette palette = {gUnknown_02039D08->field_2244, TAG_PAL_DAC6};
+    struct SpriteTemplate template = sSpriteTemplate_CursorMon;
+
+    for (i = 0; i < 0x800; i++)
+        gUnknown_02039D08->field_22C4[i] = 0;
+    for (i = 0; i < 0x10; i++)
+        gUnknown_02039D08->field_2244[i] = 0;
+
+    gUnknown_02039D08->cursorMonSprite = NULL;
+
+    do
+    {
+        tileStart = LoadSpriteSheet(&sheet);
+        if (tileStart == 0)
+            break;
+
+        palSlot = LoadSpritePalette(&palette);
+        if (palSlot == 0xFF)
+            break;
+
+        spriteId = CreateSprite(&template, 40, 48, 0);
+        if (spriteId == MAX_SPRITES)
+            break;
+
+        gUnknown_02039D08->cursorMonSprite = &gSprites[spriteId];
+        gUnknown_02039D08->field_223A = palSlot * 16 + 0x100;
+        gUnknown_02039D08->field_223C = (void*) OBJ_VRAM0 + tileStart * 32;
+    } while (0);
+
+    if (gUnknown_02039D08->cursorMonSprite == NULL)
+    {
+        FreeSpriteTilesByTag(TAG_TILE_2);
+        FreeSpritePaletteByTag(TAG_PAL_DAC6);
+    }
+}
+
+void LoadCursorMonGfx(u16 species, u32 pid)
+{
+    if (gUnknown_02039D08->cursorMonSprite == NULL)
+        return;
+
+    if (species != SPECIES_NONE)
+    {
+        LoadSpecialPokePic(&gMonFrontPicTable[species], gUnknown_02039D08->field_22C4, species, pid, TRUE);
+        LZ77UnCompWram(gUnknown_02039D08->field_CDC, gUnknown_02039D08->field_2244);
+        CpuCopy32(gUnknown_02039D08->field_22C4, gUnknown_02039D08->field_223C, 0x800);
+        LoadPalette(gUnknown_02039D08->field_2244, gUnknown_02039D08->field_223A, 0x20);
+        gUnknown_02039D08->cursorMonSprite->invisible = FALSE;
+    }
+    else
+    {
+        gUnknown_02039D08->cursorMonSprite->invisible = TRUE;
+    }
+}
+
+void PrintCursorMonInfo(void)
+{
+    FillWindowPixelBuffer(0, 0x11);
+    if (gUnknown_02039D08->boxOption != BOX_OPTION_MOVE_ITEMS)
+    {
+        AddTextPrinterParameterized(0, 1, gUnknown_02039D08->cursorMonNick, 6, 0, TEXT_SPEED_FF, NULL);
+        AddTextPrinterParameterized(0, 2, gUnknown_02039D08->cursorMonSpeciesName, 6, 15, TEXT_SPEED_FF, NULL);
+        AddTextPrinterParameterized(0, 2, gUnknown_02039D08->cursorMonGenderLvlText, 10, 29, TEXT_SPEED_FF, NULL);
+        AddTextPrinterParameterized(0, 0, gUnknown_02039D08->cursorMonItemName, 6, 43, TEXT_SPEED_FF, NULL);
+    }
+    else
+    {
+        AddTextPrinterParameterized(0, 0, gUnknown_02039D08->cursorMonItemName, 6, 0, TEXT_SPEED_FF, NULL);
+        AddTextPrinterParameterized(0, 1, gUnknown_02039D08->cursorMonNick, 6, 13, TEXT_SPEED_FF, NULL);
+        AddTextPrinterParameterized(0, 2, gUnknown_02039D08->cursorMonSpeciesName, 6, 28, TEXT_SPEED_FF, NULL);
+        AddTextPrinterParameterized(0, 2, gUnknown_02039D08->cursorMonGenderLvlText, 10, 42, TEXT_SPEED_FF, NULL);
+    }
+
+    CopyWindowToVram(0, 2);
+    if (gUnknown_02039D08->cursorMonSpecies != SPECIES_NONE)
+    {
+        sub_8120084(gUnknown_02039D08->field_CEB, gUnknown_02039D08->field_DA0);
+        gUnknown_02039D08->field_D94->invisible = FALSE;
+    }
+    else
+    {
+        gUnknown_02039D08->field_D94->invisible = TRUE;
+    }
+}
+
+void sub_80CA65C(void)
+{
+    u16 i;
+
+    if (gUnknown_02039D08->cursorMonSpecies != SPECIES_NONE)
+    {
+        sub_80D27AC(0, 0, 0, 8, 2);
+        for (i = 0; i < 2; i++)
+            StartSpriteAnimIfDifferent(gUnknown_02039D08->field_D98[i], i * 2 + 1);
+    }
+    else
+    {
+        sub_80D27AC(0, 0, 2, 8, 2);
+        for (i = 0; i < 2; i++)
+            StartSpriteAnim(gUnknown_02039D08->field_D98[i], i * 2);
+    }
+
+    sub_80D2918(0);
+    schedule_bg_copy_tilemap_to_vram(1);
+}