xref: /csrg-svn/lib/libplot/vt0/dot.c (revision 48526)
1*48526Sbostic /*-
2*48526Sbostic  * Copyright (c) 1983 The Regents of the University of California.
3*48526Sbostic  * All rights reserved.
4*48526Sbostic  *
5*48526Sbostic  * %sccs.include.proprietary.c%
6*48526Sbostic  */
7*48526Sbostic 
813381Ssam #ifndef lint
9*48526Sbostic static char sccsid[] = "@(#)dot.c	4.2 (Berkeley) 04/22/91";
10*48526Sbostic #endif /* not lint */
1113381Ssam 
1213381Ssam extern vti;
1313381Ssam dot(xi,yi,dx,n,pat)
1413381Ssam int pat[];
1513381Ssam {
1613381Ssam 	struct {char pad,c; int xi,yi,dx;} p;
1713381Ssam 	p.c = 7;
1813381Ssam 	p.xi = xsc(xi);
1913381Ssam 	p.yi = ysc(yi);
2013381Ssam 	p.dx = xsc(dx);
2113381Ssam 	write(vti,&p.c,7);
2213381Ssam 	write(vti,pat,n?n&0377:256);
2313381Ssam }
24