xref: /original-bsd/lib/libplot/hp7221/subr.c (revision a0a7d8f4)
1 #ifndef lint
2 static char sccsid[] = "@(#)subr.c	4.1 (Berkeley) 11/10/83";
3 #endif
4 
5 #include "hp7221.h"
6 
7 putMBP( x, y )
8     int		x,	y;
9 {
10     int		chr;
11 
12     chr = ( x >> 10 ) & 017;
13     chr|= 0140;
14     putchar( chr );
15     chr = ( x >> 4 ) & 077;
16     if ( chr < 32 ) {
17 	chr += 64;
18     }
19     putchar( chr );
20     chr = ( y >> 12 ) & 03;
21     chr|= ( x << 2  ) & 071;
22     if ( chr < 32 ) {
23 	chr += 64;
24     }
25     putchar( chr );
26     chr = ( y >> 6 ) & 077;
27     if ( chr < 32 ) {
28 	chr += 64;
29     }
30     putchar( chr );
31     chr = ( y ) & 077;
32     if ( chr < 32 ) {
33 	chr += 64;
34     }
35     putchar( chr );
36     return;
37 }
38 
39 putMBN( i )
40     int		i;
41 {
42     int		chr;
43 
44     chr = ( i>>12 ) & 07;
45     chr|= 0140;
46     putchar( chr );
47     chr = ( i>>6 ) & 077;
48     if ( chr < 32 ) {
49 	chr += 64;
50     }
51     putchar( chr );
52     chr = i & 077;
53     if ( chr < 32 ) {
54 	chr += 64;
55     }
56     putchar( chr );
57     return;
58 }
59 
60 putSBN( i )
61     int		i;
62 {
63     i &= 077;
64     if ( i < 32 ) {
65 	i += 64;
66     }
67     putchar( i );
68     return;
69 }
70