.TITLE	STRCUR
STRCUR::
	MOV	#FD.STR,R1
	JMP	CTLOUT
	.END