home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / VDL020D.ZIP / VPRINT.DOC < prev    next >
Encoding:
Text File  |  1993-04-14  |  3.0 KB  |  152 lines
  1. {
  2.  ══════════════════════════════════════════════════════════════════════════════
  3.  
  4.  Visionix Printer Functions Unit (VPRINT)
  5.  Copyright 1991,1992 Visionix
  6.  ALL RIGHTS RESERVED
  7.  
  8.  ──────────────────────────────────────────────────────────────────────────────
  9.  
  10.  Revision history in reverse chronological order:
  11.  
  12.  Initials  Date      Comment
  13.  ────────  ────────  ──────────────────────────────────────────────────────────
  14.  
  15.  lpg       03/16/93  Added Source Documentation
  16.  
  17.  lpg       12/08/92  Created
  18.  
  19.  ──────────────────────────────────────────────────────────────────────────────
  20.  
  21.  ──────────────────────────────────────────────────────────────────────────────
  22.  
  23. }
  24.  
  25. Unit VPrint;
  26.  
  27.  
  28.   {-------------------}
  29.   { INT 17h Functions }
  30.   {-------------------}
  31.  
  32.   Function PRN_StatusText(             Code      : BYTE          ) : STRING;
  33.  
  34.   Function PRN_WriteChar(              Port      : WORD;
  35.                                        Char      : BYTE          ) : BYTE;
  36.  
  37.   Function PRN_InitPrinter(            Port      : WORD          ) : BYTE;
  38.  
  39.  
  40.   Function PRN_StatusReq(              Port      : WORD          ) : BYTE;
  41.  
  42.  
  43.  
  44. ──────────────────────────────────────────────────────────────────────────────
  45.  
  46.  
  47. [FUNCTION]
  48.  
  49. Function PRN_StatusText(             Code      : BYTE          ) : STRING;
  50.  
  51. [PARAMETERS]
  52.  
  53. Code        Printer Status Code
  54.  
  55. [RETURNS]
  56.  
  57. Status Text Message
  58.  
  59. [DESCRIPTION]
  60.  
  61. Status Code: Bit
  62.               7 = Not Busy
  63.               6 = Acknowledge
  64.               5 = Out Of Paper
  65.               4 = Selected
  66.               3 = IO Error
  67.               2 = RESERVED
  68.               1 = RESERVED
  69.               0 = Time-Out
  70.  
  71. [SEE-ALSO]
  72.  
  73. [EXAMPLE]
  74.  
  75.  
  76. ──────────────────────────────────────────────────────────────────────────────
  77.  
  78.  
  79. [FUNCTION]
  80.  
  81. Function PRN_WriteChar(              Port        : WORD;
  82.                                      Ch          : BYTE        ) : BYTE;
  83.  
  84. [PARAMETERS]
  85.  
  86. Port        Offset from Printer Port
  87. Ch          Byte to Write
  88.  
  89. [RETURNS]
  90.  
  91. Status Code (0=Success)
  92.  
  93. [DESCRIPTION]
  94.  
  95. Port : 0=LPT1, 1=LPT2, 2=LPT3, 3=LPT4
  96.        (It is index into Port Base Address 40:08)
  97.  
  98. [SEE-ALSO]
  99.  
  100. [EXAMPLE]
  101.  
  102.  
  103. ──────────────────────────────────────────────────────────────────────────────
  104.  
  105.  
  106. [FUNCTION]
  107.  
  108. Function PRN_InitPrinter(            Port      : WORD          ) : BYTE;
  109.  
  110. [PARAMETERS]
  111.  
  112. Port        Offset from Printer Port
  113.  
  114. [RETURNS]
  115.  
  116. Status Code (0=Success)
  117.  
  118. [DESCRIPTION]
  119.  
  120. Port : 0=LPT1, 1=LPT2, 2=LPT3, 3=LPT4
  121.        (It is index into Port Base Address 40:08)
  122.  
  123. [SEE-ALSO]
  124.  
  125. [EXAMPLE]
  126.  
  127.  
  128. ──────────────────────────────────────────────────────────────────────────────
  129.  
  130.  
  131. [FUNCTION]
  132.  
  133. Function PRN_StatusReq(              Port      : WORD          ) : BYTE;
  134.  
  135. [PARAMETERS]
  136.  
  137. Port        Offset from Printer Port
  138.  
  139. [RETURNS]
  140.  
  141. Status Code (0=Success)
  142.  
  143. [DESCRIPTION]
  144.  
  145. Port : 0=LPT1, 1=LPT2, 2=LPT3, 3=LPT4
  146.        (It is index into Port Base Address 40:08)
  147.  
  148. [SEE-ALSO]
  149.  
  150. [EXAMPLE]
  151.  
  152.