finish decompiling pokedex.s

4 files changed, 352 insertions, 1054 deletions

diff --git a/asm/pokeball.s b/asm/pokeball.s
deleted file mode 100644
index c04fefbdf..000000000
--- a/asm/pokeball.s
+++ /dev/null
@@ -1,1015 +0,0 @@
-	.include "constants/gba_constants.inc"
-	.include "constants/species_constants.inc"
-	.include "asm/macros.inc"
-
-	.syntax unified
-
-	.text
-
-	thumb_func_start sub_8047230
-sub_8047230: @ 8047230
-	push {lr}
-	adds r2, r0, 0
-	ldrh r0, [r2, 0x2E]
-	adds r1, r0, 0x1
-	strh r1, [r2, 0x2E]
-	lsls r0, 16
-	asrs r0, 16
-	cmp r0, 0x18
-	ble _0804724A
-	movs r0, 0
-	strh r0, [r2, 0x2E]
-	ldr r0, _08047250 @ =sub_8046C78
-	str r0, [r2, 0x1C]
-_0804724A:
-	pop {r0}
-	bx r0
-	.align 2, 0
-_08047250: .4byte sub_8046C78
-	thumb_func_end sub_8047230
-
-	thumb_func_start sub_8047254
-sub_8047254: @ 8047254
-	push {r4,r5,lr}
-	adds r5, r0, 0
-	ldrh r0, [r5, 0x2E]
-	adds r0, 0x1
-	strh r0, [r5, 0x2E]
-	lsls r0, 16
-	asrs r0, 16
-	cmp r0, 0xF
-	ble _080472A4
-	movs r0, 0
-	strh r0, [r5, 0x2E]
-	bl IsDoubleBattle
-	lsls r0, 24
-	cmp r0, 0
-	beq _080472A0
-	ldr r0, _08047298 @ =0x02017840
-	ldrb r1, [r0, 0x9]
-	movs r0, 0x1
-	ands r0, r1
-	cmp r0, 0
-	beq _080472A0
-	movs r0, 0x3A
-	ldrsh r4, [r5, r0]
-	movs r0, 0x3
-	bl GetBankByPlayerAI
-	lsls r0, 24
-	lsrs r0, 24
-	cmp r4, r0
-	bne _080472A0
-	ldr r0, _0804729C @ =sub_8047230
-	b _080472A2
-	.align 2, 0
-_08047298: .4byte 0x02017840
-_0804729C: .4byte sub_8047230
-_080472A0:
-	ldr r0, _080472AC @ =sub_8046C78
-_080472A2:
-	str r0, [r5, 0x1C]
-_080472A4:
-	pop {r4,r5}
-	pop {r0}
-	bx r0
-	.align 2, 0
-_080472AC: .4byte sub_8046C78
-	thumb_func_end sub_8047254
-
-	thumb_func_start sub_80472B0
-sub_80472B0: @ 80472B0
-	push {r4,lr}
-	sub sp, 0x4
-	lsls r0, 24
-	lsrs r0, 24
-	lsls r1, 24
-	lsrs r1, 24
-	lsls r2, 24
-	lsrs r2, 24
-	lsls r3, 24
-	lsrs r3, 24
-	movs r4, 0
-	str r4, [sp]
-	bl sub_814086C
-	lsls r0, 24
-	lsrs r0, 24
-	add sp, 0x4
-	pop {r4}
-	pop {r1}
-	bx r1
-	thumb_func_end sub_80472B0
-
-	thumb_func_start sub_80472D8
-sub_80472D8: @ 80472D8
-	push {lr}
-	lsls r0, 24
-	lsrs r0, 24
-	lsls r1, 24
-	lsrs r1, 24
-	movs r3, 0
-	bl sub_8141314
-	lsls r0, 24
-	lsrs r0, 24
-	pop {r1}
-	bx r1
-	thumb_func_end sub_80472D8
-
-	thumb_func_start CreatePokeballSprite
-CreatePokeballSprite: @ 80472F0
-	push {r4-r7,lr}
-	mov r7, r10
-	mov r6, r9
-	mov r5, r8
-	push {r5-r7}
-	sub sp, 0x4
-	adds r5, r0, 0
-	mov r9, r2
-	mov r10, r3
-	ldr r6, [sp, 0x24]
-	ldr r4, [sp, 0x28]
-	ldr r0, [sp, 0x2C]
-	lsls r5, 24
-	lsrs r5, 24
-	lsls r1, 24
-	lsrs r1, 24
-	str r1, [sp]
-	mov r1, r9
-	lsls r1, 24
-	lsrs r1, 24
-	mov r9, r1
-	mov r2, r10
-	lsls r2, 24
-	lsrs r2, 24
-	mov r10, r2
-	lsls r6, 24
-	lsrs r6, 24
-	lsls r4, 24
-	lsrs r4, 24
-	lsls r0, 24
-	lsrs r7, r0, 24
-	ldr r0, _080473BC @ =gUnknown_0820A92C
-	bl LoadCompressedObjectPic
-	ldr r0, _080473C0 @ =gUnknown_0820A98C
-	bl LoadCompressedObjectPalette
-	ldr r0, _080473C4 @ =gSpriteTemplate_820AAB4
-	mov r1, r9
-	mov r2, r10
-	adds r3, r4, 0
-	bl CreateSprite
-	lsls r0, 24
-	lsrs r0, 24
-	ldr r3, _080473C8 @ =gSprites
-	mov r8, r3
-	lsls r4, r0, 4
-	adds r4, r0
-	lsls r4, 2
-	adds r1, r4, r3
-	strh r5, [r1, 0x2E]
-	lsls r2, r5, 4
-	adds r2, r5
-	lsls r2, 2
-	add r2, r8
-	ldrh r0, [r2, 0x20]
-	strh r0, [r1, 0x38]
-	ldrh r0, [r2, 0x22]
-	strh r0, [r1, 0x3A]
-	mov r0, r9
-	strh r0, [r2, 0x20]
-	mov r3, r10
-	strh r3, [r2, 0x22]
-	strh r7, [r1, 0x30]
-	mov r0, sp
-	ldrh r0, [r0]
-	strh r0, [r1, 0x32]
-	mov r3, sp
-	ldrh r3, [r3, 0x30]
-	strh r3, [r1, 0x34]
-	ldr r3, [sp, 0x30]
-	lsrs r0, r3, 16
-	strh r0, [r1, 0x36]
-	movs r0, 0x3
-	ands r6, r0
-	lsls r6, 2
-	ldrb r3, [r1, 0x5]
-	movs r0, 0xD
-	negs r0, r0
-	ands r0, r3
-	orrs r0, r6
-	strb r0, [r1, 0x5]
-	movs r0, 0x1C
-	add r8, r0
-	add r4, r8
-	ldr r0, _080473CC @ =sub_80473D0
-	str r0, [r4]
-	adds r2, 0x3E
-	ldrb r0, [r2]
-	movs r1, 0x4
-	orrs r0, r1
-	strb r0, [r2]
-	add sp, 0x4
-	pop {r3-r5}
-	mov r8, r3
-	mov r9, r4
-	mov r10, r5
-	pop {r4-r7}
-	pop {r0}
-	bx r0
-	.align 2, 0
-_080473BC: .4byte gUnknown_0820A92C
-_080473C0: .4byte gUnknown_0820A98C
-_080473C4: .4byte gSpriteTemplate_820AAB4
-_080473C8: .4byte gSprites
-_080473CC: .4byte sub_80473D0
-	thumb_func_end CreatePokeballSprite
-
-	thumb_func_start sub_80473D0
-sub_80473D0: @ 80473D0
-	push {r4-r7,lr}
-	mov r7, r8
-	push {r7}
-	adds r6, r0, 0
-	ldrh r1, [r6, 0x30]
-	movs r2, 0x30
-	ldrsh r0, [r6, r2]
-	cmp r0, 0
-	bne _0804747C
-	ldrh r0, [r6, 0x2E]
-	lsls r0, 24
-	lsrs r7, r0, 24
-	ldrh r0, [r6, 0x32]
-	lsls r0, 24
-	lsrs r0, 24
-	mov r8, r0
-	ldrh r4, [r6, 0x34]
-	ldrh r0, [r6, 0x36]
-	lsls r0, 16
-	orrs r4, r0
-	adds r0, r6, 0
-	adds r0, 0x43
-	ldrb r0, [r0]
-	cmp r0, 0
-	beq _0804740A
-	subs r0, 0x1
-	lsls r0, 24
-	lsrs r5, r0, 24
-	b _0804740C
-_0804740A:
-	movs r5, 0
-_0804740C:
-	adds r0, r6, 0
-	movs r1, 0x1
-	bl StartSpriteAnim
-	ldrh r0, [r6, 0x20]
-	lsls r0, 24
-	lsrs r0, 24
-	ldrh r1, [r6, 0x22]
-	subs r1, 0x5
-	lsls r1, 24
-	lsrs r1, 24
-	ldrb r2, [r6, 0x5]
-	lsls r2, 28
-	lsrs r2, 30
-	adds r3, r5, 0
-	bl sub_80472B0
-	movs r0, 0x1
-	mov r1, r8
-	adds r2, r4, 0
-	bl sub_80472D8
-	lsls r0, 24
-	lsrs r0, 24
-	movs r5, 0
-	strh r0, [r6, 0x30]
-	ldr r0, _08047474 @ =sub_804748C
-	str r0, [r6, 0x1C]
-	ldr r0, _08047478 @ =gSprites
-	lsls r4, r7, 4
-	adds r4, r7
-	lsls r4, 2
-	adds r4, r0
-	adds r2, r4, 0
-	adds r2, 0x3E
-	ldrb r1, [r2]
-	movs r0, 0x5
-	negs r0, r0
-	ands r0, r1
-	strb r0, [r2]
-	adds r0, r4, 0
-	movs r1, 0x1
-	bl StartSpriteAffineAnim
-	adds r0, r4, 0
-	bl AnimateSprite
-	movs r0, 0x80
-	lsls r0, 5
-	strh r0, [r4, 0x30]
-	strh r5, [r6, 0x3C]
-	b _08047480
-	.align 2, 0
-_08047474: .4byte sub_804748C
-_08047478: .4byte gSprites
-_0804747C:
-	subs r0, r1, 0x1
-	strh r0, [r6, 0x30]
-_08047480:
-	pop {r3}
-	mov r8, r3
-	pop {r4-r7}
-	pop {r0}
-	bx r0
-	thumb_func_end sub_80473D0
-
-	thumb_func_start sub_804748C
-sub_804748C: @ 804748C
-	push {r4-r7,lr}
-	adds r4, r0, 0
-	movs r0, 0
-	mov r12, r0
-	movs r6, 0
-	ldrh r0, [r4, 0x2E]
-	lsls r0, 24
-	lsrs r3, r0, 24
-	adds r0, r4, 0
-	adds r0, 0x3F
-	ldrb r1, [r0]
-	movs r0, 0x10
-	ands r0, r1
-	cmp r0, 0
-	beq _080474B6
-	adds r2, r4, 0
-	adds r2, 0x3E
-	ldrb r0, [r2]
-	movs r1, 0x4
-	orrs r0, r1
-	strb r0, [r2]
-_080474B6:
-	ldr r0, _08047544 @ =gSprites
-	lsls r1, r3, 4
-	adds r1, r3
-	lsls r1, 2
-	adds r5, r1, r0
-	adds r0, r5, 0
-	adds r0, 0x3F
-	ldrb r0, [r0]
-	lsls r0, 26
-	cmp r0, 0
-	bge _080474D8
-	adds r0, r5, 0
-	movs r1, 0
-	bl StartSpriteAffineAnim
-	movs r1, 0x1
-	mov r12, r1
-_080474D8:
-	movs r2, 0x38
-	ldrsh r0, [r4, r2]
-	movs r7, 0x20
-	ldrsh r1, [r4, r7]
-	subs r0, r1
-	movs r1, 0x3C
-	ldrsh r2, [r4, r1]
-	muls r0, r2
-	cmp r0, 0
-	bge _080474EE
-	adds r0, 0x7F
-_080474EE:
-	asrs r0, 7
-	ldrh r7, [r4, 0x20]
-	adds r0, r7
-	lsls r0, 16
-	lsrs r3, r0, 16
-	movs r1, 0x3A
-	ldrsh r0, [r4, r1]
-	movs r7, 0x22
-	ldrsh r1, [r4, r7]
-	subs r0, r1
-	muls r0, r2
-	cmp r0, 0
-	bge _0804750A
-	adds r0, 0x7F
-_0804750A:
-	asrs r0, 7
-	ldrh r1, [r4, 0x22]
-	adds r0, r1
-	strh r3, [r5, 0x20]
-	strh r0, [r5, 0x22]
-	ldrh r2, [r4, 0x3C]
-	movs r7, 0x3C
-	ldrsh r0, [r4, r7]
-	cmp r0, 0x7F
-	bgt _0804754C
-	ldr r1, _08047548 @ =gSineTable
-	lsls r0, r2, 24
-	lsrs r0, 23
-	adds r0, r1
-	movs r1, 0
-	ldrsh r0, [r0, r1]
-	cmp r0, 0
-	bge _08047530
-	adds r0, 0x7
-_08047530:
-	asrs r0, 3
-	negs r0, r0
-	lsls r0, 16
-	lsrs r0, 16
-	adds r1, r2, 0x4
-	strh r1, [r4, 0x3C]
-	strh r0, [r5, 0x24]
-	strh r0, [r5, 0x26]
-	b _0804755A
-	.align 2, 0
-_08047544: .4byte gSprites
-_08047548: .4byte gSineTable
-_0804754C:
-	ldrh r0, [r4, 0x38]
-	strh r0, [r5, 0x20]
-	ldrh r0, [r4, 0x3A]
-	strh r0, [r5, 0x22]
-	strh r6, [r5, 0x24]
-	strh r6, [r5, 0x26]
-	movs r6, 0x1
-_0804755A:
-	adds r0, r4, 0
-	adds r0, 0x3F
-	ldrb r1, [r0]
-	movs r0, 0x10
-	ands r0, r1
-	cmp r0, 0
-	beq _08047578
-	mov r2, r12
-	cmp r2, 0
-	beq _08047578
-	cmp r6, 0
-	beq _08047578
-	adds r0, r4, 0
-	bl DestroySpriteAndFreeResources
-_08047578:
-	pop {r4-r7}
-	pop {r0}
-	bx r0
-	thumb_func_end sub_804748C
-
-	thumb_func_start sub_8047580
-sub_8047580: @ 8047580
-	push {r4-r7,lr}
-	mov r7, r10
-	mov r6, r9
-	mov r5, r8
-	push {r5-r7}
-	mov r10, r0
-	adds r6, r2, 0
-	mov r8, r3
-	ldr r5, [sp, 0x20]
-	ldr r4, [sp, 0x24]
-	ldr r0, [sp, 0x28]
-	mov r9, r0
-	mov r0, r10
-	lsls r0, 24
-	lsrs r0, 24
-	mov r10, r0
-	lsls r1, 24
-	lsrs r7, r1, 24
-	lsls r6, 24
-	lsrs r6, 24
-	mov r1, r8
-	lsls r1, 24
-	lsrs r1, 24
-	mov r8, r1
-	lsls r5, 24
-	lsrs r5, 24
-	lsls r4, 24
-	lsrs r4, 24
-	mov r0, r9
-	lsls r0, 24
-	lsrs r0, 24
-	mov r9, r0
-	ldr r0, _08047624 @ =gUnknown_0820A92C
-	bl LoadCompressedObjectPic
-	ldr r0, _08047628 @ =gUnknown_0820A98C
-	bl LoadCompressedObjectPalette
-	ldr r0, _0804762C @ =gSpriteTemplate_820AAB4
-	adds r1, r6, 0
-	mov r2, r8
-	adds r3, r4, 0
-	bl CreateSprite
-	lsls r0, 24
-	lsrs r0, 24
-	ldr r6, _08047630 @ =gSprites
-	lsls r3, r0, 4
-	adds r3, r0
-	lsls r3, 2
-	adds r2, r3, r6
-	mov r1, r10
-	strh r1, [r2, 0x2E]
-	mov r4, r9
-	strh r4, [r2, 0x30]
-	strh r7, [r2, 0x32]
-	mov r1, sp
-	ldrh r1, [r1, 0x2C]
-	strh r1, [r2, 0x34]
-	ldr r4, [sp, 0x2C]
-	lsrs r1, r4, 16
-	strh r1, [r2, 0x36]
-	movs r1, 0x3
-	ands r5, r1
-	lsls r5, 2
-	ldrb r4, [r2, 0x5]
-	movs r1, 0xD
-	negs r1, r1
-	ands r1, r4
-	orrs r1, r5
-	strb r1, [r2, 0x5]
-	adds r6, 0x1C
-	adds r3, r6
-	ldr r1, _08047634 @ =sub_8047638
-	str r1, [r3]
-	pop {r3-r5}
-	mov r8, r3
-	mov r9, r4
-	mov r10, r5
-	pop {r4-r7}
-	pop {r1}
-	bx r1
-	.align 2, 0
-_08047624: .4byte gUnknown_0820A92C
-_08047628: .4byte gUnknown_0820A98C
-_0804762C: .4byte gSpriteTemplate_820AAB4
-_08047630: .4byte gSprites
-_08047634: .4byte sub_8047638
-	thumb_func_end sub_8047580
-
-	thumb_func_start sub_8047638
-sub_8047638: @ 8047638
-	push {r4-r7,lr}
-	mov r7, r8
-	push {r7}
-	adds r4, r0, 0
-	ldrh r1, [r4, 0x30]
-	movs r2, 0x30
-	ldrsh r0, [r4, r2]
-	cmp r0, 0
-	bne _080476D0
-	ldrh r0, [r4, 0x2E]
-	lsls r0, 24
-	lsrs r7, r0, 24
-	ldrh r0, [r4, 0x32]
-	lsls r0, 24
-	lsrs r0, 24
-	mov r8, r0
-	ldrh r5, [r4, 0x34]
-	ldrh r0, [r4, 0x36]
-	lsls r0, 16
-	orrs r5, r0
-	adds r0, r4, 0
-	adds r0, 0x43
-	ldrb r0, [r0]
-	cmp r0, 0
-	beq _08047672
-	subs r0, 0x1
-	lsls r0, 24
-	lsrs r6, r0, 24
-	b _08047674
-_08047672:
-	movs r6, 0
-_08047674:
-	adds r0, r4, 0
-	movs r1, 0x1
-	bl StartSpriteAnim
-	ldrh r0, [r4, 0x20]
-	lsls r0, 24
-	lsrs r0, 24
-	ldrh r1, [r4, 0x22]
-	subs r1, 0x5
-	lsls r1, 24
-	lsrs r1, 24
-	ldrb r2, [r4, 0x5]
-	lsls r2, 28
-	lsrs r2, 30
-	adds r3, r6, 0
-	bl sub_80472B0
-	movs r0, 0x1
-	mov r1, r8
-	adds r2, r5, 0
-	bl sub_80472D8
-	lsls r0, 24
-	lsrs r0, 24
-	movs r5, 0
-	strh r0, [r4, 0x30]
-	ldr r0, _080476C8 @ =sub_80476E0
-	str r0, [r4, 0x1C]
-	lsls r4, r7, 4
-	adds r4, r7
-	lsls r4, 2
-	ldr r0, _080476CC @ =gSprites
-	adds r4, r0
-	adds r0, r4, 0
-	movs r1, 0x2
-	bl StartSpriteAffineAnim
-	adds r0, r4, 0
-	bl AnimateSprite
-	strh r5, [r4, 0x30]
-	b _080476D4
-	.align 2, 0
-_080476C8: .4byte sub_80476E0
-_080476CC: .4byte gSprites
-_080476D0:
-	subs r0, r1, 0x1
-	strh r0, [r4, 0x30]
-_080476D4:
-	pop {r3}
-	mov r8, r3
-	pop {r4-r7}
-	pop {r0}
-	bx r0
-	thumb_func_end sub_8047638
-
-	thumb_func_start sub_80476E0
-sub_80476E0: @ 80476E0
-	push {r4,r5,lr}
-	adds r5, r0, 0
-	ldrh r0, [r5, 0x38]
-	adds r0, 0x1
-	strh r0, [r5, 0x38]
-	lsls r0, 16
-	asrs r0, 16
-	cmp r0, 0xB
-	bne _080476F8
-	movs r0, 0x3C
-	bl PlaySE
-_080476F8:
-	ldrh r1, [r5, 0x2E]
-	lsls r1, 24
-	lsrs r1, 24
-	ldr r2, _08047734 @ =gSprites
-	lsls r0, r1, 4
-	adds r0, r1
-	lsls r0, 2
-	adds r4, r0, r2
-	adds r0, r4, 0
-	adds r0, 0x3F
-	ldrb r0, [r0]
-	lsls r0, 26
-	cmp r0, 0
-	bge _0804773C
-	adds r0, r5, 0
-	movs r1, 0x2
-	bl StartSpriteAnim
-	adds r2, r4, 0
-	adds r2, 0x3E
-	ldrb r0, [r2]
-	movs r1, 0x4
-	orrs r0, r1
-	strb r0, [r2]
-	movs r0, 0
-	strh r0, [r5, 0x38]
-	ldr r0, _08047738 @ =sub_8047754
-	str r0, [r5, 0x1C]
-	b _0804774C
-	.align 2, 0
-_08047734: .4byte gSprites
-_08047738: .4byte sub_8047754
-_0804773C:
-	ldrh r0, [r4, 0x30]
-	adds r0, 0x60
-	strh r0, [r4, 0x30]
-	movs r1, 0x30
-	ldrsh r0, [r4, r1]
-	negs r0, r0
-	asrs r0, 8
-	strh r0, [r4, 0x26]
-_0804774C:
-	pop {r4,r5}
-	pop {r0}
-	bx r0
-	thumb_func_end sub_80476E0
-
-	thumb_func_start sub_8047754
-sub_8047754: @ 8047754
-	push {lr}
-	adds r2, r0, 0
-	adds r0, 0x3F
-	ldrb r1, [r0]
-	movs r0, 0x10
-	ands r0, r1
-	cmp r0, 0
-	beq _08047768
-	ldr r0, _0804776C @ =SpriteCallbackDummy
-	str r0, [r2, 0x1C]
-_08047768:
-	pop {r0}
-	bx r0
-	.align 2, 0
-_0804776C: .4byte SpriteCallbackDummy
-	thumb_func_end sub_8047754
-
-	thumb_func_start obj_delete_and_free_associated_resources_
-obj_delete_and_free_associated_resources_: @ 8047770
-	push {lr}
-	bl DestroySpriteAndFreeResources
-	pop {r0}
-	bx r0
-	thumb_func_end obj_delete_and_free_associated_resources_
-
-	thumb_func_start sub_804777C
-sub_804777C: @ 804777C
-	push {r4-r6,lr}
-	lsls r0, 24
-	lsrs r0, 24
-	adds r5, r0, 0
-	ldr r0, _080477FC @ =gHealthboxIDs
-	adds r0, r5, r0
-	ldrb r1, [r0]
-	lsls r0, r1, 4
-	adds r0, r1
-	lsls r0, 2
-	ldr r6, _08047800 @ =gSprites
-	adds r4, r0, r6
-	movs r1, 0
-	movs r0, 0x5
-	strh r0, [r4, 0x2E]
-	strh r1, [r4, 0x30]
-	movs r0, 0x73
-	strh r0, [r4, 0x24]
-	strh r1, [r4, 0x26]
-	ldr r0, _08047804 @ =sub_8047830
-	str r0, [r4, 0x1C]
-	adds r0, r5, 0
-	bl GetBankSide
-	lsls r0, 24
-	cmp r0, 0
-	beq _080477CA
-	ldrh r0, [r4, 0x2E]
-	negs r0, r0
-	strh r0, [r4, 0x2E]
-	ldrh r0, [r4, 0x30]
-	negs r0, r0
-	strh r0, [r4, 0x30]
-	ldrh r0, [r4, 0x24]
-	negs r0, r0
-	strh r0, [r4, 0x24]
-	ldrh r0, [r4, 0x26]
-	negs r0, r0
-	strh r0, [r4, 0x26]
-_080477CA:
-	movs r0, 0x38
-	ldrsh r1, [r4, r0]
-	lsls r0, r1, 4
-	adds r0, r1
-	lsls r0, 2
-	adds r1, r6, 0
-	adds r1, 0x1C
-	adds r1, r0, r1
-	adds r0, r6
-	ldr r1, [r1]
-	bl _call_via_r1
-	adds r0, r5, 0
-	bl GetBankIdentity
-	lsls r0, 24
-	lsrs r0, 24
-	cmp r0, 0x2
-	bne _080477F4
-	ldr r0, _08047808 @ =sub_804780C
-	str r0, [r4, 0x1C]
-_080477F4:
-	pop {r4-r6}
-	pop {r0}
-	bx r0
-	.align 2, 0
-_080477FC: .4byte gHealthboxIDs
-_08047800: .4byte gSprites
-_08047804: .4byte sub_8047830
-_08047808: .4byte sub_804780C
-	thumb_func_end sub_804777C
-
-	thumb_func_start sub_804780C
-sub_804780C: @ 804780C
-	push {lr}
-	adds r1, r0, 0
-	ldrh r0, [r1, 0x30]
-	adds r0, 0x1
-	strh r0, [r1, 0x30]
-	lsls r0, 16
-	asrs r0, 16
-	cmp r0, 0x14
-	bne _08047826
-	movs r0, 0
-	strh r0, [r1, 0x30]
-	ldr r0, _0804782C @ =sub_8047830
-	str r0, [r1, 0x1C]
-_08047826:
-	pop {r0}
-	bx r0
-	.align 2, 0
-_0804782C: .4byte sub_8047830
-	thumb_func_end sub_804780C
-
-	thumb_func_start sub_8047830
-sub_8047830: @ 8047830
-	push {lr}
-	adds r2, r0, 0
-	ldrh r0, [r2, 0x24]
-	ldrh r1, [r2, 0x2E]
-	subs r0, r1
-	strh r0, [r2, 0x24]
-	ldrh r0, [r2, 0x26]
-	ldrh r1, [r2, 0x30]
-	subs r0, r1
-	strh r0, [r2, 0x26]
-	ldr r0, [r2, 0x24]
-	cmp r0, 0
-	bne _0804784E
-	ldr r0, _08047854 @ =SpriteCallbackDummy
-	str r0, [r2, 0x1C]
-_0804784E:
-	pop {r0}
-	bx r0
-	.align 2, 0
-_08047854: .4byte SpriteCallbackDummy
-	thumb_func_end sub_8047830
-
-	thumb_func_start sub_8047858
-sub_8047858: @ 8047858
-	push {r4,r5,lr}
-	adds r4, r0, 0
-	lsls r4, 24
-	lsrs r4, 24
-	ldr r5, _08047890 @ =oamc_804BEB4
-	adds r0, r5, 0
-	bl CreateInvisibleSpriteWithCallback
-	lsls r0, 24
-	lsrs r0, 24
-	ldr r2, _08047894 @ =gSprites
-	lsls r1, r0, 4
-	adds r1, r0
-	lsls r1, 2
-	adds r3, r1, r2
-	movs r0, 0x1
-	strh r0, [r3, 0x2E]
-	ldr r0, _08047898 @ =gHealthboxIDs
-	adds r4, r0
-	ldrb r0, [r4]
-	strh r0, [r3, 0x30]
-	adds r2, 0x1C
-	adds r1, r2
-	str r5, [r1]
-	pop {r4,r5}
-	pop {r0}
-	bx r0
-	.align 2, 0
-_08047890: .4byte oamc_804BEB4
-_08047894: .4byte gSprites
-_08047898: .4byte gHealthboxIDs
-	thumb_func_end sub_8047858
-
-	thumb_func_start oamc_804BEB4
-oamc_804BEB4: @ 804789C
-	push {lr}
-	adds r3, r0, 0
-	ldrh r1, [r3, 0x30]
-	lsls r1, 24
-	lsrs r1, 24
-	ldr r2, _080478D8 @ =gSprites
-	lsls r0, r1, 4
-	adds r0, r1
-	lsls r0, 2
-	adds r1, r0, r2
-	ldrh r0, [r3, 0x2E]
-	movs r2, 0
-	strh r0, [r1, 0x26]
-	ldrh r0, [r3, 0x2E]
-	negs r0, r0
-	strh r0, [r3, 0x2E]
-	ldrh r0, [r3, 0x32]
-	adds r0, 0x1
-	strh r0, [r3, 0x32]
-	lsls r0, 16
-	asrs r0, 16
-	cmp r0, 0x15
-	bne _080478D4
-	strh r2, [r1, 0x24]
-	strh r2, [r1, 0x26]
-	adds r0, r3, 0
-	bl DestroySprite
-_080478D4:
-	pop {r0}
-	bx r0
-	.align 2, 0
-_080478D8: .4byte gSprites
-	thumb_func_end oamc_804BEB4
-
-	thumb_func_start sub_80478DC
-sub_80478DC: @ 80478DC
-	push {r4-r6,lr}
-	lsls r0, 24
-	lsrs r4, r0, 24
-	ldr r0, _08047938 @ =gUnknown_0820A92C
-	lsls r6, r4, 3
-	adds r5, r6, r0
-	ldrh r0, [r5, 0x6]
-	bl GetSpriteTileStartByTag
-	lsls r0, 16
-	ldr r1, _0804793C @ =0xffff0000
-	cmp r0, r1
-	bne _08047904
-	adds r0, r5, 0
-	bl LoadCompressedObjectPic
-	ldr r0, _08047940 @ =gUnknown_0820A98C
-	adds r0, r6, r0
-	bl LoadCompressedObjectPalette
-_08047904:
-	cmp r4, 0x6
-	beq _08047930
-	cmp r4, 0x6
-	blt _08047914
-	cmp r4, 0xB
-	bgt _08047914
-	cmp r4, 0xA
-	bge _08047930
-_08047914:
-	ldr r1, _08047938 @ =gUnknown_0820A92C
-	lsls r0, r4, 3
-	adds r0, r1
-	ldrh r0, [r0, 0x6]
-	bl GetSpriteTileStartByTag
-	adds r1, r0, 0
-	lsls r1, 16
-	ldr r0, _08047944 @ =gUnknown_08D030D0
-	lsrs r1, 11
-	ldr r2, _08047948 @ =0x06010100
-	adds r1, r2
-	bl LZDecompressVram
-_08047930:
-	pop {r4-r6}
-	pop {r0}
-	bx r0
-	.align 2, 0
-_08047938: .4byte gUnknown_0820A92C
-_0804793C: .4byte 0xffff0000
-_08047940: .4byte gUnknown_0820A98C
-_08047944: .4byte gUnknown_08D030D0
-_08047948: .4byte 0x06010100
-	thumb_func_end sub_80478DC
-
-	thumb_func_start sub_804794C
-sub_804794C: @ 804794C
-	push {r4,lr}
-	adds r4, r0, 0
-	lsls r4, 24
-	ldr r0, _08047970 @ =gUnknown_0820A92C
-	lsrs r4, 21
-	adds r0, r4, r0
-	ldrh r0, [r0, 0x6]
-	bl FreeSpriteTilesByTag
-	ldr r0, _08047974 @ =gUnknown_0820A98C
-	adds r4, r0
-	ldrh r0, [r4, 0x4]
-	bl FreeSpritePaletteByTag
-	pop {r4}
-	pop {r0}
-	bx r0
-	.align 2, 0
-_08047970: .4byte gUnknown_0820A92C
-_08047974: .4byte gUnknown_0820A98C
-	thumb_func_end sub_804794C
-
-	thumb_func_start sub_8047978
-sub_8047978: @ 8047978
-	push {r4,lr}
-	lsls r0, 24
-	lsrs r4, r0, 24
-	adds r0, r4, 0
-	bl GetBankSide
-	lsls r0, 24
-	cmp r0, 0
-	beq _080479A4
-	ldr r1, _0804799C @ =gBattlePartyID
-	lsls r0, r4, 1
-	adds r0, r1
-	ldrh r1, [r0]
-	movs r0, 0x64
-	muls r0, r1
-	ldr r1, _080479A0 @ =gEnemyParty
-	b _080479B2
-	.align 2, 0
-_0804799C: .4byte gBattlePartyID
-_080479A0: .4byte gEnemyParty
-_080479A4:
-	ldr r1, _080479C4 @ =gBattlePartyID
-	lsls r0, r4, 1
-	adds r0, r1
-	ldrh r1, [r0]
-	movs r0, 0x64
-	muls r0, r1
-	ldr r1, _080479C8 @ =gPlayerParty
-_080479B2:
-	adds r0, r1
-	movs r1, 0x26
-	bl GetMonData
-	lsls r0, 16
-	lsrs r0, 16
-	pop {r4}
-	pop {r1}
-	bx r1
-	.align 2, 0
-_080479C4: .4byte gBattlePartyID
-_080479C8: .4byte gPlayerParty
-	thumb_func_end sub_8047978
-
-	.align 2, 0 @ Don't pad with nop.
diff --git a/include/pokeball.h b/include/pokeball.h
index b6fbbcf77..b492df6e1 100644
--- a/include/pokeball.h
+++ b/include/pokeball.h
@@ -1,7 +1,9 @@
 #ifndef GUARD_POKEBALL_H
 #define GUARD_POKEBALL_H
 
