%   sheet.sty
\RequirePackage{ifthen}

\newcounter{i}
\newcommand{\ps@sheet}
{\setlength{\headheight}{-0.8cm}
\renewcommand{\@oddhead}{\unitlength=1cm
 \begin{picture}(0,0)(3,25)
 \begin{picture}(19,27)
 \put(0,0){\framebox(19,27){}}
 \put(0.5,0.5){\framebox(18,26){}}
 \linethickness{2pt}\put(9,0.5){\framebox(9.5,4){}}
 \thinlines
 \put(9.2,4.2){\makebox(0,0.3)[l]{\small Schema}}
 \put(13.5,0.5){\line(0,1){4}}
 \put(13.5,1.5){\line(1,0){5}}
 \put(13.5,2.5){\line(1,0){5}}
 \put(13.5,3.5){\line(1,0){5}}
 \put(13.7,4.2){\makebox(0,0.3)[l]{\small Blatt}}
 \put(13.7,3.2){\makebox(0,0.3)[l]{\small Datum}}
 \put(13.7,2.2){\makebox(0,0.3)[l]{\small Kontrolle}}
 \ifthenelse{\equal{\@schema}{}}
   {}
 {\put(9.2,0.7){\makebox(0,3.6)[l]
     {\large\bfseries \@schema}}}
 \ifthenelse{\equal{\@blatt}{}}
   {}
   {\put(13.7,3.6){\makebox(0,0.8)[l]
     {\large\bfseries \@blatt}}}
 \ifthenelse{\equal{\@datum}{}}
   {}
   {\put(13.7,2.6){\makebox(0,0.8)[l]
     {\large\bfseries \@datum}}}
 \ifthenelse{\equal{\@kontrolle}{}}
   {}
   {\put(13.7,1.6){\makebox(0,0.8)[l]
     {\large\bfseries \@kontrolle}}}
 % vertikal: Buchstaben
 \setcounter{i}{1}
 \multiput(0,0.5)(0,2){13}{
   \multiput(0,0)(18.5,0){2}
       {\makebox(0.5,2){\Alph{i}}%
     \line(-1,0){0.5}}
     \stepcounter{i}}
 \put(0,26.5){\line(1,0){0.5}}
 \put(18.5,26.5){\line(1,0){0.5}}
 % Horizontal Ziffern
 \setcounter{i}{1}
 \multiput(0.5,0)(2,0){9}{
   \multiput(0,0)(0,26.5){2}
       {\makebox(2,0.5){\arabic{i}}
     \line(0,1){0.5}}
     \stepcounter{i}}
 \put(0.5,0){\line(0,1){0.5}}
 \put(0.5,26.5){\line(0,1){0.5}}
 \end{picture}
 \end{picture}
}
\renewcommand{\@oddfoot}{}
\renewcommand{\@evenhead}{}
\renewcommand{\@evenfoot}{}
}
\newcommand{\sheet}[1]{\def\@blatt{#1}}
\newcommand{\@blatt}{}
\newcommand{\controller}[1]{\def\@kontrolle{#1}}
\newcommand{\@kontrolle}{}
\newcommand{\dateofsheet}[1]{\def\@datum{#1}}
\newcommand{\@datum}{\today}
\newcommand{\descript}[1]{\def\@schema{#1}}
\newcommand{\@schema}{}