Loop and graphictext (Metafun)

newer
Setups for images in publication...

Fabrice Couvreur

5 Oct 2015 5 Oct '15

4:28 p.m.

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

Attachments:

attachment.html (text/html — 1.6 KB)

Show replies by date

Hans Hagen

5 Oct 5 Oct

5:48 p.m.

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 -----------------------------------------------------------------

Fabrice Couvreur

6:11 p.m.

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

___________________________________________________________________________________

Fabrice Couvreur

6:31 p.m.

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

___________________________________________________________________________________

Fabrice Couvreur

6:54 p.m.

\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

___________________________________________________________________________________

3366

Age (days ago)

3366

Last active (days ago)

List overview

Download

4 comments

2 participants

participants (2)

Fabrice Couvreur
Hans Hagen