.TITLE	FCSINI	no parameters
	.ENABL	LC
	.MCALL	FINIT$,RETURN
	.GLOBL	F.C.S.; force FCSFDB to load

FCSINI::
	TST	INI
	BNE	EX	; dont rape FCS if user has already initialised
	FINIT$
	COM	INI	; note we have kick-started FCS
EX:	RETURN

	.PSECT FCSCA1,RW,D,GBL,REL,OVR
INI:	.WORD 0 ; ZERO MEANS NO FCSINI DONE

	.END