You can also use mkii as command line drawing tool: #> mtxrun texexec test.tex \starttext \startTEXpage \resetMPdrawing \startMPdrawing picture pic[] ; numeric wid[], len[], pos[], n ; wid[0] := len[0] := pos[0] := n := 0 ; \stopMPdrawing \def\whatever#1% {\appendtoks#1\to\MPtoks \setbox\MPbox=\hbox{\bfd\the\MPtoks}% \startMPdrawing n := n + 1 ; len[n] := \the\wd\MPbox ; \stopMPdrawing \startMPdrawing[-] pic[n] := textext("\bfd\setstrut\strut#1") ; pic[n] := pic[n] shifted - llcorner pic[n] ; \stopMPdrawing} \handletokens MetaPost is Fun!\with\whatever \startMPdrawing pair len ; len := origin ; for i=1 upto n : draw pic[i] shifted len ; draw boundingbox pic[i] shifted len withpen pencircle scaled .25pt withcolor red ; len := len+(xpart lrcorner pic[i]-xpart llcorner pic[i],0) ; endfor ; \stopMPdrawing \MPdrawingdonetrue\getMPdrawing \stopTEXpage \stoptext -- luigi