Hi Hans,
Thank you for this solution which is an approach that I did not know.
Fabrice
PS : What is the exact meaning of the word "blobs" because my English is
average ?
Le mar. 27 sept. 2022 à 22:04, Hans Hagen via ntg-context <
ntg-context@ntg.nl> a écrit :
> On 9/27/2022 7:49 PM, Fabrice Couvreur via ntg-context wrote:
> > Hello,
> > I notice a strange behavior of the macro numberstriped ( ).
> > Thanks.
> > Fabrice
> >
> > \starttext
> > \switchtobodyfont[9pt]
> > \startMPcode
> >
> > path p, q, r, b ;
> > p := unitsquare xyscaled (4cm,4cm) ;
> > z[0] = (2cm,0cm) ;
> > z[1] = (2cm,4cm) ;
> > z[2] = (0cm,2cm) ;
> > q := llcorner p--z[0]--z[1]--z[2]--cycle ;
> > r := unitsquare xyscaled (1cm,1cm) shifted(0,3cm) ;
> > b := unitsquare xyscaled (3cm,3cm) shifted(1cm,0) ;
> > draw p ;
> > draw r withcolor red;
> > draw r numberstriped (.25,20,5) withcolor magenta ;
> > draw b numberstriped (.25,20,5) withcolor magenta ;
> > label.llft("D", p) ;
> > label.lrt("C", p) ;
> > label.ulft("A", p) ;
> > label.urt("B", p) ;
> > label.urt("P", lrcorner r) ;
> > label.lft("Q", llcorner r) ;
> > label.top("M", urcorner r) ;
> >
> > \stopMPcode
> > \stoptext
> you need to find a volunteer to make the pattern have the two corner blobs
>
> \starttext
>
> \startMPcode
> path p, q, r, b ;
> path p ; p := unitsquare xyscaled (4cm,4cm) ;
> draw p ;
> draw p
> withpattern image (
> draw (llcorner unitsquare -- urcorner unitsquare) scaled 5mm ;
> % how to get the corner dots
> )
> withpatternscale 1/16
> withpen pencircle scaled 1mm
> ;
> \stopMPcode
>
> \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 /
> https://www.ntg.nl/mailman/listinfo/ntg-context
> webpage : https://www.pragma-ade.nl / http://context.aanhet.net
> archive : https://bitbucket.org/phg/context-mirror/commits/
> wiki : https://contextgarden.net
>
> ___________________________________________________________________________________
>
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the
Wiki!
maillist : ntg-context@ntg.nl / https://www.ntg.nl/mailman/listinfo/ntg-context
webpage : https://www.pragma-ade.nl / http://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : https://contextgarden.net
___________________________________________________________________________________