-void CreatePokeballSprite(u8 r0, u8 r1, u8 r2, u8 r3, u8 s1, u8 s2, u8 s3, u16 s4);
+void CreatePokeballSprite(u8 r0, u8 r1, u8 r2, u8 r3, u8 s1, u8 s2, u8 s3, u32 s4);
 void sub_804777C(u8);
+void sub_80478DC(u8);
+void sub_804794C(u8);
 
 #endif // GUARD_POKEBALL_H
diff --git a/ld_script.txt b/ld_script.txt
index 4eb221578..5bbabf504 100755
--- a/ld_script.txt
+++ b/ld_script.txt
@@ -79,7 +79,6 @@ SECTIONS {
         src/battle_interface.o(.text);
         src/smokescreen.o(.text);
         src/pokeball.o(.text);
-        asm/pokeball.o(.text);
         src/load_save.o(.text);
         asm/trade.o(.text);
         asm/berry_blender.o(.text);
diff --git a/src/pokeball.c b/src/pokeball.c
index 113be945b..4b2ba8212 100644
--- a/src/pokeball.c
+++ b/src/pokeball.c
@@ -1,8 +1,10 @@
 #include "global.h"
 #include "gba/m4a_internal.h"
 #include "battle.h"
+#include "decompress.h"
 #include "m4a.h"
 #include "main.h"
+#include "pokeball.h"
 #include "pokemon.h"
 #include "rom_8077ABC.h"
 #include "songs.h"
@@ -10,6 +12,7 @@
 #include "sprite.h"
 #include "task.h"
 #include "trig.h"
+#include "util.h"
 
 extern struct MusicPlayerInfo gMPlay_BGM;
 extern u16 gBattleTypeFlags;
@@ -18,34 +21,44 @@ extern u8 gActiveBank;
 extern u16 gBattlePartyID[];
 extern u8 gObjectBankIDs[];
 extern u8 gDoingBattleAnim;
+extern u8 gHealthboxIDs[];
 
+extern const struct SpriteSheet gUnknown_0820A92C[];
+extern const struct SpritePalette gUnknown_0820A98C[];
 extern const struct SpriteTemplate gSpriteTemplate_820AAB4[];
+extern const u8 gUnknown_08D030D0[];
 
 extern u32 ball_number_to_ball_processing_index(u16);  // not sure of return type
 extern void sub_80786EC();
 extern bool8 sub_8078718(struct Sprite *);
-extern void sub_814086C(u8, u8, int, int, u8);
-extern u8 sub_8141314(u8, u8, u8, u8);
-
-void sub_8046464(u8);
-void sub_80466E8(struct Sprite *);
-void sub_80466F4(struct Sprite *);
-void sub_8046760(struct Sprite *);
-void sub_80467F8(struct Sprite *);
-void sub_804684C(struct Sprite *);
-void sub_8046944(struct Sprite *);
-void sub_8046984(struct Sprite *);
-void sub_8046C78(struct Sprite *);
-void sub_8046E7C(struct Sprite *);
-void sub_8046E9C(struct Sprite *);
-void sub_8046FBC(struct Sprite *);
-void sub_8047074(struct Sprite *);
-void sub_80470C4(struct Sprite *);
-void sub_8047230(struct Sprite *);
-void sub_8047254(struct Sprite *);
-void sub_80478DC();
-void sub_804794C(u8);
-u16 sub_8047978();
+extern u8 sub_814086C(u8, u8, int, int, u8);
+extern u8 sub_8141314(u8, u8, int, u8);
+
+static void sub_8046464(u8);
+static void sub_80466E8(struct Sprite *);
+static void sub_80466F4(struct Sprite *);
+static void sub_8046760(struct Sprite *);
+static void sub_80467F8(struct Sprite *);
+static void sub_804684C(struct Sprite *);
+static void sub_8046944(struct Sprite *);
+static void sub_8046984(struct Sprite *);
+static void sub_8046C78(struct Sprite *);
+static void sub_8046E7C(struct Sprite *);
+static void sub_8046E9C(struct Sprite *);
+static void sub_8046FBC(struct Sprite *);
+static void sub_8047074(struct Sprite *);
+static void sub_80470C4(struct Sprite *);
+static void sub_8047230(struct Sprite *);
+static void sub_8047254(struct Sprite *);
+static void sub_80473D0(struct Sprite *);
+static void sub_804748C(struct Sprite *);
+static void sub_8047638(struct Sprite *);
+static void sub_80476E0(struct Sprite *);
+static void sub_8047754(struct Sprite *);
+static void sub_804780C(struct Sprite *);
+static void sub_8047830(struct Sprite *);
+static void oamc_804BEB4(struct Sprite *);
+static u16 sub_8047978(u8);
 
 u8 sub_8046400(u16 a, u8 b)
 {
@@ -60,7 +73,7 @@ u8 sub_8046400(u16 a, u8 b)
     return 0;
 }
 
-void sub_8046464(u8 taskId)
+static void sub_8046464(u8 taskId)
 {
     bool8 sp0 = FALSE;
     u16 r8;
@@ -149,12 +162,12 @@ void objc_0804ABD4(struct Sprite *sprite)
     }
 }
 
