blob: 4d40fd827c46468fe65254dda79789dcb245283b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
SaveTrainerName::
ld hl, TrainerNamePointers
ld a, [wTrainerClass]
dec a
ld c, a
ld b, 0
add hl, bc
add hl, bc
ld a, [hli]
ld h, [hl]
ld l, a
ld de, wcd6d
.CopyCharacter
ld a, [hli]
ld [de], a
inc de
cp "@"
jr nz, .CopyCharacter
ret
INCLUDE "data/trainers/name_pointers.asm"
|