124998Ssam /* 224998Ssam * Copyright (c) 1985 Regents of the University of California. 324998Ssam * All rights reserved. The Berkeley software License Agreement 424998Ssam * specifies the terms and conditions for redistribution. 524998Ssam */ 624998Ssam 724998Ssam #ifndef lint 8*25012Ssam static char sccsid[] = "@(#)open.c 5.2 (Berkeley) 09/21/85"; 924998Ssam #endif not lint 1024998Ssam 1124998Ssam #include "imPcodes.h" 1224998Ssam #include "imp.h" 13*25012Ssam 1424998Ssam openpl(){ 15*25012Ssam 1624998Ssam putch(imP_SET_HV_SYSTEM); 1724998Ssam putch((3<<3)|5); 1824998Ssam putch(imP_SET_FAMILY); 1924998Ssam putch(2); 20*25012Ssam setfont(imP_charset,imPcsize); 2124998Ssam putch(imP_SET_IL); 2224998Ssam putwd(imPcsize+3); 2324998Ssam putch(imP_SET_SP); 2424998Ssam putwd(imPcsize); 2524998Ssam putch(imP_SET_PEN); 2624998Ssam putch(2); 2724998Ssam putch(imP_SET_ABS_H); 2824998Ssam putwd(0); 2924998Ssam putch(imP_SET_ABS_V); 3024998Ssam putwd(0); 3124998Ssam } 3224998Ssam setfont(c, sz) char *c; int sz; 3324998Ssam { 3424998Ssam imPcsize = sz; 3524998Ssam putch(imP_CREATE_FAMILY_TABLE); 3624998Ssam putch(2); 3724998Ssam putch(1); 3824998Ssam putch(0); 3924998Ssam fprintf(stdout, c); 4024998Ssam putch(0); 4124998Ssam } 42