[NTG-context] Left border of a rectangle (Metafun)

Hans Hagen pragma at wxs.nl
Sat Aug 29 13:35:35 CEST 2015


On 8/29/2015 1:11 PM, Otared Kavian wrote:
> Hi fabrice,
>
> I dont’t know whether this the best solution, but you can use the following definition of the MPgraphic Funny:
>
> \startuseMPgraphic{Funny}
>      interim linecap := butt ;
>      path p ;
>      p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ;
>      drawoptions (withpen pencircle scaled 6.5pt withcolor \MPcolor{MyColorA}) ;
>      draw lrcorner p --urcorner p --ulcorner p withcolor white;
>      draw ulcorner p --llcorner p ;
>
> \stopuseMPgraphic

\startuseMPgraphic{Funny}
     interim linecap := butt ;
     draw leftboundary OverlayBox ;
     setbounds currentpicture to OverlayBox ;
\stopuseMPgraphic

-----------------------------------------------------------------
                                           Hans Hagen | PRAGMA ADE
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
     tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com
                                              | www.pragma-pod.nl
-----------------------------------------------------------------


More information about the ntg-context mailing list