date and time created 83/06/27 14:23:03 by sam

SCCS-vsn: lib/libplot/t450/open.c 4.1

diff --git a/usr/src/lib/libplot/t450/open.c b/usr/src/lib/libplot/t450/open.c
new file mode 100644 (file)
index 0000000..d6d5553
--- /dev/null
+++ b/usr/src/lib/libplot/t450/open.c
@@ -0,0 +1,54 @@
+#ifndef lint
+static char sccsid[] = "@(#)open.c     4.1 (Berkeley) %G%";
+#endif
+
+#
+#include <sgtty.h>
+/* gsi plotting output routines */
+# define DOWN 012
+# define UP 013
+# define LEFT 010
+# define RIGHT 040
+# define BEL 007
+# define ACK 006
+#define PLOTIN 063
+#define PLOTOUT 064
+# define CR 015
+# define FF 014
+# define VERTRESP 48
+# define HORZRESP 60.
+# define HORZRES 6.
+# define VERTRES 8.
+/* down is line feed, up is reverse oyne feed,
+   left is bwckspace, right is space.  48 points per inch
+   vertically, 60 horizontally */
+
+int xnow, ynow;
+int OUTF;
+struct sgttyb ITTY, PTTY;
+float HEIGHT = 6.0, WIDTH = 6.0, OFFSET = 0.0;
+int xscale, xoffset, yscale;
+float botx = 0., boty = 0., obotx = 0., oboty = 0.;
+float scalex = 1., scaley = 1.;
+
+openpl ()
+{
+       int reset();
+               xnow = ynow = 0;
+               OUTF = 1;
+               printf("\r");
+               gtty(OUTF, &ITTY);
+               signal (2, reset);
+               PTTY = ITTY;
+               PTTY.sg_flags &= ~CRMOD;        /* don't map lf */
+               stty(OUTF,&PTTY);
+               /* initialize constants */
+               xscale  = 4096./(HORZRESP * WIDTH);
+               yscale = 4096 /(VERTRESP * HEIGHT);
+               xoffset = OFFSET * HORZRESP;
+               return;
+}
+
+openvt(){
+openpl();
+}