MetaFun - Pragma ADE

We can manipulate the heigth and depth of the lines to give different (and maybe better) results.
\startuseMPgraphic{text vars}
baselineskip := 8pt ;
strutheight := 4pt ;
strutdepth := 2pt ;
offset := 4pt ;
topskip := 3pt ;
\stopuseMPgraphic
This kind of graphic trickery in itself is not enough to get TEX into typesetting within the bounds
of a closed curve. Since METAPOST can write information to a file, and TEX can read such a file, a
natural way to handle this is to let METAPOST write a \parshape specification.
\startuseMPgraphic{text macro}
def provide_parshape (expr p, offset, baselineskip,
strutheight, strutdepth, topskip) =
\includeMPgraphic{text move}
\includeMPgraphic{text split}
\includeMPgraphic{text cutoff}
\includeMPgraphic{text draw}
\includeMPgraphic{text calc}
\includeMPgraphic{text loop}
\includeMPgraphic{text save}
enddef ;
\stopuseMPgraphic
Talking to TEX Typesetting in METAPOST
245