%%%% %%%% This file belongs to the MFTOEPS package. %%%% % --- % SAMPLE2B.MF % --- input polygons; input mftoeps; eps_mode_setup; beginchar(0,16mm#,16mm#,0); path P[ ]; % ``room'' for two polygons % preparing: P[1]:=regular_polygon(7) scaled w shifted (.5w,.5h); P[2]:=flex_polygon(7,-180/7,180/7) scaled w shifted (.5w,.5h); % exporting: find_BB P[1], P[2]; write_preamble jobname; fix_fill_cmyk 0,0,0,.25; % 25 percent of black fix_line_width 1pt; fill_C P1; draw_C P2; write_postamble; endchar; end.