|
|
1.1 ! root 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: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.