1: #ifndef lint 2: static char sccsid[] = "@(#)label.c 4.1 (Berkeley) 6/27/83"; 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: }