; 
; clear screen on kaypro ii
; 24 june 1983
; Gary K. Berkheiser
; Ergo Software, Inc.
;
	org	0100h
;
start:	mvi	c,9		;print string command
	lxi	d,clsmsg	;point to message
	call	5		;do bdos
	ret			;clean exit
;
clsmsg:	db	1ah,'$'		;message with delimiter
;
	end
;