\startenvironment env_ms_calligraphy

\setuppapersize[A6,landscape]

\setupwhitespace[none]

\setupheader[state=stop]

\setupbodyfont[lucidaot,cg,10pt]
\definecharacterkerning [narrow] [factor=-.1]
\setcharacterkerning [narrow]

\setuphead[title][page=no,before={\blank}]


\stopenvironment