home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / OSK / TELECOM / OSKBox.lzh / MAILBOX / CC / pfilter.c < prev    next >
Text File  |  1987-10-04  |  598b  |  27 lines
  1. main ()
  2. {
  3.     int len;
  4.     char line[300], *p;
  5.     char *str = "^ ";
  6.     int time, oldtime, date, day, tick;
  7.     
  8.     while ((len = readln (0, line, 300)) > 0) {
  9.         _sysdate (0, &time, &date, &day, &tick);
  10.         if ((time & 0xffff00) != (oldtime & 0xffff00)) {
  11.             char str2[10];
  12.             
  13.             oldtime = time;
  14.             sprintf (str2, "%02d:%02d\n", (time >> 16) & 0xff, (time >> 8) & 0xff);
  15.             writeln (1, str2, strlen (str2));
  16.             }
  17.         for (p = line; p - line < len; p++) {
  18.             if ((*p & 0x7f) < ' ' && *p != '\n' && *p != '\t') {
  19.                 str[1] = (*p & 0x7f) + '@';
  20.                 writeln (1, str, 2);
  21.                 }
  22.             else
  23.                 writeln (1, p, 1);
  24.             }
  25.         }
  26.     }
  27.