[NTG-context] Flowchart module--> height proportional to text

18 Feb 2010

      Hi,

I use flowchart module for doing a simple chart (see attach files) but 
the text is over the node ("Fonts"). Is there anyway for doing node 
ocupies all text?

And is there any way for align the itemize within to left?

Thanks in advance,
Xan,

PS; I use MKII. And please, CCme.

\section{Tectònica de plaques}

\subsection{Com es formen els relleus?}

\setupFLOWcharts[nx=2,ny=1,width=.4\textwidth]

\startFLOWchart[fixistes]
\startFLOWcell
  \name {Fonts}
  \location {1,1}
  \text {{\bf Fonts}

\startitemize[1]
\item Algunes teories es basaven en relats bíblics.  Atribuïen al diluvi 
universal la causa d'alguns relleus i la presència de fòssils marins a 
les muntanyes.
\item Altres suposaven que la Terra s'ha anat arrugat progressivament en 
refredar-se i que els relleus són arrugues provocades per l'escorça en 
contracció.
\stopitemize
}
  \connection [rl] {fixistes}
  \shape{loop}
\stopFLOWcell
\startFLOWcell
  \name {fixistes}
  \location{2,1}
  \text {Teories fixistes: Els continents i els oceans han ocupat les 
mateixes posicions des de l'origen de la Terra.}
\stopFLOWcell
\stopFLOWchart

\defineoverlay[FunnyFrame][\useMPgraphic{FunnyFrame}]
\defineframedtext[FunnyText][frame=off,background=FunnyFrame]
\def\StartFrame{\startFunnyText}
\def\StopFrame {\stopFunnyText }
\def\FrameTitle#1%
  {\setMPtext{FunnyFrame}{\hbox spread 1em{\hss\strut#1\hss}}}
\setMPtext{FunnyFrame}{} % initialize the text variable

\startuseMPgraphic{FunnyFrame}
  picture p ; numeric o ; path a, b ; pair c ;
  p := textext.rt(\MPstring{FunnyFrame}) ;
  o := BodyFontSize ;
  a := unitsquare xyscaled(OverlayWidth,OverlayHeight) ;
  p := p shifted (2o,OverlayHeight-ypart center p) ;
  pickup pencircle scaled OverlayLineWidth ;
  b := a superellipsed .95 ;
  fill b withcolor OverlayColor ;
  draw b withcolor OverlayLineColor ;
  b := (boundingbox p) superellipsed .95 ;
  fill b withcolor OverlayColor ;
  draw b withcolor OverlayLineColor ;
  draw p withcolor black ;
  setbounds currentpicture to a ;
\stopuseMPgraphic

\setupframedtexts
  [FunnyText]
  [backgroundcolor=lightgray,
   framecolor=darkred,
   rulethickness=2pt,
   offset=\bodyfontsize,
   before={\blank[big,medium]},
   after={\blank[big]},
   width=\textwidth]

\FrameTitle{Teories fixistes}
\StartFrame
Al llarg del segle XIX i el començament del XX, es crearen diverses 
teories que intentaven explicar l'origen de les serrelades i el 
plegament dels estrats, que no podem explicar fàcilment.

Totes aquestes teories tenen com a {\bf principi} que els continents i 
els oceans han ocupat les {\em mateixes posicions} des de l'origen de la 
Terra fins ara.
\StopFrame

\FLOWchart[fixistes]