diff options
author | Bryan Bishop <kanzure@gmail.com> | 2013-09-09 15:56:49 -0500 |
---|---|---|
committer | Bryan Bishop <kanzure@gmail.com> | 2013-09-09 15:56:49 -0500 |
commit | 37e1aa4e8ec2400ba97db4c767bd3a9fcd43a1ac (patch) | |
tree | 68cb6273ed885d69512c4ba099298aad1534c6e4 /common/string.asm | |
parent | 35324ae43f845f4ce8346ef05fdf1bed8bed1e28 (diff) | |
parent | 705e6824687ed247a28cfbaedd47bf33bd1da32a (diff) |
Merge branch 'yenatch/split-predefs-specials-stds' into fix-split-predefs-specials-stds
https://github.com/kanzure/pokecrystal/pull/198
Diffstat (limited to 'common/string.asm')
-rw-r--r-- | common/string.asm | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/common/string.asm b/common/string.asm new file mode 100644 index 000000000..a871b4d2a --- /dev/null +++ b/common/string.asm @@ -0,0 +1,39 @@ +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 +; 2efc + +_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 + |