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