% Kurven-Demo
prologues := 1;
def setup =
   z1 = (0,-100); z2 = (-100,200); z3 = (0,100); z4 = (100,200);
   pickup pencircle scaled 15pt;
   drawoptions(withcolor .7[black,white]);
enddef;
def finish =
   drawoptions(); defaultscale := 4; labeloffset := 15pt;
   dotlabels.top(2, 4); dotlabels.bot(1, 3);
enddef;
beginfig(1);
   setup;
   draw z1 .. z2 .. z3 .. z4;
   finish;
endfig;
beginfig(2);
   setup;
   draw z1 .. z2 .. z3 .. z4 .. cycle;
   finish;
endfig;
beginfig(3);
   setup;
   draw z1 -- z2 -- z3 -- z4;
   finish;
endfig;
beginfig(4);
   setup;
   draw z1 -- z2 -- z3 -- z4 -- cycle;
   finish;
endfig;
beginfig(5);
   setup;
   draw z1 .. z2 .. z3 & z3 .. z4 .. z1;
   finish;
endfig;
beginfig(6);
   setup;
   draw z1{dir 135} .. z2{right} .. {dir -70}z3 &
        z3{dir 70} .. z4{right} .. z1{dir 225};
   finish;
endfig;
end.