On 3/2/2021 11:15 AM, mf wrote:
Il 01/03/21 15:44, Hans Hagen ha scritto:
\starttext
\startuseMPgraphic{circle}
lmt_parshape [
path = fullcircle scaled 136mm,
offset = 2mm,
bottomskip = - 1.5LineHeight,
] ;
\stopuseMPgraphic
\start
\startshapedparagraph[list=circle,mp=circle,repeat=yes,method=cycle]%
list=... refers to a previous \startparagraphshape definition, so mp=...
tells ConTeXt that the definition is derived from MetaPost code instead.
You can go completely crazy with this:
\setupbodyfont[pagella,10pt]
\showframe
\setuplayout[width=middle,height=middle,footer=0pt]
\startuseMPgraphic{circle}
lmt_parshape [
% path = fullcircle scaled 136mm,
path = fullcircle scaled TextWidth randomized 2cm,
% offset = 2mm,
bottomskip = - 1.5LineHeight,
] ;
\stopuseMPgraphic
\starttext
\startshapedparagraph[mp=circle,repeat=yes,method=cycle]%
\setupalign[verytolerant,stretch,last]\dontcomplain
\dorecurse{100}{
{\darkred \samplefile{tufte}}
{\darkgreen \kerncharacters[.125]\samplefile{ward}}
{\darkblue \it \samplefile{thuan}}
{\darkcyan \bf \samplefile{zapf}}
{\darkmagenta \bi \samplefile{sapolsky}}
{\darkyellow \smallcaps \samplefile{davis}}
\par % \blank
}
\stopshapedparagraph
\stoptext
It might work for a children book or so,
Hans
-----------------------------------------------------------------
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
___________________________________________________________________________________
