home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 September / PCWK996.iso / polskie / orhmet / dfdisk / rlibc / raporty.c < prev    next >
C/C++ Source or Header  |  1996-04-18  |  1KB  |  83 lines

  1. #include "rlibc.h"
  2. #include <string.h>
  3.  
  4.  
  5. int DFPrintPeriod ( char *data1, char *data2)
  6. {
  7.     int wynik;
  8.     char *bufor="  ";
  9.  
  10.     if (strlen(data1)!=6 || strlen(data2)!=6)
  11.         return (R4);
  12.     wynik=podaj_rozkaz("R1");
  13.     if (wynik!=I1)
  14.         return (wynik);
  15.     if (sendport(6, data1)==-1)
  16.         return (R0);
  17.     if (sendport(6, data2)==-1)
  18.         return (R0);
  19.     while (1)
  20.         if (recvport(2,bufor)==-1)
  21.         {
  22.             if (mk_kbhit())
  23.                 return (R1);
  24.         }
  25.         else
  26.             return (mk_translate(bufor));
  27. }
  28.  
  29. int DFSendPeriodStart ( char *data1, char *data2 )
  30. {
  31.     int wynik;
  32.  
  33.     if (strlen(data1)!=6 || strlen(data2)!=6)
  34.         return (R4);
  35.     wynik=podaj_rozkaz("R2");
  36.  
  37.     if (wynik!=I1)
  38.         return (wynik);
  39.  
  40.     if (sendport(6, data1)==-1)
  41.         return (R0);
  42.  
  43.     if (sendport(6, data2)==-1)
  44.         return (R0);
  45.  
  46.     return (D1);
  47. }
  48.  
  49. int DFSendPeriodCont( char *line )
  50. {
  51.     int wynik;
  52.     char *bufor="  ";
  53.  
  54.     if (recvport(2,bufor)==-1)
  55.         return (R0);
  56.         
  57.     wynik=mk_translate(bufor);
  58.     if (wynik==WE)
  59.         if (recvport(18, line)==-1)
  60.             return (R0);
  61.     return (wynik);
  62. }
  63.  
  64.  
  65.  
  66. int DFPrintDay ( void )
  67. {
  68.     int wynik;
  69.     char *bufor="  ";
  70.  
  71.     wynik=podaj_rozkaz("Z1");
  72.     if (wynik!=I1)
  73.         return (wynik);
  74.     while (1)
  75.         if (recvport(2,bufor)==-1)
  76.         {
  77.             if (mk_kbhit())
  78.                 return (R1);
  79.         }
  80.         else
  81.             return (mk_translate(bufor));
  82. }
  83.