Re: [NTG-context] Loop and graphictext (Metafun)

5 Oct 2015


      \startmidaligned

\startMPcode

...

\stopMPcode

\stopmidaligned

2015-10-05 20:31 GMT+02:00 Fabrice Couvreur :
...
How to center the title ?
2015-10-05 20:11 GMT+02:00 Fabrice Couvreur :
...
Hi Hans,
In fact, as the loop does not work, I have not added to the code.
It's true that your solution is simple !
Thank you,
Fabrice
2015-10-05 19:48 GMT+02:00 Hans Hagen :
...
On 10/5/2015 6:28 PM, Fabrice Couvreur wrote:
...
Hi,
I tried to write a loop to display the title, but it does not. How to
do ?
Thank you,
Fabrice
\setuppagenumbering[location=]
\setupcolors
   [state=start]
\definecolor[pagecolor][s=.6]
\definecolor[textcolor][r=.6]
\startMPinclusions
   color pagecolor ; pagecolor := \MPcolor{pagecolor} ;
   color textcolor ; textcolor := \MPcolor{textcolor} ;
\stopMPinclusions
\setMPtext{title}{Serie statistiques à deux variables}
\startuseMPgraphic{Title}
path p ; p := OverlayBox  ;
   fill OverlayBox withcolor pagecolor ;
   setbounds currentpicture to OverlayBox ;
\stopuseMPgraphic
\defineoverlay[Title][\useMPgraphic{Title}]
\defineframedtext
   [MyTitle]
   [before={\blank[line,halfline]},
    after={\blank},
    frame=off,
    background=Title,
    width=\textwidth,
    height=fit,
    ]
\starttext
\startMyTitle
\startMPcode
numeric k ; k :=0 ;
string s ; s := \MPstring{title} ;
picture r ;
r := image (graphictext
         substring (k,k+1) of s
         randomized .5pt
         scaled 5pt
         withfillcolor textcolor
         withpen pencircle scaled 1pt ; ) ;
   draw r ;
\stopMPcode
\stopMyTitle
\stoptext
i see no loop, why not just
r := image (graphictext
        s
       ....
-----------------------------------------------------------------
                                          Hans Hagen | PRAGMA ADE
              Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
    tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com
                                             | 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://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________