summaryrefslogtreecommitdiff
path: root/home/mon_stats.asm
blob: e84e55269da113c5c93b7f95a67075084d827386 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
include "constants.asm"

if DEBUG
SECTION "Mon Stats", ROM0 [$394b]
else
SECTION "Mon Stats", ROM0 [$390f]
endc

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_3957: ; 00:3957
	ld [hli], a
	dec d
	jr nz, .asm_3957
	ld a, $6b
	add b
	ld [hl], a
	pop hl
	ld a, e
	and a
	jr nz, .asm_396a
	ld a, c
	and a
	jr z, .asm_397d
	ld e, $1
.asm_396a: ; 00:396a
	ld a, e
	sub $8
	jr c, .asm_3979
	ld e, a
	ld a, $6a
	ld [hli], a
	ld a, e
	and a
	jr z, .asm_397d
	jr .asm_396a

.asm_3979: ; 00:3979
	ld a, $62
	add e
	ld [hl], a
.asm_397d: ; 00:397d
	pop bc
	pop de
	pop hl
	ret

PrepMonFrontpic::
	ld a, $1
	ld [wSpriteFlipped], a
_PrepMonFrontpic::
	ld a, [wMonDexIndex]
	and a
	jr z, .asm_39a8
	cp 252
	jr nc, .asm_39a8
	push hl
	ld de, vFrontPic
	call LoadMonFrontSprite
	pop hl
	xor a
	ldh [hGraphicStartTile], a
	lb bc, 7, 7
	predef PlaceGraphic
	xor a
	ld [wSpriteFlipped], a
	ret

.asm_39a8: ; 00:39a8
	xor a
	ld [wSpriteFlipped], a
	inc a
	ld [wMonDexIndex], a
	ret