-void sub_80466E8(struct Sprite *sprite)
+static void sub_80466E8(struct Sprite *sprite)
 {
     sprite->callback = sub_80466F4;
 }
 
-void sub_80466F4(struct Sprite *sprite)
+static void sub_80466F4(struct Sprite *sprite)
 {
     sprite->data5++;
     if (sprite->data5 == 10)
@@ -167,7 +180,7 @@ void sub_80466F4(struct Sprite *sprite)
     }
 }
 
-void sub_8046760(struct Sprite *sprite)
+static void sub_8046760(struct Sprite *sprite)
 {
     sprite->data5++;
     if (sprite->data5 == 11)
@@ -186,7 +199,7 @@ void sub_8046760(struct Sprite *sprite)
     }
 }
 
-void sub_80467F8(struct Sprite *sprite)
+static void sub_80467F8(struct Sprite *sprite)
 {
     if (sprite->animEnded)
     {
@@ -203,7 +216,7 @@ void sub_80467F8(struct Sprite *sprite)
     }
 }
 
-void sub_804684C(struct Sprite *sprite)
+static void sub_804684C(struct Sprite *sprite)
 {
     bool8 r5 = FALSE;
 
@@ -263,7 +276,7 @@ void sub_804684C(struct Sprite *sprite)
     }
 }
 
