On 05/24/2018 09:33 PM, Hans Hagen wrote:
> [...]
> reusing a picture is more efficient
>
> \startMPpage
> draw fullcircle scaled (.06TextWidth - .05LineHeight);
> picture t ; t := textext("\cldcontext{utf.char(0xEB09)}") ;
> for m=1 step 2 until 10 :
> path s ; s := (dir30--dir150--dir315--dir90--dir225--cycle)
> scaled m;
> n := (m * 50) ;
> o := (m / 5) ;
> for i=0 upto n :
> draw t scaled (o * .025) shifted point (i/n*length s) of s ;
> endfor
> endfor
> \stopMPpage
Many thanks for the improvement, Hans.
Pablo
--
http://www.ousia.tk
___________________________________________________________________________________
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
___________________________________________________________________________________
