\setuppapersize
  [S6][S6]

\setuplayout 
  [header=0cm,
   topspace=.5cm,
   backspace=2cm,
   margindistance=.5cm,
   margin=1cm,
   rightmargin=0cm,
   rightedge=2cm,
   edgedistance=.5cm,
   width=fit,
   footer=1cm,
   height=middle]

\setupbodyfont
  [lbr]

\setuphead
  [chapter]
  [alternative=inmargin,
   number=no,
   ownnumber=yes,
   after={\blank[3*medium]}]  

\setupfootertexts
  [text]
  [chapter][chapternumber]

\setupcolors
  [state=start]

\setuptyping
  [option=tex]

\setupinteraction
  [state=start,
   style=,
   color=,
   contrastcolor=,
   menu=on,
   title=ConTeXt Demo Suite,
   author=Hans Hagen]

\definecolor [DarkGray]   [s=.6]
\definecolor [MediumGray] [s=.8]
\definecolor [LightGray]  [s=.9]

\setupinteractionmenu
  [right]
  [background=color,
   backgroundcolor=LightGray,
   frame=off,
   state=start]

\startinteractionmenu[right]
  \but [content]       contents \\
  \but [sample]        sample   \\
  \but [PreviousJump]  back     \\
  \but [CloseDocument] exit     \\
  \vfill
\stopinteractionmenu

\setupbackgrounds
  [page]
  [background=color,
   backgroundcolor=MediumGray]

\setupbackgrounds
  [text][text]
  [background=color,
   backgroundcolor=LightGray,
   backgroundoffset=1.25mm]

\setuplist
  [chapter]
  [alternative=f,
   after=,
   before=]

\setuptyping
  [before=,
   after=]

\definefont [RatherLarge] [RegularBold at 42pt]

\def\ShowSample#1#2%
  {\chapter{#1}{#2}
   \definereference[sample][d-en-#1::]
   \startlinenumbering
   \typefile {d-en-#1.tex}
   \stoplinenumbering
   \page
   \definereference[sample][]}
   
\starttext 

  \setuplayout
    [leftmargin=0cm,backspace=.5cm,footer=0cm]

  \setuptexttexts
    [{\externalfigure[mp-cont.502][height=\textheight]\hfill}]

  \startstandardmakeup
    \vskip.5cm
    \vfill
    \startcolor[DarkGray]
      \raggedleft 
      \RatherLarge\setupinterlinespace 
      \ConTeXt\kern.5cm\par 
      demo suite\kern.5cm\par 
      \currentdate\kern.5cm\par 
    \stopcolor
    \vskip.5cm
  \stopstandardmakeup

  \setuptexttexts
    []

  \setuplayout
    [leftmargin=1cm,backspace=2cm,footer=1cm]

  \completecontent

  \ShowSample {001} {A simple document}    
  \ShowSample {002} {Setting up the page}         
  \ShowSample {003} {Using the margin}            
  \ShowSample {004} {Adaptive headers and footers}
  \ShowSample {004} {Some bookmarks}

  \writebetweenlist[chapter]{\blank}

  \ShowSample {all} {This file}

\stoptext 