-void sub_8046944(struct Sprite *sprite)
+static void sub_8046944(struct Sprite *sprite)
 {
     sprite->data3++;
     if (sprite->data3 == 31)
@@ -276,7 +289,7 @@ void sub_8046944(struct Sprite *sprite)
     }
 }
 
-void sub_8046984(struct Sprite *sprite)
+static void sub_8046984(struct Sprite *sprite)
 {
     switch (sprite->data3 & 0xFF)
     {
@@ -347,7 +360,7 @@ void sub_8046984(struct Sprite *sprite)
     }
 }
 
-void sub_8046AD0(u8 taskId)
+static void sub_8046AD0(u8 taskId)
 {
     u8 r6 = gTasks[taskId].data[2];
     u8 r3 = gTasks[taskId].data[1];
@@ -412,7 +425,7 @@ void sub_8046AD0(u8 taskId)
     }
 }
 
-void sub_8046C78(struct Sprite *sprite)
+static void sub_8046C78(struct Sprite *sprite)
 {
     u8 r5 = sprite->data6;
     u32 r4;  // not sure of this type
@@ -471,7 +484,7 @@ void sub_8046C78(struct Sprite *sprite)
     gSprites[gObjectBankIDs[sprite->data6]].data1 = 0x1000;
 }
 
