org	00100h

clear:	mvi	e,'K'-040h
	mvi	c,2
	call	00005h
	ret
	end