.TITLE DSKOFF
	.IDENT /1/
;+
; DSKOFF SENDS A DUMMY PACKET TO DSKMON TO SIGNAL IT TO EXIT
;
; JAMES G. DOWNWARD
; KMS FUSION, INC.
; 3941 RESEARCH PARK DR
; ANN ARBOR, MICH 48106
;
;-
 
	.MCALL	EXIT$S,SDAT$,DIR$
SEND:	SDAT$	DSKMON,BUF
BUF:	.BLKW	13.		; NOTHING IN IT
 
START:	DIR$	#SEND
	EXIT$S
	.END	START