include	clib.inc
include	conio.inc

PPROC	scenter, x:word, y:word, count:word, string:dword
	mov	bl,byte ptr x
	mov	bh,byte ptr y
	mov	cx,count
	mov	ax,word ptr string
	mov	dx,word ptr string+2
	call	@scenter
	ret
PEND	scenter

	END

