1 /* 2 * Copyright (c) 1985 Regents of the University of California. 3 * All rights reserved. The Berkeley software License Agreement 4 * specifies the terms and conditions for redistribution. 5 */ 6 7 #ifndef lint 8 static char sccsid[] = "@(#)open.c 5.2 (Berkeley) 09/21/85"; 9 #endif not lint 10 11 #include "imPcodes.h" 12 #include "imp.h" 13 14 openpl(){ 15 16 putch(imP_SET_HV_SYSTEM); 17 putch((3<<3)|5); 18 putch(imP_SET_FAMILY); 19 putch(2); 20 setfont(imP_charset,imPcsize); 21 putch(imP_SET_IL); 22 putwd(imPcsize+3); 23 putch(imP_SET_SP); 24 putwd(imPcsize); 25 putch(imP_SET_PEN); 26 putch(2); 27 putch(imP_SET_ABS_H); 28 putwd(0); 29 putch(imP_SET_ABS_V); 30 putwd(0); 31 } 32 setfont(c, sz) char *c; int sz; 33 { 34 imPcsize = sz; 35 putch(imP_CREATE_FAMILY_TABLE); 36 putch(2); 37 putch(1); 38 putch(0); 39 fprintf(stdout, c); 40 putch(0); 41 } 42