home/string.asm


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

InitString::
	push hl
	jr InitString_

InitName::
	push hl
	ld c, $a
InitString_::
	push bc
.asm_2fbd
	ld a, [hli]
	cp $50
	jr z, .asm_2fc9
	cp $7f
	jr nz, .asm_2fd4
	dec c
	jr nz, .asm_2fbd
.asm_2fc9
	pop bc
	ld l, e
	ld h, d
	pop de
	ld b, $0
	inc c
	call CopyBytes
	ret

.asm_2fd4
	pop bc
	pop hl
	ret