|
|
1.1 root 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) 9/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: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.