开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > 查看源码
FPRINT.CPP
资源名称：commutil.zip　[点击查看]
上传用户：xr_qian
上传日期：2007-01-05
资源大小：443k
文件大小：5k
源码类别：

通讯/手机编程

开发平台：

DOS

FPRINT.CPP：源码内容
  1. // ******************************************************************** //
  2. //                                                                      //
  3. //      FPRINT.CPP                                                      //
  4. //      Copyright (c) 1993, Michael Holmes and Bob Flanders             //
  5. //      C++ Communication Utilities                                     //
  6. //                                                                      //
  7. //      This file contains the routines under the PRINT main            //
  8. //      menu entry.                                                     //
  9. //                                                                      //
  10. // ******************************************************************** //
  13. /* ******************************************************************** *
  14.  *
  15.  *  f_lpt() -- format and print the fax to a printer
  16.  *
  17.  * ******************************************************************** */
  19. int     f_lpt(int c, int r,                 // column and row
  20.               int pn)                       // printer number
  21. {
  22. int     i, j, k, l,                         // loop counters
  23.         qf = 0;                             // quit flag
  24. char    huge *p, huge *q,                   // work pointer
  25.         buf[128];                           // ..and work buffer
  26. Window  p_win(c, r,                         // define temporary window
  27.             c + 40, r + 4,                  // ..to hold message
  28.             menu_cn, menu_cr);              // ..using system colors
  29. int     f;                                  // printer file number
  32. if (f_handle == -1)                         // q. file open?
  33.     return(ESC);                            // a. no .. just return
  35. p_win.Open(double_line);                    // open window with a border
  36. p_win.Display(print_msg);                   // give filename prompt
  38. sprintf(buf, "LPT%d", pn);                  // build printer name
  39. f = open(buf, O_WRONLY | O_BINARY);         // open file for binary output
  41. for (i = 1; f_read_g3(i) == 0 &&            // for each page..
  42.             NOT qf; i++)
  43.     {
  44.     sprintf(buf, page_msg, i, f_pgcnt);     // format page status
  45.     p_win.Display(buf);                     // ..and keep user informed
  47.     sprintf(buf, ESC_CHAR "E"               // reset printer
  48.                  ESC_CHAR "*p336x450Y"      // position printer cursor
  49.                  ESC_CHAR "*t300R"          // 300 dots per inch
  50.                  ESC_CHAR "*r0F"            // specify orientation
  51.                  ESC_CHAR "*r1A");          // start raster graphics
  52.     _write(f, buf, strlen(buf));            // ..write the line
  54.     for (j = 0, p = page; j < LINES;        // for each line
  55.                 j++, p += LINE)             // ..in the bitmap
  56.         {
  57.         for (k = LINE, q = &p[k-1];         // starting at the end of line
  58.                 k > 1 && NOT *q; k--, q--)  // ..and working backwards
  59.             ;                               // ..look for non-null data
  61.         sprintf(buf, ESC_CHAR "*b%dW", k);  // give graphic command
  62.         _write(f, buf, strlen(buf));        // ..send to the printer
  63.         l = _write(f, p, k);                // ..and print the data line
  64.         assert(l == k);
  66.         sprintf(buf, ESC_CHAR "*b%dW", k);  // give graphic command
  67.         _write(f, buf, strlen(buf));        // ..send to the printer
  68.         l = _write(f, p, k);                // ..and print the data line
  69.         assert(l == k);
  71.         if (get_key(ALLOW_ALT))             // q. key hit?
  72.             {
  73.             qf = 1;                         // a. yes .. set quit flag
  74.             break;                          // ..and exit loop
  75.             }
  76.         }
  78.     sprintf(buf, ESC_CHAR "*rB");           // end graphic mode
  79.     _write(f, buf, strlen(buf));            // ..write the line
  80.     }
  82. sprintf(buf, ESC_CHAR "E");                 // re-initialize printer
  83. _write(f, buf, strlen(buf));                // ..write the line
  84. close(f);                                   // ..and close file
  85. return(ESC);                                // finally, rtn to caller
  87. }
  91. /* ******************************************************************** *
  92.  *
  93.  *  f_lpt1() -- print the fax to LPT1:
  94.  *
  95.  * ******************************************************************** */
  97. int     f_lpt1(int c, int r)                // column and row
  98. {
  100. f_lpt(c, r, 1);                             // print on LPT1:
  101. return(ESC);                                // ..and return to menu
  103. }
  108. /* ******************************************************************** *
  109.  *
  110.  *  f_lpt2() -- print the fax to LPT2:
  111.  *
  112.  * ******************************************************************** */
  114. int     f_lpt2(int c, int r)                // column and row
  115. {
  117. f_lpt(c, r, 2);                             // print on LPT2:
  118. return(ESC);                                // ..and return to menu
  120. }
  124. /* ******************************************************************** *
  125.  *
  126.  *  f_lpt3() -- print the fax to LPT3:
  127.  *
  128.  * ******************************************************************** */
  130. int     f_lpt3(int c, int r)                // column and row
  131. {
  133. f_lpt(c, r, 3);                             // print on LPT3:
  134. return(ESC);                                // ..and return to menu
  136. }