Re: [NTG-context] MP newbie question

2009-05-18 Thread Alan Stone 
On Mon, May 18, 2009 at 8:45 PM, Alan Stone
wrote:

> Hi,
> How do you make this work ?
>
> --- mpframed.tex ---
>
> %\def\myFrameAlternative{line}
> %\def\myFrameAlternative{dashes}
> \def\myFrameAlternative{dots}
>

The MetaPost User Manual brought the answer...

 %\def\myFrameAlternative{"line"}
%\def\myFrameAlternative{"dashes"}
\def\myFrameAlternative{"dots"}


>  \startuniqueMPgraphic{name}
>
> path p ;
>
> p := unitsquare xscaled \overlaywidth yscaled \overlayheight ;
>  show (\myFrameAlternative) ;
>
> if \myFrameAlternative = dashes :
>

if \myFrameAlternative = "dashes" :

Alan


>  % if (\myFrameAlternative) = dashes :
> draw p dashed evenly scaled 2 ;
> % elseif (\myFrameAlternative) = dots :
> elseif \myFrameAlternative = dots :
> draw p dashed withdots scaled 2 ;
> else :
> draw p ;
> fi ;
>  \stopuniqueMPgraphic
>
> \defineoverlay[myGraphic][\uniqueMPgraphic{name}]
>
> \starttext
>
> \framed[%
> offset=5mm,
> background=myGraphic,
> frame=off]
> {mp framed}
>
> \stoptext
>
> ---
>
> context.cmd mpframed
>
> --
> Alan
>
___
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
___

Re: [NTG-context] MP newbie question

2009-05-18 Thread Aditya Mahajan 

On Mon, 18 May 2009, Alan Stone wrote:


Hi,
How do you make this work ?

--- mpframed.tex ---

%\def\myFrameAlternative{line}
%\def\myFrameAlternative{dashes}
\def\myFrameAlternative{dots}


I usually do (untested)

\chardef\myFrameAlternative 
\myFrameAlternative \zerocount %(or \plusone or \plustwo)


and then


\startuniqueMPgraphic{name}

path p ;

p := unitsquare xscaled \overlaywidth yscaled \overlayheight ;
show (\myFrameAlternative) ;


\ifcase \myFramedAlternative
 draw p dashed evenly scaled 2 ;
\or
 draw p dashed with dots scaled 2 ;
\or
 draw p;
\fi



if \myFrameAlternative = dashes :
% if (\myFrameAlternative) = dashes :
draw p dashed evenly scaled 2 ;
% elseif (\myFrameAlternative) = dots :
elseif \myFrameAlternative = dots :
draw p dashed withdots scaled 2 ;
else :
draw p ;
fi ;
\stopuniqueMPgraphic

\defineoverlay[myGraphic][\uniqueMPgraphic{name}]

\starttext

\framed[%
offset=5mm,
background=myGraphic,
frame=off]
{mp framed}

\stoptext


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

[NTG-context] MP newbie question

2009-05-18 Thread Alan Stone 
Hi,
How do you make this work ?

--- mpframed.tex ---

%\def\myFrameAlternative{line}
%\def\myFrameAlternative{dashes}
\def\myFrameAlternative{dots}

\startuniqueMPgraphic{name}

path p ;

p := unitsquare xscaled \overlaywidth yscaled \overlayheight ;
 show (\myFrameAlternative) ;

if \myFrameAlternative = dashes :
% if (\myFrameAlternative) = dashes :
draw p dashed evenly scaled 2 ;
% elseif (\myFrameAlternative) = dots :
elseif \myFrameAlternative = dots :
draw p dashed withdots scaled 2 ;
else :
draw p ;
fi ;
\stopuniqueMPgraphic

\defineoverlay[myGraphic][\uniqueMPgraphic{name}]

\starttext

\framed[%
offset=5mm,
background=myGraphic,
frame=off]
{mp framed}

\stoptext

---

context.cmd mpframed

-- 
Alan


mpframed.log
Description: Binary data
___
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
___