\startenvironment layo-02

\unprotect

\useexternalfigure [bor0118] [bor0118a] [\c!hfactor=120]
\useexternalfigure [bor0129] [bor0129a] [\c!hfactor=240]

\useexternalfigure [lb00220] [lb00220a] [\c!hfactor=40]
\useexternalfigure [lb00221] [lb00221a] [\c!hfactor=40]
\useexternalfigure [lb00222] [lb00222a] [\c!hfactor=40]
\useexternalfigure [lb00223] [lb00223a] [\c!hfactor=40]
\useexternalfigure [lb00225] [lb00225a] [\c!hfactor=40]
\useexternalfigure [lb00226] [lb00226a] [\c!hfactor=40]

\useexternalfigure [rb00006] [rb00006a] [\c!hfactor=120]
\useexternalfigure [rb00007] [rb00007e] [\c!hfactor=120]
\useexternalfigure [rb00008] [rb00008a] [\c!hfactor=120]
\useexternalfigure [rb00015] [rb00015a] [\c!hfactor=120]

\useexternalfigure [vew1067] [vew1067a] [\c!hfactor=120]
\useexternalfigure [vew1071] [vew1071a] [\c!hfactor=120]
\useexternalfigure [vew1091] [vew1091a] [\c!width=5cm]
\useexternalfigure [vew1095] [vew1095a] [\c!hfactor=100]
\useexternalfigure [vew1096] [vew1096a] [\c!hfactor=100]
\useexternalfigure [vew1097] [vew1097a] [\c!hfactor=100]
\useexternalfigure [vew1113] [vew1113a] [\c!hfactor=120]

\useexternalfigure [vew1179] [vew1179a] [\c!hfactor=75,\c!frame=\v!on]
\useexternalfigure [vew1182] [vew1182a] [\c!hfactor=75,\c!frame=\v!on]
\useexternalfigure [vew1218] [vew1218a] [\c!hfactor=75,\c!frame=\v!on]
\useexternalfigure [spin016] [spin016a] [\c!hfactor=75,\c!frame=\v!on]

\useexternalfigure [vos1082] [vos1082a] [\c!hfactor=120]
\useexternalfigure [vos1083] [vos1083a] [\c!hfactor=120]

\useexternalfigure [eenkoe]  [koe]   [\c!hfactor=120] % geen [koe][koe] !

\useexternalfigure [] [cont-xx]  [\c!hfactor=120,\c!frame=\v!on]
\useexternalfigure [] [cont-yy]  [\c!height=.85\textheight,\c!frame=\v!on]
\useexternalfigure [] [cont-zz1] [\c!height=.85\textheight,\c!frame=\v!on]
\useexternalfigure [] [cont-zz2] [\c!height=.85\textheight,\c!frame=\v!on]
\useexternalfigure [] [cont-zz3] [\c!height=.85\textheight,\c!frame=\v!on]

\protect

% MetaPost, here we come:

\MPinclusions
  {color gray;
   gray := (.95,.95,.95);}

