input plain_ex; input mpcolornames; beginfig(0); p:=0; thick:= 100; thin:= thick*0.5; rotation:=-30; vardef elliptical_nib = fix_nib(thick, thin, rotation) enddef; path paths[], strokes[]; m:=500; z0 = (0 + 100, m/2); z1 = (x0, (y0+y2)/2); z2 = ((x1+x3)/2.15, m); z3 = (x1+0.7m, (y2+y4)/3); z4 = (x0, m/6); paths[p] = z0{dir 90}..z1..{dir 0}z2{dir 0} ..z3..z4; pen_stroke( nib(elliptical_nib)(0) nib(elliptical_nib)(1) nib(elliptical_nib)(2) nib(elliptical_nib)(3) nib(elliptical_nib rotated -20)(4) )(paths[p])(strokes[p]); fill strokes[p] withcolor Teal; draw paths[p] withcolor Gold; endfig; end