PAGE

INIT,	0
	CDF 10
	NTBLIP


	INBLIP
	SIM
	ZERO
	OUTPUT
	BLNTOF
	BLOUT


	CIF 0
	
	JMS I INIT

CODEC,	0
	CDF 10
	DCA INPUT
	INBLIP


	PRESGN
	INPUT
	PREC1
	INPUT

	SIM
	INPUT
	OUTPUT


	BLOUT
	TAD OUTPUT
	CIF 0
	JMP I CODEC


INPUT,	ZBLOCK N
OUTPUT,	ZBLOCK N