Hi, Fabrice, you have a problem with the definition of the path b: this path include q and b. To see this, replace your lines with : draw q anglestriped (1,45,2) withcolor cyan; draw b anglestriped (1,45,2) withcolor red; And you will see that the path b is drawn twice : once in red, once in cyan. So if you change your instructions to : draw q anglestriped (1,45,2) withcolor cyan; draw r anglestriped (1,45,2) withcolor cyan; This will correct the problem, because each path is now drawn only once. Fabrice.
Le 20 nov. 2023 à 14:47, Fabrice Couvreur
a écrit : Hi Otared, It's true that the color seems identical. Thanks. Fabrice
Le dim. 19 nov. 2023 à 21:55, Otared Kavian
mailto:otared@gmail.com> a écrit : Hi Fabrice,
It seems to me the colors are the same, although they may appear different at first sight because the « with » of the lines are different (the width is larger in the lower rectangle).
I attach the PDF created with your code.
Best regards: Otared
On 19 Nov 2023, at 18:56, Fabrice Couvreur
mailto:fabrice1.couvreur@gmail.com> wrote: Hi, I don't understand why the hatching of the two rectangles is not the same color. Thanks for your help. Fabrice
\starttext \setupbodyfont[8pt] \startMPcode path p, q, r, b ;
z[0] = (2cm,0cm) ; z[1] = (2cm,2cm) ; z[2] = (0cm,2cm) ;
p := unitsquare xyscaled (9cm, 5cm) ; q := llcorner p--z[0]--z[1]--z[2]--cycle ; r := unitsquare xyscaled (7cm,3cm) shifted(2cm,2cm) ; b := z[2]--z[1]--ulcorner r--urcorner p--lrcorner r--z[1]-- z[0]--llcorner p--cycle ;
draw b anglestriped (1,45,2) withcolor cyan; draw q anglestriped (1,45,2) withcolor cyan;
draw p ;
label.llft("A", p) ; label.lrt("D", p) ; label.ulft("B", p) ; label.urt("C", p) ; label.lft("M", z[2]) ; label.ulft("N", z[1]) ; label.bot("P", z[0]) ; label.top("J", ulcorner r) ; label.rt("I", lrcorner r) ; label.bot(btex $x$ etex,(llcorner p+z[0])/2); label.lft(btex $x$ etex,(llcorner p+z[2])/2); \stopMPcode
\stoptext
___________________________________________________________________________________ If your question is of interest to others as well, please add an entry to the Wiki!
maillist : ntg-context@ntg.nl mailto:ntg-context@ntg.nl / https://mailman.ntg.nl/mailman3/lists/ntg-context.ntg.nl webpage : https://www.pragma-ade.nl https://www.pragma-ade.nl/ / https://context.aanhet.net https://context.aanhet.net/ (mirror) archive : https://github.com/contextgarden/context wiki : https://wiki.contextgarden.net https://wiki.contextgarden.net/ ___________________________________________________________________________________
Otared Kavian e-mail: otared@gmail.com mailto:otared@gmail.com Phone: +33 6 88 26 70 95
___________________________________________________________________________________ If your question is of interest to others as well, please add an entry to the Wiki!
maillist : ntg-context@ntg.nl mailto:ntg-context@ntg.nl / https://mailman.ntg.nl/mailman3/lists/ntg-context.ntg.nl webpage : https://www.pragma-ade.nl https://www.pragma-ade.nl/ / https://context.aanhet.net https://context.aanhet.net/ (mirror) archive : https://github.com/contextgarden/context wiki : https://wiki.contextgarden.net https://wiki.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://mailman.ntg.nl/mailman3/lists/ntg-context.ntg.nl webpage : https://www.pragma-ade.nl / https://context.aanhet.net (mirror) archive : https://github.com/contextgarden/context wiki : https://wiki.contextgarden.net ___________________________________________________________________________________