/	CLEAR FIELD ZERO AND ONE

/	USED WITH OS/8 ABSLDR TO PRECLEAR CORE IMAGE AND STANDARDIZE LENGTH.

/	LAST EDIT:	08-APR-1987	23:00:00	CJL

	FIELD	0		/CLEARING FIELD ZERO

	*0000			/START AT THE BEGINNING

	ZBLOCK	7600-.		/CLEAR OUT ALL AVAILABLE FIELD ZERO MEMORY

	FIELD	1		/CLEARING FIELD ONE

	*0000			/START AT THE BEGINNING

	ZBLOCK	7600-.		/CLEAR OUT ALL AVAILABLE FIELD ONE MEMORY

	$			/THAT'S ALL FOLK!