Annotation of OpenXM_contrib/gnuplot/term/dxf.trm, Revision 1.1
1.1 ! maekawa 1: /*
! 2: * $Id: dxf.trm,v 1.15 1998/04/14 00:17:37 drd Exp $
! 3: *
! 4: */
! 5:
! 6: /* GNUPLOT - dxf.trm */
! 7:
! 8: /*[
! 9: * Copyright 1991 - 1993, 1998
! 10: *
! 11: * Permission to use, copy, and distribute this software and its
! 12: * documentation for any purpose with or without fee is hereby granted,
! 13: * provided that the above copyright notice appear in all copies and
! 14: * that both that copyright notice and this permission notice appear
! 15: * in supporting documentation.
! 16: *
! 17: * Permission to modify the software is granted, but not the right to
! 18: * distribute the complete modified source code. Modifications are to
! 19: * be distributed as patches to the released version. Permission to
! 20: * distribute binaries produced by compiling modified sources is granted,
! 21: * provided you
! 22: * 1. distribute the corresponding source modifications from the
! 23: * released version in the form of a patch file along with the binaries,
! 24: * 2. add special version identification to distinguish your version
! 25: * in addition to the base release version number,
! 26: * 3. provide your name and address as the primary contact for the
! 27: * support of your modified version, and
! 28: * 4. retain our contact information in regard to use of the base
! 29: * software.
! 30: * Permission to distribute the released version of the source code along
! 31: * with corresponding source modifications in the form of a patch file is
! 32: * granted with same provisions 2 through 4 for binary distributions.
! 33: *
! 34: * This software is provided "as is" without express or implied warranty
! 35: * to the extent permitted by applicable law.
! 36: ]*/
! 37:
! 38: /*
! 39: * This file is included by ../term.c.
! 40: *
! 41: * This terminal driver supports:
! 42: * AutoCad (Release 10.x) dxf file format (import with AutoCad dxfin command)
! 43: *
! 44: *
! 45: * AUTHOR
! 46: * Florian Hiss (fhis1231@w204zrz.zrz.tu-berlin.de)
! 47: *
! 48: * send your comments or suggestions to (info-gnuplot@dartmouth.edu).
! 49: */
! 50:
! 51: /*
! 52: * adapted to the new terminal layout by Stefan Bodewig (Dec. 1995)
! 53: */
! 54:
! 55: #include "driver.h"
! 56:
! 57: #ifdef TERM_REGISTER
! 58: register_term(dxf)
! 59: #endif
! 60:
! 61: #ifdef TERM_PROTO
! 62: TERM_PUBLIC void DXF_init __PROTO((void));
! 63: TERM_PUBLIC void DXF_graphics __PROTO((void));
! 64: TERM_PUBLIC void DXF_text __PROTO((void));
! 65: TERM_PUBLIC void DXF_linetype __PROTO((int linetype));
! 66: TERM_PUBLIC void DXF_move __PROTO((unsigned int x, unsigned int y));
! 67: TERM_PUBLIC void DXF_vector __PROTO((unsigned int ux, unsigned int uy));
! 68: TERM_PUBLIC void DXF_put_text __PROTO((unsigned int x, unsigned int y,
! 69: char str[]));
! 70: TERM_PUBLIC int DXF_text_angle __PROTO((int ang));
! 71: TERM_PUBLIC int DXF_justify_text __PROTO((enum JUSTIFY mode));
! 72: TERM_PUBLIC void DXF_reset __PROTO((void));
! 73:
! 74: #define DXF_XMAX (120.0 * DXF_UNIT)
! 75: #define DXF_YMAX (80.0 * DXF_UNIT)
! 76: #define DXF_HTIC (0.01 * DXF_XMAX) /* 1.0 percent */
! 77: #define DXF_VTIC (0.01 * DXF_YMAX) /* 1.0 percent */
! 78: #define DXF_HCHAR (0.014 * DXF_XMAX) /* 1.4 percent */
! 79: #define DXF_VCHAR (0.026 * DXF_YMAX) /* 2.6 percent */
! 80: #endif /* TERM_PROTO */
! 81:
! 82: #ifndef TERM_PROTO_ONLY
! 83: #ifdef TERM_BODY
! 84:
! 85: #define DXF_UNIT 60.0
! 86: #define LINEWIDTH 0.0351 /* default line width is 1 pt */
! 87:
! 88: /* 120 (autocad units) wide by 80 (autocad units) high (default)
! 89: * use the GNUPLOT 'set size' command to change the defaults */
! 90: /* actual text height */
! 91: #define DXF_TEXTHEIGHT (0.7 * DXF_VCHAR)
! 92: /* actual text width, only a guess, we don't know the width of
! 93: * a character of given height of the AutoCad STANDARD text font,
! 94: * so change it if you like */
! 95: #define DXF_TEXTWIDTH (0.7 * DXF_HCHAR)
! 96: /* number of line types we support. see below */
! 97: #define DXF_LINE_TYPES 7
! 98: /* number of layers used for the drawing. see below */
! 99: #define MAX_LAYER 7
! 100: /* line type scaling */
! 101: #define LT_SCALE 1
! 102:
! 103: static unsigned int DXF_posx;
! 104: static unsigned int DXF_posy;
! 105: /* linetype is mapped to a layer. see below. */
! 106: static unsigned int dxf_linetype;
! 107: enum JUSTIFY dxf_justify = LEFT;
! 108: static float dxf_angle = 0.0; /* either 0 (horizontal) or 90.0 (vertical) */
! 109:
! 110: /* text style used in the entire drawing */
! 111: static char *text_style = "STANDARD";
! 112: /* text always resides on layer 0 */
! 113: #define TEXT_LAYER 0
! 114: /* each linetype resides on its own layer. each layer has its own color.
! 115: * this avoids difficulties that AutoCad has with proper scaling of
! 116: * the linetypes.
! 117: * change the colors according to your needs */
! 118: static char *layer_name[] ={ "0", "1", "2", "3", "4", "5", "6" };
! 119: /* the colours are white, red, yellow, green, cyan, blue, magenta.
! 120: * change them according to your needs.
! 121: * when using a black and white plotting device the colours map to different
! 122: * line thicknesses. see description of AutoCad print / plot command */
! 123: static char *layer_colour[] = { "7", "1", "2", "3", "4", "5", "6" };
! 124: /* support line types AutoCad has to offer by default. */
! 125: static char *layer_lines[] = { "CONTINUOUS", "DASHED", "HIDDEN", "CENTER",
! 126: "PHANTOM", "DOT", "DASHDOT" };
! 127:
! 128: static TBOOLEAN vector_was_last = FALSE;
! 129:
! 130: TERM_PUBLIC void DXF_init()
! 131: {
! 132: DXF_posx = DXF_posy = 0;
! 133: dxf_linetype = 0;
! 134: dxf_angle = 0.0;
! 135: vector_was_last = FALSE;
! 136: }
! 137:
! 138: TERM_PUBLIC void DXF_graphics()
! 139: {
! 140: register struct termentry *t = term;
! 141: int i;
! 142: static char GPFAR dxfi1[] = "\
! 143: 999\n\
! 144: %% GNUPLOT: dxf file for AutoCad\n\
! 145: 0\nSECTION\n 2\nHEADER\n\
! 146: 9\n$EXTMIN\n\
! 147: 10\n0.000\n 20\n0.000\n\
! 148: 9\n$EXTMAX\n\
! 149: 10\n%-6.3f\n 20\n%-6.3f\n\
! 150: 9\n$LIMMIN\n\
! 151: 10\n0.000\n 20\n0.000\n\
! 152: 9\n$LIMMAX\n\
! 153: 10\n%-6.3f\n 20\n%-6.3f\n\
! 154: 9\n$TEXTSTYLE\n 7\n%s\n\
! 155: 9\n$TEXTSIZE\n 40\n%-6.3f\n\
! 156: 9\n$PLINEWID\n 40\n%-6.4f\n\
! 157: 9\n$LTSCALE\n 40\n%-6.3f\n\
! 158: 9\n$COORDS\n 70\n 1\n\
! 159: 9\n$CELTYPE\n 6\nBYLAYER\n\
! 160: 9\n$CLAYER\n 8\n0\n\
! 161: 9\n$CECOLOR\n 62\n %s\n\
! 162: 9\n$MENU\n 1\nacad\n\
! 163: 0\nENDSEC\n\
! 164: 0\nSECTION\n 2\nTABLES\n";
! 165: static char GPFAR dxfi2[] = "\
! 166: 0\nTABLE\n 2\nLTYPE\n 70\n %d\n\
! 167: 0\nLTYPE\n 2\nCONTINUOUS\n 70\n 64\n\
! 168: 3\nSolid line\n 72\n 65\n 73\n 0\n 40\n0.0\n\
! 169: 0\nLTYPE\n 2\nDASHED\n 70\n 64\n\
! 170: 3\n__ __ __ __ __ __ __ __ __ __ __ __ __ __ __\n\
! 171: 72\n 65\n 73\n 2\n 40\n0.75\n 49\n0.5\n 49\n-0.25\n\
! 172: 0\nLTYPE\n 2\nHIDDEN\n 70\n 64\n\
! 173: 3\n_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _\n\
! 174: 72\n 65\n 73\n 2\n 40\n0.375\n 49\n0.25\n 49\n-0.125\n\
! 175: 0\nLTYPE\n 2\nCENTER\n 70\n 64\n\
! 176: 3\n____ _ ____ _ ____ _ ____ _ ____ _ ____ _ ____\n\
! 177: 72\n 65\n 73\n 4\n 40\n2.0\n 49\n1.25\n 49\n-0.25\n\
! 178: 49\n0.25\n 49\n-0.25\n\
! 179: 0\nLTYPE\n 2\nPHANTOM\n 70\n 64\n\
! 180: 3\n_____ _ _ _____ _ _ _____ _ _ _____ _ _ ____\n\
! 181: 72\n 65\n 73\n 6\n 40\n2.5\n 49\n1.25\n\
! 182: 49\n-0.25\n 49\n0.25\n 49\n-0.25\n 49\n0.25\n 49\n-0.25\n\
! 183: 0\nLTYPE\n 2\nDOT\n 70\n 64\n\
! 184: 3\n...............................................\n\
! 185: 72\n 65\n 73\n 2\n 40\n0.25\n 49\n0.0\n 49\n-0.25\n\
! 186: 0\nLTYPE\n 2\nDASHDOT\n 70\n 64\n\
! 187: 3\n__ . __ . __ . __ . __ . __ . __ . __ . __ . __\n\
! 188: 72\n 65\n 73\n 4\n 40\n1.0\n 49\n0.5\n 49\n-0.25\n\
! 189: 49\n0.0\n 49\n-0.25\n\
! 190: 0\nENDTAB\n";
! 191:
! 192: fprintf(gpoutfile, dxfi1,
! 193: t->xmax / DXF_UNIT, t->ymax / DXF_UNIT,
! 194: t->xmax / DXF_UNIT, t->ymax / DXF_UNIT,
! 195: text_style,
! 196: DXF_TEXTHEIGHT / DXF_UNIT,
! 197: LINEWIDTH,
! 198: (double) LT_SCALE,
! 199: layer_colour[0]);
! 200: /* the linetype table */
! 201: fprintf(gpoutfile, dxfi2, DXF_LINE_TYPES);
! 202: /* the layer table */
! 203: fprintf(gpoutfile, " 0\nTABLE\n 2\nLAYER\n 70\n %-d\n", MAX_LAYER);
! 204: for (i = 1; i <= MAX_LAYER; i++)
! 205: fprintf(gpoutfile, " 0\nLAYER\n 2\n%s\n 70\n 64\n62\n %s\n 6\n%s\n", layer_name[i - 1], layer_colour[i - 1], layer_lines[i - 1]);
! 206:
! 207: /* no blocks for insertion */
! 208: /* start the entity section */
! 209: fputs(" 0\nENDTAB\n0\nENDSEC\n\
! 210: 0\nSECTION\n 2\nBLOCKS\n 0\nENDSEC\n\
! 211: 0\nSECTION\n\
! 212: 2\nENTITIES\n",
! 213: gpoutfile);
! 214: }
! 215:
! 216: TERM_PUBLIC void DXF_text()
! 217: {
! 218: if (vector_was_last)
! 219: fputs(" 0\nSEQEND\n", gpoutfile);
! 220: fputs(" 0\nENDSEC\n 0\nEOF\n", gpoutfile);
! 221: }
! 222:
! 223: TERM_PUBLIC void DXF_linetype(linetype)
! 224: int linetype;
! 225: {
! 226: linetype = ABS(linetype);
! 227: linetype = linetype % DXF_LINE_TYPES;
! 228: dxf_linetype = linetype;
! 229: }
! 230:
! 231: TERM_PUBLIC void DXF_move(x, y)
! 232: unsigned int x, y;
! 233: {
! 234: DXF_posx = x;
! 235: DXF_posy = y;
! 236: if (vector_was_last)
! 237: fputs(" 0\nSEQEND\n", gpoutfile);
! 238: vector_was_last = FALSE;
! 239: fprintf(gpoutfile, "\
! 240: 0\nPOLYLINE\n 8\n%s\n 66\n 1\n\
! 241: 6\n%s\n\
! 242: 0\nVERTEX\n 8\n%s\n\
! 243: 6\n%s\n\
! 244: 10\n%-6.3f\n 20\n%-6.3f\n 30\n0.000\n",
! 245: layer_name[dxf_linetype],
! 246: layer_lines[dxf_linetype],
! 247: layer_name[dxf_linetype],
! 248: layer_lines[dxf_linetype],
! 249: DXF_posx / DXF_UNIT, DXF_posy / DXF_UNIT);
! 250:
! 251: }
! 252:
! 253: TERM_PUBLIC void DXF_vector(ux, uy)
! 254: unsigned int ux, uy;
! 255: {
! 256: DXF_posx = ux;
! 257: DXF_posy = uy;
! 258: vector_was_last = TRUE;
! 259:
! 260: fprintf(gpoutfile, "\
! 261: 0\nVERTEX\n 8\n%s\n\
! 262: 6\n%s\n\
! 263: 10\n%-6.3f\n 20\n%-6.3f\n 30\n0.000\n",
! 264: layer_name[dxf_linetype],
! 265: layer_lines[dxf_linetype],
! 266: DXF_posx / DXF_UNIT, DXF_posy / DXF_UNIT);
! 267: }
! 268:
! 269: TERM_PUBLIC void DXF_put_text(x, y, str)
! 270: unsigned int x, y;
! 271: char str[];
! 272: {
! 273: int stl;
! 274: float xleftpos, yleftpos, xrightpos, yrightpos;
! 275:
! 276: /* shut up gcc warnings - SB */
! 277: xleftpos = yleftpos = xrightpos = yrightpos = 1.0; /* dummy */
! 278: /* ignore empty strings */
! 279: if (str[0] == NUL)
! 280: return;
! 281:
! 282: stl = 0;
! 283: while (str[stl] != NUL)
! 284: ++stl; /* get string length */
! 285:
! 286: if (vector_was_last)
! 287: fputs(" 0\nSEQEND\n", gpoutfile);
! 288: vector_was_last = FALSE;
! 289: fprintf(gpoutfile, " 0\nTEXT\n 8\n%s\n", layer_name[TEXT_LAYER]);
! 290: if (dxf_angle != 90.0) {
! 291: switch (dxf_justify) {
! 292: case LEFT:
! 293: xleftpos = (float) x;
! 294: yleftpos = (float) (y - DXF_VCHAR / 4.0);
! 295: xrightpos = (float) (x + stl * DXF_TEXTWIDTH);
! 296: yrightpos = yleftpos;
! 297: break;
! 298: case RIGHT:
! 299: xleftpos = (float) (x - stl * DXF_TEXTWIDTH);
! 300: yleftpos = (float) (y - DXF_VCHAR / 4.0);
! 301: xrightpos = (float) x;
! 302: yrightpos = yleftpos;
! 303: break;
! 304: case CENTRE:
! 305: xleftpos = (float) (x - stl * DXF_TEXTWIDTH / 2.0);
! 306: yleftpos = (float) (y - DXF_VCHAR / 4.0);
! 307: xrightpos = (float) x; /* center point */
! 308: yrightpos = yleftpos;
! 309: break;
! 310: }
! 311: } else {
! 312: switch (dxf_justify) {
! 313: case LEFT:
! 314: xleftpos = (float) (x + DXF_VCHAR / 4.0);
! 315: yleftpos = (float) y;
! 316: xrightpos = xleftpos;
! 317: yrightpos = (float) (y + stl * DXF_TEXTWIDTH);
! 318: break;
! 319: case RIGHT:
! 320: xleftpos = (float) (x + DXF_VCHAR / 4.0);
! 321: yleftpos = (float) (y - stl * DXF_HCHAR);
! 322: xrightpos = xleftpos;
! 323: yrightpos = (float) y;
! 324: break;
! 325: case CENTRE:
! 326: xleftpos = (float) (x + DXF_VCHAR / 4.0);
! 327: yleftpos = (float) (y - stl * DXF_TEXTWIDTH / 2.0);
! 328: xrightpos = xleftpos;
! 329: yrightpos = (float) y; /* center point */
! 330: break;
! 331: }
! 332: }
! 333:
! 334: fprintf(gpoutfile, "\
! 335: 10\n%-6.3f\n 20\n%-6.3f\n 30\n0.000\n\
! 336: 40\n%-6.3f\n 1\n%s\n 50\n%-6.3f\n\
! 337: 7\n%s\n",
! 338: xleftpos / DXF_UNIT, yleftpos / DXF_UNIT,
! 339: DXF_TEXTHEIGHT / DXF_UNIT, str, dxf_angle,
! 340: text_style);
! 341:
! 342: if (dxf_justify != LEFT) {
! 343: fprintf(gpoutfile, " 72\n%d\n\
! 344: 11\n%-6.3f\n 21\n%-6.3f\n 31\n0.000\n",
! 345: dxf_justify,
! 346: xrightpos / DXF_UNIT, yrightpos / DXF_UNIT);
! 347: }
! 348: }
! 349:
! 350: TERM_PUBLIC int DXF_text_angle(ang)
! 351: int ang;
! 352: {
! 353: dxf_angle = 0.0;
! 354: if (ang == 1)
! 355: dxf_angle = 90.0;
! 356: return (TRUE);
! 357: }
! 358:
! 359: TERM_PUBLIC int DXF_justify_text(mode)
! 360: enum JUSTIFY mode;
! 361: {
! 362: dxf_justify = mode;
! 363: return (TRUE);
! 364: }
! 365:
! 366: TERM_PUBLIC void DXF_reset()
! 367: {
! 368: DXF_posx = DXF_posy = 0;
! 369: }
! 370:
! 371: #endif /* TERM_BODY */
! 372:
! 373: #ifdef TERM_TABLE
! 374: TERM_TABLE_START(dxf_driver)
! 375: "dxf", "dxf-file for AutoCad (default size 120x80)",
! 376: DXF_XMAX, DXF_YMAX, DXF_VCHAR, DXF_HCHAR,
! 377: DXF_VTIC, DXF_HTIC, options_null, DXF_init, DXF_reset,
! 378: DXF_text, null_scale, DXF_graphics, DXF_move, DXF_vector,
! 379: DXF_linetype, DXF_put_text, DXF_text_angle,
! 380: DXF_justify_text, do_point, do_arrow, set_font_null
! 381: TERM_TABLE_END(dxf_driver)
! 382:
! 383: #undef LAST_TERM
! 384: #define LAST_TERM dxf_driver
! 385:
! 386: #endif /* TERM_TABLE */
! 387: #endif /* TERM_PROTO_ONLY */
! 388:
! 389: #ifdef TERM_HELP
! 390: START_HELP(dxf)
! 391: "1 dxf",
! 392: "?commands set terminal dxf",
! 393: "?set terminal dxf",
! 394: "?set term dxf",
! 395: "?terminal dxf",
! 396: "?term dxf",
! 397: "?dxf",
! 398: " The `dxf` terminal driver creates pictures that can be imported into AutoCad",
! 399: " (Release 10.x). It has no options of its own, but some features of its plots",
! 400: " may be modified by other means. The default size is 120x80 AutoCad units,",
! 401: " which can be changed by `set size`. `dxf` uses seven colors (white, red,",
! 402: " yellow, green, cyan, blue and magenta), which can be changed only by",
! 403: " modifying the source file. If a black-and-white plotting device is used, the",
! 404: " colors are mapped to differing line thicknesses. See the description of the",
! 405: " AutoCad print/plot command."
! 406: END_HELP(dxf)
! 407: #endif /* TERM_HELP */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to dxf.trm CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM_contrib / gnuplot / term