[NTG-context] \dorecurse within TABLE

2012-10-26 Thread Alan BRASLAU
Does anyone have a solution to \dorecurse within TABLE?
Alan

Minimal example:

\starttext
\dorecurse{8}{\recurselevel\crlf}

\bTABLE
\dorecurse{8}{\bTR\bTD\recurselevel\eTD\eTR}
\eTABLE
\stoptext
___
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
___


Re: [NTG-context] \dorecurse within TABLE

2012-10-26 Thread luigi scarso
On Fri, Oct 26, 2012 at 11:50 AM, Alan BRASLAU alan.bras...@cea.fr wrote:

 Does anyone have a solution to \dorecurse within TABLE?
 Alan

 Minimal example:

 \starttext
 \dorecurse{8}{\recurselevel\crlf}

 \bTABLE
 \dorecurse{8}{\bTR\bTD\recurselevel\eTD\eTR}
 \eTABLE
 \stoptext

 ___
 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

 ___


table are strange, they can be parsed more than one time to achive the
result
If you use mkiv maybe the lua version is better
\starttext
\dorecurse{8}{\recurselevel\crlf}
\startluacode
global_cnt=0;
\stopluacode
\bTABLE
%% ok, but why 17 ?
\dorecurse{8}{\bTR\bTD\ctxlua{global_cnt=global_cnt+1;context(global_cnt-17)}:\recurselevel\eTD\eTR}
\eTABLE

%% straight
\startluacode
context.bTABLE()
for i=1,8 do
context.bTR()
context.bTD() context(i) context.eTD()
context.eTR()
end
context.eTABLE()
\stopluacode

\stoptext

-- 
luigi
___
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
___

Re: [NTG-context] \dorecurse within TABLE

2012-10-26 Thread Marco Patzer
2012-10-26 Alan BRASLAU:

 Does anyone have a solution to \dorecurse within TABLE?
 Alan
 
 Minimal example:
 
 \starttext
 \dorecurse{8}{\recurselevel\crlf}
 
 \bTABLE

 \dorecurse{8}{\bTR\bTD\recurselevel\eTD\eTR}

\dorecurse{8}{\expanded{\bTR\bTD\recurselevel\eTD\eTR}}

 \eTABLE
 \stoptext


Marco

___
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
___


Re: [NTG-context] \dorecurse within TABLE

2012-10-26 Thread Alan BRASLAU
On Fri, 26 Oct 2012 12:27:09 +0200
Marco Patzer home...@lavabit.com wrote:
 
 \dorecurse{8}{\expanded{\bTR\bTD\recurselevel\eTD\eTR}}

Thank you. And I found something new to understand:

http://wiki.contextgarden.net/System_Macros/Expansion_Control


Now, is there some better way, or perhaps not, around creating my own
counter (of course, I can use a counter for the column as well...)

\starttext
\bTABLE
\definenumber[row]
\dorecurse{8}{\incrementnumber[row]
\bTR
\dorecurse{5}{\expanded{\bTD \getnumber[row],\recurselevel \eTD}} \eTR }
\eTABLE
\stoptext
___
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
___


Re: [NTG-context] \dorecurse within TABLE

2012-10-26 Thread Wolfgang Schuster

Am 26.10.2012 um 15:03 schrieb Alan BRASLAU alan.bras...@cea.fr:

 On Fri, 26 Oct 2012 12:27:09 +0200
 Marco Patzer home...@lavabit.com wrote:
 
 \dorecurse{8}{\expanded{\bTR\bTD\recurselevel\eTD\eTR}}
 
 Thank you. And I found something new to understand:
 
 http://wiki.contextgarden.net/System_Macros/Expansion_Control
 
 
 Now, is there some better way, or perhaps not, around creating my own
 counter (of course, I can use a counter for the column as well...)
 
 \starttext
 \bTABLE
 \definenumber[row]
 \dorecurse{8}{\incrementnumber[row]
   \bTR
   \dorecurse{5}{\expanded{\bTD \getnumber[row],\recurselevel \eTD}} \eTR }
 \eTABLE
 \stoptext

