summaryrefslogtreecommitdiff
path: root/usr/src/ucbcmd/plot/libplot/imagen/label.c
diff options
context:
space:
mode:
Diffstat (limited to 'usr/src/ucbcmd/plot/libplot/imagen/label.c')
-rw-r--r--usr/src/ucbcmd/plot/libplot/imagen/label.c35
1 files changed, 35 insertions, 0 deletions
diff --git a/usr/src/ucbcmd/plot/libplot/imagen/label.c b/usr/src/ucbcmd/plot/libplot/imagen/label.c
new file mode 100644
index 0000000000..a25b4711ae
--- /dev/null
+++ b/usr/src/ucbcmd/plot/libplot/imagen/label.c
@@ -0,0 +1,35 @@
+/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
+/* All Rights Reserved */
+
+
+#ident "%Z%%M% %I% %E% SMI" /* SVr4.0 1.1 */
+
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved. The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ */
+
+/*
+ * Copyright (c) 1983, 1984 1985, 1986, 1987, 1988, Sun Microsystems, Inc.
+ * All Rights Reserved.
+ */
+
+
+#include "imPcodes.h"
+#include "imp.h"
+extern imPcsize;
+label(s)
+char *s;
+{
+ register i,c;
+ putch(imP_SET_ABS_H);
+ putwd((int)((imPx-obotx)*scalex+botx)-imPcsize/2);
+ putch(imP_SET_ABS_V);
+ putwd((int)((imPy-oboty)*scaley+boty-(imPcsize/1.6)));
+ for(i=0; c=s[i]; i++)
+ {
+ imPx += imPcsize/scalex;
+ putch((c == ' ')?imP_SP:c);
+ }
+}