xref: /csrg-svn/lib/libplot/aed/label.c (revision 19849)
1 #ifndef lint
2 static char sccsid[] = "@(#)label.c	4.1 (Berkeley) 11/11/83";
3 #endif
4 
5 #include "aed.h"
6 
7 /*---------------------------------------------------------
8  *	This routine places a label starting at the current
9  *	position.
10  *
11  *	Results:	None.
12  *
13  *	Side Effects:
14  *	The string indicated by s starting at (curx, cury).
15  *	The current position is updated accordingly.
16  *---------------------------------------------------------
17  */
18 label(s)
19 char *s;
20 {
21     setcolor("02");
22     putc('Q', stdout);
23     outxy20(curx + (4096/scale), cury + (4096/scale));
24     putc('\6', stdout);
25     fputs(s, stdout);
26     putc('\33', stdout);
27     (void) fflush(stdout);
28     curx += ((6*4096*strlen(s)) + 4000)/scale;
29 }
30