diff options
Diffstat (limited to 'macros/luatex/generic/luamplib/test-luamplib-latex.tex')
-rw-r--r-- | macros/luatex/generic/luamplib/test-luamplib-latex.tex | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/macros/luatex/generic/luamplib/test-luamplib-latex.tex b/macros/luatex/generic/luamplib/test-luamplib-latex.tex index 2d1994d535..b3ba66c7fe 100644 --- a/macros/luatex/generic/luamplib/test-luamplib-latex.tex +++ b/macros/luatex/generic/luamplib/test-luamplib-latex.tex @@ -244,6 +244,41 @@ draw mpliboutlinetext.b ("$\displaystyle\frac{1}{1-x^2}$") ) scaled 4; \endmpfig +\par\leavevmode +\mppattern{mypatt} + \mpfig + picture q; + q := btex Q etex; + fill bbox q withcolor .8[red,white]; + draw q withcolor .8red; + \endmpfig +\endmppattern +\mpfig + fill fullcircle scaled 100 withpostscript "collect"; + draw unitsquare shifted - center unitsquare scaled 45 + withpattern "mypatt" + withpostscript "evenodd" + ; +\endmpfig +\begin{mppattern}{pattuncolored} + [ + colored = false, + matrix = "0.7071 0.7071 -0.7071 0.7071", + ] + \tiny\TeX +\end{mppattern}\relax +\mpfig + picture tex; tex := mpliboutlinetext.p ("\bfseries \TeX"); + i:=0; + for item within tex: + i:=i+1; + if i < length tex: + fill pathpart item scaled 10 withpostscript "collect"; + else: + draw pathpart item scaled 10 withpattern "pattuncolored" withcolor 0.7 blue; + fi + endfor +\endmpfig \tracingcommands0 \vskip 2\baselineskip |