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