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
|
NameRaterScript: ; 1da12 (7:5a12)
jp EnableAutoTextBoxDrawing
NameRaterScript_1da15: ; 1da15 (7:5a15)
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
ret
NameRaterScript_1da20: ; 1da20 (7:5a20)
ld hl, wPartyMonOT
ld bc, 11
ld a, [wWhichPokemon]
call AddNTimes
ld de, wPlayerName
ld c, 11
call .asm_1da47
jr c, .asm_1da52
ld hl, wPartyMon1OTID
ld bc, wPartyMon2 - wPartyMon1
ld a, [wWhichPokemon]
call AddNTimes
ld de, wPlayerID
ld c, $2
.asm_1da47
ld a, [de]
cp [hl]
jr nz, .asm_1da52
inc hl
inc de
dec c
jr nz, .asm_1da47
and a
ret
.asm_1da52
scf
ret
NameRaterTextPointers: ; 1da54 (7:5a54)
dw NameRaterText1
NameRaterText1: ; 1da56 (7:5a56)
TX_ASM
call SaveScreenTilesToBuffer2
ld hl, NameRaterText_1dab3
call NameRaterScript_1da15
jr nz, .asm_1daae
ld hl, NameRaterText_1dab8
call PrintText
xor a
ld [wPartyMenuTypeOrMessageID], a
ld [wUpdateSpritesEnabled], a
ld [wMenuItemToSwap], a
call DisplayPartyMenu
push af
call GBPalWhiteOutWithDelay3
call RestoreScreenTilesAndReloadTilePatterns
call LoadGBPal
pop af
jr c, .asm_1daae
call GetPartyMonName2
call NameRaterScript_1da20
ld hl, NameRaterText_1dad1
jr c, .asm_1daa8
ld hl, NameRaterText_1dabd
call NameRaterScript_1da15
jr nz, .asm_1daae
ld hl, NameRaterText_1dac2
call PrintText
callba DisplayNameRaterScreen
jr c, .asm_1daae
ld hl, NameRaterText_1dac7
.asm_1daa8
call PrintText
jp TextScriptEnd
.asm_1daae
ld hl, NameRaterText_1dacc
jr .asm_1daa8
NameRaterText_1dab3: ; 1dab3 (7:5ab3)
TX_FAR _NameRaterText_1dab3
db "@"
NameRaterText_1dab8: ; 1dab8 (7:5ab8)
TX_FAR _NameRaterText_1dab8
db "@"
NameRaterText_1dabd: ; 1dabd (7:5abd)
TX_FAR _NameRaterText_1dabd
db "@"
NameRaterText_1dac2: ; 1dac2 (7:5ac2)
TX_FAR _NameRaterText_1dac2
db "@"
NameRaterText_1dac7: ; 1dac7 (7:5ac7)
TX_FAR _NameRaterText_1dac7
db "@"
NameRaterText_1dacc: ; 1dacc (7:5acc)
TX_FAR _NameRaterText_1dacc
db "@"
NameRaterText_1dad1: ; 1dad1 (7:5ad1)
TX_FAR _NameRaterText_1dad1
db "@"
|
