Home » CEEFAX disks » telesoftware12.adl » 04-02-89/Pstat\C

04-02-89/Pstat\C

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » CEEFAX disks » telesoftware12.adl
Filename: 04-02-89/Pstat\C
Read OK:
File size: 0D92 bytes
Load address: 0000
Exec address: 0000
File contents
/*==============================================================*/
/* PSTAT            Version 1.2	 by Colin J Smith (c) 1988	*/
/*                                                              */
/* A program to read printer and parallel port settings         */
/*                                                              */
/* Written in Turbo C v1.5 (c) Borland                          */
/*==============================================================*/

#include <bios.h>

#define STATUS 2

#define IOE 3	/* shift for Input/Output Error */
#define SEL 4   /* shift for SELection		*/
#define OOP 5   /* shift for Out Of Paper	*/
#define ACK 6   /* shift for ACKnowledge	*/
#define BUS 7   /* shift for not BUSy		*/

main(int argc, char *argv[])
{

   int port, selection, pstatus, result;


   if(argc<2)
	notail();

   port = strtol(argv[1],&argv[1]+strlen(&argv[1]),0);
   selection = strtol(argv[2],&argv[2]+strlen(&argv[2]),0);

   pstatus=biosprint(STATUS, 0, --port);

   switch(selection){
	case 0: if(pstatus==200)     /* printer connected and switched OFF */
		exit(0);
		if(pstatus==48)      /* printer not connected to port      */
		exit(3);
		if(pstatus==2)       /* port does not exist		   */
		exit(2);
		exit(1);             /* printer connected and switched ON  */
		break;
   	case 1: result=(pstatus);
		break;
	case 2: result=(pstatus >> IOE);
		break;
	case 3: result=(pstatus >> SEL);
		break;
	case 4: result=(pstatus >> OOP);
		break;
	case 5: result=(pstatus >> ACK);
		break;
	case 6: result=(pstatus >> BUS);
   }
   result=result & 1;	/* mask off status bit	      */
   exit(result); 	/* return value to ERRORLEVEL */
}

/*==============================================================*/

notail(void)
{
	printf("PSTAT Ver 1.2 (c) Colin J Smith Sept \'88\n");
	printf("Usage: PSTAT p   -- [1] test printer port 'p'\n");
        printf("       PSTAT p s -- [2] test printer on port 'p' for status 's'\n\n");
        printf("��������p�����PORT������������s�����STATUS������������Ŀ\n");
	printf("�                                                      �\n");
	printf("�       1     LTP1 [PRN]      1     Device time out?   �\n");
	printf("�       2     LTP2            2     I/O error?         �\n");
	printf("�       3     LTP3            3     Selected?          �\n");
	printf("�                             4     Out of paper?      �\n");
	printf("�                             5     Acknowledge?       �\n");
	printf("�                             6     Not busy?          �\n");
	printf("�                                                      �\n");
	printf("��������������������ERRORLEVEL returns����������������Ĵ\n");
	printf("�[1]          ����testing printer port p����           �\n");
	printf("�  0 - printer connected to port 'p' and switched OFF  �\n");
	printf("�  1 - printer connected to port 'p' and switched ON   �\n");
	printf("�  2 - port 'p' not available to system                �\n");
	printf("�  3 - printer not connected to port 'p'               �\n");
	printf("�                                                      �\n");
	printf("�[2] ����testing status s of printer on port p����     �\n");
	printf("�  0 - status false [NO]        1 - status true [YES]  �\n");
	printf("��������������������������������������������������������");
        exit(255);
}

