.TITLE	GINSYS
	.IDENT	/01.01/
;
	.MCALL	GIN$S
;
GINSYS::
	GIN$S	#GI.FMK,2(R5),#80.	;GET SYS FEATURE MASK
	MOV	$DSW,@4(R5)		; RETURN DSW
	RTS	PC
;
	.END