Commit | Line | Data |
---|---|---|
19b3e1c8 SL |
1 | #ifndef lint |
2 | static char sccsid[] = "@(#)label.c 4.1 (Berkeley) %G%"; | |
3 | #endif | |
4 | ||
5 | #define N 0104 | |
6 | #define E 0101 | |
7 | #define NE 0105 | |
8 | #define S 0110 | |
9 | #define W 0102 | |
10 | #define SW 0112 | |
11 | /* arrange by incremental plotting that an initial | |
12 | * character such as +, X, *, etc will fall | |
13 | * right on the point, and undo it so that further | |
14 | * labels will fall properly in place | |
15 | */ | |
16 | char lbl_mv[] = { | |
17 | 036,040,S,S,S,S,S,S,SW,SW,SW,SW,SW,SW,SW,SW,SW,SW,037,0 | |
18 | }; | |
19 | char lbl_umv[] = { | |
20 | 036,040,N,N,N,N,N,N,NE,NE,NE,NE,NE,NE,NE,NE,NE,NE,037,0 | |
21 | }; | |
22 | label(s) | |
23 | char *s; | |
24 | { | |
25 | register i,c; | |
26 | for(i=0; c=lbl_mv[i]; i++) | |
27 | putch(c); | |
28 | for(i=0; c=s[i]; i++) | |
29 | putch(c); | |
30 | for(i=0; c=lbl_umv[i]; i++) | |
31 | putch(c); | |
32 | } |