MetaPost简明教程(英文)注释版.pdf

MetaPost: A Very Brief Tutorial

osurs@bluewin.ch Urs Oswald http://www.ursoswald.ch

October 3, 2002

Contents

1 A2B 2

2 LineSegments 3

3 Circles 4

4 CircleParametrization 5

5 BezierCurves 7

12 Mediation 19

13 Precedence 21

14 Directions 23

15 Times 25

16 Colors 27

17 Slanted 28

18 Scaled 30

19 xScaled 33

20 zScaled 35

21 Transform 38

1

1 A2B

beginfig(1)

draw (100, 100)--(350, 275);

endfig;

end

2

2 LineSegments

u:=25; % 25 = 25bp = 25 PostScript points = 25/72 in

wi:=10; % width in units u

he:=7; % height in units u

hoehe:=he*u; % height

for j=0 upto wi:

draw (j*u, 0)--(j*u, hoehe) withcolor .7white;

endfor

% --- End Grid ---

draw (0, 0)--(breite, 0)--(breite, hoehe)--(0, hoehe)--cycle;

% --- Line Segment ---

draw (.7u, 4u)--(5u, 6.5u);

% --- Arrow ---

drawarrow (6.4u, 6u)--(9.5u, 4.8u);

pickup pencircle scaled 2; % default:

fill (7.7u, .3u)--(9.6u, 1.5u)--(9.3u, 3.6u)--(7.2u, 3.8u)

--(6.4u, 2.5u)--(7.3u, 1.9u)--cycle withcolor .9white;

pickup pencircle scaled .5;

draw (7.7u, .3u)--(9.6u, 1.5u)--(9.3u, 3.6u)--(7.2u, 3.8u)

endfig;

end

3

3 Circles

%

% /home/osurs/latex/metapost/TutorialAugsburg/tutorial/Circles/Circles.mp

% 18.09.02

beginfig(1)

% --- Grid ---

for i=0 upto he:

draw (0, i*u)--(breite, i*u) withcolor .7white;

endfor

for j=0 upto wi:

draw (j*u, 0)--(j*u, hoehe) withcolor .7white;

endfor

% --- End Grid ---

draw (0, 0)--(breite, 0)--(breite, hoehe)--(0, hoehe)--cycle;

draw fullcircle xscaled 1.2u yscaled 3u shifted (8u, 5.2u);

fill fullcircle xscaled 3u yscaled 1.2u rotated 45 shifted (8u, 2.2u) withcolor .9white;

draw fullcircle xscaled 3u yscaled 1.2u rotated 45 shifted (8u, 2.2u);

draw halfcircle scaled 2u shifted (1.5u, 5u);

pickup pencircle scaled 1.5;

draw halfcircle scaled 2u rotated 90 shifted (1.5u, 4u) withcolor red;

draw halfcircle scaled 2u rotated -90 shifted (1.5u, 3u) withcolor blue;

endfig;

end

4

4 CircleParametrization

t = 0

t = 1 - p oint 1 of p1

t = 2

t = 3

t = 4

t = 5

t = 6

p1

wi:=10; % width in units u

he:=7; % height in units u

hoehe:=he*u; % height

def draw_point(expr P, colInt, colPer) =

fill fullcircle scaled 1.5mm shifted P withcolor colInt;

draw fullcircle scaled 1.5mm shifted P withcolor colPer;

enddef;

beginfig(1)

% --- Draw frame ---

draw (0, 0)--(breite, 0)--(breite, hoehe)--(0, hoehe)--cycle;

pickup pencircle scaled 1.5;

elseif t=2:

elseif (t=3) or (t=5):

elseif t=4:

else:

fi

endfor

label("p0", center p0 + (0, .25u));

label("length(p0)="&decimal length(p0), center p0 - (0, .25u));

5