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 = (x1+0.3m, 0); z1 = (0, (y0+y2)/2); z2 = ((x1+x3)/2, m); z3 = (x1+m, (y2+y4)/2); z4 = (x2+0.35m, 0); paths[p] = z0..{up}z1 ..z2{right}..z3..z4; pen_stroke( nib(elliptical_nib scaled 0.7)(0) nib(elliptical_nib scaled 0.7)(1) nib(elliptical_nib)(2) nib(elliptical_nib)(3) nib(elliptical_nib)(4) )(paths[p])(strokes[p]); fill strokes[p] withcolor Teal; draw paths[p] withcolor Gold; endfig; end