.TITLE	UNDRON
UNDRON::
	MOV	#FD.UON,R1
	JMP	CTLOUT
	.END