home *** CD-ROM | disk | FTP | other *** search
- From: ihnp4!mnetor!clewis (Chris Lewis)
- Newsgroups: mod.sources
- Subject: troff->laserjet
- Approved: jpn@panda.UUCP
-
- Mod.sources: Volume 3, Issue 96
- Submitted by: ihnp4!mnetor!clewis (Chris Lewis)
-
-
- This is a troff->HP laserjet filter package that should be capable of
- using Berkeley vfont files. I say "should be", because our system
- doesn't have any, and I converted some MAC fonts to look like what
- the manual pages say for vfonts. "vfontinfo" does seem to work properly.
-
- I will be submitting the MAC->vfont converter and some publically
- distributable MAC font files a little later.
-
- This was built on a Pyramid in the System V universe.
-
- #!/bin/sh
- echo 'Start of pack.out, part 01 of 01:'
- echo 'x - README'
- sed 's/^X//' > README << '/'
- XThis is a UNIX Troff to Laserjet converter filter. It supports rasterized
- XBerkeley vfonts. Er, rather, I uploaded some MAC fonts, converted them to
- Xwhat I *think* are Berkeley vfonts (vfontinfo works okay on 'em), and
- Xit works okay sort of. The manual page for lroff describes the whole thing.
- XThe MACfont to vfont converter plus whatever fonts I can legally distribute
- Xwill be posted separately.
- X
- XInstallation:
- X - modify BIN in the makefile to point to where you want to put
- X the executables.
- X - modify "lcat.c" initialization of "fontLIB" to point at either:
- X - the Berkeley vfont directory, or
- X - where you are going to place vfonts
- X (particularly from the MAC -> vfont converter)
- X - modify lroff for your printer system. You may have to modify
- X your printer system so that you can get both 8 bit and ^S/^Q
- X control, and that no other filters are used. We modified a System V
- X spooler to accept a "-p" to mean "plot mode", where the tty's
- X are set differently, and it doesn't go through the reversal filter
- X we use for normal stuff.
- X - make sure that tmac.lmm has the right path for your mm macro package.
- X - Run "make".
- X - Run "make test" to ensure everything is working reasonably.
- X This will give the printed example of the logo.
- X - run "make install". If it asks you for a password, then
- X enter your super-user password. It copies lroff, lcat to
- X $(BIN) and tmac.lmm to /usr/lib/tmac/tmac.lmm
- X
- XThis thing runs on System V. I don't think that there will be many changes
- Xfor Berkeley except for acquiring one of the public domain getopt's.
- /
- echo 'x - lcat.c'
- sed 's/^X//' > lcat.c << '/'
- X/*****************************************************************
- X
- X Copyright 1985. Chris Lewis
- X
- X Module : lcat.c 1.5
- X Date submitted : 86/01/21 13:23:21
- X Author : Chris Lewis
- X Origin : Permission to copy and further distribute is
- X freely given provided this copyright notice remains
- X intact and that this software is not sold for profit.
- X Description : Driver for troff WANG/CAT to HP laserjet filter.
- X
- X******************************************************************/
- X
- X#ifndef lint
- Xstatic char SrcId[] = "@(#)lcat.c:1.5";
- X#endif
- X
- X#include <stdio.h>
- X#include <ctype.h>
- X#include <string.h>
- Xtypedef struct {
- X int size;
- X char *g_line;
- X} glyph[];
- X
- X#include "bell.glyph.h"
- X
- X#define ESC 0x80
- X#define FLASH 0x00
- X#define CONTROL 0x40
- X#define LEAD 0x60
- X#define SIZE 0x50
- X
- X#define DOWN 0
- X#define UP 1
- X#define LOWER 2
- X#define UPPER 3
- X#define FORWARD 4
- X#define BACKWARD 5
- X
- XFILE *diagFile = (FILE *) NULL;
- X#define DEBUGPRINTF if (diagFile) debugprintf
- X
- Xchar *toprnt();
- X
- Xchar ptab[16] = { 7, 8, 10, 11, 12, 14, 18, 9, 6, 16, 20, 22, 24, 28, 36, 72};
- Xint points;
- Xint vertChanged = 0;
- Xint quality = 1;
- X
- X
- X/* Scale factors:
- X (td/ld) * (lu / tu)
- X Where:
- X td: troff dimension in inches
- X ld: laserjet dimension in inches
- X lu: laserjet precision/inch
- X tu: troff precision/inch
- X
- X td = 6.5 (width), 11 (length)
- X tu = 432
- X ld = 6.5 (width), 10 (length)
- X lu = 720
- X*/
- X
- X#define XSF 1.6666666 /* X Scale factor (troff to laserjet units) */
- X#define YSF 1.5151515 /* Y Scale factor (troff to laserjet units) */
- X
- Xlong xpos, oldypos = -9999, ypos = -153;
- X
- Xchar *words[] = {
- X "down", "up", "lower", "upper", "forward", "backwards"
- X };
- X
- Xchar fontName[BUFSIZ] = "newyork";
- Xchar *fontLib = "/u/clewis/lcat/fonts/";
- X
- X#define CTOINT(val,sig) ((~c)&sig)
- X
- X#define UNITS 432
- X#define FONT4 /* 4 Font device */
- X
- X#ifdef FONT4
- X#define calcfont font = ((mag == UPPER)<<1)|((rail == UPPER))
- X#else
- X#define calcfont font = ((mag == UPPER)<<2)|((rail == UPPER)<<1)|(tilt==DOWN)
- X#endif
- X
- Xextern char *native[], *specnative[];
- X
- Xmain(argc, argv)
- Xint argc;
- Xchar **argv; {
- X register int nc, c;
- X register char *rp;
- X register int i,j;
- X register int decipoints;
- X register int units;
- X register int oldFont, font, rail, mag, tilt, half, escape, lead;
- X
- X extern int getopt();
- X extern char *optarg;
- X while((c = getopt(argc, argv, "hHDdf:")) != EOF)
- X switch (c) {
- X case 'D':
- X diagFile = fopen("diagnostics", "w");
- X if (!diagFile) {
- X fprintf(stderr, "Could not open diagnostics file\n");
- X exit(1);
- X }
- X break;
- X case 'f':
- X strcpy(fontName, optarg);
- X break;
- X case 'd':
- X fontName[0] = '\0';
- X quality = 0;
- X break;
- X case 'h':
- X quality = 1;
- X break;
- X case 'H':
- X quality = 2;
- X break;
- X case '?':
- X usage();
- X exit(1);
- X }
- X
- X if (diagFile) {
- X for (i = 0; i <= 107; i++) {
- X fprintf(diagFile, "%d: native: %s, ", i, toprnt(native[i]));
- X fprintf(diagFile, "Special:%s\n", toprnt(specnative[i]));
- X }
- X }
- X while (!feof(stdin)) {
- X c = getc(stdin);
- X switch(c) {
- X case 0x00:
- X DEBUGPRINTF("NOP\n");
- X break;
- X /* Flash (print character) codes */
- X case 0x01: case 0x02: case 0x03: case 0x04:
- X case 0x05: case 0x06: case 0x07: case 0x08:
- X case 0x09: case 0x0a: case 0x0b: case 0x0c:
- X case 0x0d: case 0x0e: case 0x0f: case 0x10:
- X case 0x11: case 0x12: case 0x13: case 0x14:
- X case 0x15: case 0x16: case 0x17: case 0x18:
- X case 0x19: case 0x1a: case 0x1b: case 0x1c:
- X case 0x1d: case 0x1e: case 0x1f: case 0x20:
- X case 0x21: case 0x22: case 0x23: case 0x24:
- X case 0x25: case 0x26: case 0x27: case 0x28:
- X case 0x29: case 0x2a: case 0x2b: case 0x2c:
- X case 0x2d: case 0x2e: case 0x2f: case 0x30:
- X case 0x31: case 0x32: case 0x33: case 0x34:
- X case 0x35: case 0x36: case 0x37: case 0x38:
- X case 0x39: case 0x3a: case 0x3b: case 0x3c:
- X case 0x3d: case 0x3e: case 0x3f:
- X /* This is terribly kludgey:
- X In 432 units per inch, 4752 is 11 inches.
- X When we go beyond this, we subtract 4752
- X and ignore anything printed on this line.
- X */
- X while (ypos >= 4752) {
- X ypos -= 4752;
- X oldypos = -9999;
- X DEBUGPRINTF("Page break\n", 0, 0);
- X putchar('\f');
- X }
- X if (ypos <= 20) {
- X DEBUGPRINTF("Ignoring: %d, %d\n", xpos, ypos);
- X break; /* ignore anything less than this
- X from the beginning of a page */
- X }
- X c = c&0x3f;
- X DEBUGPRINTF("Flash %02d %s font %d\n", c&0x3f,
- X words[half], font);
- X DEBUGPRINTF("x,y=%ld,%ld; font=%d; rail=%s; mag=%s; tilt=%s; half=%s\n",
- X xpos,ypos,font+1,words[rail],words[mag],words[tilt],
- X words[half]);
- X /* Find the C/A/T code */
- X if (half == UPPER) {
- X if (c > 46) {
- X fprintf(stderr, "Illegal upper flash: %d\n", c);
- X exit(1);
- X }
- X nc = c + 62;
- X } else
- X nc = c - 1;
- X /* Move to the appropriate position */
- X
- X if (!vertChanged && oldypos == ypos) {
- X printf("\033&a%dH",(int) (xpos*XSF));
- X } else {
- X printf("\033&a%dh%dV",(int) (xpos*XSF),
- X (int) (ypos*YSF));
- X }
- X oldypos = ypos;
- X vertChanged = 0;
- X if (font == 3 && nc == 34) {
- X prt_glyph(cX_glyph);
- X break;
- X }
- X if (points != 12 && fontName[0] != '\0' && quality) {
- X if (loadfont(fontName, points, quality)) {
- X flashrast(nc, points, font);
- X vertChanged = 1;
- X break;
- X }
- X }
- X if (oldFont != font) {
- X DEBUGPRINTF("Changing to font %d\n", font);
- X switch(font) {
- X case 3:
- X case 0:
- X /* upright, normal weight */
- X printf("\033(s0s-2B");
- X break;
- X case 1:
- X /* italics, light weight */
- X printf("\033(s1s-3B");
- X break;
- X case 2:
- X /* upright, heavy weight (bold)*/
- X printf("\033(s0s7B");
- X break;
- X }
- X }
- X oldFont = font;
- X
- X if (font < 3)
- X for (rp = native[nc]; *rp; rp++)
- X putc(*rp, stdout);
- X else
- X for (rp = specnative[nc]; *rp; rp++)
- X putc(*rp, stdout);
- X DEBUGPRINTF("Code %d is %d(%s)\n", c, nc, (font < 3) ?
- X toprnt(native[nc]):toprnt(specnative[nc]));
- X break;
- X /* Control codes */
- X case 0x40:
- X DEBUGPRINTF("Initialize\n");
- X xpos = 0;
- X ypos = -153;
- X escape = FORWARD;
- X lead = FORWARD;
- X half = LOWER;
- X rail = LOWER;
- X mag = LOWER;
- X tilt = DOWN;
- X calcfont;
- X break;
- X case 0x41:
- X DEBUGPRINTF("Rail lower\n");
- X rail = LOWER;
- X calcfont;
- X break;
- X case 0x42:
- X DEBUGPRINTF("Rail upper\n");
- X rail = UPPER;
- X calcfont;
- X break;
- X case 0x43:
- X DEBUGPRINTF("Mag upper\n");
- X mag = UPPER;
- X calcfont;
- X break;
- X case 0x44:
- X DEBUGPRINTF("Mag lower\n");
- X mag = LOWER;
- X calcfont;
- X break;
- X case 0x45:
- X DEBUGPRINTF("half lower\n");
- X half = LOWER;
- X break;
- X case 0x46:
- X DEBUGPRINTF("half upper\n");
- X half = UPPER;
- X break;
- X case 0x47:
- X DEBUGPRINTF("Escape forward\n");
- X escape = FORWARD;
- X break;
- X case 0x48:
- X DEBUGPRINTF("Escape backward\n");
- X escape = BACKWARD;
- X break;
- X case 0x49:
- X DEBUGPRINTF("STOP\n");
- X break;
- X case 0x4a:
- X DEBUGPRINTF("Lead forward\n");
- X lead = FORWARD;
- X break;
- X case 0x4b:
- X DEBUGPRINTF("Software cut!\n");
- X break;
- X case 0x4c:
- X DEBUGPRINTF("Lead backward\n");
- X lead = BACKWARD;
- X break;
- X case 0x4d:
- X DEBUGPRINTF("UNKNOWN CONTROL CODE!\n");
- X exit(0);
- X case 0x4e:
- X DEBUGPRINTF("Tilt up\n");
- X tilt = UP;
- X calcfont;
- X break;
- X case 0x4f:
- X DEBUGPRINTF("Tilt down\n");
- X tilt = DOWN;
- X calcfont;
- X break;
- X
- X /* Size changes */
- X case 0x50: case 0x51: case 0x52: case 0x53:
- X case 0x54: case 0x55: case 0x56: case 0x57:
- X case 0x58: case 0x59: case 0x5a: case 0x5b:
- X case 0x5c: case 0x5d: case 0x5e: case 0x5f:
- X DEBUGPRINTF("Size change %02x\n", c&0xf);
- X points = ptab[c&0xf];
- X break;
- X /* Lead (vertical motion) codes */
- X case 0x60: case 0x61: case 0x62: case 0x63:
- X case 0x64: case 0x65: case 0x66: case 0x67:
- X case 0x68: case 0x69: case 0x6a: case 0x6b:
- X case 0x6c: case 0x6d: case 0x6e: case 0x6f:
- X case 0x70: case 0x71: case 0x72: case 0x73:
- X case 0x74: case 0x75: case 0x76: case 0x77:
- X case 0x78: case 0x79: case 0x7a: case 0x7b:
- X case 0x7c: case 0x7d: case 0x7e: case 0x7f:
- X
- X DEBUGPRINTF("Lead(vertical) %02x\n", c&0x1f);
- X units = CTOINT(c,0x1f);
- X if (lead == FORWARD) {
- X ypos += 3*units;
- X } else {
- X ypos -= 3*units;
- X }
- X break;
- X /* Escape (horizontal motion) codes */
- X case 0x80: case 0x81: case 0x82: case 0x83:
- X case 0x84: case 0x85: case 0x86: case 0x87:
- X case 0x88: case 0x89: case 0x8a: case 0x8b:
- X case 0x8c: case 0x8d: case 0x8e: case 0x8f:
- X case 0x90: case 0x91: case 0x92: case 0x93:
- X case 0x94: case 0x95: case 0x96: case 0x97:
- X case 0x98: case 0x99: case 0x9a: case 0x9b:
- X case 0x9c: case 0x9d: case 0x9e: case 0x9f:
- X case 0xa0: case 0xa1: case 0xa2: case 0xa3:
- X case 0xa4: case 0xa5: case 0xa6: case 0xa7:
- X case 0xa8: case 0xa9: case 0xaa: case 0xab:
- X case 0xac: case 0xad: case 0xae: case 0xaf:
- X case 0xb0: case 0xb1: case 0xb2: case 0xb3:
- X case 0xb4: case 0xb5: case 0xb6: case 0xb7:
- X case 0xb8: case 0xb9: case 0xba: case 0xbb:
- X case 0xbc: case 0xbd: case 0xbe: case 0xbf:
- X case 0xc0: case 0xc1: case 0xc2: case 0xc3:
- X case 0xc4: case 0xc5: case 0xc6: case 0xc7:
- X case 0xc8: case 0xc9: case 0xca: case 0xcb:
- X case 0xcc: case 0xcd: case 0xce: case 0xcf:
- X case 0xd0: case 0xd1: case 0xd2: case 0xd3:
- X case 0xd4: case 0xd5: case 0xd6: case 0xd7:
- X case 0xd8: case 0xd9: case 0xda: case 0xdb:
- X case 0xdc: case 0xdd: case 0xde: case 0xdf:
- X case 0xe0: case 0xe1: case 0xe2: case 0xe3:
- X case 0xe4: case 0xe5: case 0xe6: case 0xe7:
- X case 0xe8: case 0xe9: case 0xea: case 0xeb:
- X case 0xec: case 0xed: case 0xee: case 0xef:
- X case 0xf0: case 0xf1: case 0xf2: case 0xf3:
- X case 0xf4: case 0xf5: case 0xf6: case 0xf7:
- X case 0xf8: case 0xf9: case 0xfa: case 0xfb:
- X case 0xfc: case 0xfd: case 0xfe:
- X
- X units = CTOINT(c,0x7f);
- X if (escape == FORWARD) {
- X xpos += units;
- X } else {
- X xpos -= units;
- X }
- X DEBUGPRINTF("ESC (hor): %02x\n", c&0x7f);
- X break;
- X
- X case 0xff:
- X DEBUGPRINTF("Illegal: %02x\n", c);
- X break;
- X }
- X }
- X exit(0);
- X}
- X
- Xchar *
- Xtoprnt(s)
- Xchar *s; {
- X static char buf[BUFSIZ];
- X register char *fromp, *top;
- X for (fromp = s, top = buf; *fromp; fromp++,top++)
- X if (isascii(*fromp) && isprint(*fromp))
- X *top = *fromp;
- X else {
- X sprintf(top, "\\%03o", *fromp);
- X top += 3;
- X }
- X *top = '\0';
- X return(buf);
- X}
- X
- Xprt_glyph(g)
- Xglyph g; {
- X register int i, j;
- X int val;
- X printf("\033&a-%dV", cX_height * 2);
- X printf("\033*t300R");
- X for (i = 0; i < cX_height; i++) {
- X printf("\033*r1A");
- X printf("\033*b%dW", g[i].size);
- X for (j = 0; j < g[i].size; j++) {
- X if (1 != sscanf(&(g[i].g_line[j*2]), "%2x", &val)) {
- X fprintf(stderr, "Scan failure\n");
- X exit(1);
- X }
- X putc(val, stdout);
- X }
- X }
- X printf("\033*rB");
- X}
- X
- Xusage() {
- X fprintf(stderr, "usage: lcat -f<fontName> [-d] [-D]\n");
- X}
- X
- Xdebugprintf(fmt, a1, a2, a3, a4, a5, a6, a7)
- Xchar *fmt;
- Xint a1, a2, a3, a4, a5, a6, a7; {
- X char buf[BUFSIZ];
- X sprintf(buf, fmt, a1, a2, a3, a4, a5, a6, a7);
- X fprintf(diagFile, buf);
- X}
- /
- echo 'x - fastfonts.c'
- sed 's/^X//' > fastfonts.c << '/'
- X/*****************************************************************
- X
- X Copyright 1985. Chris Lewis
- X
- X Module : fastfonts.c 1.3
- X Date submitted : 85/12/18 14:06:01
- X Author : Chris Lewis
- X Origin : Permission to copy and further distribute is
- X freely given provided this copyright notice remains
- X intact and that this software is not sold for profit.
- X Description : Native Laser jet font where the index is the C/A/T
- X codes
- X
- X******************************************************************/
- X
- X#ifndef lint
- Xstatic char SrcId[] = "@(#)fastfonts.c:1.3";
- X#endif
- X
- X#define UNASS "\377" /* unassigned in C/A/T */
- X#define UNREP "\377" /* unrepresentable on Laser fonts */
- X/* Regular characters, fonts 1-3 */
- X/* Note on native and specnative arrays:
- X you can create composite characters by using HP positionning
- X and characters. Only one proviso, because of the vertical
- X optimization, the net vertical motion MUST BE ZERO */
- Xchar *native[108] = {
- X /* num howto name */
- X /* 1 */ "h", /*h*/
- X /* 2 */ "t", /*t*/
- X /* 3 */ "n", /*n*/
- X /* 4 */ "m", /*m*/
- X /* 5 */ "l", /*l*/
- X /* 6 */ "i", /*i*/
- X /* 7 */ "z", /*z*/
- X /* 8 */ "s", /*s*/
- X /* 9 */ "d", /*d*/
- X /* 10 */ "b", /*b*/
- X /* 11 */ "x", /*x*/
- X /* 12 */ "f", /*f*/
- X /* 13 */ "j", /*j*/
- X /* 14 */ "u", /*u*/
- X /* 15 */ "k", /*k*/
- X /* 16 */ UNASS, /*unassigned*/
- X /* 17 */ "p", /*p*/
- X /* 18 */ "\366", /*3/4 em*/
- X /* 19 */ ";", /*;*/
- X /* 20 */ UNASS, /*unassigned*/
- X /* 21 */ "a", /*a*/
- X /* 22 */ "\033&a-80V_\033&a-60H_\033&a+80V", /*horizontal rule*/
- X /* 23 */ "c", /*c*/
- X /* 24 */ "`", /*` open*/
- X /* 25 */ "e", /*e*/
- X /* 26 */ "'", /*' close*/
- X /* 27 */ "o", /*o*/
- X /* 28 */ "\367", /*1/4*/
- X /* 29 */ "r", /*r*/
- X /* 30 */ "\370", /*1/2*/
- X /* 31 */ "v", /*v*/
- X /* 32 */ "-", /*- hyphen*/
- X /* 33 */ "w", /*w*/
- X /* 34 */ "q", /*q*/
- X /* 35 */ "/", /*/*/
- X /* 36 */ ".", /*.*/
- X /* 37 */ "g", /*g*/
- X /* 38 */ "\377", /*3/4*/
- X /* 39 */ ",", /*,*/
- X /* 40 */ "&", /*&*/
- X /* 41 */ "y", /*y*/
- X /* 42 */ UNASS, /*unassigned*/
- X /* 43 */ "%", /*%*/
- X /* 44 */ UNASS, /*unassigned*/
- X /* 45 */ "Q", /*Q*/
- X /* 46 */ "T", /*T*/
- X /* 47 */ "O", /*O*/
- X /* 48 */ "H", /*H*/
- X /* 49 */ "N", /*N*/
- X /* 50 */ "M", /*M*/
- X /* 51 */ "L", /*L*/
- X /* 52 */ "R", /*R*/
- X /* 53 */ "G", /*G*/
- X /* 54 */ "I", /*I*/
- X /* 55 */ "P", /*P*/
- X /* 56 */ "C", /*C*/
- X /* 57 */ "V", /*V*/
- X /* 58 */ "E", /*E*/
- X /* 59 */ "Z", /*Z*/
- X /* 60 */ "D", /*D*/
- X /* 61 */ "B", /*B*/
- X /* 62 */ "S", /*S*/
- X /* 63 */ "Y", /*Y*/
- X /* from here on are actually code 1-45, upper half of font */
- X /* 64 */ "F", /*F*/
- X /* 65 */ "X", /*X*/
- X /* 66 */ "A", /*A*/
- X /* 67 */ "W", /*W*/
- X /* 68 */ "J", /*J*/
- X /* 69 */ "U", /*U*/
- X /* 70 */ "K", /*K*/
- X /* 71 */ "0", /*0*/
- X /* 72 */ "1", /*1*/
- X /* 73 */ "2", /*2*/
- X /* 74 */ "3", /*3*/
- X /* 75 */ "4", /*4*/
- X /* 76 */ "5", /*5*/
- X /* 77 */ "6", /*6*/
- X /* 78 */ "7", /*7*/
- X /* 79 */ "8", /*8*/
- X /* 80 */ "9", /*9*/
- X /* 81 */ "*", /***/
- X /* 82 */ "-", /*minus*/
- X /* 83 */ "\033&a-20Hf\033&a-45Hi", /*fi*/
- X /* 84 */ "\033&a-20Hf\033&a-45Hl", /*fl*/
- X /* 85 */ "\033&a-20Hf\033&a-45Hf", /*ff*/
- X /* 86 */ "\277", /*cent sign*/
- X /* 87 */ "\033&a-30Hf\033&a-45Hf\033&a-45Hl", /*ffl*/
- X /* 88 */ "\033&a-30Hf\033&a-45Hf\033&a-45Hi", /*ffi*/
- X /* 89 */ "(", /*(*/
- X /* 90 */ ")", /*)*/
- X /* 91 */ "[", /*[*/
- X /* 92 */ "]", /*]*/
- X /* 93 */ "\263", /*degree*/
- X /* 94 */ "\377", /*dagger*/
- X /* 95 */ "=", /*=*/
- X /* 96 */ "\377", /*registered*/
- X /* 97 */ ":", /*:*/
- X /* 98 */ "+", /*+*/
- X /* 99 */ UNASS, /*unassigned*/
- X /* 100 */ "!", /*!*/
- X#ifdef BLOTBULL
- X /* 101 */ "\374", /*bullet*/
- X#else
- X /* Composite bullet */
- X /* 101 */ "\033&a-15Vo\033&a-72h+15V*",
- X#endif
- X /* 102 */ "?", /*?*/
- X /* 103 */ "\250", /*foot mark*/
- X /* 104 */ "|", /*|*/
- X /* 105 */ UNASS, /*unassigned*/
- X /* 106 */ "\377", /*copyright*/
- X /* 107 */ "\272", /*square*/
- X /* 108 */ "$" /*$*/
- X};
- X
- Xchar *specnative[108] = {
- X /* 1*/ "psi", /*psi*/
- X /* 2*/ "theta", /*theta*/
- X /* 3*/ "nu", /*nu*/
- X /* 4*/ "mu", /*mu*/
- X /* 5*/ "lambda", /*lambda*/
- X /* 6*/ "iota", /*iota*/
- X /* 7*/ "zeta", /*zeta*/
- X /* 8*/ "sigma", /*sigma*/
- X /* 9*/ "delta", /*delta*/
- X /* 10*/ "beta", /*beta*/
- X /* 11*/ "xi", /*xi*/
- X /* 12*/ "eta", /*eta*/
- X /* 13*/ "phi", /*phi*/
- X /* 14*/ "upsilon", /*upsilon*/
- X /* 15*/ "kappa", /*kappa*/
- X /* 16*/ UNASS, /*unassigned*/
- X /* 17*/ "pi", /*pi*/
- X /* 18*/ "@", /*@*/
- X /* 19*/ "down arrow", /*down arrow*/
- X /* 20*/ UNASS, /*unassigned*/
- X /* 21*/ "alpha", /*alpha*/
- X /* 22*/ "or (was star)", /*or (was star)*/
- X /* 23*/ "chi", /*chi*/
- X /* 24*/ "\033&a-9H'\033&a-90H'", /*double quote*/
- X /* 25*/ "epsilon", /*epsilon*/
- X /* 26*/ "equation equal", /*equation equal*/
- X /* 27*/ "omicron", /*omicron*/
- X /* 28*/ "left arrow", /*left arrow*/
- X /* 29*/ "rho", /*rho*/
- X /* 30*/ "up arrow", /*up arrow*/
- X /* 31*/ "tau", /*tau*/
- X /* 32*/ "_", /*_ underrule*/
- X /* 33*/ "\\", /*\*/
- X /* 34*/ "Psi", /*Psi*/
- X /* 35*/ "bell system sign", /*bell system sign*/
- X /* 36*/ "infinity", /*infinity*/
- X /* 37*/ "gamma", /*gamma*/
- X /* 38*/ " improper superset", /* improper superset*/
- X /* 39*/ "proportional to", /*proportional to*/
- X /* 40*/ "right hand", /*right hand*/
- X /* 41*/ "omega", /*omega*/
- X /* 42*/ "gradient", /*gradient*/
- X /* 43*/ UNASS, /*unassigned*/
- X /* 44*/ "Phi", /*Phi*/
- X /* 45*/ "Theta", /*Theta*/
- X /* 46*/ "Omega", /*Omega*/
- X /* 47*/ "cup (union)", /*cup (union)*/
- X /* 48*/ "root en", /*root en*/
- X /* 49*/ "terminal sigma (was root em)", /*terminal sigma (was root em)*/
- X /* 50*/ "Lambda", /*Lambda*/
- X /* 51*/ "equation minus", /*equation minus*/
- X /* 52*/ "Gamma", /*Gamma*/
- X /* 53*/ "integral sign", /*integral sign*/
- X /* 54*/ "Pi", /*Pi*/
- X /* 55*/ "subset of", /*subset of*/
- X /* 56*/ "superset of", /*superset of*/
- X /* 57*/ "approximates", /*approximates*/
- X /* 58*/ "partial derivative", /*partial derivative*/
- X /* 59*/ "Delta", /*Delta*/
- X /* 60*/ "square root", /*square root*/
- X /* 61*/ "Sigma", /*Sigma*/
- X /* 62*/ "approx =", /*approx =*/
- X /* 63*/ UNASS, /*unassigned*/
- X /* 64*/ ">", /*>*/
- X /* 65*/ "Xi", /*Xi*/
- X /* 66*/ "<", /*<*/
- X /* 67*/ "slash (longer)", /*slash (longer)*/
- X /* 68*/ "cap (intersection)", /*cap (intersection)*/
- X /* 69*/ "Upsilon", /*Upsilon*/
- X /* 70*/ "not", /*not*/
- X /* 71*/ "right ceiling (rt of \")", /*right ceiling (rt of ")*/
- X /* 72*/ "left top (of big curly)", /*left top (of big curly)*/
- X /* 73*/ "bold vertical", /*bold vertical*/
- X /* 74*/ "left center of big curly bracket", /*left center of big curly bracket*/
- X /* 75*/ "left bottom", /*left bottom*/
- X /* 76*/ "right top", /*right top*/
- X /* 77*/ "right center of big curly bracket", /*right center of big curly bracket*/
- X /* 78*/ "right bot", /*right bot*/
- X /* 79*/ "right floor (rb of \")", /*right floor (rb of ")*/
- X /* 80*/ "left floor (left bot of big sq bract)", /*left floor (left bot of big sq bract)*/
- X /* 81*/ "left ceiling (lt of \")", /*left ceiling (lt of ")*/
- X /* 82*/ "multiply", /*multiply*/
- X /* 83*/ "divide", /*divide*/
- X /* 84*/ "plus-minus", /*plus-minus*/
- X /* 85*/ "<=", /*<=*/
- X /* 86*/ ">=", /*>=*/
- X /* 87*/ "identically equal", /*identically equal*/
- X /* 88*/ "not equal", /*not equal*/
- X /* 89*/ "{", /*{*/
- X /* 90*/ "}", /*}*/
- X /* 91*/ "acute accent", /*acute accent*/
- X /* 92*/ "grave accent", /*grave accent*/
- X /* 93*/ "^", /*^*/
- X /* 94*/ "#", /*#*/
- X /* 95*/ "left hand", /*left hand*/
- X /* 96*/ "member of", /*member of*/
- X /* 97*/ "~", /*~*/
- X /* 98*/ "empty set", /*empty set*/
- X /* 99*/ UNASS, /*unassigned*/
- X /*100*/ "dbl dagger", /*dbl dagger*/
- X /*101*/ "\033&a-30H|", /*box rule (was parallel sign)*/
- X /*102*/ "math * ", /*math * */
- X /*103*/ "improper subset", /*improper subset*/
- X /*104*/ "circle", /*circle*/
- X /*105*/ UNASS, /*unassigned*/
- X /*106*/ "equation plus", /*equation plus*/
- X /*107*/ "right arrow", /*right arrow*/
- X /*108*/ "section" /*section*/
- X};
- /
- echo 'x - compfont.c'
- sed 's/^X//' > compfont.c << '/'
- X/*****************************************************************
- X
- X Copyright 1985. Chris Lewis
- X
- X Module : compfont.c 1.1
- X Date submitted : 86/01/21 14:03:23
- X Author : Chris Lewis
- X Origin : Permission to copy and further distribute is
- X freely given provided this copyright notice remains
- X intact and that this software is not sold for profit.
- X Description : Convert's vi'ed glyph file to lcat.c useable
- X raster description.
- X
- X******************************************************************/
- X
- X#ifndef lint
- Xstatic char SrcId[] = "@(#)compfont.c:1.1";
- X#endif
- X#include <stdio.h>
- X#define tstbit(n, f) ((f) == ' ') ? (1 << n):0
- Xmain(argc, argv)
- Xint argc;
- Xchar *argv[]; {
- X char buf[BUFSIZ];
- X register int i,j, length;
- X register char *rp;
- X unsigned char v;
- X int cdef;
- X int lcount = 0;
- X if (argc != 1)
- X cdef = 1;
- X if (cdef) {
- X printf("glyph %s_glyph = {\n", argv[1]);
- X } else
- X printf("\033*t300R");
- X while (gets(buf)) {
- X lcount++;
- X rp = buf + strlen(buf) - 1;
- X while(rp > buf && *rp == ' ')
- X *rp-- = '\0';
- X if (!cdef)
- X printf("\033*r1A");
- X length = (strlen(buf) + 7) / 8;
- X if (cdef)
- X printf("\t{%d, \"", length);
- X else
- X printf("\033*b%dW", length);
- X strcat(buf, " ");
- X for (i = 0, rp = buf; i < length; i++) {
- X v = 0;
- X for (j = 7; j >= 0; j--)
- X v |= (*rp++ != ' ') ? (1 << j):0;
- X if (cdef)
- X printf("%02x", v);
- X else
- X printf("%c", v);
- X }
- X printf("\"},\n");
- X }
- X printf("\t{-1,NULL}\n");
- X printf("};\n");
- X if (cdef)
- X printf("#define %s_height %d\n", argv[1], lcount);
- X else {
- X printf("\033*rB");
- X printf("\f");
- X }
- X exit(0);
- X}
- /
- echo 'x - Makefile'
- sed 's/^X//' > Makefile << '/'
- X.SUFFIXES: .sh .sh~
- X
- XBIN = /u1/cx/bin
- XTMAC = /usr/lib/tmac/tmac.lmm
- X
- XCFLAGS = -O -DDEBUG
- XOBJ = lcat.o fastfonts.o newfonts.o
- X
- Xall: lcat lroff
- X
- Xlcat: $(OBJ)
- X $(CC) -o lcat $(CFLAGS) $(OBJ)
- X
- Xlcat.o: bell.glyph.h
- X
- Xbell.glyph.h: bell.glyph compfont
- X compfont cX < bell.glyph > bell.glyph.h
- X
- Xpack: README lcat.c fastfonts.c compfont.c Makefile lroff bell.glyph \
- X cat.5 lroff.1 lrofftest.m tmac.lmm
- X packmail README lcat.c fastfonts.c compfont.c Makefile lroff \
- X bell.glyph cat.5 lroff.1 lrofftest.m tmac.lmm
- X
- Xtest: lcat lroff lrofftest.m
- X tbl lrofftest.m | lroff tmac.lmm -
- X
- Xinstall: lcat lroff tmac.lmm
- X echo "cp lcat lroff $(BIN)" | su
- X echo "cp tmac.lmm $(TMAC)" | su
- X
- X.sh~.sh:
- X $(GET) $(GFLAGS) $<
- X
- X.sh~:
- X rm -f $* $*.sh
- X $(GET) $(GFLAGS) $<
- X mv $*.sh $*
- X chmod 555 $*
- X
- X.sh:
- X rm -f $*
- X cp $*.sh $*
- X chmod 555 $*
- /
- echo 'x - lroff'
- sed 's/^X//' > lroff << '/'
- X#!/bin/sh
- X#*****************************************************************
- X#
- X# Copyright 1985. Chris Lewis
- X#
- X# Module : lroff.sh 1.6
- X# Date submitted : 86/01/21 14:47:00
- X# Author : C. Lewis
- X# Origin : This software may be freely distributed
- X# as long as it is not for profit, and that
- X# this copyright notice remains intact.
- X# Description : shell file for laserjet troff
- X#
- X#*****************************************************************/
- X#
- Xprintcmd="lp -w -dlaser -op -ob"
- Xtrap "rm -f /tmp/$$; exit 1" 1 2 3 15
- Xcat > /tmp/$$ <<\EOF
- X.\" Some of these commands are specific to MM, you may have to change
- X.\" the W, and trace down who fires the cut marks ")k" in MM.
- X.\" Tuning troff for HP. Some others are done in /usr/lib/tmac/tmac.lmm
- X.\" Minimum interword spacing (15 points)
- X.ss 15
- X.\" Turn off ligatures (Ugly!). But, they *do* work.
- X.lg 0
- X.\" Clobber cut marks.
- X.rm )k
- X.fp 1 CW \" constant width font 1
- X.fp 2 CW \" constant width font 2
- X.fp 3 CW \" constant width font 3
- XEOF
- Xfor i
- Xdo
- X case $i in
- X -h)
- X largs="$largs $i"
- X ;;
- X -H)
- X largs="$largs $i"
- X ;;
- X -)
- X files="$files -"
- X ;;
- X -D)
- X test='-D'
- X ;;
- X -f*)
- X largs="$largs $i"
- X ;;
- X -*)
- X args="$args $i"
- X ;;
- X *)
- X files="$files $i"
- X ;;
- X esac
- Xdone
- Xif [ -n "$test" ]
- Xthen
- X troff -t $args /tmp/$$ $files | tee troffout | lcat $largs $test | tee lroffout | $printcmd
- X rc=$?
- Xelse
- X troff -t $args /tmp/$$ $files | lcat $largs | $printcmd
- X rc=$?
- Xfi
- Xrm -f /tmp/$$
- Xexit $rc
- /
- echo 'x - bell.glyph'
- sed 's/^X//' > bell.glyph << '/'
- X ###################### ########################
- X ###################### ######################
- X ################# #################
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X ############# #############
- X #########################
- X #########################
- X #######################
- X #####################
- X ###################
- X ###################
- X #################
- X ###############
- X #############
- X #############
- X ###############
- X #################
- X ###################
- X ###################
- X ############# #####################
- X ################## #######################
- X ##################### #########################
- X ####################### #########################
- X ########################## ############# #############
- X ######## ############## ############# #############
- X ####### ############# ############# #############
- X ####### ############# ############# #############
- X ######## ############# ###### ############## #############
- X ######## ################### ############## #############
- X ######### ################# ############## #############
- X ######## ################ ############### #############
- X ######### ############## ############### #############
- X ######### ############### #############
- X ######### ############### #############
- X ######### ################# #############
- X ######### ################ #############
- X ######### ################# #############
- X ######### ################ #############
- X ######### ################ #############
- X ######### ################ #############
- X ########## ################ #############
- X ######### ############### #############
- X ########## ############### #############
- X ######### ############### #############
- X ########### ############### #############
- X ############ ################ #############
- X ########### ################# #############
- X ########## ################# #############
- X ############ ################# #############
- X ############################### #############
- X ############################ ###################
- X ######################## ########################
- X ################ ##########################
- /
- echo 'x - cat.5'
- sed 's/^X//' > cat.5 << '/'
- X.TH CAT 5 local writeup
- X.DA 4 April 1981
- X.SH NAME
- Xcat \- C/A/T phototypesetter code
- X.SH DESCRIPTION
- XThe Graphic Systems C/A/T phototypesetter is driven by sending it a
- Xsequence of one-byte codes
- Xwhich specify characters, fonts, sizes, and other control information.
- X.PP
- XThe C/A/T's basic unit of length is 1/432 of an inch (6 units to a
- Xtypesetter's ``point'').
- XThe quantum of horizontal motion is one unit.
- XThe quantum of vertical motion is three units (1/144 of an inch, 1/2 point).
- X.PP
- XThe top two bits of the code classify it as one of three major
- Xtypes:
- Xan \fIescape\fR code (top bit 1),
- Xa \fIflash\fR code (top bits 00),
- Xor a control code (top bits 01).
- XA code of all zeros is ignored; a code of all ones is illegal.
- X.PP
- XA flash code specifies flashing one of 63 characters, as given by the
- Xremaining six bits.
- XSince this is not enough to specify all possible characters, or even
- Xall characters in a single font \(em there are 108 per font \(em
- Xvarious control codes (described later) select a font and either
- Xthe Lower or Upper half of the font.
- XThe Lower half is the first 63 characters of the font; the Upper
- Xhalf is the remaining 45.
- XA flash code of 46 or higher in the Upper half is illegal.
- X.PP
- XAn escape code specifies horizontal motion.
- XThe size of the motion, in horizontal quanta, is the one's-complement
- Xof the low seven bits of the code.
- XThe direction of the motion is set by control codes.
- XHitting the right or left margin limit switch is illegal and will
- Xcause the machine to stop.
- XThe machine starts out, after initialization, hard against the left
- Xmargin limit switch; an initial escape of 16 units \fImust\fR
- Xbe given before starting work, and the position after this motion
- Xshould be the limit of all future leftward motions.
- X>From this point, the distance to the right margin limit switch
- Xis about 7.5 inches.
- X.PP
- XA code with the top three bits 011 is a \fIlead\fR code,
- Xspecifying vertical motion.
- XThe remaining five bits are the one's-complement of the size of
- Xthe motion, in vertical quanta.
- XThe direction of motion is set by control codes.
- XThe amount of vertical motion is, in principle, limited only by
- Xrunning off the paper in the upward direction and by the limited
- Xcapacity of the output cartridge in the downward direction.
- X.PP
- XA code with the top four bits 0101 is a size-change code, which
- Xspecifies movement of the lens turret and the doubler lens to
- Xchange point size.
- XThese codes are as follows:
- X.PP
- X.RS
- X.nf
- X.ta 2c
- XSize Code
- X
- X6 0101\|1000
- X7 0101\|0000
- X8 0101\|0001
- X9 0101\|0111
- X10 0101\|0010
- X11 0101\|0011
- X12 0101\|0100
- X14 0101\|0101
- X16 0101\|1001
- X18 0101\|0110
- X20 0101\|1010
- X22 0101\|1011
- X24 0101\|1100
- X28 0101\|1101
- X36 0101\|1110
- X.DT
- X.fi
- X.RE
- X.PP
- XSize changes involving the doubler lens alter the horizontal position.
- XChanges from single to double sizes should be followed by a forward
- Xescape of 55 quanta; changes from double to single sizes should be
- Xfollowed by a reverse escape of 55 quanta.
- XThe single sizes are 6, 7, 8, 9, 10, 11, 12, 14, and 18;
- Xthe double sizes are 16, 20, 22, 24, 28, and 36.
- X.PP
- XThe control codes with the top four bits 0100 specify miscellaneous
- Xcontrol codes, not all of which have valid meanings.
- XThey are:
- X.PP
- X.RS
- X.ta 6c
- X.nf
- Xinitialize 0100\|0000
- Xstop 0100\|1001
- Xupper rail 0100\|0010
- Xlower rail 0100\|0001
- Xupper mag 0100\|0011
- Xlower mag 0100\|0100
- Xtilt up 0100\|1110
- Xtilt down 0100\|1111
- Xupper font half 0100\|0110
- Xlower font half 0100\|0101
- Xescape forward 0100\|0111
- Xescape backward 0100\|1000
- Xlead forward 0100\|1010
- Xlead backward 0100\|1100
- Xsoftware cut 0100\|1011
- X.fi
- X.DT
- X.RE
- X.PP
- XThe \fIinitialize\fR code causes leftward motion to the left margin limit
- Xswitch,
- Xand sets the following modes:
- Xescape forward, lead forward, lower font half,
- Xlower rail, lower mag, tilt down.
- XNote that the left margin limit switch does not define a precise
- Xposition, and hence reinitializing the machine
- Xwill destroy precise left-margin alignment.
- X.PP
- XThe \fIstop\fR code stops the machine, which must be manually
- Xrestarted (normally after changing output cartridges);
- Xthis code should be used only at the end of a run.
- X.PP
- XFonts are selected by the combination of \fIrail\fR, \fImag\fR, and \fItilt\fR.
- XThe tilt codes do not exist on the 4-font C/A/T; this is the only user-visible
- Xdifference between the 4-font and 8-font machines.
- XThe correspondence between rail/mag/tilt and font number is as follows:
- X.PP
- X.RS
- X.nf
- X.ta 2c 4c 6c 8c
- Xrail mag tilt 4font 8font
- X
- Xlower lower up 1 1
- Xlower lower down 1 2
- Xupper lower up 2 3
- Xupper lower down 2 4
- Xlower upper up 3 5
- Xlower upper down 3 6
- Xupper upper up 4 7
- Xupper upper down 4 8
- X.DT
- X.fi
- X.RE
- X.PP
- XThe \fIsoftware cut\fR code should not be issued to the hardware, but
- Xis used by local spooling software to indicate places where it is
- Xlegal for the spooler to break output between pages.
- XThis code should be followed by an \fIinitialize\fR code.
- X.PP
- XA complete C/A/T file should begin with an \fIinitialize\fR code followed
- Xby an \fIescape\fR-16 code,
- Xand should end with 14 inches of trailer and a \fIstop\fR code.
- X.SH HISTORY
- XThe \fIsoftware cut\fR code is a local invention.
- XThis manual page written at U of T by Henry Spencer.
- X.SH BUGS
- XThe documentation and the hardware disagree on the initial tilt setting;
- Xthe above describes the hardware.
- X.PP
- XIt's not the fastest or most modern typesetter.
- /
- echo 'x - lroff.1'
- sed 's/^X//' > lroff.1 << '/'
- X.TH LCAT 5 local
- X.SH NAME
- Xlroff,lcat \- Laserjet Troff Simulator
- X.SH SYNOPSIS
- X.I lroff
- X[-h | -H | -d] [-D] [-ffontname] [-t] [troff arguments]
- X.SH DESCRIPTION
- X.P
- X.I Lroff
- Xis effectively "troff" for output on HP Laserjets.
- XIt works by prepending some Laserjet-specific troff commands to a file,
- Xrunning it along with troff arguments through troff, invoking the
- Xtroff WANG C/A/T code to HP Laserjet converter filter "lcat", and
- Xsends the output to your HP laserjet printer.
- X.P
- X.I Lroff
- Xsets the default point size to 12, so as to use the Laserjet native fonts
- Xwherever possible.
- XHowever, "lcat" does support rasterized fonts.
- XA Macintosh to Berkeley vfont format converter is available.
- XThe filter also is capable of using the Berkeley /usr/lib/vfonts raster fonts
- Xfiles.
- X[This is untested, because our Pyramid does not have vfonts.
- XYou may encounter scaling problems, but the characters should be printed
- Xproperly]
- X.P
- XAn adapter to allow the use of MM macros is provided.
- XTo use MM macros,
- Xinstead of "nroff -mm", use "lroff -mlmm"
- X.P
- XOptions:
- X.IP -d
- XDo not use raster fonts.
- X.IP -h
- XUse raster fonts, only in the sizes available.
- XThese will be printed at 75DPI.
- X.IP -H
- XUse raster fonts.
- XIf a font is available in twice or four times the size, use it at 150 or
- X300 DPI respectively.
- X.IP -ffont
- XUse
- X.I font
- Xas the font name.
- XThe default is "newyork".
- XThis will be changed to "times" sometime in the future.
- X.IP -D
- XTurn on debug mode, a file called "diagnostics" will be created
- Xin the current directory containing debug output from lcat.
- X.IP -t
- XTurn on a higher level of debug mode.
- XOutput of "troff" is placed in a file called "troffout".
- XOutput of "lcat" is placed in a file called "lroffout".
- XAlso turns on -D option.
- X.I Lcat
- Xtakes the same parameters (except for -t), and assumes "troff -t"
- Xoutput as standard input, and produces Laserjet escape sequences
- Xon standard output.
- X.SH "Add Your own Logo"
- X.P
- X.I Lcat
- Xsupports the drawing of a symbol to replace the troff
- X"Bell System" character ("\e(bs").
- XThis takes place no matter what the point size is, and no scaling
- Xis done.
- XWhen compiling "lcat", it includes a file called "bell.glyph.h".
- X"bell.glyph.h" is constructed by taking the file "bell.glyph"
- Xand running a utility called "compfont" on it.
- X"bell.glyph" can be constructed by using VI to draw out your logo.
- XRunning "make" will compile this logo into "bell.glyph.h", and
- Xinclude it into lcat.c
- XIt is always printed at 300DPI.
- XAn example logo is distributed with this software.
- X.SH BUGS
- X.P
- XThere is no italic or bold support on raster'd fonts (yet).
- X.P
- Xlcat does not know how to scale raster fonts to sizes other than those
- Xavailable (yet).
- XIt will use native fonts where necessary.
- X.P
- XEnd-of-page detection is kludgey.
- XSetting page length to other than the default 11 inches
- Xwill cause page breaks in the wrong place.
- XFurther, most of the troff macro packages insert "cut-marks" marking
- Xwhere the page should be chopped (because the WANG C/A/T is a "roll-paper"
- Xdevice).
- XLroff attempts to disable this feature, but this will not work on
- Xmacro packages other than MM, and even some differing versions of MM.
- X.P
- XThe output of lcat is *HUGE*, because it individually places each
- Xcharacter using Laserjet escape codes.
- XEven the rasterized characters.
- XLots of motion optimization is done, but it could do much more.
- XSet the Laserjet baud rate as high as you reasonably can.
- XNote: the Laserjet device must be set to 8 bit.
- XOur System V laserjet lp filters are using ^S/^Q.
- X.P
- XNope, "lroff" isn't slow, "troff" is.
- X.P
- XA "normal" HP Laserjet is only capable of printing about 1/4 page or
- Xless of raster at 75DPI.
- XParticularly if you are using a 300 DPI glyph (as we are) this doesn't
- Xleave you much room.
- XA HP Laserjet "Plus" should be able to do the entire page at 75DPI
- Xor 150DPI with room to spare.
- XIf you overrun the Laserjet's buffer, you will get a "21" error code.
- XHit "cont" button to continue, but you will have lost everything on the
- Xcurrent page after the overflow.
- X.P
- XWidths are set "CW" by Lroff for the native fonts.
- XHowever, the rasterized fonts won't be perfect with this.
- XMore work needs to be done to get proper width tables in for the raster
- Xfonts and the built-in Laserjet font.
- X.P
- XItalics and bold will work when the built-in laserjet font, provided that
- Xyou have HP font cartridge 92286A installed.
- X.P
- XDoes not support downloadable fonts.
- XIt will when we get our Plus.
- X.P
- XThe MAC fonts are designed towards 80DPI, but lcat assumes them to be
- X75DPI, so the fonts will be slightly bigger than you'd expect.
- X.SH FILES
- X$(somedir)/<name>.<size>
- Xcontains the raster font file (supposedly compatible with Berkeley
- X"vfonts") for font name "name", and point size "size".
- X.P
- X/usr/lib/tmac/tmac.lmm contains some definitions that must be made
- Xbefore the MM macros are read.
- X.SH "SEE ALSO"
- Xmacvfont(1L), lp (System V), lpr (Berkeley)
- /
- echo 'x - lrofftest.m'
- sed 's/^X//' > lrofftest.m << '/'
- X.P
- XThis line should be exactly 5 inches long:
- X.DS
- X\l'5i\&\(ru'
- X.DE
- X.P
- XThis is a test of the paragraphs and other things of lroff/lmm how do
- Xyou like it?
- XThis is some more of the test.
- XBullet list:
- X.BL
- X.LI
- X<- that was an Oreo cookie.
- X.LI
- XThis is 2
- X.LI
- XThis is 3
- X.LE
- X.P
- XHello there.
- X.P
- X" is a compound character, since nroff doesn't like double quotes too much.
- X"X" should look reasonable.
- XMore 'test` `test'\*F
- X.FS
- XThis here's a footnote - slightly smaller pitch.
- X.FE
- XThis is more of the paragraph.
- X.P
- XThis is normal\f3Bold\fP\f2italic\fPnormal.
- X.bd 2 3
- X\f2This should be bold italics.\fP
- X.DS 0 F
- X.TS
- Xexpand doublebox allbox;
- Xl l l.
- XFirst field second third
- XXXXXX XXXXX XXXXX
- Xtbl is working rather nicely.
- XHowever, the vertical T{
- Xlines may not butt perfectly.
- XThis is a known problem, because troff seems to
- Xuse slightly different vertical spacing each time.
- XThis will be fixed eventually
- XT}
- X.TE
- X.DE
- X.P
- X.S 36 38
- X\(bs
- X.S P
- X.P
- X.S 24 26
- Xthat was the logo at 300 DPI.
- X.S P
- X.P
- XThe Logo will be printed whether or not you have raster fonts.
- XThe original logo is a stylized "cX".
- XIf you don't have the vfonts installed, the rest of the line will be
- Xnormal characters with big spacing.
- XIf the fonts are installed, you will see 75DPI big print.
- /
- echo 'x - tmac.lmm'
- sed 's/^X//' > tmac.lmm << '/'
- X.\" Default point size
- X.nr S 12
- X.\" Default page width (though this is not critical)
- X.nr W 6i
- X.so /usr/lib/tmac/tmac.m
- X.\" I think that this is a nicer bullet than MM uses.
- X.ds BU \(bu
- /
- echo 'Part 01 of pack.out complete.'
- exit
-
-
-
