ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
* Back to Metafun Manual
@ 2007-06-06 21:22 David Arnold
  2007-06-07  7:05 ` Taco Hoekwater
  0 siblings, 1 reply; 3+ messages in thread
From: David Arnold @ 2007-06-06 21:22 UTC (permalink / raw)
  To: Context Mailing List List

All,

I am wondering what is wrong with the following. On my system it  
produces the error that follows.

\setuppapersize[S6][S6]

\usetypescriptonce [map]      [times,helvetica,palatino] [texnansi]
\usetypescriptonce [serif]    [times]                    [name,texnansi]
\usetypescriptonce [sans]     [helvetica]                [name,texnansi]
\usetypescriptonce [palatino] [texnansi]

\setupbodyfont [palatino,10pt]

\startbuffer[mpenv]
\startMPenvironment
   \usetypescriptonce[map][times,helvetica,palatino][texnansi]
   \usetypescriptonce[serif][times][name,texnansi]
   \usetypescriptonce[sans][helvetica][name,texnansi]
   \usetypescriptonce[palatino][texnansi]
   \setupbodyfont[palatino,10pt]
   \definefont[RotFont][RegularBold]
\stopMPenvironment
\stopbuffer

\definefont[RotFont][RegularBold]

\getbuffer[mpenv]

\setupcolors[state=start]

\starttext

\def\showMPline#1#2%
   {\startMPcode
      path p ; p := ((0,0)--(.5,1)--(1,0)) xscaled 2.5cm yscaled  
1.25cm ;
      pickup pencircle scaled .75cm ;
      draw p withcolor .625white ;
      interim linejoin := #1 ;
      interim linecap  := #2 ;
      draw p withcolor transparent(1,.5,.625yellow) ;
    \stopMPcode}

\def\showMPtext#1#2%
   {linejoin=#1\par linecap=#2}

\startbuffer
\startcombination[3*3]
   {\showMPline{mitered}{butt}}    {\showMPtext{mitered}{butt}}
   {\showMPline{mitered}{rounded}} {\showMPtext{mitered}{rounded}}
   {\showMPline{mitered}{squared}} {\showMPtext{mitered}{squared}}
   {\showMPline{rounded}{butt}}    {\showMPtext{rounded}{butt}}
   {\showMPline{rounded}{rounded}} {\showMPtext{rounded}{rounded}}
   {\showMPline{rounded}{squared}} {\showMPtext{rounded}{squared}}
   {\showMPline{beveled}{butt}}    {\showMPtext{beveled}{butt}}
   {\showMPline{beveled}{rounded}} {\showMPtext{beveled}{rounded}}
   {\showMPline{beveled}{squared}} {\showMPtext{beveled}{squared}}
\stopcombination
\stopbuffer

\placefigure
   [here] [fig:joints]
   {The nine ways to end and join lines.}
   {\getbuffer}


\stoptext

\stoptext


The error:

(./meta-meta.tmp [MP to PDF] (./meta-mpgraph.1
! Dimension too large.
<recently read> \onebasepoint

\handleMPboundingbox ...expr \MPury \onebasepoint
                                                   -\MPlly  
\onebasepoint \rel...
l.2 %%BoundingBox: -11 -11 82 25121

?

___________________________________________________________________________________
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  : https://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________


^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2007-06-07 16:45 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2007-06-06 21:22 Back to Metafun Manual David Arnold
2007-06-07  7:05 ` Taco Hoekwater
2007-06-07 16:45   ` David Arnold

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).