Re: [NTG-context] Circled text in metapost

2 Apr 2018


      On 3/31/2018 7:22 PM, Gerhard Kugler wrote:
...
Hi,
my very slow proceedings are here:
--------
\useMPlibrary[txt]
\starttext
\setupbodyfont[pp1]
\setupcolors[state=start]
\setuplayout
[topspace=192pt,
backspace=48pt,
cutspace=12pt,
width=400pt,
margin=0cm,
rightedge=88pt,
rightedgedistance=48pt,
header=0cm,
footer=0cm,
height=400pt]
\startuseMPgraphic{followtokens}
   path RotPath ;
RotPath := halfcircle scaled 7cm rotated 180 ;
\stopuseMPgraphic
\followtokens{Dies ist ein anderer Text}
\startuseMPgraphic{followtokens}
   path RotPath ;
RotPath := halfcircle scaled 14cm rotated 180 ;
\stopuseMPgraphic
\followtokens{Dies ist ein selbst geschriebener Text}
--------
But I want to place the round lines concentrically in a circle (more
than two). And I want to place all the lines on colored circled
background.
\useMPlibrary[txt]
\starttext

\startuseMPgraphic{followtokens}
     path RotPath ; RotPath := halfcircle scaled 7cm rotated 180 ;
     for i=1 upto 6 :
         draw halfcircle scaled (i*cm) rotated 180 ;
     endfor ;
\stopuseMPgraphic

\followtokens{Dies ist ein anderer Text}

\stoptext

-----------------------------------------------------------------
                                           Hans Hagen | PRAGMA ADE
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
        tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl
-----------------------------------------------------------------