.MACRO	GCCI$	CBUF,CBFL,IBUF,IBFL,ADDR,NCP
	.MCALL	OFF$
	.IF	NDF $$$GLB
	.BYTE	127.,7.
	.BYTE	NCP
	.BYTE	0
	.WORD	ADDR
	.WORD	CBUF
	.WORD	CBFL
	.WORD	IBUF
	.WORD	IBFL
	.ENDC
	.IF	NDF G.CCNC
	.IRP	X,<,<G.CCNC,2>,<G.CCAD,2>,<G.CCBA,2>,<G.CCBL,2>,<G.CCIA,2>>
	OFF$	X
	.ENDM
	OFF$	G.CCIL,2
$$$OST=0
	.IRP	X,<<G.CCW2,2>,<G.CCPT,4>,<G.CCOA,2>,<G.CCPU,2>,<G.CCCU,2>,<G.CCCA,2>>
	OFF$	X
	.ENDM
$$$OST=0
	.IRP	X,<<G.CCDV,2>,<G.CCUN,1>,<G.CCCT,1>,<G.CCCL,2>,<G.CCTC,1>>
	OFF$	X
	.ENDM
	.IRP	X,<<G.CCFL,1>,<G.CCBF,>>
	OFF$	X
	.ENDM
	.IF DF $$$GLB
	.GLOBL	GC.CND,GC.CST,GC.CEX,GC.CCS
	.ENDC
GC.CND=200
GC.CST=002
GC.CEX=001
GC.CCS=000
	.ENDC
	.ENDM	GCCI$