ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
* sunset showoff
@ 2010-09-15 21:37 Henning Hraban Ramm
  2010-09-15 21:52 ` Aditya Mahajan
  0 siblings, 1 reply; 2+ messages in thread
From: Henning Hraban Ramm @ 2010-09-15 21:37 UTC (permalink / raw)
  To: mailing list for ConTeXt users

try this:

\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

(With the help of Taco, Piotr and Wolfgang - thanks!)

Have fun!
Hraban
___________________________________________________________________________________
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
___________________________________________________________________________________


^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: sunset showoff
  2010-09-15 21:37 sunset showoff Henning Hraban Ramm
@ 2010-09-15 21:52 ` Aditya Mahajan
  0 siblings, 0 replies; 2+ messages in thread
From: Aditya Mahajan @ 2010-09-15 21:52 UTC (permalink / raw)
  To: mailing list for ConTeXt users

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


^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2010-09-15 21:52 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2010-09-15 21:37 sunset showoff Henning Hraban Ramm
2010-09-15 21:52 ` Aditya Mahajan

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).