BDOS	EQU	05H
	PUBLIC BD009
;write string
;this sends a character string to the console
;the starting position of the string is in register de
;the string is terminated by a delimiter
;the default delimiter is a $ sign
;a different delimiter may be specified with bdos110b
;it also checks for ctrl-s(to pause), ctrl-q(end pause)
;and ctrl-p(echo to printer)
;if the console is in the default mode tabs(ctrl-i) wil be expanded
;bd109b sets console mode
BD009:	PUSH	B
	PUSH	D
	PUSH	H
	MVI	C,9
	CALL	BDOS
	POP	H
	POP	D
	POP	B
	RET
	END
