> On 16 Aug 2020, at 21:09, Keith McKay <mckaymeis...@gmail.com> wrote:
>
> Jairo
>
> Try
>
> draw unitsquare scaled 1cm shifted (xcm, ycm);
>
> Page 11 of the manual metafun-p.pdf is your friend here. My recent
> conversation with Taco on this list will be usefull as well.
Also:
\starttext
\startMPpage
% puts the center of the bbox of path p at the point t
primarydef p centered t =
hide(xshift := xpart t - (xpart urcorner p + xpart llcorner p)/2 ;
yshift := ypart t - (ypart urcorner p + ypart llcorner p)/2 ; )
p shifted (xshift,yshift)
enddef;
draw fullsquare scaled 2cm shifted (50,3) centered (100,100);
% just for reference:
drawdot origin withpen pencircle scaled 10 withcolor red;
drawdot (100,100) withpen pencircle scaled 10 withcolor green;
\stopMPpage
\stoptext
(I thought there was a metafun definition for that but I cannot find it).
Best wishes,
Taco
___________________________________________________________________________________
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
___________________________________________________________________________________
