1*48306Sbostic /*-
2*48306Sbostic  * %sccs.include.proprietary.c%
3*48306Sbostic  *
4*48306Sbostic  *	@(#)tabx-ecs12.c	4.2 (Berkeley) 04/18/91
5*48306Sbostic  */
6*48306Sbostic 
714373Ssam #define INCH 240
814373Ssam /*
914373Ssam  * DIABLO 630 12 pitch ECS
1014373Ssam  * nroff driving table (extended character set)
1114373Ssam  * ECS Elite 12 Scientific
1214373Ssam  * by Bill Tuthill, ucbvax!g:tut, 15dec82
1314373Ssam  */
1414373Ssam struct {
1514373Ssam 	int bset;
1614373Ssam 	int breset;
1714373Ssam 	int Hor;
1814373Ssam 	int Vert;
1914373Ssam 	int Newline;
2014373Ssam 	int Char;
2114373Ssam 	int Em;
2214373Ssam 	int Halfline;
2314373Ssam 	int Adj;
2414373Ssam 	char *twinit;
2514373Ssam 	char *twrest;
2614373Ssam 	char *twnl;
2714373Ssam 	char *hlr;
2814373Ssam 	char *hlf;
2914373Ssam 	char *flr;
3014373Ssam 	char *bdon;
3114373Ssam 	char *bdoff;
3214373Ssam 	char *ploton;
3314373Ssam 	char *plotoff;
3414373Ssam 	char *up;
3514373Ssam 	char *down;
3614373Ssam 	char *right;
3714373Ssam 	char *left;
3814373Ssam 	char *codetab[256-32];
3914373Ssam 	int zzz;
4014373Ssam 	} t = {
4114373Ssam /*bset*/	0,
4214373Ssam /*breset*/	0177420,
4314373Ssam /*Hor*/		INCH/60,
4414373Ssam /*Vert*/	INCH/48,
4514373Ssam /*Newline*/	INCH/6,
4614373Ssam /*Char*/	INCH/12,
4714373Ssam /*Em*/		INCH/12,
4814373Ssam /*Halfline*/	INCH/12,
4914373Ssam /*Adj*/		INCH/12,
5014373Ssam /*twinit*/	"\0334",
5114373Ssam /*twrest*/	"\0334",
5214373Ssam /*twnl*/	"\r\n",
5314373Ssam /*hlr*/		"\033D",
5414373Ssam /*hlf*/		"\033U",
5514373Ssam /*flr*/		"\033\n",
5614373Ssam /*bdon*/	"\033W",
5714373Ssam /*bdoff*/	"\033&",
5814373Ssam /*ploton*/	"\0333",
5914373Ssam /*plotoff*/	"\0334",
6014373Ssam /*up*/		"\033\n",
6114373Ssam /*down*/	"\n",
6214373Ssam /*right*/	" ",
6314373Ssam /*left*/	"\b",
6414373Ssam /*codetab*/
6514373Ssam #include "code.x-ecs"
66