Hi Jan, Am 05.04.2014 15:48, schrieb Jan Heinen:
\startuseMPgraphic{rotatedHeadline} % Text "Headline" in a box which is rotated draw btex {\strut\tfd Headline} etex;
setbounds currentpicture to boundingbox currentpicture enlarged 2mm; The following code is based on the boundingbox, so just make it bigger beforehand.
% rectangle with rounded corners path p; p := llcorner currentpicture+(0mm,3mm){down}..{right}llcorner currentpicture+(3mm,0mm)-- lrcorner currentpicture+(-3mm,0mm){right}..{up}lrcorner currentpicture+(0mm,3mm)-- urcorner currentpicture+(0mm,-3mm){up}..{left}urcorner currentpicture+(-3mm,0mm)-- ulcorner currentpicture+(3mm,0mm){left}..{down}ulcorner currentpicture+(0mm,-3mm)--cycle; pickup pencircle scaled 0.5pt; clip currentpicture to p; draw p; currentpicture := currentpicture rotated 90; \stopuseMPgraphic
\starttext \useMPgraphic{rotatedHeadline} \stoptext
Best wishes, Peter