Hi Hans,
I updated lmtx, but your code does not compile except that the output is a pdf file where it is written ERROR.
Fabrice

tex error > tex error on line 1 in file ./blond.tex: ?

\font_helpers_low_level_define ...\scaledfontmode
\relax \ifcase \scaledfont...
\font_helpers_trigger_define ..._identifier_class
\csname \v_font_identifier...
\applyfontclassstrategies ...to_size \lastnamedcs
\else \expandafter \font_h...
\font_helpers_synchronize_font ...classstrategies
\fi \setfalse \c_font_auto...
\rm ->\ifmmode \mathrm \else \normalrm
\fi
\font_basics_switch_style ...dcsname \lastnamedcs
\edef \fontstyle {#1}\ifmm...
...
l.1 \starttext

1 >> \starttext
2
3 \startMPcode
4 defaultfont := "texgyrepagella-regular*default" ;
5 defaultscale := 0.8 ;
6
7 definecolor [ name = "mp:red", b = 1 ] ;
8 definecolor [ name = "mp:green", y = 1 ] ;
9
10 path twos, threes ;
11 twos := fullcircle xscaled 4cm yscaled 2cm rotated 180 shifted 42

mtx-context | fatal error: return code: 256

Le dim. 1 déc. 2019 à 13:09, Hans Hagen <j.hagen@xs4all.nl> a écrit :

On 12/1/2019 11:32 AM, Fabrice Couvreur wrote:
> Hello
> Thank you for your suggestion. However, it works with context and not
> with lmtx.
> Fabrice
>
> \starttext
> \startMPcode
> defaultfont := "texgyrepagella-regular*default" ;
> defaultscale :=0.8;
>
> color brown;
> brown = (0.128,0.00,0.00);
>
> path twos, threes, sixes;
> twos = fullcircle xscaled 4cm yscaled 2cm rotated 180
> shifted 42 left;
> threes = fullcircle xscaled 4cm yscaled 2cm shifted 42 right;
> sixes = buildcycle(twos, threes);
>
> fill twos withcolor brown withtransparency(1,0.75);
> fill threes withcolor yellow withtransparency(1,0.75);
> fill sixes withcolor yellow + brown withtransparency(1,0.75);
>
> draw twos;
> draw threes;
>
> label("...",(1.5cm,0));
> label("...",(0,0));
> label("...",(-1.5cm,0));
> label.top("yeux marron",(-1.5cm,1.25cm));
> label.top("cheveux blonds",(1.5cm,1.25cm));
> \stopMPcode
> \stoptext
>
> tex error > tex error on line 1 in file ./blond.tex: ?
Looks ok here ... but isn't the transparacy used instead of the sizes?
Anyway, you can use named colors

\starttext

\startMPcode
defaultfont := "texgyrepagella-regular*default" ;
defaultscale := 0.8 ;

definecolor [ name = "mp:red", b = 1 ] ;
definecolor [ name = "mp:green", y = 1 ] ;

path twos, threes ;
twos := fullcircle xscaled 4cm yscaled 2cm rotated 180 shifted 42
left ;
threes := fullcircle xscaled 4cm yscaled 2cm shifted 42
right ;

fill twos withcolor "mp:red" withtransparency(1,0.5) ;
fill threes withcolor "mp:green" withtransparency(1,0.5) ;

draw twos ;
draw threes ;

label("...",( 1.5cm,0));
label("...",( 0, 0));
label("...",(-1.5cm,0));
label.top("\strut yeux marron", (-1.5cm,1.25cm));
label.top("\strut cheveux blonds",( 1.5cm,1.25cm));
\stopMPcode

\stoptext

(you cannot overload colors at the tex level in mp but use them in order
to be consistent)

Hans

-----------------------------------------------------------------
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 / 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
___________________________________________________________________________________