CHARACTER*4 COMMFC
      INTEGER*4 IX1FC,IY1FC,IX2FC,IY2FC,IX3FC
      CHARACTER*80 TEXTFC
      INTEGER*4 IXFC(2000)
      INTEGER*4 IYFC(2000)
C
      CHARACTER*4 COMMCF
      INTEGER*4 IX1CF,IY1CF,IX2CF,IY2CF,IX3CF
      CHARACTER*80 TEXTCF
      INTEGER*4 IXCF(2000)
      INTEGER*4 IYCF(2000)
C
      INTEGER*4 ITCLL
C
      COMMON /FC/ COMMFC,IX1FC,IY1FC,IX2FC,IY2FC,IX3FC,
     1TEXTFC,IXFC,IYFC
      COMMON /CF/ COMMCF,IX1CF,IY1CF,IX2CF,IY2CF,IX3CF,
     1TEXTCF,IXCF,IYCF
      COMMON /TC/ ITCLL