Commit | Line | Data |
---|---|---|
dc921478 RC |
1 | #ifndef lint |
2 | static char sccsid[] = "@(#)subr.c 4.1 (Berkeley) %G%"; | |
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 | } |