1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
/* For FigPlotter objects, we place all user-defined colors [``color
pseudo-objects''], which must appear first in the .fig file, in a header
for the page.
Note that a Fig file may contain no more than a single page of graphics.
Later pages are simply deallocated by closepl(), even though we go to
som trouble to prepare them. */
#include "sys-defines.h"
#include "extern.h"
bool
#ifdef _HAVE_PROTOS
_f_end_page (S___(Plotter *_plotter))
#else
_f_end_page (S___(_plotter))
S___(Plotter *_plotter;)
#endif
{
int i;
const char *units;
plOutbuf *fig_header;
/* prepare Fig header, write it to a plOutbuf */
fig_header = _new_outbuf ();
units = (_plotter->data->page_data->metric ? "Metric" : "Inches");
sprintf (fig_header->point,
"#FIG 3.2\n%s\n%s\n%s\n%s\n%.2f\n%s\n%d\n%d %d\n",
"Portrait", /* portrait mode, not landscape */
"Flush Left", /* justification */
units, /* "Metric" or "Inches" */
_plotter->data->page_data->fig_name, /* paper size */
100.00, /* export and print magnification */
"Single", /* "Single" or "Multiple" pages */
-2, /* color number for transparent color */
IROUND(FIG_UNITS_PER_INCH), /* Fig units per inch */
2 /* origin in lower left corner (ignored) */
);
_update_buffer (fig_header);
/* output user-defined colors if any */
for (i = 0; i < _plotter->fig_num_usercolors; i++)
{
sprintf (fig_header->point,
"#COLOR\n%d %d #%06lx\n",
0, /* color pseudo-object */
FIG_USER_COLOR_MIN + i, /* color num, in xfig's range */
_plotter->fig_usercolors[i] /* 24-bit RGB value */
);
_update_buffer (fig_header);
}
/* place header in the plOutbuf for the page */
_plotter->data->page->header = fig_header;
return true;
}
|
