Re: [NTG-context] Problem with shading when using rotation (Metapost)

2020-03-03 Thread Fabrice Couvreur
Hi,
No idea ?
Thanks
Fabrice

Le sam. 29 févr. 2020 à 11:01, Fabrice Couvreur 
a écrit :

> Hi,
> Sorry to come back with my match problem. In fact, I do not understand
> why a rotation of 90 influences the degraded color of the ends of the
> matches.
> Thank you.
> Fabrice
>
> \starttext
> \startMPcode
>
>   def match (expr alpha, pos) =
> numeric l;
> l = 4.6cm;
> picture pic;
> pic = image (
> fill unitsquare xscaled 4cm  yscaled 0.2cm  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 xyscaled (0.5cm,0.44cm) shifted (4.125cm,0.1cm) shaded
> withshademethod "circular"
> withshadefactor 0.75
> withshadecolors (white,red););
> draw (fullcircle xyscaled (0.5cm,0.44cm) shifted (4.125cm,0.1cm));
> draw pic rotated alpha shifted pos;
> enddef;
>
> picture house ;
> house = image (
> match(90,(0,0));
> match(0,(0,0));
> match(90,(l,0));
> match(120,(l,l));
> match(60,(0,l)););
>
> draw house;
>
> \stopMPcode
>
___
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
___


[NTG-context] Problem with shading when using rotation (Metapost)

2020-02-29 Thread Fabrice Couvreur
Hi,
Sorry to come back with my match problem. In fact, I do not understand why
a rotation of 90 influences the degraded color of the ends of the matches.
Thank you.
Fabrice

\starttext
\startMPcode

  def match (expr alpha, pos) =
numeric l;
l = 4.6cm;
picture pic;
pic = image (
fill unitsquare xscaled 4cm  yscaled 0.2cm  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 xyscaled (0.5cm,0.44cm) shifted (4.125cm,0.1cm) shaded
withshademethod "circular"
withshadefactor 0.75
withshadecolors (white,red););
draw (fullcircle xyscaled (0.5cm,0.44cm) shifted (4.125cm,0.1cm));
draw pic rotated alpha shifted pos;
enddef;

picture house ;
house = image (
match(90,(0,0));
match(0,(0,0));
match(90,(l,0));
match(120,(l,l));
match(60,(0,l)););

draw house;

\stopMPcode
___
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
___