home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / archives / ckc072.zip / ckmkr2.r < prev    next >
Text File  |  1988-08-16  |  956b  |  41 lines
  1. /* Create the version string for Kermit with the last compi-    */
  2. /* lation time. Compile this resource definition with Rez.    */
  3. /* Created: 10/12/87 Matthias Aebi                */
  4. /* Modifications:                        */
  5.  
  6. type 'KR09' {
  7.     byte = 39;        /* the string length */
  8.     array CompileTime {
  9.         string;
  10.         byte;        /* month first digit */
  11.         byte;        /* month second digit */
  12.         byte = '/';
  13.         byte;        /* day first digit */
  14.         byte;        /* day second digit */
  15.         byte = '/';
  16.         byte;        /* year first digit */
  17.         byte;        /* year second digit */
  18.         byte = ' ';
  19.         byte;        /* hour first digit */
  20.         byte;        /* hour second digit */
  21.         byte = ':';
  22.         byte;        /* minute first digit */
  23.         byte;        /* minute second digit */
  24.     };
  25. };
  26.  
  27. resource 'KR09' (0) {
  28.     {    "Kermit Version 0.9(40) Q ",
  29.         ($$Month/10)+48,
  30.         ($$Month%10)+48,
  31.         ($$Day/10)+48,
  32.         ($$Day%10)+48,
  33.         ($$Year%100/10)+48,
  34.         ($$Year%10)+48,
  35.         ($$Hour/10)+48,
  36.         ($$Hour%10)+48,
  37.         ($$Minute/10)+48,
  38.         ($$Minute%10)+48
  39.     }
  40. };
  41.