Home › Resources & Tools › MetaPost Compiler

MetaPost Compiler

MetaPost is a programming language for creating graphics. It is based on Donald Knuth's Metafont language for typesetting.

To generate figures using MetaPost, you typically write a program in the MetaPost language and then compile it using the MetaPost compiler. The compiler generates SVG or PostScript files.

This tool allows you to compile MetaPost code online. Simply write your MetaPost code in the input box below and click the "Compile" button. The generated SVGs will be displayed below the input box.

Input (MetaPost code)

transform pagecoords;
pagecoords:=identity scaled 10mm shifted (5mm,5mm);
beginfig (1)
    fill ((0,0)--(2,0)--(2,1)--(1,1)--(1,2)--(0,2)--cycle)
        transformed pagecoords withcolor green;
    draw ((2,0)..(2,1)..(1,1)..(1,2)..(0,2))
        transformed pagecoords;
    drawarrow ((0,0)--(2,2)) transformed pagecoords;
endfig;
beginfig (2)
    draw (for i=0 upto 7: dir (135i)-- endfor cycle)
        transformed pagecoords;
endfig;
pagecoords:=identity scaled 15mm shifted (5mm,5mm);
beginfig (3);
    % declare paths to be used
    path p[],p[]t;
    % set up points by defining relationships
    z1=(0,0);   z2=z1+2up;
    z3=z1+whatever*dir (60)=z2+whatever*dir (-50);
    z4=z3+(-1.5,-.5);
    z5=z1+dir (135);
    z0=whatever[z1,z2]=whatever[z3,z4];
    % set up paths
    p0=fullcircle yscaled .5 rotated 45 shifted z0 ;
    p1=z2---z4..z0..z3---z1;
    p2=p1 cutbefore p0 cutafter p0;
    p3=p0 cutbefore p1 cutafter p1;
    p4=p2---p3---cycle;
    % define transformed versions of paths and points
    for i=0 upto 4: p[i]t=p[i] transformed pagecoords; endfor
    for i=0 upto 5: z[i]t=z[i] transformed pagecoords; endfor
    % do some drawing
    fill p4t withcolor (1,1,0.2);
    draw z1t---z2t withcolor .5white;
    draw z3t---z4t withcolor .5white;
    pickup pencircle;
    draw p0t dashed withdots scaled .3;
    draw p1t dashed evenly;
    draw p2t withcolor blue;
    draw p3t withcolor red;
    label.lrt (btex $z_0$ etex, z0t);
    label.llft (btex $z_1$ etex, z1t);
    label.top (btex $z_2$ etex, z2t);
    label.rt (btex $z_3$ etex, z3t);
    label.llft (btex $z_4$ etex, z4t);
    for i=0 upto 4:
        drawdot z[i]t withpen pencircle scaled 2;
    endfor
endfig;
bye1
transform pagecoords;
2
pagecoords:=identity scaled 10mm shifted (5mm,5mm);
3
beginfig (1)
4
    fill ((0,0)--(2,0)--(2,1)--(1,1)--(1,2)--(0,2)--cycle)
5
        transformed pagecoords withcolor green;
6
    draw ((2,0)..(2,1)..(1,1)..(1,2)..(0,2))
7
        transformed pagecoords;
8
    drawarrow ((0,0)--(2,2)) transformed pagecoords;
9
endfig;
10
beginfig (2)
11
    draw (for i=0 upto 7: dir (135i)-- endfor cycle)
12
        transformed pagecoords;
13
endfig;
14
pagecoords:=identity scaled 15mm shifted (5mm,5mm);
15
beginfig (3);
16
    % declare paths to be used
17
    path p[],p[]t;
18
    % set up points by defining relationships
19
    z1=(0,0);   z2=z1+2up;
20
    z3=z1+whatever*dir (60)=z2+whatever*dir (-50);
21
    z4=z3+(-1.5,-.5);
22
    z5=z1+dir (135);
23
    z0=whatever[z1,z2]=whatever[z3,z4];
24
    % set up paths
25
    p0=fullcircle yscaled .5 rotated 45 shifted z0 ;
26
    p1=z2---z4..z0..z3---z1;
27
    p2=p1 cutbefore p0 cutafter p0;
28
    p3=p0 cutbefore p1 cutafter p1;
29
    p4=p2---p3---cycle;
30
    % define transformed versions of paths and points
31
    for i=0 upto 4: p[i]t=p[i] transformed pagecoords; endfor
32
    for i=0 upto 5: z[i]t=z[i] transformed pagecoords; endfor
33
    % do some drawing
34
    fill p4t withcolor (1,1,0.2);
35
    draw z1t---z2t withcolor .5white;
36
    draw z3t---z4t withcolor .5white;
37
    pickup pencircle;
38
    draw p0t dashed withdots scaled .3;
39
    draw p1t dashed evenly;
40
    draw p2t withcolor blue;
41
    draw p3t withcolor red;
42
    label.lrt (btex $z_0$ etex, z0t);
43
    label.llft (btex $z_1$ etex, z1t);
44
    label.top (btex $z_2$ etex, z2t);
45
    label.rt (btex $z_3$ etex, z3t);
46
    label.llft (btex $z_4$ etex, z4t);
47
    for i=0 upto 4:
48
        drawdot z[i]t withpen pencircle scaled 2;
49
    endfor
50
endfig;
51
bye