home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Media Share 9
/
MEDIASHARE_09.ISO
/
pascal
/
vdl020d.zip
/
VPRINT.DOC
< prev
next >
Wrap
Text File
|
1993-04-14
|
3KB
|
152 lines
{
══════════════════════════════════════════════════════════════════════════════
Visionix Printer Functions Unit (VPRINT)
Copyright 1991,1992 Visionix
ALL RIGHTS RESERVED
──────────────────────────────────────────────────────────────────────────────
Revision history in reverse chronological order:
Initials Date Comment
──────── ──────── ──────────────────────────────────────────────────────────
lpg 03/16/93 Added Source Documentation
lpg 12/08/92 Created
──────────────────────────────────────────────────────────────────────────────
──────────────────────────────────────────────────────────────────────────────
}
Unit VPrint;
{-------------------}
{ INT 17h Functions }
{-------------------}
Function PRN_StatusText( Code : BYTE ) : STRING;
Function PRN_WriteChar( Port : WORD;
Char : BYTE ) : BYTE;
Function PRN_InitPrinter( Port : WORD ) : BYTE;
Function PRN_StatusReq( Port : WORD ) : BYTE;
──────────────────────────────────────────────────────────────────────────────
[FUNCTION]
Function PRN_StatusText( Code : BYTE ) : STRING;
[PARAMETERS]
Code Printer Status Code
[RETURNS]
Status Text Message
[DESCRIPTION]
Status Code: Bit
7 = Not Busy
6 = Acknowledge
5 = Out Of Paper
4 = Selected
3 = IO Error
2 = RESERVED
1 = RESERVED
0 = Time-Out
[SEE-ALSO]
[EXAMPLE]
──────────────────────────────────────────────────────────────────────────────
[FUNCTION]
Function PRN_WriteChar( Port : WORD;
Ch : BYTE ) : BYTE;
[PARAMETERS]
Port Offset from Printer Port
Ch Byte to Write
[RETURNS]
Status Code (0=Success)
[DESCRIPTION]
Port : 0=LPT1, 1=LPT2, 2=LPT3, 3=LPT4
(It is index into Port Base Address 40:08)
[SEE-ALSO]
[EXAMPLE]
──────────────────────────────────────────────────────────────────────────────
[FUNCTION]
Function PRN_InitPrinter( Port : WORD ) : BYTE;
[PARAMETERS]
Port Offset from Printer Port
[RETURNS]
Status Code (0=Success)
[DESCRIPTION]
Port : 0=LPT1, 1=LPT2, 2=LPT3, 3=LPT4
(It is index into Port Base Address 40:08)
[SEE-ALSO]
[EXAMPLE]
──────────────────────────────────────────────────────────────────────────────
[FUNCTION]
Function PRN_StatusReq( Port : WORD ) : BYTE;
[PARAMETERS]
Port Offset from Printer Port
[RETURNS]
Status Code (0=Success)
[DESCRIPTION]
Port : 0=LPT1, 1=LPT2, 2=LPT3, 3=LPT4
(It is index into Port Base Address 40:08)
[SEE-ALSO]
[EXAMPLE]