Add home/mon_stats.asm

1 files changed, 1 insertions, 79 deletions

diff --git a/home.asm b/home.asm
index 4f9f2a71..283a0e5d 100644
--- a/home.asm
+++ b/home.asm
@@ -260,85 +260,7 @@ INCLUDE "home/names.asm"
 INCLUDE "home/scrolling_menu.asm"
 INCLUDE "home/stone_queue.asm"
 INCLUDE "home/trainers.asm"
-
-DrawBattleHPBar::
-	push hl
-	push de
-	push bc
-	ld a, $60
-	ld [hli], a
-	ld a, $61
-	ld [hli], a
-	push hl
-	ld a, $62
-.asm_3990
-	ld [hli], a
-	dec d
-	jr nz, .asm_3990
-	ld a, $6b
-	add b
-	ld [hl], a
-	pop hl
-	ld a, e
-	and a
-	jr nz, .asm_39a3
-	ld a, c
-	and a
-	jr z, .asm_39b6
-	ld e, $1
-.asm_39a3
-	ld a, e
-	sub $8
-	jr c, .asm_39b2
-	ld e, a
-	ld a, $6a
-	ld [hli], a
-	ld a, e
-	and a
-	jr z, .asm_39b6
-	jr .asm_39a3
-
-.asm_39b2
-	ld a, $62
-	add e
-	ld [hl], a
-.asm_39b6
-	pop bc
-	pop de
-	pop hl
-	ret
-
-PrepMonFrontpic::
-	ld a, $1
-	ld [wcf3b], a
-PrepMonFrontpic_::
-	ld a, [wCurPartySpecies]
-	and a
-	jr z, .not_pokemon
-	cp EGG
-	jr z, .egg
-	cp NUM_POKEMON + 1
-	jr nc, .not_pokemon
-.egg
-	push hl
-	ld de, $9000
-	predef GetMonFrontpic
-	pop hl
-	xor a
-	ldh [hGraphicStartTile], a
-	lb bc, 7, 7
-	predef PlaceGraphic
-	xor a
-	ld [wcf3b], a
-	ret
-
-.not_pokemon
-	xor a
-	ld [wcf3b], a
-	inc a
-	ld [wCurPartySpecies], a
-	ret
-
+INCLUDE "home/mon_stats.asm"
 INCLUDE "home/cry.asm"
 
 PrintLevel:: ; 3a50