ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
From: Roland Thiers <roland.thiers@gmail.com>
To: mailing list for ConTeXt users <ntg-context@ntg.nl>
Subject: command for a MP graphic
Date: Tue, 7 May 2013 09:30:35 +0200	[thread overview]
Message-ID: <B19DA7FE-010F-4A1E-B350-3277FA2B1A17@gmail.com> (raw)

Hi,
I did this code to get a regular polygon with metafun, it works but I  
would like to have an user command  like  \define or \def
to be able to choose the number of sides, n. I don't know how to do  
that ...

\startbuffer[largeurdeslignes]
drawoptions (withpen pencircle scaled 2pt);
\stopbuffer

\startbuffer[polygoneregulier]
numeric u ; u:=1*cm ;
numeric n ; n:=7 ;
pair a[];
a[0]:=(0,3u);
path polygone[] ;
for i=1 upto n :
a[i]:=a[0] rotatedaround(origin,i*360/n) ;
polygone[i]:=a[i-1]--a[i];
draw polygone[i]; endfor;
\stopbuffer

\startbuffer[cercleunite]
draw fullcircle scaled 6u withcolor blue;
\stopbuffer

\define 
\polyreg 
{\processMPbuffer[largeurdeslignes,polygoneregulier,cercleunite]}
\starttext
\polyreg
\stoptext

Thanks, Roland Thiers
___________________________________________________________________________________
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://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________


             reply	other threads:[~2013-05-07  7:30 UTC|newest]

Thread overview: 7+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-05-07  7:30 Roland Thiers [this message]
2013-05-07  7:51 ` Marco Patzer
2013-05-07 10:55   ` Roland Thiers
2013-05-07 11:05   ` Wolfgang Schuster
2013-05-07 20:28     ` Roland Thiers
2013-05-08  4:56       ` Wolfgang Schuster
2013-05-08  6:22         ` Roland Thiers

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=B19DA7FE-010F-4A1E-B350-3277FA2B1A17@gmail.com \
    --to=roland.thiers@gmail.com \
    --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).