home *** CD-ROM | disk | FTP | other *** search
/ ST-Computer Leser-CD: Millenium / STCMILLENIUM.iso / demovers / coma5 / develop / example.c < prev   
C/C++ Source or Header  |  1997-05-16  |  2KB  |  78 lines
  1. /* Beispiel für die Einbinden der CoMa-FAX-Treiber-Routinen in eigene Programme */
  2. /* 25.10.93 by SOFTBÄR */
  3.  
  4. #include "coma_drv.h"
  5. #include <aes.h>
  6. #include <stdio.h>
  7. #include <string.h>
  8.  
  9. /**********************************************************/
  10. /*                                                        */
  11. /*           Fax-Seiten erstellen mit foldername          */
  12. /*                                                        */
  13. /**********************************************************/
  14. main ()
  15.   {
  16.   long page, line;
  17.   char pixelline[216]; /* 1728 Pixel pro Zeile */
  18.   
  19.   coma_clear_folder("F:\\FAX\\OUTGOING");
  20.   for (page=0; page<2; page++)
  21.     {
  22.     if (coma_open_file("F:\\FAX\\OUTGOING", "MAGNUM") != 0)
  23.       {
  24.       form_alert(1, "[1][FAX-Datei kann nicht geöffnet werden][ OK ]");
  25.       return -1;
  26.       }
  27.     else
  28.       {
  29.       memset(pixelline, 0, 216);
  30.       for (line=0; line < 2200; line++)
  31.         {
  32.         pixelline[line>>4] |= (0x80>>((line>>1) & 0x7)); /* Dialonale erzeugen */
  33.         coma_pixelline(pixelline);
  34.         }
  35.       coma_close_file();
  36.       }
  37.     }
  38.   return 0;
  39.   }
  40.  
  41. /*
  42. /**********************************************************/
  43. /*                                                        */
  44. /*     Fax-Seiten erstellen mit Envoironmentvariable      */
  45. /*                                                        */
  46. /**********************************************************/
  47. main ()
  48.   {
  49.   int  ret;
  50.   long page, line;
  51.   char pixelline[216]; /* 1728 Pixel pro Zeile */
  52.   
  53.   coma_clear_folder(NULL); 
  54.   for (page=0; page<2; page++)
  55.     {
  56.     if ((ret = coma_open_file(NULL, "MAGNUM")) != 0)
  57.       {
  58.       if (ret == NO_PATH)
  59.         form_alert(1, "[1][COMA_OUT-Variable nicht gesetzt][ OK ]");
  60.       else  
  61.         form_alert(1, "[1][FAX-Datei kann nicht geöffnet werden][ OK ]");
  62.       return -1;
  63.       }
  64.     else
  65.       {
  66.       memset(pixelline, 0, 216);
  67.       for (line=0; line < 2200; line++)
  68.         {
  69.         pixelline[line>>4] |= (0x80>>((line>>1) & 0x7)); /* Dialonale erzeugen */
  70.         coma_pixelline(pixelline);
  71.         }
  72.       coma_close_file();
  73.       }
  74.     }
  75.   return 0;
  76.   }
  77. */
  78.