-void sub_8046E7C(struct Sprite *sprite)
+static void sub_8046E7C(struct Sprite *sprite)
 {
     sprite->animPaused = TRUE;
     sprite->callback = sub_8046FBC;
@@ -480,7 +493,7 @@ void sub_8046E7C(struct Sprite *sprite)
     sprite->data5 = 0;
 }
 
-void sub_8046E9C(struct Sprite *sprite)
+static void sub_8046E9C(struct Sprite *sprite)
 {
     bool8 r7 = FALSE;
     u8 r4 = sprite->data6;
@@ -521,7 +534,7 @@ void sub_8046E9C(struct Sprite *sprite)
     }
 }
 
-void sub_8046FBC(struct Sprite *sprite)
+static void sub_8046FBC(struct Sprite *sprite)
 {
     u8 r7 = sprite->data6;
 
@@ -546,7 +559,7 @@ void sub_8046FBC(struct Sprite *sprite)
     }
 }
 
-void sub_8047074(struct Sprite *sprite)
+static void sub_8047074(struct Sprite *sprite)
 {
     sprite->data0 = 25;
     sprite->data2 = sub_8077ABC(sprite->data6, 2);
@@ -559,7 +572,7 @@ void sub_8047074(struct Sprite *sprite)
 
 #define HIBYTE(x) (((x) >> 8) & 0xFF)
 
-void sub_80470C4(struct Sprite *sprite)
+static void sub_80470C4(struct Sprite *sprite)
 {
     u32 r6;
     u32 r7;
@@ -612,3 +625,302 @@ void sub_80470C4(struct Sprite *sprite)
         }
     }
 }
