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
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
|
DisplayDexRating:
ld hl, wPokedexSeen
ld b, wPokedexSeenEnd - wPokedexSeen
call CountSetBits
ld a, [wNumSetBits]
ld [hDexRatingNumMonsSeen], a
ld hl, wPokedexOwned
ld b, wPokedexOwnedEnd - wPokedexOwned
call CountSetBits
ld a, [wNumSetBits]
ld [hDexRatingNumMonsOwned], a
ld hl, DexRatingsTable
.findRating
ld a, [hli]
ld b, a
ld a, [hDexRatingNumMonsOwned]
cp b
jr c, .foundRating
inc hl
inc hl
jr .findRating
.foundRating
ld a, [hli]
ld h, [hl]
ld l, a ; load text pointer into hl
CheckAndResetEventA EVENT_HALL_OF_FAME_DEX_RATING
jr nz, .hallOfFame
push hl
ld hl, PokedexRatingText_441cc
call PrintText
pop hl
call PrintText
callba PlayPokedexRatingSfx
jp WaitForTextScrollButtonPress
.hallOfFame
ld de, wDexRatingNumMonsSeen
ld a, [hDexRatingNumMonsSeen]
ld [de], a
inc de
ld a, [hDexRatingNumMonsOwned]
ld [de], a
inc de
.copyRatingTextLoop
ld a, [hli]
cp a, "@"
jr z, .doneCopying
ld [de], a
inc de
jr .copyRatingTextLoop
.doneCopying
ld [de], a
ret
PokedexRatingText_441cc:
TX_FAR _OaksLabText_441cc
db "@"
DexRatingsTable:
db 10
dw PokedexRatingText_44201
db 20
dw PokedexRatingText_44206
db 30
dw PokedexRatingText_4420b
db 40
dw PokedexRatingText_44210
db 50
dw PokedexRatingText_44215
db 60
dw PokedexRatingText_4421a
db 70
dw PokedexRatingText_4421f
db 80
dw PokedexRatingText_44224
db 90
dw PokedexRatingText_44229
db 100
dw PokedexRatingText_4422e
db 110
dw PokedexRatingText_44233
db 120
dw PokedexRatingText_44238
db 130
dw PokedexRatingText_4423d
db 140
dw PokedexRatingText_44242
db 150
dw PokedexRatingText_44247
db 152
dw PokedexRatingText_4424c
PokedexRatingText_44201:
TX_FAR _OaksLabText_44201
db "@"
PokedexRatingText_44206:
TX_FAR _OaksLabText_44206
db "@"
PokedexRatingText_4420b:
TX_FAR _OaksLabText_4420b
db "@"
PokedexRatingText_44210:
TX_FAR _OaksLabText_44210
db "@"
PokedexRatingText_44215:
TX_FAR _OaksLabText_44215
db "@"
PokedexRatingText_4421a:
TX_FAR _OaksLabText_4421a
db "@"
PokedexRatingText_4421f:
TX_FAR _OaksLabText_4421f
db "@"
PokedexRatingText_44224:
TX_FAR _OaksLabText_44224
db "@"
PokedexRatingText_44229:
TX_FAR _OaksLabText_44229
db "@"
PokedexRatingText_4422e:
TX_FAR _OaksLabText_4422e
db "@"
PokedexRatingText_44233:
TX_FAR _OaksLabText_44233
db "@"
PokedexRatingText_44238:
TX_FAR _OaksLabText_44238
db "@"
PokedexRatingText_4423d:
TX_FAR _OaksLabText_4423d
db "@"
PokedexRatingText_44242:
TX_FAR _OaksLabText_44242
db "@"
PokedexRatingText_44247:
TX_FAR _OaksLabText_44247
db "@"
PokedexRatingText_4424c:
TX_FAR _OaksLabText_4424c
db "@"
|
