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
-----------------------------------------------------------------
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the
Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________