; Main consol input routine using CPM. 
; Character returned in [A]. 
; All registers (except [A]) unchanged
 
ZCI:	PUSH	BC
	PUSH	DE
	LD	C,RDCON
	CALL	BDOS
	POP	DE
	POP	BC
	RET