Немного с опозданием но закину свои 66 байт
Код:
	device	zxspectrum48
	org	#8000
start
	ld	hl,(tick)
	ld	de,(tick+2)
	ld	c, 10
	call	div41
	ld	c, 100
	call	div41
	ld	(hdr),a
	ld	c, 60
	call	div41
	ld	(sec),a
	ld	c, 60
	call	div41
	ld	(min),a
	ld	(hour),hl
	jr	$
tick	db	0,10,0,0
hdr	db	0
sec	db	0
min	db	0
hour	dw	0
div41
;dehl/c=dehl(a)
	xor	a
	ld	b, #20
.l1
	add	hl,hl
	rl	e
	rl	d
	rla
	cp	c
	jr	c,.l2
	sub	c
	inc	l
.l2
	djnz	.l1
	ret
	savesna	"time.sna",start
Около 8к тактов, разделяет на сотые, секунды, минуты и часы. Буду рад если окажется полезным.