		org	078DH
zTIME		CALL	GETTIME			; Original--> ld de,2fh now embeded in GETTIME.		
		LD	C,':'			;Set the separator
TIME1		LD	B,3			;Init for three fields
TIME2		LD	A,(DE)			;Get a field item
		LD	(HL),2Fh		;Init display
TIME3		INC	(HL)			;Bump until proper digit
		SUB	10	
		JR	NC,TIME3
		ADD	A,3Ah			;Correct the remainder
		INC	HL			;Bump to next display
		LD	(HL),A			;& stuff the digit
		INC	HL
		DEC	B
		RET	Z			;Back when done
		LD	(HL),C			;else stuff separator
		INC	HL
		DEC	DE			;next field
		JR	TIME2			;& loop