29.11.2012 Views

MetaFun - Pragma ADE

MetaFun - Pragma ADE

MetaFun - Pragma ADE

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

\startoverlay<br />

{\startuseMPgraphic{followtokens}<br />

draw fullcircle scaled 5cm .<br />

withpen pencircle scaled 1pt withcolor .625yellow ;<br />

draw fullsquare scaled 5.25cm<br />

withpen pencircle scaled 1pt withcolor .625red ;<br />

drawoptions (withcolor .625red) ;<br />

path RotPath ; RotPath := halfcircle scaled 5cm ;<br />

setbounds currentpicture to boundingbox fullcircle scaled 5.25cm ;<br />

\stopuseMPgraphic<br />

\followtokens { Met{\`a} superiore }}<br />

{\startuseMPgraphic{followtokens}<br />

drawoptions (withcolor .625red) ;<br />

path RotPath ; RotPath := halfcircle rotated 90 scaled 5cm ;<br />

setbounds currentpicture to boundingbox fullcircle scaled 5.25cm ;<br />

\stopuseMPgraphic<br />

\followtokens { {$\star$} }}<br />

{\startuseMPgraphic{followtokens}<br />

drawoptions (withcolor .625red) ;<br />

path RotPath ; RotPath := halfcircle rotated 180 scaled 5cm ;<br />

setbounds currentpicture to boundingbox fullcircle scaled 5.25cm ;<br />

\stopuseMPgraphic<br />

\followtokens { Met{\`a} inferiore }}<br />

{\startuseMPgraphic{followtokens}<br />

drawoptions (withcolor .625red) ;<br />

path RotPath ; RotPath := halfcircle rotated 270 scaled 5cm ;<br />

setbounds currentpicture to boundingbox fullcircle scaled 5.25cm ;<br />

\stopuseMPgraphic<br />

\followtokens { {$\star$} }}<br />

\stopoverlay<br />

In order to fool the overlay macro that each graphic has the same size, we force a bounding box.<br />

p e r i o r e ⋆ M e t à<br />

i n<br />

s u<br />

t à<br />

M e<br />

f e r i o r e ⋆<br />

TEX text Typesetting in METAPOST<br />

237

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!