|
|
1.1 ! root 1: /* ! 2: * Copyright (c) 1980 Regents of the University of California. ! 3: * All rights reserved. The Berkeley software License Agreement ! 4: * specifies the terms and conditions for redistribution. ! 5: */ ! 6: ! 7: #ifndef lint ! 8: static char sccsid[] = "@(#)label.c 5.2 (Berkeley) 4/30/85"; ! 9: #endif not lint ! 10: ! 11: ! 12: #include "aed.h" ! 13: ! 14: /*--------------------------------------------------------- ! 15: * This routine places a label starting at the current ! 16: * position. ! 17: * ! 18: * Results: None. ! 19: * ! 20: * Side Effects: ! 21: * The string indicated by s starting at (curx, cury). ! 22: * The current position is updated accordingly. ! 23: *--------------------------------------------------------- ! 24: */ ! 25: label(s) ! 26: char *s; ! 27: { ! 28: setcolor("02"); ! 29: putc('Q', stdout); ! 30: outxy20(curx + (4096/scale), cury + (4096/scale)); ! 31: putc('\6', stdout); ! 32: fputs(s, stdout); ! 33: putc('\33', stdout); ! 34: (void) fflush(stdout); ! 35: curx += ((6*4096*strlen(s)) + 4000)/scale; ! 36: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.