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
|
DisplayPlayerNamingScreen:
; clear the name buffer.
ld hl, wNameBuffer ; c500: name buffer.
ld bc, NAME_BUFFER_LENGTH
ld a, TX_END
call FillMemoryWithA
; get player's name
; from the user into hl.
ld hl, wNameBuffer
farcall InputPlayerName
farcall WhiteOutDMGPals
call DoFrameIfLCDEnabled
call DisableLCD
ld hl, wNameBuffer
; get the first byte of the name buffer.
ld a, [hl]
or a
; check if anything typed.
jr nz, .no_name
ld hl, .default_name
.no_name
; set the default name.
ld de, sPlayerName
ld bc, NAME_BUFFER_LENGTH
call EnableSRAM
call CopyDataHLtoDE_SaveRegisters
; it seems for integrity checking.
call UpdateRNGSources
ld [sPlayerName+$e], a
call UpdateRNGSources
ld [sPlayerName+$f], a
call DisableSRAM
ret
.default_name
; "MARK": default player name.
textfw3 "MARK"
db TX_END, TX_END, TX_END, TX_END
Unknown_128f7:
db 0, 0 ; start menu coords
db 16, 18 ; start menu text box dimensions
db 2, 2 ; text alignment for InitTextPrinting
tx DebugMenuText
db $ff
db 1, 2 ; cursor x, cursor y
db 1 ; y displacement between items
db 11 ; number of items
db SYM_CURSOR_R ; cursor tile number
db SYM_SPACE ; tile behind cursor
dw NULL ; function pointer if non-0
Unknown_12908:
db 10, 0 ; start menu coords
db 10, 6 ; start menu text box dimensions
db 12, 2 ; text alignment for InitTextPrinting
tx Text037b
db $ff
db 11, 2 ; cursor x, cursor y
db 2 ; y displacement between items
db 2 ; number of items
db SYM_CURSOR_R ; cursor tile number
db SYM_SPACE ; tile behind cursor
dw NULL ; function pointer if non-0
Unknown_12919:
db 0, 0 ; start menu coords
db 12, 12 ; start menu text box dimensions
db 2, 2 ; text alignment for InitTextPrinting
tx DebugBoosterPackMenuText
db $ff
db 1, 2 ; cursor x, cursor y
db 2 ; y displacement between items
db 5 ; number of items
db SYM_CURSOR_R ; cursor tile number
db SYM_SPACE ; tile behind cursor
dw NULL ; function pointer if non-0
Unknown_1292a:
db 12, 0 ; start menu coords
db 4, 16 ; start menu text box dimensions
db 14, 2 ; text alignment for InitTextPrinting
tx DebugBoosterPackColosseumEvolutionMenuText
db $ff
db 13, 2 ; cursor x, cursor y
db 2 ; y displacement between items
db 7 ; number of items
db SYM_CURSOR_R ; cursor tile number
db SYM_SPACE ; tile behind cursor
dw NULL ; function pointer if non-0
Unknown_1293b:
db 12, 0 ; start menu coords
db 4, 14 ; start menu text box dimensions
db 14, 2 ; text alignment for InitTextPrinting
tx DebugBoosterPackMysteryMenuText
db $ff
db 13, 2 ; cursor x, cursor y
db 2 ; y displacement between items
db 6 ; number of items
db SYM_CURSOR_R ; cursor tile number
db SYM_SPACE ; tile behind cursor
dw NULL ; function pointer if non-0
Unknown_1294c:
db 12, 0 ; start menu coords
db 4, 12 ; start menu text box dimensions
db 14, 2 ; text alignment for InitTextPrinting
tx DebugBoosterPackLaboratoryMenuText
db $ff
db 13, 2 ; cursor x, cursor y
db 2 ; y displacement between items
db 5 ; number of items
db SYM_CURSOR_R ; cursor tile number
db SYM_SPACE ; tile behind cursor
dw NULL ; function pointer if non-0
Unknown_1295d:
db 12, 0 ; start menu coords
db 4, 10 ; start menu text box dimensions
db 14, 2 ; text alignment for InitTextPrinting
tx DebugBoosterPackEnergyMenuText
db $ff
db 13, 2 ; cursor x, cursor y
db 2 ; y displacement between items
db 4 ; number of items
db SYM_CURSOR_R ; cursor tile number
db SYM_SPACE ; tile behind cursor
dw NULL ; function pointer if non-0
|
