Hi Henri,
Why does the blue path not rotate 90 with the draw command but rotate with
the fill command ?
\startMPcode
def match (expr alpha, pos) =
fill unitsquare xscaled 4cm yscaled 0.2cm rotated alpha shifted pos
withcolor yellow ;
fill origin -- (4cm,0) -- (4.1cm,-0.05cm) -- (0.1cm,-0.05cm) --
cycle rotated alpha withcolor(.6yellow + black);
draw origin -- (0,0.2cm) -- (4cm,0.2cm) -- (4cm,0) -- (4.1cm,-0.05cm)
-- (0.1cm,-0.05cm) -- cycle rotated alpha withcolor blue;
draw origin -- (0,0.2cm) -- (4cm,0.2cm) -- (4cm,0) -- (4.1cm,-0.05cm)
-- (0.1cm,-0.05cm) -- cycle rotated alpha withcolor blue;
draw fullcircle xscaled 0.50cm yscaled 0.44cm shifted (4.125cm,0.1cm)
rotated alpha;
draw fullcircle xscaled 0.50cm yscaled 0.44cm shifted (4.125cm,0.1cm)
rotated alpha
withshademethod "circular 1"
withshadevector (0,1)
withshadecolors (red,white);
enddef;
match(0,(0,0));
match(90,(4.2cm,0));
match(90,(0,0));
match(0,(0,4.2cm));
\stopMPcode
Le sam. 15 févr. 2020 à 00:01, Fabrice Couvreur
Hi, Hi, I have corrected for the dimensions of the ellipse but I cannot achieve the same effect for the red color. Thank you. Fabrice \startMPcode def match (expr pos) = fill unitsquare xscaled 4cm yscaled 0.2cm shifted pos withcolor yellow; fill origin -- (4cm,0) -- (4.1cm,-0.05cm) -- (0.1cm,-0.05cm) -- cycle withcolor(.6yellow + black); draw origin -- (0,0.2cm) -- (4cm,0.2cm) -- (4cm,0) -- (4.1cm,-0.05cm) -- (0.1cm,-0.05cm) -- cycle; fill fullcircle xscaled 0.50cm yscaled 0.44cm shifted (4.125cm,0.1cm) withcolor red; draw fullcircle xscaled 0.50cm yscaled 0.44cm shifted (4.125cm,0.1cm); draw fullcircle xscaled 0.50cm yscaled 0.44cm shifted (4.125cm,0.1cm) withshademethod "circular" withshadevector (0,1) withshadecolors (red,white) enddef; match((0,0));
\stopMPcode
Le ven. 14 févr. 2020 à 16:43, Fabrice L
a écrit : Hi,
Le 13 févr. 2020 à 16:45, Fabrice Couvreur
a écrit : How to have the color defined by {yellow!60!black} with Metapost ?
color MyColor ; MyColor := .6[yellow,black] ;
See metafun manual, section 1.13.
Thank you. Fabrice
Fabrice (another one !).
___________________________________________________________________________________ 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://context.aanhet.net archive : https://bitbucket.org/phg/context-mirror/commits/ wiki : http://contextgarden.net
___________________________________________________________________________________
___________________________________________________________________________________ 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://context.aanhet.net archive : https://bitbucket.org/phg/context-mirror/commits/ wiki : http://contextgarden.net
___________________________________________________________________________________