/ ZERO FIELD ZERO, ONE, TWO / 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 FIELD 2 /CLEARING FIELD TWO *0000 /START AT THE BEGINNING ZBLOCK 7600-. /CLEAR OUT ALL AVAILABLE FIELD TWO MEMORY $ /THAT'S ALL FOLK!