xref: /csrg-svn/lib/libplot/vt0/dot.c (revision 13381)
1*13381Ssam #ifndef lint
2*13381Ssam static char sccsid[] = "@(#)dot.c	4.1 (Berkeley) 06/27/83";
3*13381Ssam #endif
4*13381Ssam 
5*13381Ssam extern vti;
6*13381Ssam dot(xi,yi,dx,n,pat)
7*13381Ssam int pat[];
8*13381Ssam {
9*13381Ssam 	struct {char pad,c; int xi,yi,dx;} p;
10*13381Ssam 	p.c = 7;
11*13381Ssam 	p.xi = xsc(xi);
12*13381Ssam 	p.yi = ysc(yi);
13*13381Ssam 	p.dx = xsc(dx);
14*13381Ssam 	write(vti,&p.c,7);
15*13381Ssam 	write(vti,pat,n?n&0377:256);
16*13381Ssam }
17