;Programm gibt n 8-Byte-Zeichen auf Port o17 aus
mvi h,0
mvi l,o100
weiter:	
	mov a,m(hl)
	cpi 0			;schauen, ob Zk terminiert mit o000
	jz ende
	out o17			;auf Port o17 schreiben
	inr l			;l auf nächstes Byte setzen
	jmp weiter
ende:
	hlt
	end