From: Aditya Mahajan <adityam@umich.edu>
To: mailing list for ConTeXt users <ntg-context@ntg.nl>
Subject: Re: How to run Typesetting in MetaPost example (MetaFun)?
Date: Wed, 19 Jan 2011 12:42:42 -0500 (EST) [thread overview]
Message-ID: <alpine.LNX.2.01.1101191228550.31800@ybpnyubfg.ybpnyqbznva> (raw)
In-Reply-To: <4D359A42.4030209@ziggo.nl>
On Tue, 18 Jan 2011, Verhaag, G.C.H.M. wrote:
> Hi,
>
> I wanted to try (using ConTeXt minimals MkIV) the example on page 228 of the
> MetaFun manual, dealing with typesetting in MetaPost.
I haven't look at the metapost manual ... but
> The code is given as:
>
> \resetMPdrawing
> \startMPdrawing
> picture pic[] ;
> numeric wid[], len[], pos[], n ;
> wid[0] := len[0] := pos[0] := n := 0 ;
> \stopMPdrawing
>
> \def\whatever#1%
> {\appendtoks#1\to\MPtoks
> \setbox\MPbox=\hbox{\bfd\the\MPtoks}%
> \startMPdrawing
> n := n + 1 ; len[n] := \the\wd\MPbox ;
> \stopMPdrawing
> \startMPdrawing[-]
> pic[n] := textext("\bfd\setstrut\strut#1") ;
> pic[n] := pic[n] shifted - llcorner pic[n] ;
> \stopMPdrawing}
>
> \handletokens MetaPost is Fun!\with\whatever
>
> But is won't run. The following message is generated:
The actual error message said
! Undefined control sequence.
\@@toks ->\MPtoks
So add
\newtoks\MPtoks
After which you get
! Undefined control sequence.
\whatever ...endtoks #1\to \MPtoks \setbox \MPbox
so add
\newbox\MPbox
After that the file compiles but you get an empty image. There are two
things missing in the code. First you don't tell actually draw the
metapost drawing. for that, add
\MPdrawingdonetrue \getMPdrawing \resetMPdrawing
Still an empty page. Again the pic[n] is calculated but never drawn. So
add
draw p[n] shifted (n*1cm,0) ;
(or perhaps along a more sophisticated path),
and now you have a working example:
\newtoks\MPtoks
\newbox\MPbox
\resetMPdrawing
\startMPdrawing
picture p[] ;
numeric wid[], len[], pos[], n ;
wid[0] := len[0] := pos[0] := n := 0 ;
\stopMPdrawing
\def\whatever#1%
{\appendtoks#1\to\MPtoks
\setbox\MPbox=\hbox{\bfd\the\MPtoks}%
\startMPdrawing
n := n + 1 ; len[n] := \the\wd\MPbox ;
p[n] := textext("\bfd\setstrut\strut#1") ;
p[n] := p[n] shifted - llcorner p[n] ;
draw p[n] shifted (n*1cm,0) ;
\stopMPdrawing}
\starttext
\handletokens MetaPost is Fun!\with\whatever
\MPdrawingdonetrue \getMPdrawing \resetMPdrawing
\stoptext
You could also have just used the macros from meta-txt:
\useMPlibrary[txt]
\startMPdefinitions
newpath RotPath ;
RotPath = fullcircle scaled 3cm ;
\stopMPdefinitions
\starttext
\followtokens{Metapost is fun \quad}
\stoptext
@Hans: Perhaps we can have a more ConTeXtist interface to this macro:
\definetextonepath
[whatever]
[color=...,
style=...,
mp=..., % path specification
]
\whatever{Metapost is fun}
Aditya
___________________________________________________________________________________
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
___________________________________________________________________________________
next prev parent reply other threads:[~2011-01-19 17:42 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-01-18 13:48 Verhaag, G.C.H.M.
2011-01-19 13:35 ` Verhaag, G.C.H.M.
2011-01-19 17:12 ` Peter Rolf
2011-01-19 17:42 ` Aditya Mahajan [this message]
2011-01-20 9:59 ` Verhaag, G.C.H.M.
2011-01-20 10:33 ` luigi scarso
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=alpine.LNX.2.01.1101191228550.31800@ybpnyubfg.ybpnyqbznva \
--to=adityam@umich.edu \
--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).