متاپست (MetaPost)
0 likes471 views
The document provides an extensive overview of the metapost typesetting system, detailing dimensions and scaling along with various commands for drawing and defining shapes. It includes sample code snippets demonstrating the use of variables, paths, loops, and transformations in graphic generation. The content is heavily oriented towards practical applications, such as drawing curves and labeling, while also covering mathematical operations and conditions.
![SOLVING
beginfig(13);
z1=-z2=(.2in,0); x3=-x6=.3in;
x3+y3=x6+y6=1.1in;
z4=1/3[z3,z6]; z5=2/3[z3,z6];
z20=whatever[z1,z3]=whatever[z2,z4];
z30=whatever[z1,z4]=whatever[z2,z5];
z40=whatever[z1,z5]=whatever[z2,z6];
draw z1--z20--z2--z30--z1--z40--z2;
pickup pencircle scaled 1pt;
draw z1--z2; draw z3--z6;
endfig;](https://image.slidesharecdn.com/hoomanmesgarimetapost-170104091131/85/MetaPost-16-320.jpg)
![ORDERS
-1[a,b] = -b
(-1)[a,b] = 2a-b
sqrt 2/3
sqrt (1+1)/3](https://image.slidesharecdn.com/hoomanmesgarimetapost-170104091131/85/MetaPost-23-320.jpg)
![LABELS
beginfig(17);
a=.7in; b=.5in;
z0=(0,0);
z1=-z3=(a,0);
z2=-z4=(0,b);
draw z1..z2..z3..z4..cycle;
draw z1--z0--z2;
label.top("a", .5[z0,z1]);
label.lft("b", .5[z0,z2]);
dotlabel.bot("(0,0)", z0);
endfig;](https://image.slidesharecdn.com/hoomanmesgarimetapost-170104091131/85/MetaPost-24-320.jpg)
متاپست (MetaPost)
- 1. METAPOST by Hooman Mesgary
- 2. SCALING Same as PostScript 1 unit = 1/72 inch Other units bp: Big Point pt: Printer’s Point in: Inches cm: Centimeters mm: Milimeters
- 3. COMMANDS drawdot drawdot (10,2) drawdot origin drawdot (2cm, 13mm) draw draw (0,0)—(0,1) pickup pickup pencircle scaled 4pt
- 4. VARIABLES u = 1cm; drawdot (2u, 3u); z0 = (2u, 3u); z1 = (3u, 2u); draw z0--z1;
- 5. LOOP u = 1mm; for i=0 upto 4: drawdot (i*u,u); endfor
- 7. CURVES z0 = (0,0); z1 = (60,40); z2 = (40,90); z3 = (10,70); z4 = (30,50); draw z0..z1..z2..z3..z4 draw z0..z1..z2..z3--z4--cycle draw z0..z1..z2..z3..z4..cycle
- 8. DIRECTION draw z0..z1..z2..z3..z4 draw z0..z1{up}..z2{left}..z3..z4 ..{dir 60}(10,0){up}..
- 9. CONT. beginfig(1) for a=0 upto 9: draw (0,0){dir 45}..{dir -10a}(6cm,0); endfor endfig; beginfig(2) for a=0 upto 9: draw (0,0){dir 45}..{dir 10a}(6cm,0); endfor endfig;
- 11. TENTION draw z0..z1..z2..z3 draw z0..z1..tension 1.3..z2..z3 draw z0..z1..tension 1.3 and 1..z2..z3
- 12. CURL draw z0{curl c}..z1..{curl c}z2
- 15. EQU. & ASSIGN. z1=-z2=(.2in,0); x3=-x6=.3in; x3+y3=x6+y6=1.1in; z1=(.2in,0); z2=(-.2in,0); z3=(.3in,.8in); z6=(-.3in,1.4in);
- 16. SOLVING beginfig(13); z1=-z2=(.2in,0); x3=-x6=.3in; x3+y3=x6+y6=1.1in; z4=1/3[z3,z6]; z5=2/3[z3,z6]; z20=whatever[z1,z3]=whatever[z2,z4]; z30=whatever[z1,z4]=whatever[z2,z5]; z40=whatever[z1,z5]=whatever[z2,z6]; draw z1--z20--z2--z30--z1--z40--z2; pickup pencircle scaled 1pt; draw z1--z2; draw z3--z6; endfig;
- 17. TRANSFORM p transformed T ( 𝑝𝑥, 𝑝𝑦) ( 𝑡𝑥, 𝑡𝑦, 𝑡𝑥𝑥, 𝑡𝑥𝑦, 𝑡𝑦𝑥, 𝑡𝑦𝑦) ( 𝑡𝑥 + 𝑡𝑥𝑥𝑝𝑥 + 𝑡𝑥𝑦𝑝𝑦, 𝑡𝑦 + 𝑡𝑦𝑥𝑝𝑥 + 𝑡𝑦𝑦𝑝𝑦)
- 18. MORE TRANSFORM transform T; T = identity xscaled -1 rotated 90 shifted (1,1); reflectedabout( 𝑝, 𝑞) rotatedaround( 𝑝, 𝜃) 𝑞𝑞 = 𝑝 transformed inverse 𝑇
- 19. FINDING TRANSFORMS (0,1) transformed T’ = (3,4); (1,1) transformed T’ = (7,1); (1,0) transformed T’ = (4,-3);
- 20. COLORS black, white, red, green, blue (0,0,0) (1,1,1) (.4,.4,.4) = 0.4white
- 21. OPERAND - * / ** + - ++ +-+ sqrt
- 22. CONT. and or z1 dotprod z2 = x1*x2 + y1*y2 length “abcde” substring(2,4) of “abcde” = “cd” abs round floor ceiling
- 23. ORDERS -1[a,b] = -b (-1)[a,b] = 2a-b sqrt 2/3 sqrt (1+1)/3
- 24. LABELS beginfig(17); a=.7in; b=.5in; z0=(0,0); z1=-z3=(a,0); z2=-z4=(0,b); draw z1..z2..z3..z4..cycle; draw z1--z0--z2; label.top("a", .5[z0,z1]); label.lft("b", .5[z0,z2]); dotlabel.bot("(0,0)", z0); endfig;
- 25. CONT. ⟨label suffix⟩ → ⟨empty⟩ | lft | rt | top | bot | ulft | urt | llft | lrt label.lrt(btex $sqrt x$ etex, (3,sqrt 3)*u)
- 26. USING TEX beginfig(18); numeric u; u = 1cm; draw (0,2u)--(0,0)--(4u,0); pickup pencircle scaled 1pt; draw (0,0){up} for i=1 upto 8: ..(i/2,sqrt(i/2))*u endfor; label.lrt(btex $sqrt x$ etex, (3,sqrt 3)*u); label.bot(btex $x$ etex, (2u,0)); label.lft(btex $y$ etex, (0,u)); endfig;
- 27. CONTINUES DRAWING beginfig(19); numeric ux, uy; 120ux=1.2in; 4uy=2.4in; draw (0,4uy)--(0,0)--(120ux,0); pickup pencircle scaled 1pt; draw (0,uy){right} for ix=1 upto 8: ..(15ix*ux, uy*2/(1+cosd 15ix)) endfor; label.bot(btex $x$ axis etex, (60ux,0)); label.lft(btex $y$ axis etex rotated 90, (0,2uy)); label.lft( btex $displaystyle y={2over1+cos x}$ etex, (120ux, 4uy)); endfig;
- 28. RESULT
- 29. FILL beginfig(21); path p; p = (-1cm,0)..(0,-1cm)..(1cm,0); fill p{up}..(0,0){-1,-2}..{up}cycle; draw p..(0,1cm)..cycle; endfig;
- 30. FILL WITH COLOR
- 31. PATH WORKING a intersectiontimes b point t of p p1 cutbefore p2 p1 cutafter p2
- 32. DASHED LINES
- 33. ARROWS drawarrow z1..z2 drawarrow reverse (z1..z2) drawdblarrow z1..z2
- 34. CLIPPING
- 35. CONDITION if 𝑒1: ... elseif 𝑒2: ... else: ... fi def middlepoint(expr a) = if path a: (point .5*length a of else: .5(llcorner a + urcorner fi a) enddef;
- 36. LOOPS for ⟨symbolic token⟩ = ⟨expression⟩ upto ⟨expression⟩ : ⟨loop text⟩ endfor for ⟨symbolic token⟩ = ⟨expression⟩ downto ⟨expression⟩ : ⟨loop text⟩ endfor for ⟨symbolic token⟩ = ⟨expression⟩ step ⟨expression⟩ until ⟨expression⟩ : ⟨loop text⟩ endfor
- 37. SAMPLE LOOP for t=3.14, 2.78, (a,2a), "hello": show t; endfor draw for p=(3,1),(6,2),(7,5),(4,6),(1,3): p-- endfor cycle; draw (3,1)--(6,2)--(7,5)--(4,6)--(1,3)--cycle;