mirror of
https://github.com/hsoft/collapseos.git
synced 2024-07-22 09:20:20 +10:00
16 lines
275 B
NASM
16 lines
275 B
NASM
; Is (HL) a double-quoted string? If yes, spit what's inside and place (HL)
|
|
; at char after the closing quote.
|
|
; Set Z if there was a string, unset otherwise.
|
|
spitQuoted:
|
|
ld a, (hl)
|
|
cp '"'
|
|
ret nz
|
|
inc hl
|
|
.loop:
|
|
ld a, (hl)
|
|
inc hl
|
|
cp '"'
|
|
ret z
|
|
call stdioPutC
|
|
jr .loop
|