Hi,
Initially, there was a bug with maro numberstriped() and Hans suggested
another sensible approach to me, but you don't get the same shape of the
hatches depending on the dimensions of the squares.
Your solution works perfectly but I'm trying to understand the action of
the parameters:
the first ?
the second represents the angle in degrees that the segments make
the third represents the gap between two segments
Thanks
Fabrice

Le sam. 1 oct. 2022 à 21:46, Mikael Sundqvist via ntg-context <
ntg-context@ntg.nl> a écrit :

> Hi,
>
> Is this what you are looking for?
>
> On Sat, Oct 1, 2022 at 7:43 PM Fabrice Couvreur via ntg-context
> <ntg-context@ntg.nl> wrote:
> >
> > Hi Hans,
> > When the rectangles are not identical, how to have the same type of
> hatching in both ?
> > Thanks.
> > Fabrice
> >
> >
> > \starttext
> >  \startlinecorrection[blank]
> >       \startmidaligned
> >         \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 r anglestriped (1,45,2) withcolor cyan;
> draw b anglestriped (1,45,2) withcolor cyan;
>
> >
> >        draw p;
> >        draw b;
> >        draw r;
> >
> >      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
> >       \stopmidaligned
> >     \stoplinecorrection
> > \stoptext
> >
> >
>
> /Mikael
>
> ___________________________________________________________________________________
> 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
___________________________________________________________________________________

Reply via email to