ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
From: Hans Hagen <j.hagen@xs4all.nl>
To: mailing list for ConTeXt users <ntg-context@ntg.nl>
Subject: Re: question about MP drawing with dir
Date: Thu, 24 May 2018 21:33:08 +0200	[thread overview]
Message-ID: <d35f21b6-dc7e-acfb-00b7-29f82dabf5d2@xs4all.nl> (raw)
In-Reply-To: <838666be-6ec5-317b-044a-d4d933b41455@gmx.es>

On 5/24/2018 9:01 PM, Pablo Rodriguez wrote:
> Dear Alan,
> 
> I have the following sample (as I wrote, this is addictive ;-)):
> 
>    \startMPpage
>      draw fullcircle scaled (.06TextWidth - .05LineHeight);
> 
>      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 textext("\utfchar{"EB09}")
>              scaled (o * .025) shifted point (i/n*length s) of s ;
>          endfor
>      endfor
>    \stopMPpage

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




-- 

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

  reply	other threads:[~2018-05-24 19:33 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2018-05-24 19:01 Pablo Rodriguez
2018-05-24 19:33 ` Hans Hagen [this message]
2018-05-24 19:41   ` Hans Hagen
2018-05-25 17:41   ` Pablo Rodriguez
2018-05-24 20:23 ` Alan Braslau
2018-05-25 17:58   ` Pablo Rodriguez

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=d35f21b6-dc7e-acfb-00b7-29f82dabf5d2@xs4all.nl \
    --to=j.hagen@xs4all.nl \
    --cc=ntg-context@ntg.nl \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).