|
|
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.