.TITLE	CLSCNR
CLSCNR::
	MOV	#FD.CSR,R1
	JMP	CTLOUT
	.END