shithub: pokecrystal

ref: acdb3020359de30ccde3bd1227883902b18b60a9
dir: /home/string.asm/

View raw version 
InitString:: ; 2ef6
; Init a string of length c.
	push hl
	jr _InitString
; 2ef9

InitName:: ; 2ef9
; Intended for names, so this function is limited to ten characters.
	push hl
	ld c, 10
_InitString:: ; 2efc
; if the string pointed to by hl is empty (defined as "zero or more spaces
; followed by a null"), then initialize it to the string pointed to by de.
	push bc
.loop
	ld a, [hli]
	cp "@"
	jr z, .blank
	cp " "
	jr nz, .notblank
	dec c
	jr nz, .loop
.blank
	pop bc
	ld l, e
	ld h, d
	pop de
	ld b, 0
	inc c
	call CopyBytes
	ret

.notblank
	pop bc
	pop hl
	ret
; 2f17