28-print-string.asm

; Example that is used in following article:
;    Vývoj pro ZX Spectrum: výpis informací na obrazovku
;    https://www.root.cz/clanky/vyvoj-pro-zx-spectrum-vypis-informaci-na-obrazovku/
;
; This article is part of series:
;    "Vývoj pro slavné ZX Spectrum"
;    https://www.root.cz/serialy/vyvoj-pro-slavne-zx-spectrum/
;
; Repository:
;    https://github.com/tisnik/8bit-fame
;
; Example #28:
;    Print whole string onto screen, optimized version
;
; This source code is available at:
;    https://github.com/tisnik/8bit-fame/blob/master/Speccy-asm/28-print-string.asm



ENTRY_POINT      equ $8000
ROM_OPEN_CHANNEL equ $1601

	org ENTRY_POINT

start:
	ld   A,2              ; číslo kanálu
	call ROM_OPEN_CHANNEL ; otevření kanálu číslo 2 (screen)

	ld   HL, TEXT         ; adresa prvního znaku v řetězci

LOOP:
	ld   A, (HL)          ; načíst kód znaku z řetězce
	and  a                ; test na kód znak s kódem 0
	ret  Z                ; ukončit program na konci řetězce

	rst  0x10             ; zavolání rutiny v ROM
	inc  HL               ; přechod na další znak
	jr   LOOP

; nulou ukončený řetězec
TEXT:	db "Hello, Speccy!", 0

end ENTRY_POINT