home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / gould3 / k.msgcom < prev    next >
Text File  |  2020-01-01  |  972b  |  13 lines
  1. C                                                                       0001.000
  2. C K.MSGCOM - KERMIT MESSAGE COMMON                                      0002.000
  3. C                                                                       0003.000
  4.       OPTION 1+                                                         0004.000
  5.       INTEGER      PROMPT(21)                                           0005.000
  6.       INTEGER      LNAME           !length of name                      0006.000
  7.       INTEGER      NAME(41)        !name of current kermit              0007.000
  8.       CHARACTER*72 VERSION         !current version                     0008.000
  9. C                                                                       0009.000
  10.       COMMON /MSGCOM/ PROMPT, LNAME, NAME, VERSION                      0010.000
  11.       OPTION 1-                                                         0011.000
  12. C-----END OF FILE: MSGCOM                                               0012.000
  13.