% content=tex
%
% copyright=pragma-ade readme=readme.pdf licence=cc-by-nc-sa

\startcomponent text-022

\page[right]

\startMPpage
  StartPage ;  
    fill Page withcolor \MPcolor{blue} ; % .5blue ; 
  StopPage ; 
\stopMPpage 

\startMPpage % \tt 
  StartPage ;  
    path p[] ; picture q[] ; 
    p[1] := Page ; 
    p[2] := Page xscaled .6 shifted (.2PaperWidth,0) ;
    q[1] := btex CONTEXT etex xsized(.6PaperWidth) ; 
%q[2] := btex \tt \currentdate etex xsized(.6PaperWidth) ; 
    fill p[1] withcolor \MPcolor{red} ; % .5red ; 
    fill p[2] withcolor \MPcolor{blue} ; % .5blue ; 
%q[2] := q[2] shifted (0,-1.5bbheight(q[2])) ; 
    draw q[1] shifted (.2PaperWidth,.15PaperHeight) withcolor white ;
%draw q[2] shifted (.2PaperWidth,.15PaperHeight) withcolor white ;
  StopPage ; 
\stopMPpage 

\stopcomponent 
