IMPLICIT NONE	
*     
      INTEGER HITMAP, HITSTATUS
      INTEGER TRIGGER
      INTEGER STATUS
      REAL OBT,EVFILE,HEADC
c     
      COMMON /aclev1/obt,evfile,headc,
     &  status(2),hitmap(2),hitstatus(2),
     & 	trigger(2)
      SAVE /aclev1/