	.MODEL SMALL,C
	.CODE

ST_time0wait PROC
	mov	ah,2ch
	int	21h
	mov	bl,dh
@@:	int	21h
	cmp	bl,dh
	je	@b

	mov	al,60
	mul	cl
	xchg	dh,dl
	mov	dh,0
	add	ax,dx
	ret
ST_time0wait ENDP

ST_getnext0time PROC uses si di,ARGV:WORD
	xor	si,si
	xor	di,di
	mov	ah,2ch
	int	21h
	mov	bh,dh

@@:	int	21h
	add	si,1
	adc	di,0
	cmp	bh,dh
	je	@b

	mov	bx,ARGV
	mov	[bx],si
	mov	[bx+2],di

	mov	al,60
	mul	cl
	xchg	dh,dl
	mov	dh,0
	add	ax,dx
	ret
ST_getnext0time ENDP
	END