\def\MPcircle#1#2#3#4#5%
  {\startuseMPgraphic{circle}
     path p;
     p := fullcircle xscaled #1\space yscaled #2;
     pickup pencircle scaled #3;
     fill p withcolor \MPcolor{#5};
     draw p withcolor \MPcolor{#4};
   \stopuseMPgraphic
   \useMPgraphic{circle}}

\defineoverlay
  [MPcircleA]
  [\MPcircle{\overlaywidth}{\overlayheight}{2pt}{FrameColor}{GrayColor}]

\startbuffer[fig-cont]

\unprotect

\setupframed[\c!background=MPcircleA,\c!frame=\v!off,\c!offset=\v!none]

\framed
  [\c!width=6cm,\c!height=5cm]
  {\vfil \ConTeXt \vfil
   \leavevmode\framed[\c!width=.7\hsize,\c!height=.5\hsize]
     {\vfil plain\ \TeX \vfil
      \leavevmode\framed[\c!width=.7\hsize,\c!height=.3\hsize]{\TeX}
      \vfil\vfil}
   \vfil\vfil}

\protect

\stopbuffer

\startbuffer[fig-layo]

\unprotect

\setuplinewidth[\v!small]

\setupframed[\c!offset=0pt,\c!framecolor=PlusColor]

\framed
  [\c!strut=\v!no,
   \c!background=\v!screen,
   \c!backgroundscreen=1]
  {\hbox
     {\framed
        [\c!height=15cm,\c!width=1.25cm]
        {\translate[nl=rugwit,en=backspace]}%
      \vbox
        {\offinterlineskip
         \setupframed[\c!width=7.5cm]
         \framed
           [\c!height=1.25cm]
           {\translate[nl=kopwit,en=topspace]}
         \framed
           [\c!height=1.00cm,\c!background=\v!screen,\c!backgroundscreen=.85]
           {\translate[nl=hoofd,en=header]}
         \framed
           [\c!height=10.50cm,\c!background=\v!screen,\c!backgroundscreen=.95]
           {\translate[nl=tekst,en=text]}
         \framed
           [\c!height=1.00cm,\c!background=\v!screen,\c!backgroundscreen=.85]
           {\translate[nl=hoofd,en=footer]}
         \framed
           [\c!height=1.25cm]
           {}}%
      \framed[\c!height=15cm,\c!width=1.75cm]{}}}

\vskip.25cm

\hbox to 10.5cm
  {\hskip1.25cm
   \llap{\hbox to 2cm
      {\color[PlusColor]{\vl}\hss
       \translate[nl=marge,en=margin]\hss
       \color[PlusColor]{\vl}}}%
   \hskip7.5cm
   \hbox to 2.00cm
     {\color[PlusColor]{\vl}\hss
      \translate[nl=marge,en=margin]\hss
      \color[PlusColor]{\vl}}%
   \hss}

\protect

\stopbuffer

\usemodule[chart]

\unprotect

\startFLOWchart [opzet-1]

  \startFLOWcell
    \shape{procedure}
    \name{onderdeel}
    \location{1,1}
    \text{\translate[nl=onderdeel,en=component]}
  \stopFLOWcell
  \startFLOWcell
    \shape{procedure}
    \name{omgeving-3}
    \location{1,2}
    \text{\translate[nl=omgeving,en=environment]}
    \connect [tb] {onderdeel}
  \stopFLOWcell

\stopFLOWchart

\startFLOWchart [opzet-2]

  \startFLOWcell
    \shape{procedure}
    \name{produkt}
    \location{1,1}
    \text{\translate[nl=produkt,en=product]}
    \connect [rl] {onderdeel}
  \stopFLOWcell
  \startFLOWcell
    \shape{procedure}
    \name{omgeving-2}
    \location{1,2}
    \text{\translate[nl=omgeving,en=environment]}
    \connect [tb] {produkt}
  \stopFLOWcell

  \includeFLOWchart[opzet-1][x=2,y=1]

\stopFLOWchart

\startFLOWchart [opzet-3]

  \startFLOWcell
    \shape{procedure}
    \name{projekt}
    \location{1,1}
    \text{\translate[nl=projekt,en=project]}
    \connect [rl] {produkt}
  \stopFLOWcell
  \startFLOWcell
    \shape{procedure}
    \name{omgeving-1}
    \location{1,2}
    \text{\translate[nl=omgeving,en=environment]}
    \connect [tb] {projekt}
  \stopFLOWcell

  \includeFLOWchart[opzet-2][x=2,y=1]

\stopFLOWchart

\setupFLOWcharts  % Pas op, geldt nu voor alle charts!
  [\c!width=6em,
   \c!height=3em,
   \c!dx=1.5em,
   \c!dy=1em,
   \c!frame=\v!on,
   \c!framecolor=FrameColor,
   \c!background=\v!color,
   \c!backgroundcolor=ChartColor,
   \c!offset=.25em]

\setupFLOWlines
  [\c!rulethickness=3pt,
   \c!color=FrameColor]

\protect

\startbuffer[pag-16]

\unprotect

\hbox
  {\forgetall
   \offinterlineskip
   \setupframed
     [\c!width=1cm,\c!height=1.5cm,
      \c!background=\v!screen,\c!backgroundscreen=1]%
   \vbox
     {\hbox
        {\framed{8}\framed{9}\framed{12}\framed{5}}
      \rotate[\c!rotation=180]{\hbox
        {\framed{4}\framed{13}\framed{16}\framed{1}}}}%
   \hskip.25cm
   \vbox
     {\hbox
        {\framed{6}\framed{11}\framed{10}\framed{7}}
      \rotate[\c!rotation=180]{\hbox
        {\framed{2}\framed{15}\framed{14}\framed{3}}}}}

\protect

\stopbuffer

\startbuffer[pag-8]

\unprotect

\hbox
  {\forgetall
   \offinterlineskip
   \setupframed
     [\c!width=1cm,\c!height=1.5cm,
      \c!background=\v!screen,\c!backgroundscreen=1]%
   \vbox
     {\hbox
        {\framed{4}\framed{5}}
      \rotate[\c!rotation=180]{\hbox
        {\framed{8}\framed{1}}}}%
   \hskip.25cm
   \vbox
     {\hbox
        {\framed{3}\framed{6}}
      \rotate[\c!rotation=180]{\hbox
        {\framed{2}\framed{7}}}}}

\protect

\stopbuffer

\startbuffer[pag-4]

\unprotect

\hbox
  {\setupframed
     [\c!width=1cm,\c!height=1.5cm,
      \c!background=\v!screen,\c!backgroundscreen=1]%
   \hbox{\framed{1}\framed{4}}%
   \hskip.25cm
   \hbox{\framed{3}\framed{2}}}

\protect

\stopbuffer

\startbuffer[pag-2up]

\unprotect

\hbox
  {\setupframed
     [\c!width=1cm,\c!height=1.5cm,
      \c!background=\v!screen,\c!backgroundscreen=1]%
   \hbox{\framed{1}\framed{8}}%
   \hskip.25cm
   \hbox{\framed{2}\framed{7}}%
   \hskip.25cm
   \hbox{\framed{3}\framed{6}}%
   \hskip.25cm
   \hbox{\framed{4}\framed{5}}}

\protect

\stopbuffer

\startbuffer[pag-2down]

\unprotect

\hbox
  {\forgetall
   \offinterlineskip
   \setupframed
     [\c!width=1.5cm,\c!height=1cm,
      \c!background=\v!screen,\c!backgroundscreen=1]%
   \vbox{\framed{8}\break\framed{1}}%
   \hskip.25cm
   \vbox{\framed{7}\break\framed{2}}%
   \hskip.25cm
   \vbox{\framed{6}\break\framed{3}}%
   \hskip.25cm
   \vbox{\framed{5}\break\framed{4}}}

\protect

\stopbuffer

\unprotect

\def\ShowArrangementA#1#2%
  {\page
   \placefloat
     [\v!figure]
     {#2}
     \startcombination
       {\externalfigure[#1l]
          [\c!width=.4\makeupwidth,
           \c!framecolor=PlusColor,
           \c!background=\v!screen,
           \c!backgroundscreen=1,
           \c!frame=\v!on]}
       {\translate[nl=rechts,en=right]}
       {\externalfigure[#1r]
          [\c!width=.4\makeupwidth,
           \c!framecolor=PlusColor,
           \c!background=\v!screen,
           \c!backgroundscreen=1,
           \c!frame=\v!on]}
       {\translate[nl=links,en=left]}
     \stopcombination
   \typefile{#1q}
   \page}

\def\ShowArrangementB#1#2%
  {\page
   \dimen0=\textheight
   \advance\dimen0 by -15\openlineheight
   \edef\LeftOver{\the\dimen0}%
   \placefloat
     [\v!figure]
     {#2}
     {\externalfigure[#1]
        [\c!height=\LeftOver,
         \c!framecolor=PlusColor,
         \c!background=\v!screen,
         \c!backgroundscreen=1,
         \c!frame=\v!on]}
   \typefile{#1}
   \page}

\protect

\startbuffer[grid-1]
  \advance\baselineskip by 0pt plus 1pt
  \hsize.2\hsize
  \def\Alpha{\translate[nl=alfa, en=alpha]}
  \def\Beta {\translate[nl=beta, en=beta]}
  \def\Gamma{\translate[nl=gamma,en=gamma]}
  \startcombination[4]
    {\ruledvbox to 5\baselineskip {\Alpha\par\Beta\par\Gamma\par}}                  {}
    {\ruledvbox to 5\baselineskip {\Alpha\par\Beta\par\Gamma\par\kern-\prevdepth}} {}
    {\ruledvbox to 5\baselineskip {\Alpha\par\Beta\par\Gamma\par\kern0pt}}         {}
    {\ruledvbox to 5\baselineskip {\Alpha\par\Beta\par\Gamma\par\vfill}}           {}
  \stopcombination
\stopbuffer

\startbuffer[grid-2]
  \hsize.2\hsize
  \def\Alpha{\translate[nl=alfa, en=alpha]}
  \def\Beta {\translate[nl=beta, en=beta]}
  \def\Gamma{\translate[nl=gamma,en=gamma]}
  \def\Delta{\translate[nl=delta,en=delta]}
  \startcombination[4]
    {\ruledvbox to 5\baselineskip {\Alpha\par\Beta\blank\Gamma\par\Delta}} {}
    {\ruledvbox to 5\baselineskip {\Alpha\par\Beta\par\Gamma\blank\Delta}} {}
    {\ruledvbox to 5\baselineskip {\Alpha\blank\Beta\blank\Gamma}}        {}
    {\ruledvbox to 5\baselineskip {\Alpha\par\Beta\par\Gamma}}              {}
  \stopcombination
\stopbuffer

\startbuffer[print-1]

\writestatus{translation}{move buffer print-1 inline}

\startcombination[4*4]
  {\showprint[][]}                                  {\strut}
  {\showprint[][][location=middle]}                 {\tttf location=middle}
  {\showprint[][][location=middle,marking=on]}      {\tttf marking=on\break location=middle}
  {\showprint[][][location=middle,marking=on,nx=2]} {\tttf marking=on\break location=middle\break nx=2}
  {\showprint[][][location=left]}                   {\tttf location=left}
  {\showprint[][][location=right]}                  {\tttf location=right}
  {\showprint[][][location={left,bottom}]}          {\tttf location={left,bottom}}
  {\showprint[][][location={right,bottom}]}         {\tttf location={right,bottom}}
  {\showprint[][][nx=2,ny=1]}                       {\tttf nx=2, ny=1}
  {\showprint[][][nx=1,ny=2]}                       {\tttf nx=1, ny=2}
  {\showprint[][][nx=2,ny=2]}                       {\tttf nx=2, ny=2}
  {\showprint[][][nx=2,ny=2,location=middle]}       {\tttf nx=2, ny=2\break location=middle}
  {\showprint[][][horoffset=3pt]}                   {\tttf horoffset=.5cm}
  {\showprint[][][veroffset=3pt]}                   {\tttf veroffset=.5cm}
  {\showprint[][][scale=1.5]}                       {\tttf scale=1.5}
  {\showprint[][][scale=0.8]}                       {\tttf scale=0.8}
\stopcombination

\stopbuffer

\startbuffer[print-2]

\writestatus{translation}{move buffer print-2 inline}

\startcombination[3*4]
  {\showprint[landscape][][location=middle]}          {\tttf landscape}
  {\showprint[][landscape][location=middle]}          {\tttf\strut\break\v!landscape}
  {\showprint[landscape][landscape][location=middle]} {\tttf landscape\break landscape}
  {\showprint[90][][location=middle]}                 {\tttf90}
  {\showprint[][90][location=middle]}                 {\tttf\strut\break90}
  {\showprint[90][90][location=middle]}               {\tttf90\break90}
  {\showprint[180][][location=middle]}                {\tttf180}
  {\showprint[][180][location=middle]}                {\tttf\strut\break180}
  {\showprint[180][180][location=middle]}             {\tttf180\break180}
  {\showprint[mirrored][][location=middle]}           {\tttf mirrored}
  {\showprint[][ mirrored][location=middle]}          {\tttf\strut\break mirrored}
  {\showprint[mirrored][mirrored][location=middle]}   {\tttf mirrored\break mirrored}
\stopcombination

\stopbuffer

\startbuffer[baseline]

\def\next#1 #2 #3 #4 #5\\% plus minus gaat hier niet (catcodes)
  {\advance\dimen0 by #1
   \advance\dimen0 by #3}

\dimen0=4\linewidth
\expandafter\next\the\bigskipamount\\
\expandafter\next\the\medskipamount\\
\expandafter\next\the\smallskipamount\\

\startlinecorrection
\midaligned{\startcombination[3]
  {\vbox to \dimen0
     {\hsize=.3\hsize
      \hrule height \linewidth width \hsize \vskip\bigskipamount
      \hrule height \linewidth width \hsize \vskip\medskipamount
      \hrule height \linewidth width \hsize \vskip\smallskipamount
      \hrule height \linewidth width \hsize}}%
  {\translate[nl=maximale rek,en=maximum stretch]}
  {\vbox to \dimen0
     {\hsize=.3\hsize
      \hrule height \linewidth width \hsize \vskip1\bigskipamount
      \hrule height \linewidth width \hsize \vskip1\medskipamount
      \hrule height \linewidth width \hsize \vskip1\smallskipamount
      \hrule height \linewidth width \hsize}}%
  {\translate[nl=geen rek,en=no stretch]}
  {\vbox to \dimen0
     {\hsize=.3\hsize
      \hrule height \linewidth width \hsize \vskip\bigskipamount
      \hrule height \linewidth width \hsize \vskip\medskipamount
      \hrule height \linewidth width \hsize \vskip\smallskipamount
      \hrule height \linewidth width \hsize
      \vskip 3\bigskipamount}}
  {\translate[nl=minimale rek,en=minimal stretch]}
\stopcombination}
\stoplinecorrection

\stopbuffer

\definetabulate[sometable][|c|c|c|c|c|c|c|c|c|]

\startbuffer[boxes-1]
\startsometable
\noalign
  {\vskip\lineheight
   \color[gray]{\hrule height \ht\strutbox depth \dp\strutbox}
   \vskip-2\lineheight
   \nobreak}%
\NC \showstruts\hbox{\hsize1cm \strut a\par a\strut} \NC
    \showstruts\vbox{\hsize1cm \strut a\par a\strut} \NC
    \showstruts\vtop{\hsize1cm \strut a\par a\strut} \NC
    \showstruts\lbox{\hsize1cm \strut a\par a\strut} \NC
    \showstruts\cbox{\hsize1cm \strut a\par a\strut} \NC
    \showstruts\rbox{\hsize1cm \strut a\par a\strut} \NC
    \showstruts\sbox{\hsize1cm \strut a\par a\strut} \=NC
    \showstruts\tbox{\hsize1cm \strut a\par a\strut} \NC
    \showstruts\bbox{\hsize1cm \strut a\par a\strut} \NC \NR
\noalign{\nobreak}
\NC \type {\hbox} \NC
    \type {\vbox} \NC
    \type {\vtop} \NC
    \type {\lbox} \NC
    \type {\cbox} \NC
    \type {\rbox} \NC
    \type {\sbox} \NC
    \type {\tbox} \NC
    \type {\bbox} \NC \NR
\stopsometable
\stopbuffer

\startbuffer[boxes-2]

\definetabulate[sometable][|c|c|c|c|c|]

\unprotect

\startsometable
\noalign
  {\vskip\lineheight
   \color[gray]{\hrule height \ht\strutbox depth \dp\strutbox}
   \vskip-2\lineheight
   \nobreak}
\NC \hbox{\externalfigure[koe][\c!height=1cm,\c!frame=\v!on]} \NC
    \vbox{\externalfigure[koe][\c!height=1cm,\c!frame=\v!on]} \NC
    \sbox{\externalfigure[koe][\c!height=1cm,\c!frame=\v!on]} \NC
    \tbox{\externalfigure[koe][\c!height=1cm,\c!frame=\v!on]} \NC
    \bbox{\externalfigure[koe][\c!height=1cm,\c!frame=\v!on]} \NC \NR
\noalign{\nobreak}
\NC \type {\hbox} \NC
    \type {\vbox} \NC
    \type {\sbox} \NC
    \type {\tbox} \NC
    \type {\bbox} \NC \NR
\stopsometable

\protect

\stopbuffer

\unprotect

\startbuffer[boxes-3]
\setbox0=\vbox{The Final Cut\par --- \em Pink Floyd}
\makecutbox0 \box0
\stopbuffer

\startinterface dutch

\startbuffer[boxes-4]
\startbuffer[water]
Drink geen water \crlf direct uit de kraan! \blanko

\start
  \tfx \stelinterliniein Het drinkwater is tijdelijk niet betrouwbaar.
  Kook het water voor consumptie ten minste 2~minuten. Zodra het water
  weer betrouwbaar is, krijgt u bericht. \par
\stop

\blanko[2*groot]

\language[en] Do not drink water \crlf directly from the tap! \blanko

\start
  \tfx \setupinterlinespace The water is temporarily unfit for drinking.
  Boil the water during at least 2~minutes before consumption. As soon
  as the water is reliable again, you will be notified. \par
\stop
\stopbuffer
\stopbuffer

\stopinterface

\startinterface english

\startbuffer[boxes-4]
\startbuffer[water]
Drink geen water \crlf direct uit de kraan! \blank

\start
  \tfx \setupinterlinespace Het drinkwater is tijdelijk niet betrouwbaar.
  Kook het water voor consumptie ten minste 2~minuten. Zodra het water
  weer betrouwbaar is, krijgt u bericht. \par
\stop

\blank[2*big]

\language[en] Do not drink water \crlf directly from the tap! \blank

\start
  \tfx \setupinterlinespace The water is temporarily unfit for drinking.
  Boil the water during at least 2~minutes before consumption. As soon
  as the water is reliable again, you will be notified. \par
\stop
\stopbuffer
\stopbuffer

\stopinterface

\startbuffer[sdsided]

\unprotect

\switchtobodyfont[\v!small]

\def\somepage#1#2#3%
  {\bgroup
   \doif{#2#3}{}{\setupframed[\c!background=\v!screen]}%
   \framed[\c!height=6em]%
     {\vbox to 5em
        {\hbox to #1{#2\hss#3}%
         \vss
         \hbox to #1{#2\hss#3}}}%
   \egroup}%

\protect

\stopbuffer

\startbuffer[sdsided]

\unprotect

\switchtobodyfont[\v!small]

\def\somepage#1#2#3%
  {\bgroup
   \doif{#2#3}{}{\setupframed[\c!background=\v!screen]}%
   \framed[\c!height=6em]%
     {\vbox to 5em
        {\hbox to #1{#2\hss#3}%
         \vss
         \hbox to #1{#2\hss#3}}}%
   \egroup}%

\startcombination[3*1]
  {\hbox
     {\somepage{1em}{}{}%
      \somepage{4em}{l}{r}%
      \hskip.5em%
      \somepage{1em}{}{}%
      \somepage{4em}{l}{r}}}
  {\tttf\translate[en=singlesided,nl=enkelzijdig]}
  {\hbox
     {\somepage{1em}{}{}%
      \somepage{4em}{l}{r}%
      \hskip.5em%
      \somepage{1em}{}{}%
      \somepage{4em}{r}{l}}}
  {\tttf\translate[en={single...,double...},nl={enkel...,dubbel...}]}
  {\hbox
     {\somepage{4em}{l}{r}%
      \somepage{1em}{}{}%
      \hskip.5em%
      \somepage{1em}{}{}%
      \somepage{4em}{r}{l}}}
  {\tttf\translate[en=doublesided,nl=doublesided]}
\stopcombination

\protect

\stopbuffer

\startbuffer[kerning]

\startlinecorrection
\vbox
  {\forgetall
   \vfill
   \definefont[test][ComputerModern at 48pt]\test
   \hbox{box}
   \vskip-36pt
   \def\\#1%
     {\toprulefalse
      \bottomrulefalse
      \ruledhbox{\vrule width 0pt height 72pt#1}}
   \hbox{\\b\\o\\x}}
\stoplinecorrection

\stopbuffer

\startbuffer[ok-1]

\startlinecorrection
\ruledhbox to \hsize
  {\hss
   \definefont[test][LucidaBright             at 48pt]\test ok\setstrut\strut\hss
   \definefont[test][LucidaSans               at 48pt]\test ok\hss
   \definefont[test][LucidaSans-Typewriter    at 48pt]\test ok\hss
   \definefont[test][LucidaHandwriting-Italic at 48pt]\test ok\hss
   \definefont[test][LucidaCalligraphy-Italic at 48pt]\test ok\hss}
\stoplinecorrection

\stopbuffer

\startbuffer[ok-2]

\startlinecorrection
\ruledhbox to \hsize
  {\hss
   \definefont[test][cmr5  at 48pt]\test ok\setstrut\strut\hss
   \definefont[test][cmr7  at 48pt]\test ok\hss
   \definefont[test][cmr9  at 48pt]\test ok\hss
   \definefont[test][cmr12 at 48pt]\test ok\hss
   \definefont[test][cmr17 at 48pt]\test ok\hss}
\stoplinecorrection

\stopbuffer

\startbuffer[styles]

\vskip1ex
\startcombination[3*3]
  {\rmtfc\setupinterlinespace \let\ShowTokenFont\relax \ShowTokens   Serif\end}  {}
  {\sstfc\setupinterlinespace \let\ShowTokenFont\relax \ShowTokens    Sans\end}   {}
  {\tttfc\setupinterlinespace \let\ShowTokenFont\relax \ShowTokens    Mono\end}   {}
  {\rmtfc\setupinterlinespace \let\ShowTokenFont\relax \ShowTokens Regular\end}{}
  {\sstfc\setupinterlinespace \let\ShowTokenFont\relax \ShowTokens Support\end}{}
  {\tttfc\setupinterlinespace \let\ShowTokenFont\relax \ShowTokens    Mono\end}   {}
  {\rmtfc\setupinterlinespace \let\ShowTokenFont\relax \ShowTokens   Roman\end}  {}
  {\sstfc\setupinterlinespace \let\ShowTokenFont\relax \ShowTokens    Sans\end}   {}
  {\tttfc\setupinterlinespace \let\ShowTokenFont\relax \ShowTokens    Type\end}   {}
\stopcombination
\vskip1ex

\stopbuffer

\startbuffer[em-ex-1]

\def\jump{\vl\hskip1em\vl}%
\def\mmmm{\vl M\vl}%
\def\dash{\vl---\vl}%
\def\numb{\vl12\vl}%

\starttable[|c|c|c|c|c|c|]
\HL
\VL \type{\tf} \VL \type{\bf} \VL \type{\sl}  \VL
    \type{\tt} \VL \type{\ss} \VL \type{\tfx} \VL\SR
\HL
\VL \tf\numb   \VL \bf\numb   \VL \sl \numb   \VL
    \tt\numb   \VL \ss\numb   \VL \tfx\numb   \VL\FR
\VL \tf\mmmm   \VL \bf\mmmm   \VL \sl \mmmm   \VL
    \tt\mmmm   \VL \ss\mmmm   \VL \tfx\mmmm   \VL\MR
\VL \tf\jump   \VL \bf\jump   \VL \sl \jump   \VL
    \tt\jump   \VL \ss\jump   \VL \tfx\jump   \VL\MR
\VL \tf\dash   \VL \bf\dash   \VL \sl \dash   \VL
    \tt\dash   \VL \ss\dash   \VL \tfx\dash   \VL\LR
\HL
\stoptable

\stopbuffer

\startbuffer[em-ex-2]

\def\show
  {\hbox
    {\forgetall
     \offinterlineskip
     \vbox
       {\hsize1em\hl[1]\endgraf\vskip1ex\hl[1]}%
     \hskip.25em
     \vbox
       {\hsize.5em \vskip\linewidth x\vskip\linewidth}}}%

\starttable[|c|c|c|c|c|c|]
\HL
\VL \type{\tf} \VL \type{\bf} \VL \type{\sl}  \VL
    \type{\tt} \VL \type{\ss} \VL \type{\tfx} \VL\SR
\HL
\VL \tf\show   \VL \bf\show   \VL \sl\show    \VL
    \tt\show   \VL \ss\show   \VL \tfx\show   \VL\SR
\HL
\stoptable

\stopbuffer

\startbuffer[font-1]
\definefontsynonym [Sans]            [Helvetica]
\definefontsynonym [SansBold]        [Helvetica-Bold]
\definefontsynonym [SansItalic]      [Helvetica-Oblique]
\definefontsynonym [SansSlanted]     [Helvetica-Oblique]
\definefontsynonym [SansBoldItalic]  [Helvetica-BoldOblique]
\definefontsynonym [SansBoldSlanted] [Helvetica-BoldOblique]
\definefontsynonym [SansCaps]        [Helvetica]

\definebodyfont [14.4pt,12pt,11pt,10pt,9pt,8pt,7pt,6pt,5pt] [ss] [default]
\stopbuffer

\startbuffer[font-2]
\definefontsynonym [Helvetica-Bold] [hvb] [encoding=texnansi]
\stopbuffer

\startbuffer[font-3]
\definefontsynonym [Helvetica-Bold] [phvb] [encoding=ec]
\stopbuffer

\startbuffer[font-4]
\definefontsynonym [Regular] [Serif]
\definefontsynonym [Roman]   [Serif]
\stopbuffer

\startbuffer[font-5]
\definebodyfont [default] [rm]
  [ tf=Serif        sa 1,
   tfa=Serif        sa a,
      ...
    sl=SerifSlanted sa 1,
   sla=SerifSlanted sa a,
      ...]
\stopbuffer

\startbuffer[font-6]
\definebodyfont [12pt] [rm]
  [ tf=cmr12,
   tfa=cmr12 scaled \magstep1,
   tfb=cmr12 scaled \magstep2,
   tfc=cmr12 scaled \magstep3,
   tfd=cmr12 scaled \magstep4,
    bf=cmbx12,
    it=cmti12,
    sl=cmsl12,
    bi=cmbxti10 at 12pt,
    bs=cmbxsl10 at 12pt,
    sc=cmcsc10 at 12pt]
\stopbuffer

\startbuffer[font-7]
\definebodyfont [12pt,11pt,10pt,9pt,8pt] [ss]
  [tf=hv  sa 1.000,
   bf=hvb sa 1.000,
   it=hvo sa 1.000,
   sl=hvo sa 1.000,
  tfa=hv  sa 1.200,
  tfb=hv  sa 1.440,
  tfc=hv  sa 1.728,
  tfd=hv  sa 2.074,
   sc=hv  sa 1.000]
\stopbuffer

\startbuffer[font-8]
\definebodyfont [12pt,11pt,10pt,9pt,8pt] [ss]
  [tf=hv sa 1, tfa=hv sa a, tfb=hv sa b, tfc=hv sa c, tfd=hv sa d]
\stopbuffer

\startbuffer[enco-1]
\startmapping[texnansi]
  \definecasemap 228 228 196  \definecasemap 196 228 196
  \definecasemap 235 235 203  \definecasemap 203 235 203
  \definecasemap 239 239 207  \definecasemap 207 239 207
  \definecasemap 246 246 214  \definecasemap 214 246 214
  \definecasemap 252 252 220  \definecasemap 220 252 220
  \definecasemap 255 255 159  \definecasemap 159 255 159
\stopmapping
\stopbuffer

\startbuffer[enco-2]
\startencoding[texnansi]
  \defineaccent " a 228
  \defineaccent " e 235
  \defineaccent " i 239
  \defineaccent " o 246
  \defineaccent " u 252
  \defineaccent " y 255
\stopencoding
\stopbuffer

\startbuffer[enco-3]
\startencoding[texnansi]
  \definecharacter ae 230
  \definecharacter oe 156
  \definecharacter o  248
  \definecharacter AE 198
\stopencoding
\stopbuffer

\startinterface dutch

\startbuffer[font-10]
\definieerfontsynoniem [twelvepoint] [12pt]
\definieerfontsynoniem [xii]         [12pt]
\stopbuffer

\startbuffer[font-11]
\definieeralgemenestijl [rm,romaan,serif,regular]     [rm]
\definieeralgemenestijl [ss,schreefloos,sans,support] [ss]
\definieeralgemenestijl [tt,teletype,type,mono]       [tt]
\definieeralgemenestijl [hw,handschrift]              [hw]
\definieeralgemenestijl [cg,calligrafie]              [cg]
\stopbuffer

\startbuffer[font-12]
\definieerletter [normaal]             [\tf]  []
\definieerletter [vet]                 [\bf]  []
\definieerletter [type]                [\tt]  []
\definieerletter [italic]              [\it]  []
\definieerletter [schuin]              [\sl]  []
\definieerletter [vetitalic,italicvet] [\bs]  []
\definieerletter [vetschuin,schuinvet] [\bs]  []
\definieerletter [klein,kleinnormaal]  [\tfx] []
\stopbuffer

\startbuffer[font-13]
\definefontsynonym [OldStyle] [MathItalic]
\stopbuffer

\stopinterface

\startinterface english

\startbuffer[font-10]
\definefontsynonym [twelvepoint] [12pt]
\definefontsynonym [xii]         [12pt]
\stopbuffer

\startbuffer[font-11]
\definefontstyle [rm,roman,serif,regular]    [rm]
\definefontstyle [ss,sansserif,sans,support] [ss]
\definefontstyle [tt,teletype,type,mono]     [tt]
\definefontstyle [hw,handwritten]            [hw]
\definefontstyle [cg,calligraphic]           [cg]
\stopbuffer

\startbuffer[font-12]
\definestyle [normal]                  [\tf]  []
\definestyle [bold]                    [\bf]  []
\definestyle [type]                    [\tt]  []
\definestyle [italic]                  [\it]  []
\definestyle [slanted]                 [\sl]  []
\definestyle [bolditalic,italicbold]   [\bs]  []
\definestyle [boldslanted,slantedbold] [\bs]  []
\definestyle [small,smallnormal]       [\tfx] []
\stopbuffer

\startbuffer[font-13]
\definefontsynonym [OldStyle] [MathItalic]
\stopbuffer

\stopinterface

\startbuffer[math-1]
$\tf x^2+\bf x^2+\sl x^2+\it x^2+\bs x^2+ \bi x^2 =\rm 6x^2$
$\tf x^2+\bf x^2+\sl x^2+\it x^2+\bs x^2+ \bi x^2 =\tf 6x^2$
$\tf x^2+\bf x^2+\sl x^2+\it x^2+\bs x^2+ \bi x^2 =\bf 6x^2$
$\tf x^2+\bf x^2+\sl x^2+\it x^2+\bs x^2+ \bi x^2 =\sl 6x^2$
\stopbuffer

\startbuffer[math-2]
$\tf\mf x^2 + x^2 + x^2 + x^2 + x^2 + x^2 = 6x^2$
$\bf\mf x^2 + x^2 + x^2 + x^2 + x^2 + x^2 = 6x^2$
$\sl\mf x^2 + x^2 + x^2 + x^2 + x^2 + x^2 = 6x^2$
$\bs\mf x^2 + x^2 + x^2 + x^2 + x^2 + x^2 = 6x^2$
$\it\mf x^2 + x^2 + x^2 + x^2 + x^2 + x^2 = 6x^2$
$\bi\mf x^2 + x^2 + x^2 + x^2 + x^2 + x^2 = 6x^2$
\stopbuffer

\startbuffer[math-3]
$\bf x^2 + x^2 + x^2 + x^2 + x^2 + x^2 = \mf 6x^2$
\stopbuffer

\startbuffer[math-4]
$\bf x^2 + \hbox{whatever} + \sin(2x)$
\stopbuffer

\startbuffer[math-5]
\definebodyfont [12pt] [mm]
  [ex=cmex10 at 12pt,
   mi=cmmi12,
   sy=cmsy10 at 12pt]
\stopbuffer

\startbuffer[math-6]
\definebodyfont [10pt,11pt,12pt] [mm]
  [tf=Sans          sa 1,
   bf=SansBold      sa 1,
   sl=SansItalic    sa 1,
   ex=MathExtension sa 1,
   mi=MathItalic    sa 1,
   sy=MathSymbol    sa 1]

\setupbodyfont
\stopbuffer

\startbuffer[fontfil]
\starttable[|Tl|l|]
\HL
\NC font-cmr \NC Computer Modern Roman        \NC\AR
\NC font-csr \NC Computer Slavik Roman (?)    \NC\AR
\NC font-con \NC Concrete Roman               \NC\AR
\NC font-eul \NC Euler                        \NC\AR
\NC font-ams \NC American Mathematics Society \NC\AR
\HL
\NC font-ant \NC Antykwa Torunska             \NC\AR
\HL
\NC font-lbr \NC Lucida Bright                \NC\AR
\HL
\NC font-pos \NC Base PostScript Fonts        \NC\AR
\NC font-ptm \NC Times Roman                  \NC\AR
\NC font-phv \NC Helvetica                    \NC\AR
\NC font-pcr \NC Courier                      \NC\AR
\HL
\NC font-fil \NC Standard Filenames           \NC\AR
\NC font-ber \NC Karl Berry FileNames         \NC\AR
\HL
\stoptable
\stopbuffer

\startbuffer[encofil]
\starttable[|Tl|l|]
\HL
\NC enco-ans \NC TeXnansi                     \NC\AR
\NC enco-ec  \NC European Computer            \NC\AR
\NC enco-il2 \NC ISO Latin 2                  \NC\AR
\NC enco-plr \NC Polish Roman                 \NC\AR
\HL
\NC enco-ibm \NC default IBM PC code page     \NC\AR
\NC enco-win \NC default MS Windows code page \NC\AR
\HL
\stoptable
\stopbuffer

\startbuffer[colo-1]
\setupblackrules[\c!width=.25\hsize,\c!height=2ex,\c!depth=0cm]
\setupcombinations[\c!inbetween=]
\startcombination[3*7]
  {\color[red]           {\blackrule}} {\translate[en=red,          nl=rood]}
  {\color[green]         {\blackrule}} {\translate[en=green,        nl=groen]}
  {\color[blue]          {\blackrule}} {\translate[en=blue,         nl=blauw]}
  {\color[middlered]     {\blackrule}} {\translate[en=middlered,    nl=middenrood]}
  {\color[middlegreen]   {\blackrule}} {\translate[en=middlegreen,  nl=middengroen]}
  {\color[middleblue]    {\blackrule}} {\translate[en=middleblue,   nl=middenblauw]}
  {\color[darkred]       {\blackrule}} {\translate[en=darkred,      nl=donkerrood]}
  {\color[darkgreen]     {\blackrule}} {\translate[en=darkgreen,    nl=donkergroen]}
  {\color[darkblue]      {\blackrule}} {\translate[en=darkblue,     nl=donkerblauw]}
  {\color[yellow]        {\blackrule}} {\translate[en=yellow,       nl=geel]}
  {\color[magenta]       {\blackrule}} {\translate[en=magenta,      nl=magenta]}
  {\color[cyan]          {\blackrule}} {\translate[en=cyan,         nl=cyaan]}
  {\color[middleyellow]  {\blackrule}} {\translate[en=middleyellow, nl=middelgeel]}
  {\color[middlemagenta] {\blackrule}} {\translate[en=middlemagenta,nl=middelmagenta]}
  {\color[middlecyan]    {\blackrule}} {\translate[en=middlecyan,   nl=middelcyaan]}
  {\color[darkyellow]    {\blackrule}} {\translate[en=darkyellow,   nl=donkergeel]}
  {\color[darkmagenta]   {\blackrule}} {\translate[en=darkmagenta,  nl=donkermagenta]}
  {\color[darkcyan]      {\blackrule}} {\translate[en=darkcyan,     nl=donkercyaan]}
  {\color[lightgray]     {\blackrule}} {\translate[en=lightgray,    nl=lichtgrijs]}
  {\color[darkgray]      {\blackrule}} {\translate[en=darkergray,   nl=donkergrijs]}
  {\color[black]         {\blackrule}} {\translate[en=black,        nl=zwart]}
\stopcombination
\stopbuffer

\startbuffer[colo-2]
\setupblackrules[\c!width=.25\hsize,\c!height=\ht\strutbox,\c!depth=\dp\strutbox]
\startcombination[3*2]
  {\color    [cyaan:x]{\blackrule}} {\colorvalue{cyaan:x}}
  {\color    [cyaan:y]{\blackrule}} {\colorvalue{cyaan:y}}
  {\color    [cyaan:z]{\blackrule}} {\colorvalue{cyaan:z}}
  {\graycolor[cyaan:x]{\blackrule}} {\grayvalue {cyaan:x}}
  {\graycolor[cyaan:y]{\blackrule}} {\grayvalue {cyaan:y}}
  {\graycolor[cyaan:z]{\blackrule}} {\grayvalue {cyaan:z}}
\stopcombination
\stopbuffer

\startbuffer[colo-3]
\offinterlineskip
\halign
  {\hss#\cr
   \showcolorgroup[red]    [\v!horizontal,\v!name,\v!number]\cr
   \showcolorgroup[green]  [\v!horizontal,\v!name]\cr
   \showcolorgroup[blue]   [\v!horizontal,\v!name]\cr
   \showcolorgroup[yellow] [\v!horizontal,\v!name]\cr
   \showcolorgroup[magenta][\v!horizontal,\v!name]\cr
   \showcolorgroup[cyan]   [\v!horizontal,\v!name]\cr}
\stopbuffer

\startbuffer[colo-4]
\hbox
  {\showcolorgroup[red]     [\v!vertical,\v!name,\v!number]%
   \showcolorgroup[green]   [\v!vertical,\v!name]%
   \showcolorgroup[blue]    [\v!vertical,\v!name]%
   \showcolorgroup[yellow]  [\v!vertical,\v!name]%
   \showcolorgroup[magenta] [\v!vertical,\v!name]%
   \showcolorgroup[cyan]    [\v!vertical,\v!name]}
\stopbuffer

\startbuffer[colo-5]
\vbox
  {\forgetall
   \ttx
   \def\y{\v!screen}
   \def\n{}
   \offinterlineskip
   \def\rijtjenamen#1#2#3#4#5#6#7#8
     {\hbox
        {\framed[\c!width=4em,\c!frame=\v!off]{#1}%
         \hskip.25em
         \framed[\c!background=#3,\c!backgroundscreen=.9]{#2{\v!leftedge}}%
         \hskip.25em
         \framed[\c!background=#4,\c!backgroundscreen=.9]{#2{\v!leftmargin}}%
         \hskip.25em
         \framed[\c!background=#5,\c!backgroundscreen=#8]{#2{\v!text}}%
         \hskip.25em
         \framed[\c!background=#6,\c!backgroundscreen=.9]{#2{\v!rightmargin}}%
         \hskip.25em
         \framed[\c!background=#7,\c!backgroundscreen=.9]{#2{\v!rightedge}}}}%
   \setupframed[\c!width=6.5em]
   \bgroup
   \setupframed[\c!frame=\v!off]
   \rijtjenamen{}\hbox \n\n\n\n\n .9
   \egroup
   \vskip.125em
   \rijtjenamen{\v!top}\hphantom \n\n\n\n\n .9
   \vskip.25em
   \rijtjenamen{\v!header}\hphantom \n\y\y\y\n .9
   \vskip.25em
   \rijtjenamen{\v!text}\hphantom \n\y\y\y\n .5
   \vskip.25em
   \rijtjenamen{\v!footer} \hphantom \n\y\y\y\n .9
   \vskip.25em
   \rijtjenamen{\v!bottom}\hphantom \n\n\n\n\n .9
   \vskip.25em}
\stopbuffer

\def\ShowComposed #1
  {\handletokens#1\with\type\VL#1\VL\hyphenatedword{#1}}

\startinterface english

\startbuffer[hyph-1]
\starttable[|l|l|l|]
\HL
\VL \bf input \VL \bf normal \VL \bf hyphenated \VL\SR
\HL
\VL \ShowComposed intra||word   \VL\FR
\VL \ShowComposed intra|-|word  \VL\MR
\VL \ShowComposed intra|(|word) \VL\MR
\VL \ShowComposed (intra|)|word \VL\MR
\VL \ShowComposed intra|--|word \VL\MR
\VL \ShowComposed intra|~|word  \VL\LR
\HL
\stoptable
\stopbuffer

\stopinterface

\startinterface dutch

\startbuffer[hyph-1]
\starttabel[|l|l|l|]
\HL
\VL \bf invoer \VL \bf normaal  \VL \bf afgebroken \VL\SR
\HL
\VL \ShowComposed polymeer||chemie   \VL\FR
\VL \ShowComposed polymeer|-|chemie  \VL\MR
\VL \ShowComposed polymeer|(|chemie) \VL\MR
\VL \ShowComposed (polymeer|)|chemie \VL\MR
\VL \ShowComposed polymeer|--|chemie \VL\MR
\VL \ShowComposed polymeer|~|chemie  \VL\LR
\HL
\stoptabel
\stopbuffer

\stopinterface

\startbuffer[mp-1]
\startMPgraphic
  fill unitsquare scaled 100 withcolor (.2,.3,.4) ;
\stopMPgraphic
\stopbuffer

\startbuffer[mp-2]
\startMPgraphic
  fill unitsquare scaled 100 withcolor \MPcolor{mark} ;
\stopMPgraphic
\stopbuffer

\startbuffer[mp-3]
\startuseMPgraphic{test a}
  fill unitsquare xscaled \overlaywidth yscaled \overlayheight ;
\stopuseMPgraphic

\defineoverlay[A Nice Rectangle][\useMPgraphic{test a}]

\setupbackgrounds[page][background=A Nice Rectangle]
\stopbuffer

\startbuffer[mp-4]
\startreusableMPgraphic{test b}
  fill unitsquare xscaled \overlaywidth yscaled \overlayheight ;
\stopreusableMPgraphic

\defineoverlay[A Nice Rectangle][\reuseMPgraphic{test b}]

\setupbackgrounds[page][background=A Nice Rectangle]
\stopbuffer

\startinterface english

\startbuffer[messian]
The French composer {\fr Olivier Messiaen} wrote \quote {\fr Quatuor pour
la fin du temps} during the World War II in a concentration camp. This
may well be one of the most moving musical pieces of that period.
\stopbuffer

\stopinterface

\startinterface dutch

\startbuffer
Het door de franse componist {\fr Olivier Messiaen} in de tweede
wereldoorlog in een kamp geschreven \citeer {\fr Quatuor pour la fin du
temps} is wellicht een van de meest aangrijpende muziekstukken uit die
periode.
\stopbuffer

\stopinterface

\stopenvironment
