15 Sep
2010
15 Sep
'10
3:52 p.m.
On Wed, 15 Sep 2010, Henning Hraban Ramm wrote:
\starttext
\setupcolors[state=start] \definedfont[SansBold at 35mm] \baselineskip 0pt % switch off the space between the stripes \lineskip 0pt \def\MyLogo{\vbox{\hbox{\CONTEXT}\null}} % null is necessary for the whole bounding box
\def\Number{30}
\dorecurse{\Number}{\definecolor[Col:\recurselevel][c=0,m=\ctxlua{tex.print(\recurselevel/\Number)},y=1,k=0]}
\dorecurse{\Number}{ \clip[ny=\Number,y=\recurselevel]{\color[Col:\recurselevel]\MyLogo} }
\hbox{\dorecurse{\Number}{\clip[nx=\Number,x=\recurselevel]{\color[Col:\recurselevel]\MyLogo}}}
\stoptext
Add \showboxes to see what is happening :) Aditya