En/na Wolfgang Schuster ha escrit:
>
> Am 12.03.2009 um 18:01 schrieb Xan:
>
>> Thanks, Wolfgang. Now it works, but whith tiny letters (see attachments)
>
> New version (the old worked only under MkIV).
>
> % logo.mp: creates a blue traffic sign-style context logo
> % Copyright 2008 Taco Hoekwater
> % You are free to use this code any way you can
>
> \setupcolors[state=start,textcolor=white]
>
> \startMPenvironment
> \usetypescript[postscript][ec]
> \setupbodyfont[postscript,ss,120pt]
> \stopMPenvironment
>
> \usetypescript[postscript][ec]
> \setupbodyfont[postscript,ss,120pt]
>
> \starttext
>
> \startMPpage[offset=0pt]
> color darkblue,textcolor;
> darkblue := (0.0625,0,.412); % 0f006b =
> textcolor := (1,1,1);
> def rect (expr xl,yl,r) =
>   pickup pencircle scaled 1;
>   draw (xl-.5r,yl-.5r) -- (xl+.5r,yl-.5r)--
>        (xl+.5r,yl+.5r) -- (xl-.5r,yl+.5r) -- cycle
>             withcolor textcolor;
> enddef;
>
> f:= 14;
> h:=8;
> v:=4;
>
> fill fullcircle scaled 408 shifted (112,0)
>     withcolor darkblue;
> label (textext("C"), (0,v*f)     ) withcolor textcolor ;
> label (textext("O"), (f*h,2*v*f) ) withcolor textcolor ;
> label (textext("N"), (2*f*h,v*f) ) withcolor textcolor ;
> label (textext("T"), (0,-v*f)    ) withcolor textcolor ;
> label (textext("E"), (f*h,0)     ) withcolor textcolor ;
> label (textext("X"), (f*h*2,-v*f)) withcolor textcolor ;
> label (textext("T"), (f*h,-2*v*f)) withcolor textcolor ;
> r := h*f;
>
> rect (0,v*f,r);
> rect (f*h,2*v*f,r);
> rect (2*f*h,v*f,r);
> rect (0,-v*f,r);
> rect (f*h,0,r);
> rect (f*h*2,-v*f,r);
> rect (f*h,-2*v*f,r);
> \stopMPpage
>
> \stoptext
>
> Wolfgang
>
Wolfgang, perhaps now I will be a little bit noisy, but the logo in the 
wiki [http://wiki.contextgarden.net/skins/common/images/logo-alt4.png ] 
has the letters more bold rather than the mp graphic (see attachment below).

How can we do thick more the letters? (and have exactly the same logo). 
I don't know metafun.

Thanks in advance,
Xan