+
+static void sub_8047230(struct Sprite *sprite)
+{
+    if (sprite->data0++ > 0x18)
+    {
+        sprite->data0 = 0;
+        sprite->callback = sub_8046C78;
+    }
+}
+
+static void sub_8047254(struct Sprite *sprite)
+{
+    sprite->data0++;
+    if (sprite->data0 > 15)
+    {
+        sprite->data0 = 0;
+        if (IsDoubleBattle() && ewram17840.unk9_0
+         && sprite->data6 == GetBankByPlayerAI(3))
+            sprite->callback = sub_8047230;
+        else
+            sprite->callback = sub_8046C78;
+    }
+}
+
+static u8 sub_80472B0(u8 a, u8 b, u8 c, u8 d)
+{
+    return sub_814086C(a, b, c, d, 0);
+}
+
+static u8 sub_80472D8(u8 a, u8 b, u32 c)
+{
+    return sub_8141314(a, b, c, 0);
+}
+
+void CreatePokeballSprite(u8 a, u8 b, u8 x, u8 y, u8 e, u8 f, u8 g, u32 h)
+{
+    u8 spriteId;
+
+    LoadCompressedObjectPic(&gUnknown_0820A92C[0]);
+    LoadCompressedObjectPalette(&gUnknown_0820A98C[0]);
+    spriteId = CreateSprite(&gSpriteTemplate_820AAB4[0], x, y, f);
+    gSprites[spriteId].data0 = a;
+    gSprites[spriteId].data5 = gSprites[a].pos1.x;
+    gSprites[spriteId].data6 = gSprites[a].pos1.y;
+    gSprites[a].pos1.x = x;
+    gSprites[a].pos1.y = y;
+    gSprites[spriteId].data1 = g;
+    gSprites[spriteId].data2 = b;
+    gSprites[spriteId].data3 = h;
+    gSprites[spriteId].data4 = h >> 16;
+    gSprites[spriteId].oam.priority = e;
+    gSprites[spriteId].callback = sub_80473D0;
+    gSprites[a].invisible = TRUE;
+}
+
+static void sub_80473D0(struct Sprite *sprite)
+{
+    if (sprite->data1 == 0)
+    {
+        u8 r5;
+        u8 r7 = sprite->data0;
+        u8 r8 = sprite->data2;
+        u32 r4 = (u16)sprite->data3 | ((u16)sprite->data4 << 16);
+
+        if (sprite->subpriority != 0)
+            r5 = sprite->subpriority - 1;
+        else
+            r5 = 0;
+        StartSpriteAnim(sprite, 1);
+        sub_80472B0(sprite->pos1.x, sprite->pos1.y - 5, sprite->oam.priority, r5);
+        sprite->data1 = sub_80472D8(1, r8, r4);
+        sprite->callback = sub_804748C;
+        gSprites[r7].invisible = FALSE;
+        StartSpriteAffineAnim(&gSprites[r7], 1);
+        AnimateSprite(&gSprites[r7]);
+        gSprites[r7].data1 = 0x1000;
+        sprite->data7 = 0;
+    }
+    else
+    {
+        sprite->data1--;
+    }
+}
+
+static void sub_804748C(struct Sprite *sprite)
+{
+    bool8 r12 = FALSE;
+    bool8 r6 = FALSE;
+    u8 r3 = sprite->data0;
+    u16 var1;
+    u16 var2;
+
+    if (sprite->animEnded)
+        sprite->invisible = TRUE;
+    if (gSprites[r3].affineAnimEnded)
+    {
+        StartSpriteAffineAnim(&gSprites[r3], 0);
+        r12 = TRUE;
+    }
+    var1 = (sprite->data5 - sprite->pos1.x) * sprite->data7 / 128 + sprite->pos1.x;
+    var2 = (sprite->data6 - sprite->pos1.y) * sprite->data7 / 128 + sprite->pos1.y;
+    gSprites[r3].pos1.x = var1;
+    gSprites[r3].pos1.y = var2;
+    if (sprite->data7 < 128)
+    {
+        s16 sine = -(gSineTable[(u8)sprite->data7] / 8);
+
+        sprite->data7 += 4;
+        gSprites[r3].pos2.x = sine;
+        gSprites[r3].pos2.y = sine;
+    }
+    else
+    {
+        gSprites[r3].pos1.x = sprite->data5;
+        gSprites[r3].pos1.y = sprite->data6;
+        gSprites[r3].pos2.x = 0;
+        gSprites[r3].pos2.y = 0;
+        r6 = TRUE;
+    }
+    if (sprite->animEnded && r12 && r6)
+        DestroySpriteAndFreeResources(sprite);
+}
+
+u8 sub_8047580(u8 a, u8 b, u8 x, u8 y, u8 e, u8 f, u8 g, u32 h)
+{
+    u8 spriteId;
+
+    LoadCompressedObjectPic(&gUnknown_0820A92C[0]);
+    LoadCompressedObjectPalette(&gUnknown_0820A98C[0]);
+    spriteId = CreateSprite(&gSpriteTemplate_820AAB4[0], x, y, f);
+    gSprites[spriteId].data0 = a;
+    gSprites[spriteId].data1 = g;
+    gSprites[spriteId].data2 = b;
+    gSprites[spriteId].data3 = h;
+    gSprites[spriteId].data4 = h >> 16;
+    gSprites[spriteId].oam.priority = e;
+    gSprites[spriteId].callback = sub_8047638;
+    return spriteId;
+}
+
+static void sub_8047638(struct Sprite *sprite)
+{
+    if (sprite->data1 == 0)
+    {
+        u8 r6;
+        u8 r7 = sprite->data0;
+        u8 r8 = sprite->data2;
+        u32 r5 = (u16)sprite->data3 | ((u16)sprite->data4 << 16);
+
+        if (sprite->subpriority != 0)
+            r6 = sprite->subpriority - 1;
+        else
+            r6 = 0;
+        StartSpriteAnim(sprite, 1);
+        sub_80472B0(sprite->pos1.x, sprite->pos1.y - 5, sprite->oam.priority, r6);
+        sprite->data1 = sub_80472D8(1, r8, r5);
+        sprite->callback = sub_80476E0;
+        StartSpriteAffineAnim(&gSprites[r7], 2);
+        AnimateSprite(&gSprites[r7]);
+        gSprites[r7].data1 = 0;
+    }
+    else
+    {
+        sprite->data1--;
+    }
+}
+
+static void sub_80476E0(struct Sprite *sprite)
+{
+    u8 r1;
+
+    sprite->data5++;
+    if (sprite->data5 == 11)
+        PlaySE(SE_SUIKOMU);
+    r1 = sprite->data0;
+    if (gSprites[r1].affineAnimEnded)
+    {
+        StartSpriteAnim(sprite, 2);
+        gSprites[r1].invisible = TRUE;
+        sprite->data5 = 0;
+        sprite->callback = sub_8047754;
+    }
+    else
+    {
+        gSprites[r1].data1 += 96;
+        gSprites[r1].pos2.y = -gSprites[r1].data1 >> 8;
+    }
+}
+
+static void sub_8047754(struct Sprite *sprite)
+{
+    if (sprite->animEnded)
+        sprite->callback = SpriteCallbackDummy;
+}
+
+void obj_delete_and_free_associated_resources_(struct Sprite *sprite)
+{
+    DestroySpriteAndFreeResources(sprite);
+}
+
+void sub_804777C(u8 a)
+{
+    struct Sprite *sprite = &gSprites[gHealthboxIDs[a]];
+
+    sprite->data0 = 5;
+    sprite->data1 = 0;
+    sprite->pos2.x = 0x73;
+    sprite->pos2.y = 0;
+    sprite->callback = sub_8047830;
+    if (GetBankSide(a) != 0)
+    {
+        sprite->data0 = -sprite->data0;
+        sprite->data1 = -sprite->data1;
+        sprite->pos2.x = -sprite->pos2.x;
+        sprite->pos2.y = -sprite->pos2.y;
+    }
+    gSprites[sprite->data5].callback(&gSprites[sprite->data5]);
+    if (GetBankIdentity(a) == 2)
+        sprite->callback = sub_804780C;
+}
+
+static void sub_804780C(struct Sprite *sprite)
+{
+    sprite->data1++;
+    if (sprite->data1 == 20)
+    {
+        sprite->data1 = 0;
+        sprite->callback = sub_8047830;
+    }
+}
+
+static void sub_8047830(struct Sprite *sprite)
+{
+    sprite->pos2.x -= sprite->data0;
+    sprite->pos2.y -= sprite->data1;
+    if (sprite->pos2.x == 0 && sprite->pos2.y == 0)
+        sprite->callback = SpriteCallbackDummy;
+}
+
+void sub_8047858(u8 a)
+{
+    u8 spriteId;
+
+    spriteId = CreateInvisibleSpriteWithCallback(oamc_804BEB4);
+    gSprites[spriteId].data0 = 1;
+    gSprites[spriteId].data1 = gHealthboxIDs[a];
+    gSprites[spriteId].callback = oamc_804BEB4;
+}
+
+static void oamc_804BEB4(struct Sprite *sprite)
+{
+    u8 r1 = sprite->data1;
+
+    gSprites[r1].pos2.y = sprite->data0;
+    sprite->data0 = -sprite->data0;
+    sprite->data2++;
+    if (sprite->data2 == 21)
+    {
+        gSprites[r1].pos2.x = 0;
+        gSprites[r1].pos2.y = 0;
+        DestroySprite(sprite);
+    }
+}
+
+void sub_80478DC(u8 a)
+{
+    u16 var;
+
+    if (GetSpriteTileStartByTag(gUnknown_0820A92C[a].tag) == 0xFFFF)
+    {
+        LoadCompressedObjectPic(&gUnknown_0820A92C[a]);
+        LoadCompressedObjectPalette(&gUnknown_0820A98C[a]);
+    }
+    switch (a)
+    {
+    case 6:
+    case 10:
+    case 11:
+        break;
+    default:
+        var = GetSpriteTileStartByTag(gUnknown_0820A92C[a].tag);
+        LZDecompressVram(gUnknown_08D030D0, (void *)(VRAM + 0x10100 + var * 32));
+        break;
+    }
+}
+
+void sub_804794C(u8 a)
+{
+    FreeSpriteTilesByTag(gUnknown_0820A92C[a].tag);
+    FreeSpritePaletteByTag(gUnknown_0820A98C[a].tag);
+}
+
+static u16 sub_8047978(u8 a)
+{
+    if (GetBankSide(a) == 0)
+        return GetMonData(&gPlayerParty[gBattlePartyID[a]], MON_DATA_POKEBALL);
+    else
+        return GetMonData(&gEnemyParty[gBattlePartyID[a]], MON_DATA_POKEBALL);
+}