Markup for DL envelopes: address field and folding lines

envelope-dl.tex

%
% Address
%

\begin{textblock}{93}(14,47) % minus 1 mm 
  \vspace*{38mm} % minus 1 mm
  \setlength{\unitlength}{1mm}
  \begin{picture}(0,0)
    \linethickness{0.075mm}
    % Left bottom
    \put(0,0){\line(0,1){5}}
    \put(0,0){\line(1,0){5}}
    % Left top
    \put(0,39){\line(0,-1){5}}
    \put(0,39){\line(1,0){5}}
    % Right bottom
    \put(93,0){\line(0,1){5}}
    \put(93,0){\line(-1,0){5}}
    % Right top
    \put(93,39){\line(0,-1){5}}
    \put(93,39){\line(-1,0){5}}
  \end{picture}
\end{textblock}


%
% Fold lines
%

\begin{textblock}{210}(0,98) % minus 1 mm
  \setlength{\unitlength}{1mm}
  \begin{picture}(0,0)
    \linethickness{0.075mm}
    % Left
    \put(0,0){\line(1,0){5}}
    % Right bottom
    \put(210,0){\line(-1,0){5}}
  \end{picture}
\end{textblock}

\begin{textblock}{210}(0,197) % minus 1 mm
  \setlength{\unitlength}{1mm}
  \begin{picture}(0,0)
    \linethickness{0.075mm}
    % Left
    \put(0,0){\line(1,0){5}}
    % Right bottom
    \put(210,0){\line(-1,0){5}}
  \end{picture}
\end{textblock}