blob: 63802ab54d0656f3a34363a07224a2b781d8f170 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
%%%%
%%%% This file belongs to the MFTOEPS package.
%%%%
% ---
% RECTAN.MF---a trivial example
% ---
input mftoeps;
EPS_mode_setup;
beginchar(48, % ASCII code (unimportant)
2cm#, % width
1cm#, % height
0cm# % depth
);
set_BB 0,-d,w,h; % coordinates of the corners of the bounding box
write_preamble "rectan";
fill_C unitsquare xscaled w yscaled h;
write_postamble;
endchar;
end.
|