\starttext
\bTABLE
\dorecurse{8}{\bTR\dorecurse{5}{\bTD #1,##1 \eTD}\eTR}
\eTBALE
\stoptext

Wolfgang
___
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
___


Re: [NTG-context] \dorecurse within TABLE

2012-10-26 Thread Marco Patzer
2012-10-26 Alan BRASLAU:

 Now, is there some better way, or perhaps not, around creating my own
 counter (of course, I can use a counter for the column as well...)

You can use \currentTABLEcolumn and \currentTABLErow

\starttext
\bTABLE
  \dorecurse{8}{
\bTR
\dorecurse{5}{\bTD \currentTABLErow,\currentTABLEcolumn \eTD} \eTR }
  \eTABLE
\stoptext


Marco

___
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
___


Re: [NTG-context] \dorecurse within TABLE

2012-10-26 Thread Alan BRASLAU
Helps to read the wiki, with a link to:

http://randomdeterminism.wordpress.com/2009/03/05/tex-programming-the-past-the-present-and-the-future/

Simple enough:

\starttext
\bTABLE
\dorecurse{8}{
\bTR
\dorecurse{5}{\bTD \the\numexpr#1,\the\numexpr##1 \eTD}
\eTR
}
\eTABLE
\stoptext

Alan

On Fri, 26 Oct 2012 15:03:59 +0200
Alan BRASLAU alan.bras...@cea.fr wrote:

 On Fri, 26 Oct 2012 12:27:09 +0200
 Marco Patzer home...@lavabit.com wrote:
  
  \dorecurse{8}{\expanded{\bTR\bTD\recurselevel\eTD\eTR}}
 
 Thank you. And I found something new to understand:
 
 http://wiki.contextgarden.net/System_Macros/Expansion_Control
 
 
 Now, is there some better way, or perhaps not, around creating my own
 counter (of course, I can use a counter for the column as well...)
 
 \starttext
 \bTABLE
 \definenumber[row]
 \dorecurse{8}{\incrementnumber[row]
   \bTR
   \dorecurse{5}{\expanded{\bTD \getnumber[row],\recurselevel
 \eTD}} \eTR } \eTABLE
 \stoptext

___
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
___


Re: [NTG-context] dorecurse in table

2010-09-06 Thread Aditya Mahajan

On Mon, 6 Sep 2010, Cecil Westerhof wrote:


The following code does what I want:
   \blank
   \SetTableToWidth{\textwidth}
   \starttable[|lp(0.90\textwidth)|]
   Some text \SR
   \SR
   \HL
   \SR
   \HL
   \SR
   \HL
   \SR
   \HL
   \stoptable
   \blank


The correct syntax is \NC ... \NC \SR but that doesn't solve the problem 
in this case.



I would think that the following code is equivalent:
   \blank
   \SetTableToWidth{\textwidth}
   \starttable[|lp(0.90\textwidth)|]
   Some text \SR
   \dorecurse{4}{
 \SR
 \HL
   }
   \stoptable
   \blank

But it is not. I get:
   Underfull \hbox (badness 1) in alignment at lines 39--49
   [][][][][]
   ! Misplaced \noalign.
   \TABLEnoalign -\noalign
\bgroup \let \noalign \relax \let \next =
   \insertTABLEtail -\TABLEnoalign
{\global \settrue \preventTABLEbreak 
\globa...

   \stoptable -\chuckTABLEautorow \insertTABLEtail
\TABLEnoalign 
{\globalletem...
   l.60 \stoptable
and h gives:
   I expect to see \noalign only after the \cr of
   an alignment. Proceed, and I'll ignore this case.

What am I doing wrong?


Table and expansion are tricky. The error is caused by the last \HL and 
goes away if you add another line.


But if you only want four horizontal lines, why not use \thinrules

\thinrules[n=4]

Also have a look at m-educat.tex (look at the example in the end of the 
file) which is essentially a fancy wrapper around \thinrules.


I don't know if \thinrules are documented in a manual, but pack-rul.mkiv 
gives a  few examples:



\starttext
A couple of examples are given below.

\startbuffer
\setupthinrules[n=3,inbetween=,color=gray]

test test \thinrules\ test test \par
test test \thinrules [color=green] test test \par
test test \thinrules [height=max, depth=max] test test \par

\setupthinrules[height=.9,depth=.9]

test test \thinrules\ test test \par
test test \thinrules [alternativevariant=b] test test \par
test test \thinrules [alternativevariant=c] test test \par
test test \thinrules [alternativevariant=c,inbetween=\vskip2ex] test test 
\par

\stopbuffer

\typebuffer {\getbuffer}

There are a couple of alternative ways to visualize rules
using backgrounds. At first sight these may look strange,
but they make sense in educational settings. The
alternatives are more or less compatible with the more
advanced \METAPOST\ based implementation.

\startbuffer[a]
\setupthinrules
  [n=2,
   backgroundcolor=gray  ,
   rulethickness=1pt,
   colorkleur=donkerblauw,
   after=\blank,
   before=\blank]
\stopbuffer

\typebuffer[a]

\startbuffer[b]
\thinrules[alternativevariant=a]
\thinrules[alternativevariant=b]
\thinrules[alternativevariant=c]
\stopbuffer

\typebuffer[b] \getbuffer[a,b]

\startbuffer[b]
\thinrules[alternativevariant=a,background=color]
\thinrules[alternativevariant=b,background=color]
\thinrules[alternativevariant=c,background=color]
\stopbuffer

\typebuffer[b] \getbuffer[a,b]

\startbuffer[b]
\thinrules[alternativevariant=a,height=.8,depth=.8,background=color]
\thinrules[alternativevariant=b,height=.8,depth=.8,background=color]
\thinrules[alternativevariant=c,height=.8,depth=.8,background=color]
\stopbuffer

\typebuffer[b] \getbuffer[a,b]
\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  : http://foundry.supelec.fr/projects/contextrev/
wiki : http://contextgarden.net
___


Re: [NTG-context] dorecurse in table

2010-09-06 Thread Cecil Westerhof
Op maandag 6 sep 2010 23:18 CEST schreef Aditya Mahajan:

 The following code does what I want:
 \blank
 \SetTableToWidth{\textwidth}
 \starttable[|lp(0.90\textwidth)|]
 Some text \SR
 \SR
 \HL
 \SR
 \HL
 \SR
 \HL
 \SR
 \HL
 \stoptable
 \blank

[CUT]

 Table and expansion are tricky. The error is caused by the last \HL and
 goes away if you add another line.

 But if you only want four horizontal lines, why not use \thinrules

 \thinrules[n=4]

That is what I want. I have now defined the following much simpler
macro:
\def\GetComment[#1]{
  \blank
  #1\par
  \thinrules[n=4]
  \blank
}

and I call it with:
\GetComment[What was the most useful for you?]

-- 
Cecil Westerhof
M cldwester...@gmail.com

O ascii ribbon campaign - stop html mail - www.asciiribbon.org

Please do not send me Microsoft Office/Apple iWork documents.
Send OpenDocument instead! http://fsf.org/campaigns/opendocument/
___
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
___