/*==============================================================*/
00000000  2f 2a 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |/*==============|
00000010  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |================|
*
00000040  2a 2f 0d 0a 2f 2a 20 50  53 54 41 54 20 20 20 20  |*/../* PSTAT    |
00000050  20 20 20 20 20 20 20 20  56 65 72 73 69 6f 6e 20  |        Version |
00000060  31 2e 32 09 20 62 79 20  43 6f 6c 69 6e 20 4a 20  |1.2. by Colin J |
00000070  53 6d 69 74 68 20 28 63  29 20 31 39 38 38 09 2a  |Smith (c) 1988.*|
00000080  2f 0d 0a 2f 2a 20 20 20  20 20 20 20 20 20 20 20  |/../*           |
00000090  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
000000c0  20 20 20 2a 2f 0d 0a 2f  2a 20 41 20 70 72 6f 67  |   */../* A prog|
000000d0  72 61 6d 20 74 6f 20 72  65 61 64 20 70 72 69 6e  |ram to read prin|
000000e0  74 65 72 20 61 6e 64 20  70 61 72 61 6c 6c 65 6c  |ter and parallel|
000000f0  20 70 6f 72 74 20 73 65  74 74 69 6e 67 73 20 20  | port settings  |
00000100  20 20 20 20 20 20 20 2a  2f 0d 0a 2f 2a 20 20 20  |       */../*   |
00000110  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000140  20 20 20 20 20 20 20 20  20 20 20 2a 2f 0d 0a 2f  |           */../|
00000150  2a 20 57 72 69 74 74 65  6e 20 69 6e 20 54 75 72  |* Written in Tur|
00000160  62 6f 20 43 20 76 31 2e  35 20 28 63 29 20 42 6f  |bo C v1.5 (c) Bo|
00000170  72 6c 61 6e 64 20 20 20  20 20 20 20 20 20 20 20  |rland           |
00000180  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2a  |               *|
00000190  2f 0d 0a 2f 2a 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |/../*===========|
000001a0  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |================|
*
000001d0  3d 3d 3d 2a 2f 0d 0a 0d  0a 23 69 6e 63 6c 75 64  |===*/....#includ|
000001e0  65 20 3c 62 69 6f 73 2e  68 3e 0d 0a 0d 0a 23 64  |e <bios.h>....#d|
000001f0  65 66 69 6e 65 20 53 54  41 54 55 53 20 32 0d 0a  |efine STATUS 2..|
00000200  0d 0a 23 64 65 66 69 6e  65 20 49 4f 45 20 33 09  |..#define IOE 3.|
00000210  2f 2a 20 73 68 69 66 74  20 66 6f 72 20 49 6e 70  |/* shift for Inp|
00000220  75 74 2f 4f 75 74 70 75  74 20 45 72 72 6f 72 20  |ut/Output Error |
00000230  2a 2f 0d 0a 23 64 65 66  69 6e 65 20 53 45 4c 20  |*/..#define SEL |
00000240  34 20 20 20 2f 2a 20 73  68 69 66 74 20 66 6f 72  |4   /* shift for|
00000250  20 53 45 4c 65 63 74 69  6f 6e 09 09 2a 2f 0d 0a  | SELection..*/..|
00000260  23 64 65 66 69 6e 65 20  4f 4f 50 20 35 20 20 20  |#define OOP 5   |
00000270  2f 2a 20 73 68 69 66 74  20 66 6f 72 20 4f 75 74  |/* shift for Out|
00000280  20 4f 66 20 50 61 70 65  72 09 2a 2f 0d 0a 23 64  | Of Paper.*/..#d|
00000290  65 66 69 6e 65 20 41 43  4b 20 36 20 20 20 2f 2a  |efine ACK 6   /*|
000002a0  20 73 68 69 66 74 20 66  6f 72 20 41 43 4b 6e 6f  | shift for ACKno|
000002b0  77 6c 65 64 67 65 09 2a  2f 0d 0a 23 64 65 66 69  |wledge.*/..#defi|
000002c0  6e 65 20 42 55 53 20 37  20 20 20 2f 2a 20 73 68  |ne BUS 7   /* sh|
000002d0  69 66 74 20 66 6f 72 20  6e 6f 74 20 42 55 53 79  |ift for not BUSy|
000002e0  09 09 2a 2f 0d 0a 0d 0a  6d 61 69 6e 28 69 6e 74  |..*/....main(int|
000002f0  20 61 72 67 63 2c 20 63  68 61 72 20 2a 61 72 67  | argc, char *arg|
00000300  76 5b 5d 29 0d 0a 7b 0d  0a 0d 0a 20 20 20 69 6e  |v[])..{....   in|
00000310  74 20 70 6f 72 74 2c 20  73 65 6c 65 63 74 69 6f  |t port, selectio|
00000320  6e 2c 20 70 73 74 61 74  75 73 2c 20 72 65 73 75  |n, pstatus, resu|
00000330  6c 74 3b 0d 0a 0d 0a 0d  0a 20 20 20 69 66 28 61  |lt;......   if(a|
00000340  72 67 63 3c 32 29 0d 0a  09 6e 6f 74 61 69 6c 28  |rgc<2)...notail(|
00000350  29 3b 0d 0a 0d 0a 20 20  20 70 6f 72 74 20 3d 20  |);....   port = |
00000360  73 74 72 74 6f 6c 28 61  72 67 76 5b 31 5d 2c 26  |strtol(argv[1],&|
00000370  61 72 67 76 5b 31 5d 2b  73 74 72 6c 65 6e 28 26  |argv[1]+strlen(&|
00000380  61 72 67 76 5b 31 5d 29  2c 30 29 3b 0d 0a 20 20  |argv[1]),0);..  |
00000390  20 73 65 6c 65 63 74 69  6f 6e 20 3d 20 73 74 72  | selection = str|
000003a0  74 6f 6c 28 61 72 67 76  5b 32 5d 2c 26 61 72 67  |tol(argv[2],&arg|
000003b0  76 5b 32 5d 2b 73 74 72  6c 65 6e 28 26 61 72 67  |v[2]+strlen(&arg|
000003c0  76 5b 32 5d 29 2c 30 29  3b 0d 0a 0d 0a 20 20 20  |v[2]),0);....   |
000003d0  70 73 74 61 74 75 73 3d  62 69 6f 73 70 72 69 6e  |pstatus=biosprin|
000003e0  74 28 53 54 41 54 55 53  2c 20 30 2c 20 2d 2d 70  |t(STATUS, 0, --p|
000003f0  6f 72 74 29 3b 0d 0a 0d  0a 20 20 20 73 77 69 74  |ort);....   swit|
00000400  63 68 28 73 65 6c 65 63  74 69 6f 6e 29 7b 0d 0a  |ch(selection){..|
00000410  09 63 61 73 65 20 30 3a  20 69 66 28 70 73 74 61  |.case 0: if(psta|
00000420  74 75 73 3d 3d 32 30 30  29 20 20 20 20 20 2f 2a  |tus==200)     /*|
00000430  20 70 72 69 6e 74 65 72  20 63 6f 6e 6e 65 63 74  | printer connect|
00000440  65 64 20 61 6e 64 20 73  77 69 74 63 68 65 64 20  |ed and switched |
00000450  4f 46 46 20 2a 2f 0d 0a  09 09 65 78 69 74 28 30  |OFF */....exit(0|
00000460  29 3b 0d 0a 09 09 69 66  28 70 73 74 61 74 75 73  |);....if(pstatus|
00000470  3d 3d 34 38 29 20 20 20  20 20 20 2f 2a 20 70 72  |==48)      /* pr|
00000480  69 6e 74 65 72 20 6e 6f  74 20 63 6f 6e 6e 65 63  |inter not connec|
00000490  74 65 64 20 74 6f 20 70  6f 72 74 20 20 20 20 20  |ted to port     |
000004a0  20 2a 2f 0d 0a 09 09 65  78 69 74 28 33 29 3b 0d  | */....exit(3);.|
000004b0  0a 09 09 69 66 28 70 73  74 61 74 75 73 3d 3d 32  |...if(pstatus==2|
000004c0  29 20 20 20 20 20 20 20  2f 2a 20 70 6f 72 74 20  |)       /* port |
000004d0  64 6f 65 73 20 6e 6f 74  20 65 78 69 73 74 09 09  |does not exist..|
000004e0  20 20 20 2a 2f 0d 0a 09  09 65 78 69 74 28 32 29  |   */....exit(2)|
000004f0  3b 0d 0a 09 09 65 78 69  74 28 31 29 3b 20 20 20  |;....exit(1);   |
00000500  20 20 20 20 20 20 20 20  20 20 2f 2a 20 70 72 69  |          /* pri|
00000510  6e 74 65 72 20 63 6f 6e  6e 65 63 74 65 64 20 61  |nter connected a|
00000520  6e 64 20 73 77 69 74 63  68 65 64 20 4f 4e 20 20  |nd switched ON  |
00000530  2a 2f 0d 0a 09 09 62 72  65 61 6b 3b 0d 0a 20 20  |*/....break;..  |
00000540  20 09 63 61 73 65 20 31  3a 20 72 65 73 75 6c 74  | .case 1: result|
00000550  3d 28 70 73 74 61 74 75  73 29 3b 0d 0a 09 09 62  |=(pstatus);....b|
00000560  72 65 61 6b 3b 0d 0a 09  63 61 73 65 20 32 3a 20  |reak;...case 2: |
00000570  72 65 73 75 6c 74 3d 28  70 73 74 61 74 75 73 20  |result=(pstatus |
00000580  3e 3e 20 49 4f 45 29 3b  0d 0a 09 09 62 72 65 61  |>> IOE);....brea|
00000590  6b 3b 0d 0a 09 63 61 73  65 20 33 3a 20 72 65 73  |k;...case 3: res|
000005a0  75 6c 74 3d 28 70 73 74  61 74 75 73 20 3e 3e 20  |ult=(pstatus >> |
000005b0  53 45 4c 29 3b 0d 0a 09  09 62 72 65 61 6b 3b 0d  |SEL);....break;.|
000005c0  0a 09 63 61 73 65 20 34  3a 20 72 65 73 75 6c 74  |..case 4: result|
000005d0  3d 28 70 73 74 61 74 75  73 20 3e 3e 20 4f 4f 50  |=(pstatus >> OOP|
000005e0  29 3b 0d 0a 09 09 62 72  65 61 6b 3b 0d 0a 09 63  |);....break;...c|
000005f0  61 73 65 20 35 3a 20 72  65 73 75 6c 74 3d 28 70  |ase 5: result=(p|
00000600  73 74 61 74 75 73 20 3e  3e 20 41 43 4b 29 3b 0d  |status >> ACK);.|
00000610  0a 09 09 62 72 65 61 6b  3b 0d 0a 09 63 61 73 65  |...break;...case|
00000620  20 36 3a 20 72 65 73 75  6c 74 3d 28 70 73 74 61  | 6: result=(psta|
00000630  74 75 73 20 3e 3e 20 42  55 53 29 3b 0d 0a 20 20  |tus >> BUS);..  |
00000640  20 7d 0d 0a 20 20 20 72  65 73 75 6c 74 3d 72 65  | }..   result=re|
00000650  73 75 6c 74 20 26 20 31  3b 09 2f 2a 20 6d 61 73  |sult & 1;./* mas|
00000660  6b 20 6f 66 66 20 73 74  61 74 75 73 20 62 69 74  |k off status bit|
00000670  09 20 20 20 20 20 20 2a  2f 0d 0a 20 20 20 65 78  |.      */..   ex|
00000680  69 74 28 72 65 73 75 6c  74 29 3b 20 09 2f 2a 20  |it(result); ./* |
00000690  72 65 74 75 72 6e 20 76  61 6c 75 65 20 74 6f 20  |return value to |
000006a0  45 52 52 4f 52 4c 45 56  45 4c 20 2a 2f 0d 0a 7d  |ERRORLEVEL */..}|
000006b0  0d 0a 0d 0a 2f 2a 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |..../*==========|
000006c0  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |================|
*
000006f0  3d 3d 3d 3d 2a 2f 0d 0a  0d 0a 6e 6f 74 61 69 6c  |====*/....notail|
00000700  28 76 6f 69 64 29 0d 0a  7b 0d 0a 09 70 72 69 6e  |(void)..{...prin|
00000710  74 66 28 22 50 53 54 41  54 20 56 65 72 20 31 2e  |tf("PSTAT Ver 1.|
00000720  32 20 28 63 29 20 43 6f  6c 69 6e 20 4a 20 53 6d  |2 (c) Colin J Sm|
00000730  69 74 68 20 53 65 70 74  20 5c 27 38 38 5c 6e 22  |ith Sept \'88\n"|
00000740  29 3b 0d 0a 09 70 72 69  6e 74 66 28 22 55 73 61  |);...printf("Usa|
00000750  67 65 3a 20 50 53 54 41  54 20 70 20 20 20 2d 2d  |ge: PSTAT p   --|
00000760  20 5b 31 5d 20 74 65 73  74 20 70 72 69 6e 74 65  | [1] test printe|
00000770  72 20 70 6f 72 74 20 27  70 27 5c 6e 22 29 3b 0d  |r port 'p'\n");.|
00000780  0a 20 20 20 20 20 20 20  20 70 72 69 6e 74 66 28  |.        printf(|
00000790  22 20 20 20 20 20 20 20  50 53 54 41 54 20 70 20  |"       PSTAT p |
000007a0  73 20 2d 2d 20 5b 32 5d  20 74 65 73 74 20 70 72  |s -- [2] test pr|
000007b0  69 6e 74 65 72 20 6f 6e  20 70 6f 72 74 20 27 70  |inter on port 'p|
000007c0  27 20 66 6f 72 20 73 74  61 74 75 73 20 27 73 27  |' for status 's'|
000007d0  5c 6e 5c 6e 22 29 3b 0d  0a 20 20 20 20 20 20 20  |\n\n");..       |
000007e0  20 70 72 69 6e 74 66 28  22 da c4 c4 c4 c4 c4 c4  | printf(".......|
000007f0  c4 70 c4 c4 c4 c4 c4 50  4f 52 54 c4 c4 c4 c4 c4  |.p.....PORT.....|
00000800  c4 c4 c4 c4 c4 c4 c4 73  c4 c4 c4 c4 c4 53 54 41  |.......s.....STA|
00000810  54 55 53 c4 c4 c4 c4 c4  c4 c4 c4 c4 c4 c4 c4 c4  |TUS.............|
00000820  bf 5c 6e 22 29 3b 0d 0a  09 70 72 69 6e 74 66 28  |.\n");...printf(|
00000830  22 b3 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00000840  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000860  20 20 20 20 20 20 20 20  b3 5c 6e 22 29 3b 0d 0a  |        .\n");..|
00000870  09 70 72 69 6e 74 66 28  22 b3 20 20 20 20 20 20  |.printf(".      |
00000880  20 31 20 20 20 20 20 4c  54 50 31 20 5b 50 52 4e  | 1     LTP1 [PRN|
00000890  5d 20 20 20 20 20 20 31  20 20 20 20 20 44 65 76  |]      1     Dev|
000008a0  69 63 65 20 74 69 6d 65  20 6f 75 74 3f 20 20 20  |ice time out?   |
000008b0  b3 5c 6e 22 29 3b 0d 0a  09 70 72 69 6e 74 66 28  |.\n");...printf(|
000008c0  22 b3 20 20 20 20 20 20  20 32 20 20 20 20 20 4c  |".       2     L|
000008d0  54 50 32 20 20 20 20 20  20 20 20 20 20 20 20 32  |TP2            2|
000008e0  20 20 20 20 20 49 2f 4f  20 65 72 72 6f 72 3f 20  |     I/O error? |
000008f0  20 20 20 20 20 20 20 20  b3 5c 6e 22 29 3b 0d 0a  |        .\n");..|
00000900  09 70 72 69 6e 74 66 28  22 b3 20 20 20 20 20 20  |.printf(".      |
00000910  20 33 20 20 20 20 20 4c  54 50 33 20 20 20 20 20  | 3     LTP3     |
00000920  20 20 20 20 20 20 20 33  20 20 20 20 20 53 65 6c  |       3     Sel|
00000930  65 63 74 65 64 3f 20 20  20 20 20 20 20 20 20 20  |ected?          |
00000940  b3 5c 6e 22 29 3b 0d 0a  09 70 72 69 6e 74 66 28  |.\n");...printf(|
00000950  22 b3 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00000960  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 34  |               4|
00000970  20 20 20 20 20 4f 75 74  20 6f 66 20 70 61 70 65  |     Out of pape|
00000980  72 3f 20 20 20 20 20 20  b3 5c 6e 22 29 3b 0d 0a  |r?      .\n");..|
00000990  09 70 72 69 6e 74 66 28  22 b3 20 20 20 20 20 20  |.printf(".      |
000009a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000009b0  20 20 20 20 20 20 20 35  20 20 20 20 20 41 63 6b  |       5     Ack|
000009c0  6e 6f 77 6c 65 64 67 65  3f 20 20 20 20 20 20 20  |nowledge?       |
000009d0  b3 5c 6e 22 29 3b 0d 0a  09 70 72 69 6e 74 66 28  |.\n");...printf(|
000009e0  22 b3 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
000009f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 36  |               6|
00000a00  20 20 20 20 20 4e 6f 74  20 62 75 73 79 3f 20 20  |     Not busy?  |
00000a10  20 20 20 20 20 20 20 20  b3 5c 6e 22 29 3b 0d 0a  |        .\n");..|
00000a20  09 70 72 69 6e 74 66 28  22 b3 20 20 20 20 20 20  |.printf(".      |
00000a30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000a60  b3 5c 6e 22 29 3b 0d 0a  09 70 72 69 6e 74 66 28  |.\n");...printf(|
00000a70  22 c3 c4 c4 c4 c4 c4 c4  c4 c4 c4 c4 c4 c4 c4 c4  |"...............|
00000a80  c4 c4 c4 c4 c4 45 52 52  4f 52 4c 45 56 45 4c 20  |.....ERRORLEVEL |
00000a90  72 65 74 75 72 6e 73 c4  c4 c4 c4 c4 c4 c4 c4 c4  |returns.........|
00000aa0  c4 c4 c4 c4 c4 c4 c4 c4  b4 5c 6e 22 29 3b 0d 0a  |.........\n");..|
00000ab0  09 70 72 69 6e 74 66 28  22 b3 5b 31 5d 20 20 20  |.printf(".[1]   |
00000ac0  20 20 20 20 20 20 20 c4  c4 c4 c4 74 65 73 74 69  |       ....testi|
00000ad0  6e 67 20 70 72 69 6e 74  65 72 20 70 6f 72 74 20  |ng printer port |
00000ae0  70 c4 c4 c4 c4 20 20 20  20 20 20 20 20 20 20 20  |p....           |
00000af0  b3 5c 6e 22 29 3b 0d 0a  09 70 72 69 6e 74 66 28  |.\n");...printf(|
00000b00  22 b3 20 20 30 20 2d 20  70 72 69 6e 74 65 72 20  |".  0 - printer |
00000b10  63 6f 6e 6e 65 63 74 65  64 20 74 6f 20 70 6f 72  |connected to por|
00000b20  74 20 27 70 27 20 61 6e  64 20 73 77 69 74 63 68  |t 'p' and switch|
00000b30  65 64 20 4f 46 46 20 20  b3 5c 6e 22 29 3b 0d 0a  |ed OFF  .\n");..|
00000b40  09 70 72 69 6e 74 66 28  22 b3 20 20 31 20 2d 20  |.printf(".  1 - |
00000b50  70 72 69 6e 74 65 72 20  63 6f 6e 6e 65 63 74 65  |printer connecte|
00000b60  64 20 74 6f 20 70 6f 72  74 20 27 70 27 20 61 6e  |d to port 'p' an|
00000b70  64 20 73 77 69 74 63 68  65 64 20 4f 4e 20 20 20  |d switched ON   |
00000b80  b3 5c 6e 22 29 3b 0d 0a  09 70 72 69 6e 74 66 28  |.\n");...printf(|
00000b90  22 b3 20 20 32 20 2d 20  70 6f 72 74 20 27 70 27  |".  2 - port 'p'|
00000ba0  20 6e 6f 74 20 61 76 61  69 6c 61 62 6c 65 20 74  | not available t|
00000bb0  6f 20 73 79 73 74 65 6d  20 20 20 20 20 20 20 20  |o system        |
00000bc0  20 20 20 20 20 20 20 20  b3 5c 6e 22 29 3b 0d 0a  |        .\n");..|
00000bd0  09 70 72 69 6e 74 66 28  22 b3 20 20 33 20 2d 20  |.printf(".  3 - |
00000be0  70 72 69 6e 74 65 72 20  6e 6f 74 20 63 6f 6e 6e  |printer not conn|
00000bf0  65 63 74 65 64 20 74 6f  20 70 6f 72 74 20 27 70  |ected to port 'p|
00000c00  27 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |'               |
00000c10  b3 5c 6e 22 29 3b 0d 0a  09 70 72 69 6e 74 66 28  |.\n");...printf(|
00000c20  22 b3 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |".              |
00000c30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000c50  20 20 20 20 20 20 20 20  b3 5c 6e 22 29 3b 0d 0a  |        .\n");..|
00000c60  09 70 72 69 6e 74 66 28  22 b3 5b 32 5d 20 c4 c4  |.printf(".[2] ..|
00000c70  c4 c4 74 65 73 74 69 6e  67 20 73 74 61 74 75 73  |..testing status|
00000c80  20 73 20 6f 66 20 70 72  69 6e 74 65 72 20 6f 6e  | s of printer on|
00000c90  20 70 6f 72 74 20 70 c4  c4 c4 c4 20 20 20 20 20  | port p....     |
00000ca0  b3 5c 6e 22 29 3b 0d 0a  09 70 72 69 6e 74 66 28  |.\n");...printf(|
00000cb0  22 b3 20 20 30 20 2d 20  73 74 61 74 75 73 20 66  |".  0 - status f|
00000cc0  61 6c 73 65 20 5b 4e 4f  5d 20 20 20 20 20 20 20  |alse [NO]       |
00000cd0  20 31 20 2d 20 73 74 61  74 75 73 20 74 72 75 65  | 1 - status true|
00000ce0  20 5b 59 45 53 5d 20 20  b3 5c 6e 22 29 3b 0d 0a  | [YES]  .\n");..|
00000cf0  09 70 72 69 6e 74 66 28  22 c0 c4 c4 c4 c4 c4 c4  |.printf(".......|
00000d00  c4 c4 c4 c4 c4 c4 c4 c4  c4 c4 c4 c4 c4 c4 c4 c4  |................|
*
00000d30  d9 22 29 3b 0d 0a 20 20  20 20 20 20 20 20 65 78  |.");..        ex|
00000d40  69 74 28 32 35 35 29 3b  0d 0a 7d 0d 0a 0d 0a 2f  |it(255);..}..../|
00000d50  2a 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |*===============|
00000d60  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |================|
*
00000d80  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 2a  |===============*|
00000d90  2f 1a                                             |/.|
00000d92
04-02-89/Pstat\C.m0
04-02-89/Pstat\C.m1
04-02-89/Pstat\C.m2
04-02-89/Pstat\C.m4
04-02-89/Pstat\C.m5