C     *****************************************************************
C          COMINT Address Specification Program SubRoutine Announce
C          SubRoutine Revision                          21-OCT-1991
C     *****************************************************************

      SUBROUTINE   Announce_Startup

      WRITE ( 6, 30 )

   30 FORMAT   (                         //////////////////////////
     &       '      ******************************************** '/
     &       '      *                                          * '/
     &       '      *        This is the COMINT Address        * '/
     &       '      *       Specification file Translator      * '/
     &       '      *                                          * '/
     &       '      *    Revision 1              21-OCT-1991   * '/
     &       '      ******************************************** '// )

      RETURN

      END