xref: /csrg-svn/lib/libplot/imagen/open.c (revision 61397)
148519Sbostic /*-
2*61397Sbostic  * Copyright (c) 1985, 1993
3*61397Sbostic  *	The Regents of the University of California.  All rights reserved.
448519Sbostic  *
548519Sbostic  * %sccs.include.proprietary.c%
624998Ssam  */
724998Ssam 
824998Ssam #ifndef lint
9*61397Sbostic static char sccsid[] = "@(#)open.c	8.1 (Berkeley) 06/04/93";
1048519Sbostic #endif /* not lint */
1124998Ssam 
1224998Ssam #include "imPcodes.h"
1324998Ssam #include "imp.h"
1425012Ssam 
openpl()1524998Ssam openpl(){
1625012Ssam 
1724998Ssam 	putch(imP_SET_HV_SYSTEM);
1824998Ssam 	  putch((3<<3)|5);
1924998Ssam 	putch(imP_SET_FAMILY);
2024998Ssam 	  putch(2);
2125012Ssam 	setfont(imP_charset,imPcsize);
2224998Ssam 	putch(imP_SET_IL);
2324998Ssam 	  putwd(imPcsize+3);
2424998Ssam 	putch(imP_SET_SP);
2524998Ssam 	  putwd(imPcsize);
2624998Ssam 	putch(imP_SET_PEN);
2724998Ssam 	  putch(2);
2824998Ssam 	putch(imP_SET_ABS_H);
2924998Ssam 	  putwd(0);
3024998Ssam 	putch(imP_SET_ABS_V);
3124998Ssam 	  putwd(0);
3224998Ssam }
setfont(c,sz)3324998Ssam setfont(c, sz) char *c; int sz;
3424998Ssam {
3524998Ssam 	imPcsize = sz;
3624998Ssam 	putch(imP_CREATE_FAMILY_TABLE);
3724998Ssam 	  putch(2);
3824998Ssam 	  putch(1);
3924998Ssam 	  putch(0);
4024998Ssam 	  fprintf(stdout, c);
4124998Ssam 	  putch(0);
4224998Ssam }
43