;
; ROUTINE TO TURN ..TMON OFF
;
	.TITLE	MONOFF -- TURNS ..TMON OFF
	.MCALL	VSDR$,DIR$,EXIT$S
;
VSD:	VSDR$	..TMON,,,,,VSDBUF,5
VSDBUF:	.WORD	0,0,0,0,0
;
;
MONOFF::DIR$	#VSD
	EXIT$S
	.END	MONOFF