.TITLE	BLNKON
BLNKON::
	MOV	#FD.BON,R1
	JMP	CTLOUT
	.END