.TITLE	CLLINR
CLLINR::
	MOV	#FD.CLR,R1
	JMP	CTLOUT
	.END