subroutine hec_slow_sps_epio
c
c read slow control SPS  data
c
      implicit none
c      include'hec_epio.inc'     !epio common
c
c here is the SC back...
c
c      write(*,*)'***** SPS SlowControl BLOCK'
c      write(*,*)'***** t4 tbiu',ibankbuf(10)
c      write(*,*)'***** t4 tbid',ibankbuf(11)
c     
c     print *, ' hec_slow_pc_epio end'
c
      end