Commit | Line | Data |
---|---|---|
231eb7eb SL |
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 | |
82d16e90 | 8 | static char sccsid[] = "@(#)open.c 5.2 (Berkeley) %G%"; |
231eb7eb SL |
9 | #endif not lint |
10 | ||
11 | #include "imPcodes.h" | |
12 | #include "imp.h" | |
82d16e90 | 13 | |
231eb7eb | 14 | openpl(){ |
82d16e90 | 15 | |
231eb7eb SL |
16 | putch(imP_SET_HV_SYSTEM); |
17 | putch((3<<3)|5); | |
18 | putch(imP_SET_FAMILY); | |
19 | putch(2); | |
82d16e90 | 20 | setfont(imP_charset,imPcsize); |
231eb7eb SL |
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 | } |