%==================================================================================
%
%  dsaz0112.sty                         Version 17.01.2012 (U. Thiele)
%
%  LaTeX Style File for applications of observing time at Calar Alto
%
%==================================================================================
%
\NeedsTeXFormat{LaTeX2e}[1994/06/01]
%
 \typeout{}
 \typeout{}
 \typeout{------------------------------------------------------------}
 \typeout{------------------------------------------------------------}
 \typeout{----------> CAHA Application Sheet (Jan. 2012)    <---------}
 \typeout{------------------------------------------------------------}
 \typeout{------------------------------------------------------------}
 \typeout{}
 \typeout{}
%
\newcommand{\dsazVersion}{dsaz0112}
%
% Definition of page format
%
\textheight 27.5cm \textwidth 17.0cm
\oddsidemargin 0pt \evensidemargin 0pt
%
\setlength{\hoffset}{-0.5cm} \setlength{\voffset}{-1.5cm} \topsep
0pt \partopsep 0pt \topmargin 0cm \headheight 0cm \headsep 0cm
\setlength{\footskip}{0.7cm}
%
\renewcommand{\topfraction}{1.0}
\renewcommand{\bottomfraction}{1.0}
\renewcommand{\dbltopfraction}{1.0}
\renewcommand{\textfraction}{0.0}
\renewcommand{\floatpagefraction}{0.0}
\renewcommand{\dblfloatpagefraction}{0.0}
%
\newcounter{dsaz}
\newcounter{Mond}
%
%==========================================================================
%               S y m b o l s           HJR     15-Dez-95
%==========================================================================
%
\newcommand{\etal}{\emph{et al.}}
\newcommand{\privcom}{\emph{priv.comm.}}
\newcommand{\eg}{{\it e.g.\/}}
\newcommand{\ie}{{\it i.e.\/}}
\newcommand{\ibidem}{\quad{\it ibidem\/} }
\newcommand{\dito}{\vrule width 0.8cm height 2.5pt depth -2.2pt $\,$}
%-----------------------------------
% units for math-mode (in rm-font !)
%___________________________________
%
\newcommand{\GHz}{{\rm\,GHz}}
\newcommand{\MHz}{{\rm\,MHz}}
\newcommand{\Hz}{{\rm\,Hz}}
%
\newcommand{\pc}{{\rm\,pc}}
\newcommand{\kpc}{{\rm\,kpc}}
\newcommand{\Mpc}{{\rm\,Mpc}}
%
\newcommand{\cm}{{\rm\,cm}}
\newcommand{\second}{{\rm\,sec}}
\newcommand{\Kelvin}{{\rm\,K}}
%
\newcommand{\Jy}{{\rm\,Jy}}
\newcommand{\mJy}{{\rm\,mJy}}
\newcommand{\microJy}{{\rm\,\mu Jy}}
%
%==================
%  special symbols
%==================
%
\newcommand{\sqbullet}{\vrule height .9ex width .8ex depth -.1ex }  % square bullet
\newcommand{\square}{\mathchoice\sqr34\sqr34\sqr{2.1}3\sqr{1.5}3}
\newcommand{\sqr}[2]{{\vcenter{\vbox{\hrule height.#2pt\hbox{\vrule width.#2pt
        height#1pt \kern#1pt\vrule width.#2pt}\hrule height.#2pt}}}}
%
%==========================================================
%   Symbols for degree, arcminute, arcsecond etc.
%              as well as their decimal fractions
%==========================================================
\newcommand{\degree}{\hbox{$^\circ$$$}}
\newcommand{\decdeg}{\hbox{$.\!\!^\circ$}}
\newcommand{\arcmin}{\hbox{$^\prime$}}
\newcommand{\darcmin}{\hbox{$.\mkern-4mu^\prime$}}
\newcommand{\arcsec}{\hbox{$^{\prime\prime}$}}
\newcommand{\darcsec}{\hbox{$.\!\!^{\prime\prime}$}}
\newcommand{\hour}{\hbox{$^{\rm h}$}}
\newcommand{\dech}{\hbox{$.\!\!^{\rm h}$}}
\newcommand{\minute}{\hbox{$^{\rm m}$}}
\newcommand{\decmin}{\hbox{$.\!\!^{\rm m}$}}
\newcommand{\secnd}{\hbox{$^{\rm s}$}}
\newcommand{\decsec}{\hbox{$.\!\!^{\rm s}$}}
%===========================================================================
%
% Definitions for this style-file
%
\newcommand{\RA}[4]{#1\hour&#2\minute&#3\decsec&#4}            % alpha
\newcommand{\DEC}[3]{$#1$\degree&$#2$\arcmin&$#3$\arcsec}      % delta
\newcommand{\bobbl}[2]{\put(#1,#2){\framebox(5,5){\put(2.5,0.0){\circle*{3}}}}}
\newcommand{\bobblh}[2]{\put(#1,#2){\framebox(5,10){\put(2.5,0.0){\circle*{3}}}}}
%
%
\newcommand{\BLANK}{\hskip 2em}
\newcommand{\filledblank}[2]{\underbar{\parbox{#1}{\raisebox{3pt}{\centerline{\rm #2}}}}}
\newcommand{\BOX}[1]{\unitlength1.0cm
           \begin{picture}(0.5,0.5)\put(0.1,-0.1){\framebox(0.5,0.5){#1}}
           \end{picture}}
\newcommand{\DBOX}[1]{\unitlength1.0cm
           \begin{picture}(0.5,0.5)\put(0.1,-0.1){\framebox(1.0,0.5){#1}}
           \end{picture}}
%
\newcommand{\stichw}{}
\newcommand{\kateg}{}
\newcommand{\KeyWord}[1]{\renewcommand{\stichw}{\stepcounter{ExistStich}#1}}
\newcommand{\Category}[1]{\renewcommand{\kateg}{\stepcounter{ExistKat}#1}}
\newcommand{\StatusOfProjects}[1]{\hline
  \multicolumn{7}{|p{15.7cm}|}{\rule[0mm]{0cm}{4mm}{\rm #1}}\\}
\newcommand{\HeadLine}{\centerline{magnitude in}\newline
                       \centerline{spectral range}\newline
                       \centerline{to be observed}}
\newcommand{\Group}{}
\newcommand{\RDSapplication}{\stepcounter{ExistGroup}
\renewcommand{\Group}{from \ \ \BOX{X}\ \ Germany (RDS)\ \ \ \BOX{}\ \ Spain\ \ \BOX{}\ \ other}}
\newcommand{\MPIAapplication}{\stepcounter{ExistGroup}
\renewcommand{\Group}{from \ \ \BOX{X}\ \ Germany (MPIA) \ \BOX{}\ \ Spain\ \ \BOX{}\ \ other}}
\newcommand{\SPANISHapplication}{\stepcounter{ExistGroup}
\renewcommand{\Group}{from \ \ \BOX{}\ \ Germany\ \ \ \ \ \ \ \ \  \BOX{X}\ \ Spain\ \ \BOX{}\ \ other}}
\newcommand{\OTHER}{\stepcounter{ExistGroup}
\renewcommand{\Group}{from \ \ \BOX{}\ \ Germany\ \ \ \ \ \ \ \ \  \BOX{}\ \ Spain\ \ \BOX{X}\ \ other}}
%
% Praeample
%
\newcommand{\AntragNr}{}
\newcommand{\Eingang}{}
\def\TestFlag{nein}\def\test{ja}
\newcommand{\TestRun}{%
\typeout{=======================================================}%
\typeout{=====.............................................=====}%
\typeout{=====..... THIS IS A TEST RUN ONLY !!! ...........=====}%
\typeout{=====.............................................=====}%
\typeout{=====..... NO RECORDS KEPT AT MPIA !!! ...........=====}%
\typeout{=====.............................................=====}%
\typeout{=====....... DE-ACTIVATE TestLauf FOR ............=====}%
\typeout{=====...... SUBMISSION OF PROPOSAL !! ............=====}%
\typeout{=====.............................................=====}%
\typeout{=======================================================}%
\def\TestFlag{ja}}
%
\newcommand{\Service}{}
\newcommand{\ServiceMode}{\stepcounter{ExistService}\renewcommand{\Service}{Service}}
\newcommand{\PartlyServiceMode}{\stepcounter{ExistService}\renewcommand{\Service}{Partly Service}}
\newcommand{\noServiceMode}{\stepcounter{ExistService}\renewcommand{\Service}{ }}
%
%
% Macro prueft, ob eingegebener 1. Parameter eine Zahl ist
% (d.h. nur die Ziffern 0...9 und den Dezimalpunkt oder ein
% Dezimalkomma enthaelt).
%   Parameter 2 = betroffenes Package
%   Parameter 3 = Fehlertext
%   Parameter 4 = Hilfetext
%
%    Siehe N. Schwarz: S. 120
%
\def\SoweitOkay{\relax}
\def\PruefeAufZahl#1#2#3#4{\def\betrPack{#2}\def\betrFehler{#3}\def\betrHilfe{#4}\PruefeZahl#1\Endlist}
\def\Endlist{\Endlist}
\def\PruefeZahl{\afterassignment\TuNichts\let\next= }
\def\TuNichts{%
   \ifx
      \next\Endlist\let\next\relax
   \else
      \if\next 0{\SoweitOkay}%
      \else\if\next 1{\SoweitOkay}%
      \else\if\next 2{\SoweitOkay}%
      \else\if\next 3{\SoweitOkay}%
      \else\if\next 4{\SoweitOkay}%
      \else\if\next 5{\SoweitOkay}%
      \else\if\next 6{\SoweitOkay}%
      \else\if\next 7{\SoweitOkay}%
      \else\if\next 8{\SoweitOkay}%
      \else\if\next 9{\SoweitOkay}%
      \else\if\next .{\SoweitOkay}%
      \else\if\next ,{\SoweitOkay}%
      \else\if\next :{\SoweitOkay}%
      \else\PackageError{\betrPack}{\betrFehler}{\betrHilfe}\next
      \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
        \let\next\PruefeZahl
   \fi\next}
%
% Macro pr{\"u}ft die verschiedenen Flags der Antragstypen und setzt entsprechende Z{\"a}hler
%
\def\PruefeAufTyp#1#2#3#4{\def\betrAPack{#2}\def\betrAFehler{#3}\def\betrAHilfe{#4}\PruefeTyp#1\EndAlist}
\newcounter{TypM}
\newcounter{TypP}
\newcounter{TypL}
\newcounter{TypW}
\newcounter{TypT}
\newcounter{TypC}
\newcounter{TypR}
\newcounter{TypI}
\newcounter{TypG}
\def\EndAlist{\EndAlist}
\def\PruefeTyp{\afterassignment\TuANichts\let\next= }
\def\TuANichts{%
   \ifx
      \next\EndAlist\let\next\relax
   \else
      \if\next 0{\SoweitOkay}%
      \else\if\next M{\setcounter{TypM}{1}}%
      \else\if\next P{\setcounter{TypP}{1}}%
      \else\if\next L{\setcounter{TypL}{1}}%
      \else\if\next W{\setcounter{TypW}{1}}%
      \else\if\next T{\setcounter{TypT}{1}}%
      \else\if\next C{\setcounter{TypC}{1}}%
      \else\if\next R{\setcounter{TypR}{1}}%
      \else\if\next I{\setcounter{TypI}{1}}%
      \else\if\next G{\setcounter{TypG}{1}}%
      \else\PackageError{\betrAPack}{\betrAFehler}{\betrAHilfe}\next
      \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
        \let\next\PruefeTyp
   \fi\next}
%
% ---------------- Z{\"a}hler zur Kontrolle der Kommandos --------------
%
\newcounter{ExistService}
\newcounter{ExistCollab}
\newcounter{ExistObs}
\newcounter{ExistKat}
\newcounter{ExistStich}
\newcounter{ExistTitle}
\newcounter{ExistAbstract}
\newcounter{ExistMethod}
\newcounter{ExistFlux}
\newcounter{ExistNacht}
\newcounter{ExistZeit}
\newcounter{ExistLST}
\newcounter{ExistLogistik}
\newcounter{ExistObj}
\newcounter{ExistBegruend}
\newcounter{ExistRand}
\newcounter{ExistErfahr}
\newcounter{ExistPub}
\newcounter{ExistBiblio}
\newcounter{ExistDFG}
\newcounter{ExistMinReq}
\newcounter{ExistInstr}
\newcounter{ExistGroup}
\newcounter{CheckInstrument}
%
\newcommand{\EndOfApplication}{
        \ifthenelse{\value{ExistGroup}= 0}
        {\PackageError{\dsazVersion}{No user group specified!}{Please make
        sure to use one of the commands RDS, MPIA, SPAIN or OTHER!}}{}
        \ifthenelse{\value{ExistGroup} > 1}
        {\PackageError{\dsazVersion}{More than one user group specified!}{Please
        use only one of the commands RDS, MPIA, SPAIN or OTHER!}}{}
        \ifthenelse{\value{ExistService}= 0}
        {\PackageError{\dsazVersion}{No observing mode selected!}{Please
        make sure to use one of the ServiceModus commands!}}{}
        \ifthenelse{\value{ExistCollab}= 0}
        {\PackageError{\dsazVersion}{Missing command: Collaborators}{Please
        make sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistObs}= 0}
        {\PackageError{\dsazVersion}{Missing command: Observers}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistInstr}= 0}
        {\PackageError{\dsazVersion}{Missing command: Instrumentation}{Please
        make sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistStich}= 0}
        {\PackageError{\dsazVersion}{Missing command: KeyWord}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistTitle}= 0}
        {\PackageError{\dsazVersion}{Missing command: Title}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistKat}= 0}
        {\PackageError{\dsazVersion}{Missing command: Category}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistAbstract}= 0}
        {\PackageError{\dsazVersion}{Missing command: Abstract}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistMethod}= 0}
        {\PackageError{\dsazVersion}{Missing command: Method}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistFlux}= 0}
        {\PackageError{\dsazVersion}{Missing command: FluxLevel}{Please
        make sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistNacht}= 0}
        {\PackageError{\dsazVersion}{Missing command: Nights}{Please make sure
        the command exists in your application!}}{}
        \ifthenelse{\value{ExistZeit}= 0}
        {\PackageError{\dsazVersion}{Missing command: ObsTimeRange}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistLST}= 0}
        {\PackageError{\dsazVersion}{Missing command: LST}{Please make sure
        the command exists in your application!}}{}
        \ifthenelse{\value{TypP}=1}
            {\ifthenelse{\value{ExistLogistik}= 0}
            {\PackageError{\dsazVersion}{Missing command: Logistics}{P (PhD thesis) type
            applications require a logistics page!}}{}}{}
        \ifthenelse{\value{TypL}=1}
            {\ifthenelse{\value{ExistLogistik}= 0}
            {\PackageError{\dsazVersion}{Missing command: Logistics}{L (long term) type
            applications require a logistics page!}}{}}{}
        \ifthenelse{\value{ExistObj}= 0}
        {\PackageError{\dsazVersion}{Missing command: Targets}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistBegruend}= 0}
        {\PackageError{\dsazVersion}{Missing command: Justification}{Please
        make sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistRand}= 0}
        {\PackageError{\dsazVersion}{Missing command: BoundaryConditions}{Please
        make sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistErfahr}= 0}
        {\PackageError{\dsazVersion}{Missing command: Experience}{Please
        make sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistPub}= 0}
        {\PackageError{\dsazVersion}{Missing command: Publications}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistBiblio}= 0}
        {\PackageError{\dsazVersion}{Missing command: BibliographyLists}{Please make
        sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistDFG}= 0}
        {\PackageError{\dsazVersion}{Missing command: noTravelFunding / TravelFunding}{Please
        make sure the command exists in your application!}}{}
        \ifthenelse{\value{ExistMinReq}= 0}
        {\PackageError{\dsazVersion}{Missing command: MinimumObservingRequirements}{Please
        make sure the command exists in your application!}}{}
\end{document}}
%
%----------------------- HEADER ------------------------------------
%
\newcommand{\Header}[2]{\thispagestyle{empty}\setcounter{dsaz}{1}
            \tt \noindent
  \begin{tabular}{p{9.1cm}@{\hspace*{1.0cm}}p{6.3cm}}
    \begin{tabular}[t]{l}
                                           \\
      Time Allocation Committee for \\
      Centro Astron{\'o}mico Hispano Alem{\'a}n (CAHA)\\[0.5ex]
      C/ Jes{\'u}s Durb{\'a}n Rem{\'o}n \\
      E-04004 Almer{\'i}a / Spain\\[3ex]
      \begin{bfseries}\noindent{\large
      APPLICATION FOR OBSERVING TIME
      }\end{bfseries}\\[2ex]
      \Group \\
      \end{tabular} &
   {\large
      \begin{tabular}[t]{|p{5.8cm}|}
        \hline
        {\normalsize
        Application No.}\\
        \hspace*{\fill}\ifx\test\TestFlag {\LARGE\bf TEST}\else\AntragNr\fi\\
        \hline
        {\normalsize Observing period
        \hspace{\fill} #2\,#1}\\
        \hline
        {\normalsize
               Received}              \\
                                      \\
              \hspace*{\fill}\Eingang \\
                                      \\
        \hline\\[-2.0ex]
        \multicolumn{1}{|c|}{\large\bf {\Service}}\\
        \hline
      \end{tabular}}
   \end{tabular}

\vspace*{0.5cm}
}
%
%--------------------- SPRING- OR AUTUMN-PERIOD ---------------------------
%
\newcommand{\Periode}[2]{\noindent
   \begin{tabular}{llll}
      \BOX{#1} &  Autumn period
               &  beginning of July - end of December,
               &  acceptance till March 15.\\[1ex]
      \BOX{#2} & Spring period
               & beginning of January - end of June,
               & acceptance till September 15.\\[2ex]
   \end{tabular}

\vspace*{0.5cm}}
%
\newcommand{\AutumnApplication}[1]{\Header{#1}{H}\Periode{X}{\BLANK}}
\newcommand{\SpringApplication}[1]{\Header{#1}{F}\Periode{\BLANK}{X}}
%
%------------------------------ TELESCOPE ---------------------------------
%
\newcommand{\Teleskope}[5]{

   \noindent
   1.\ \    Telescope:
%                    {\hskip 0.4cm} 1.23-m \ \BOX{#1}
                    {\hskip 0.4cm} 2.2-m  \ \BOX{#2}
                    {\hskip 0.4cm} 3.5-m  \ \BOX{#3}
                    {\hspace{\fill}
            \def\argu{#4}%
            \ifx\argu\empty % nichts besonderes
                  \else
                     #5 \DBOX{\large\bf #4}  % Antragstyp + Referenz
                     \PruefeAufTyp{#4}{\dsazVersion}{Command Telescope 1. parameter}{Illegal Flag: only M,P,L,W,T,C,R,I,G allowed (no blanks)!}

                  \fi}

\vspace*{1.0cm}}
%
%\newcommand{\TelOnePointTwo}[2]{   \Teleskope{\bf X}{\BLANK}{\BLANK}{#1}{#2} \gdef\usetele{teleinszwei}}
\newcommand{\TelTwoPointTwo}[2]{   \Teleskope{\BLANK}{\bf X}{\BLANK}{#1}{#2} \gdef\usetele{telzweizwei}}
\newcommand{\TelThreePointFive}[2]{\Teleskope{\BLANK}{\BLANK}{\bf X}{#1}{#2} \gdef\usetele{teldreifuenf}}
%
%-------------------- APPLICANTS & OBSERVER --------------------------
%
\newcommand{\Applicant}[9]{\gdef\PI{#3}\noindent
  \begin{tabular}{lcc}
                      \hspace*{-1.0em}
2.1  Applicant\ \ \ \
                  & \filledblank{6.3cm}{\ #1 #2 {\large\bf #3}}
                  & \filledblank{6.3cm}{\ #4}      \\
                  & {\footnotesize\tt Name}
                  & {\footnotesize\tt Institute}\\[1ex]
                  & \filledblank{6.3cm}{\ #5}
                  & \filledblank{6.3cm}{\ #6 #7}   \\
                  & {\footnotesize\tt street}
                  & {\footnotesize\tt ZIP code - city}\\[1ex]
                  & \filledblank{6.3cm}{\ #8}
                  & \filledblank{6.3cm}{\tt \ #9}  \\
                  & {\footnotesize\tt country}
                  & {\footnotesize\tt e-mail}      \\[2ex]
  \end{tabular}}

\newcommand{\Collaborators}[4]{\stepcounter{ExistCollab}

  \noindent
  \begin{tabular}{lcc}
                      \hspace*{-1.0em}
2.2  Collaborators
                & \filledblank{6.1cm}{\ #1}
                & \filledblank{6.3cm}{\ #2}       \\
                & {\footnotesize\tt name(s)}
                & {\footnotesize\tt institute(s)}\\[1ex]
                & \filledblank{6.1cm}{\ #3}
                & \filledblank{6.3cm}{\ #4}       \\
                & {\footnotesize\tt  name(s)}
                & {\footnotesize\tt institute(s)}\\[2ex]
  \end{tabular}}
%
\newcommand{\Observers}[2]{\stepcounter{ExistObs}

  \noindent
  \begin{tabular}{lcc}
                      \hspace*{-1.0em}
2.3  Observers \ \ \
                   & \filledblank{6.3cm}{\ #1}
                   & \filledblank{6.3cm}{\ #2} \\
                   & {\footnotesize\tt  name}
                   & {\footnotesize\tt  name}\\[2ex]
  \end{tabular}

}
%
%--------------------- TITLE & ABSTRACT ---------------------------------
%
\newcommand{\Title}[1]{\stepcounter{ExistTitle}

   \noindent
    CAHA points out that by specifying the names under item 2.3
    it is obligatory to also send\\
    out these observers to Calar Alto. Correspondence on the
    rating of this application will\\
    be sent to the applicant (P.I.) as quoted under 2.1 above.\\[3ex]
   \noindent
   3.\ \   Observing programme and method:\hspace{7.1cm}
           Category:\BOX{\kateg}\\[2ex]\gdef\proptitle{#1}
   \parbox[b]{2.6cm}{\ \ \ \ Title\ \ \ \ :\hspace{\fill}}
   \parbox[t]{14.cm}{\begin{rmfamily}\begin{bfseries}{\large
            \ifthenelse{\equal{#1}{}}{\ }{#1}}
            \end{bfseries}\end{rmfamily}}

   \vspace*{1ex}}
%
\newcommand{\Abstract}[1]{\stepcounter{ExistAbstract}\noindent
   \parbox[b]{2.6cm}{\ \ \ \ Abstract :}\hspace{\fill}
   \parbox[t]{14.cm}{\begin{rmfamily}
                       \ifthenelse{\equal{#1}{}}{\ \vspace*{1.0cm}}{#1}
                     \end{rmfamily}}

   \vspace*{\fill}}
%
%------------------------- METHOD --------------------------------------
%
\newcommand{\Method}[2]{\stepcounter{ExistMethod}\noindent
  4.\ \   Instrument:\filledblank{4.4cm}{#1} \hspace{1.8cm}
          Method:\filledblank{6.0cm}{#2}\\[3ex]}
%
%------------------------- FLUX LEVEL ----------------------------------
%
\newcommand{\FluxLevel}[3]{\stepcounter{ExistFlux}\noindent
   5.\ \   Brightness range of objects to be observed:
           from \filledblank{2.0cm}{#1}
           to \filledblank{2.0cm}{#2} {#3}\\[3ex]}
%
%------------------------- NUMBER OF NIGHTS ----------------------------
%
\newcommand{\Nights}[5]{\stepcounter{ExistNacht}\noindent
%
% Pruefung, ob Zahl eingegeben wurde
%
        \PruefeAufZahl{#1}{\dsazVersion}{Command Nights 1. parameter}{Only numbers (real, integer, no blanks) allowed!}
        \PruefeAufZahl{#2}{\dsazVersion}{Command Nights 2. parameter}{Only numbers (real, integer, no blanks) allowed!}
        \PruefeAufZahl{#3}{\dsazVersion}{Command Nights 3. parameter}{Only numbers (real, integer, no blanks) allowed!}
        \PruefeAufZahl{#4}{\dsazVersion}{Command Nights 4. parameter}{Only numbers (real, integer, no blanks) allowed!}
        \PruefeAufZahl{#5}{\dsazVersion}{Command Nights 5. parameter}{Only numbers (real, integer, no blanks) allowed!}
%
% Pruefung, auf Anzahl Eingaben
%
        \setcounter{Mond}{0}
        \ifx#1\empty \else \stepcounter{Mond}\fi
        \ifx#2\empty \else \stepcounter{Mond}\fi
        \ifx#3\empty \else \stepcounter{Mond}\fi
        \ifthenelse{\value{Mond}> 1}
        {\PackageError{\dsazVersion}{Input error in command Nights}{Please specify only one moon phase!}}{}
%
   6.\ \  Number of nights:\hspace*{\fill}
      \begin{tabular}[t]{|c|c|c|cc}
        \cline{1-5}
        \multicolumn{3}{|c|}{\rule[-1mm]{0mm}{5mm}applied for} &
        \multicolumn{1}{|c|}{already awarded} &
        \multicolumn{1}{|c|}{still needed}\\
        \cline{1-5}
        {\rule[-2mm]{0mm}{7mm}\rm #1} & {\rm #2} & {\rm #3} &
        \multicolumn{1}{|c|}{\ifthenelse{\equal{#4}{}}{none}{#4}} &
        \multicolumn{1}{|c|}{\ifthenelse{\equal{#5}{}}{none}{#5}}\\
        \cline{1-5}
        \ {\footnotesize\tt \rule[-0.5mm]{0mm}{4mm}no restriction} &
        \ {\footnotesize\tt grey} &
        \ {\footnotesize\tt dark} & &\\
        \cline{1-3}
      \end{tabular}

\vspace*{0.7cm}}
%
%---------------------- OBSERVING RANGE ----------------------------
%
\newcommand{\ObsTimeRange}[2]{\stepcounter{ExistZeit}
%
        \PruefeAufZahl{#1}{\dsazVersion}{Command Zeitraum 1. parameter}{Only date in format dd.mm.yyyy (no blanks) allowed!}
        \PruefeAufZahl{#2}{\dsazVersion}{Command Zeitraum 2. parameter}{Only date in format dd.mm.yyyy (no blanks) allowed!}
%
\noindent
7.\ \  Optimum date range for the observations: \dotfill
            \begin{rmfamily} #1 -- #2 \end{rmfamily}

         }
\newcommand{\LST}[2]{\stepcounter{ExistLST}
%
        \PruefeAufZahl{#1}{\dsazVersion}{Command LST 1. parameter}{Only time in format hh:mm (no blanks) allowed!}
        \PruefeAufZahl{#2}{\dsazVersion}{Command LST 2. parameter}{Only time in format hh:mm (no blanks) allowed!}
%
\noindent
\hspace*{4ex}
Usable range in local sidereal time LST: \dotfill
            \begin{rmfamily} #1h -- #2h \end{rmfamily}
\newpage}
%
%------------------------- BESCHREIBUNG ----------------------------------
%
\newenvironment{ObservingProgram}
  {\twocolumn[8a.  Description of the observing programme\vspace*{0.5cm}]
  \begin{rmfamily}\sloppy%\vspace*{-0.8cm}
%
  \addtocounter{dsaz}{1}
  \ifthenelse{\value{page}>\value{dsaz}}
            {\PackageError{\dsazVersion}{The title page is too long!\MessageBreak
                                         Description must begin on page \arabic{dsaz}!}
                                        {Shorten text, most likely the abstract! To see where the problem is
                                         enter batch mode by giving "q" !.}}{}
%
  }{\end{rmfamily} \tt \newpage \onecolumn}
%
%------------------------- FIGURES + TABLES  --------------------------
%
\newenvironment{SupportingMaterial}
 {\twocolumn[8b. Figures and tables\vspace*{0.5cm}]
 \begin{rmfamily}\sloppy%\vspace*{-0.8cm}
%
  \addtocounter{dsaz}{1}
  \ifthenelse{\value{page}>\value{dsaz}}
                {\PackageError{\dsazVersion}{The page Description is too long!\MessageBreak
                                            Figures must begin on page \arabic{dsaz}!}
                                            {Shorten text of the description! To see where the problem is
                                             enter batch mode by giving "q" !.}}{}
%
 }{\end{rmfamily} \tt \newpage \onecolumn}
%
%------------------------- LOGISTICS -------------------------------
%
\newenvironment{Logistics}
 {\twocolumn[8c. Current logistics of PhD thesis / Progress report on long-term/large programme \vspace*{0.5cm}]
 \begin{rmfamily}\sloppy\stepcounter{ExistLogistik}
%
  \addtocounter{dsaz}{1}
  \ifthenelse{\value{page}>\value{dsaz}}
                {\PackageError{\dsazVersion}{The Scientific Justification/Backup Programme pages are too long!\MessageBreak
                                            Logistic must begin on page \arabic{dsaz}}
                                            {Shorten text and/or scale down figures!
                                            To see where the problem is enter batch mode by giving "q" !.}}{}
%
 }{\end{rmfamily} \tt \newpage \onecolumn}
%
%------------------------- BACKUP PROGRAM -------------------------------
%
\newenvironment{BackupProgramm}
 {\twocolumn[8d. Description of the backup programme\vspace*{0.5cm}]
 \begin{rmfamily}\sloppy%\vspace*{-0.8cm}
%
  \addtocounter{dsaz}{1}
  \ifthenelse{\value{page}>\value{dsaz}}
                {\PackageError{\dsazVersion}{The page with figures is too long!\MessageBreak
                                            Backup Programme must begin on page \arabic{dsaz}}
                                            {Scale down figures and/or shorten figure captions!
                                            To see where the problem is enter batch mode by giving "q" !.}}{}
%
 }{\end{rmfamily} \tt \newpage \onecolumn}
%
%--------------- FIGURES FOR BACKUP PROGRAM ------------------------
%
\newenvironment{BackupSupportingMaterial}
 {\twocolumn[8e. Figures and tables for backup programme or section 8c\vspace*{0.5cm}]
 \begin{rmfamily}\sloppy%\vspace*{-0.8cm}
%
  \addtocounter{dsaz}{1}
  \ifthenelse{\value{page}>\value{dsaz}}
                {\PackageError{\dsazVersion}{The description of the backup programme is too long!\MessageBreak
                                            Figures for Backup Programme must begin on page \arabic{dsaz}}
                                            {Shorten text for backup programme!
                                            To see where the problem is enter batch mode by giving "q" !.}}{}
%
 }{\end{rmfamily} \tt \newpage \onecolumn}
%
%------------------------------- TARGETS ---------------------------------
%
\newenvironment{Targets}{\stepcounter{ExistObj}
%
  \addtocounter{dsaz}{1}
  \ifthenelse{\value{page}>\value{dsaz}}
                {\PackageError{\dsazVersion}{The preceeding page is too long!\MessageBreak
                                            Object list must begin on page \arabic{dsaz}!}
                                            {Shorten text!
                                            To see where the problem is enter batch mode by giving "q" !.}}{}
%
    \noindent 9a.\ \
    Objects to be observed\hfill\\[2ex]
    \hspace*{3em}(Objects to be observed with high priority should
                                        be marked in last column.

    \hspace*{2em}Please limit the number of targets in this list  
                                        to max. 30)\\[6ex]
    \begin{minipage}[t]{16.0cm}
    \renewcommand{\footnoterule}{\rule{3cm}{0pt}}
%
        \begin{center}
        \normalsize
        \begin{tabular}{|l|r@{\,}r@{\,}r@{}l|r@{\,}r@{\,}r|c|c|}
        \hline
        \multicolumn{1}{|c|}{\normalsize Designation} &
        \multicolumn{4}{|c|}{\normalsize $\alpha$ (2000)} &
        \multicolumn{3}{|c|}{\normalsize $\delta$ (2000)} &
        \multicolumn{1}{|c|}{\parbox{3.0cm}{\begin{center}
                \rule{0cm}{3ex}\normalsize
                \HeadLine
                \rule[-2ex]{0cm}{1ex}\end{center}}}&
        \multicolumn{1}{|c|}{\normalsize priority}\\
        \hline
        &&&& &&& & & \\
        }{
        &&&& &&& & & \\
        \hline
        \end{tabular}
        \end{center}
    \end{minipage}}


\newcommand{\CommentsSample}[1]{

    \vspace*{3ex}
    \noindent 9b.\ 
     Comments on the selection of target sample:\\[2ex]
        \hspace*{2em}\hfill\parbox[t]{16.2cm}{\rm
            {\ifthenelse{\equal{#1}{}}{\ \vspace*{6.0cm} }{#1}}}

        \normalsize
    }
%
\newcommand{\CommentsArchive}[1]{

    \vspace*{3ex}
    \noindent 9c.\
    Please verify whether data of your selected objects, taken in a similar observing\\
    \hspace*{2em}configuration, are already available in the Calar Alto archive:\\[2ex]
        \centerline{http://caha.sdc.cab.inta-csic.es/calto}\\[2ex]
    \hspace*{2em}If so, please justify why new observations are necessary.\\[2ex]
        \hspace*{2em}\hfill\parbox[t]{16.2cm}{\rm
            {\ifthenelse{\equal{#1}{}}{\ \vspace*{6.0cm} }{#1}}}
        \normalsize
        \newpage
        \vspace*{2ex}
    }
%
%
%------------------------ TIME JUSTIFICATION ---------------------------------
%
\newcommand{\TimeJustification}[1]{\stepcounter{ExistBegruend}
  \addtocounter{dsaz}{1}
  \ifthenelse{\value{page}>\value{dsaz}}
                {\PackageError{\dsazVersion}{The target list is too long!\MessageBreak
                                            Justification must begin on page \arabic{dsaz}}
                                            {Remove some objects from the list!
                                            To see where the problem is enter batch mode by giving "q" !.}}{}
%
\noindent
     10.\  Justification of the amount of observing time requested:\\[2ex]
        \hspace*{2em}\hfill\parbox[t]{16.2cm}{\rm
            {\ifthenelse{\equal{#1}{}}{\ \vspace*{6.0cm} }{#1}}}

        \vspace*{2ex}}
%
% ----------------------- SCHEDULING CONSTRAINTS -----------------------------
%
\newcommand{\SchedulingConstraints}[1]{\stepcounter{ExistRand}\noindent
     11.\  Constraints for scheduling observations for this application:\\[2ex]
        \hspace*{2em}\hfill\parbox[t]{16.2cm}{\rm
            {\ifthenelse{\equal{#1}{}}{\ \vspace*{3.0cm} }{#1}}}

        \vspace*{2ex}}
%
%--------------------------- OBSERVING EXPERIENCE -------------------------
%
\newcommand{\ObsExperience}[1]{\stepcounter{ExistErfahr}\noindent
    12.\  Observational experience of observer(s) named under 2.3:\\
    \phantom{12.\  }(at least one observer must have sufficient experience)\\[1ex]
    \hspace*{2em}\hspace{\fill}\parbox[t]{16.2cm}{\rm
            {\ifthenelse{\equal{#1}{}}{\ \vspace*{3.0cm} }{#1}}}

        \vspace*{2ex}}
%
%-------------------------- PUBLICATIONS ---------------------------
%
%
\newenvironment{Publications}{\stepcounter{ExistPub}\noindent
    13.\  Calar Alto runs (preferably during the last 3 years)\\
    \hspace*{5ex}and publications resulting from these\\[1ex]
    \noindent\hspace*{0.5cm}
\begin{minipage}[t]{16.25cm}
\renewcommand{\footnoterule}{\rule{3cm}{0pt}}
    \normalsize
    \begin{center}
    \begin{tabular}{|c|c|c|c|c|c|c|}
    \hline
    Tel. & instrument & proposal ID & date & nights & success rate & publications\rule[-1mm]{0cm}{3ex}\\
    \hline
    }{
    \hline
        \end{tabular}
    \end{center}
\end{minipage}
\normalsize\newpage}

\newcommand{\BibliographyLists}[3]{
  \addtocounter{dsaz}{1}\stepcounter{ExistBiblio}
  \ifthenelse{\value{page}>\value{dsaz}}
                {\PackageError{\dsazVersion}{The preceeding page is too long!\MessageBreak
                                            References must begin on page \arabic{dsaz}}
                                            {Shorten one or several entries on preceeding page!
                                            To see where the problem is enter batch mode by giving "q" !.}}{}
%
     \noindent 14.\  References for items 8 and 13:

     {\rm \medskip
        \ifthenelse{\equal{#1}{manuell}}
             {\hspace*{1ex}         % manual entry of references
              \begin{minipage}[t]{16.0cm}
        #2

        \hrulefill

        \medskip
        #3
              \end{minipage}}
%
        {\renewcommand{\refname}{ }\vspace*{-1.5cm} % automatic formating
        \begin{thebibliography}{000}
        #2
        \setcounter{enumiv}{99}
        #3
        \end{thebibliography}}}
\newpage}
%
%----------------------- TRAVEL FUNDING ----------------------------------------
%
\newcommand{\REISEtextA}{
  \addtocounter{dsaz}{1}
  \ifthenelse{\value{page}>\value{dsaz}}
                {\PackageError{\dsazVersion}{The list of references is too long!\MessageBreak
                                            Items 15./16. must begin on page \arabic{dsaz}}
                                            {Remove/shorten some references!
                                            To see where the problem is enter batch mode by giving "q" !.}}{}
%
    \noindent
    \parbox[t]{0.6cm}{15.}\ \parbox[t]{15.5cm}{
    CAHA does not cover costs of the observing run. It is the responsibility of the\\
    applicant(s) to raise the money for the travel to Calar Alto and expenses during\\
    the observing run.\\[2ex]
    Consumables needed in larger quantities will be charged to the applicant(s).\\[2ex]
    Furthermore the applicant(s) should consult our web page with the "Guidelines \\
    for Visiting Astronomers":\\[2ex]
    \centerline{http://www.caha.es/visast.html}}\\[3ex]
%
    \parbox[t]{0.6cm}{16.}\ \parbox[t]{15.5cm}{
    Members of institutes of the Rat Deutscher Sternwarten (except Max Planck insti-\\
    tutes) may apply for travel funding at the DFG with reference to this application\\
    and the letter granting observing time.
    \\[2ex]\hspace*{\fill}
    }}
%
\newcommand{\TravelFunding}[1]{
        \ifthenelse{\value{ExistDFG}> 0}
        {\PackageError{\dsazVersion}{Funding already specified!}{Please make sure to use one of the Funding commands only!}}{}
        \stepcounter{ExistDFG}\REISEtextA

    \noindent
    \parbox[t]{0.6cm}{\ }\ \parbox[t]{14.5cm}{Should observing time be granted is
                it planned to apply for DFG funds?
      \hspace*{\fill}yes\BOX{X}\\
      \hspace*{\fill}no\BOX{\BLANK}

    \vspace{4ex}

    Should it be necessary to send two observers to Calar Alto, this has to be\\
    justified below. Final decision upon its approval lies with the TAC's DFG\\
    representative.}\\[3ex]
%
    \parbox[t]{0.6cm}{\ }\ \parbox[t]{14.5cm}{
    Justification for 2 observers travelling to Calar Alto, if funds for both will\\
    be applied for at DFG:}

    \medskip
    \noindent\parbox[t]{0.6cm}{\hfill}\hfill\parbox[t]{16.0cm}{\rm#1}\hspace*{\fill}

    \vspace{4ex}
%
    \noindent
    \parbox[t]{0.6cm}{17.}\ \parbox[t]{15.5cm}{
    Please note that the observing data will be made public by the Virtual\\
    Observatory (VO), Madrid, after a proprietary period of one year after\\
    the end of the observation. This does not apply for IAA and MPIA\\
    guaranteed time.
    \\[2ex]\hspace*{\fill}
    }
%
    \vfill\newpage}
%
\newcommand{\noTravelFunding}{
        \ifthenelse{\value{ExistDFG}> 0}
        {\PackageError{\dsazVersion}{Funding already specified!}{Please make sure to use one of the Funding commands only!}}{}
        \stepcounter{ExistDFG}\REISEtextA

    \noindent
    \parbox[t]{0.6cm}{\ }\ \parbox[t]{14.5cm}{Should observing time be granted is
                it planned to apply for DFG funds?
      \hspace*{\fill}yes\BOX{\BLANK}\\
      \hspace*{\fill}no\BOX{X}}\hspace*{\fill}

    \vspace{4ex}
%
    \noindent
    \parbox[t]{0.6cm}{17.}\ \parbox[t]{15.5cm}{
    Please note that the observing data will be made public by the Virtual\\
    Observatory (VO), Madrid, after a proprietary period of one year after\\
    the end of the observation. This does not apply for IAA and MPIA\\
    guaranteed time.
    \\[2ex]\hspace*{\fill}
    }
%
    \vfill\newpage}
%
%====================== min requirements =================================
%

\newcommand{\MinimumObservingRequirements}[6]{
  \addtocounter{dsaz}{1}\stepcounter{ExistMinReq}
  \ifthenelse{\value{page}>\value{dsaz}}
  {\PackageError{\dsazVersion}{The preceding page (items 15./16.) is too long!\MessageBreak
                                Instrumentation must begin on page \arabic{dsaz}}
                                {Shorten text for Item 15./16.!
                                To see where the problem is enter batch mode by giving "q" !.}}{}
\noindent {\rm\large\bf Tolerance limits for planned observations:}\\[2ex]
\setlength{\footskip}{0pt}
\setlength{\textheight}{280mm}
\setlength{\textwidth}{180mm}
\parindent 0pt
%
\thispagestyle{empty}
\unitlength1.0mm
\linethickness{0.5mm}
\begin{picture}(180,20)
\put(0,0){\framebox(180,20){}}
\linethickness{0.1mm}
\put(   0, 10){\framebox(55,10)[l]{{\rm\bf\ maximum seeing:}
             \hspace{\fill}#1\arcsec\ }}
\put(  55, 10){\framebox(65,10)[l]{{\rm\bf\ minimum transparency:}
            \hspace{\fill}#2\%\ }}
\put( 120, 10){\framebox(60,10)[l]{{\rm\bf\ maximum airmass:}
            \hspace{\fill}#3\ }}
\put(   0,  0){\framebox(55,10)[l]{{\rm\bf\ photometric conditions:}
            \hspace{\fill}#4\ }}
\put(  55,  0){\framebox(65,10)[l]{{\rm\bf\ moon: max. phase / $\angle$ :}
            \hspace{\fill}#5\degree\ }}
\put( 120,  0){\framebox(60,10)[l]{{\rm\bf\ min. / max. lag:}
            \hspace{\fill}#6 nights\ }}
\end{picture}}

% ========================= Instrumentierungsblatt ======================
%
\newcommand{\Instrumentation}[7]{\marginparwidth 1in \marginparsep 0pt
%
\stepcounter{ExistInstr}
%
\begin{picture}(180,240)
\linethickness{0.5mm}

\put(0,0){\framebox(180,234.9){}}
\linethickness{0.1mm}
%
%   3.5m-Teleskop
%
\put(  5,225){\framebox(5,5){}}
\put( 10,225){\framebox(20,5){\sf\large\bf 3.5m}}
\put( 30,225){\framebox(5,5){}}
\put( 35,225){\framebox(35,5)[c]{\sf\,LAICA}}
\put( 70,227.5){\vector(1,0){5}}
\put( 75,225){\framebox(80,5)[l]{\sf\,Filters:}}
\put( 30,225){\line(0,-1){10}}
\put( 30,215){\framebox(5,5){}}
\put( 35,215){\framebox(35,5)[c]{\sf\,OMEGA 2000}}
\put( 70,217.5){\vector(1,0){5}}
\put( 75,215){\framebox(80,5)[l]{\sf\,Filters:}}
%
\put( 30,225){\line(0,-1){30}}
\put( 30,195){\framebox(5,10){}}
\put( 35,195){\framebox(35,10){\sf TWIN}}
\put( 70,200){\vector(1,0){5}}
\put( 75,200){\framebox(5,5){}}
\put( 80,200){\framebox(25,5)[l]{\sf \ beam splitter}}
\put(105,200){\framebox(5,5){}}
\put(110,200){\framebox(25,5)[l]{\sf \ mirror}}
\put( 75,195){\framebox(30,5){\sf blue channel}}
\put(105,195){\framebox(30,5){\sf red channel}}
\put( 75,190){\framebox(30,5){}}
\put( 80,190){\makebox(25,5)[l]{\sf\,grating:}}

\put(105,190){\framebox(30,5){}}
\put(110,190){\makebox(25,5)[l]{\sf\,grating:}}
%
\put( 30,200){\line(0,-1){30}}
%\put( 30,175){\framebox(5,10){}}
%\put( 35,175){\framebox(35,10){\sf OMEGA Cass}}
%\put(110,180){\vector(1,0){10}}
%\put(120,180){\framebox(5,5){}}
%\put(125,180){\framebox(45,5){\sf without adaptive optics}}
%\put(120,175){\framebox(5,5){}}
%\put(125,175){\framebox(45,5){\sf with adaptive optics}}
%\put(120,177.5){\framebox(45,5){\sf not available for H03!}}

%\put( 30,175){\line(0,-1){20}}
\put( 30,175){\framebox(5,10){}}
\put( 35,175){\framebox(35,10){\sf MOSCA}}
\put( 70,180){\vector(1,0){5}}
\put( 75,180){\framebox(75,5)[l]{\sf\,Filters:}}
\put( 75,175){\framebox(75,5)[l]{\sf\,Grisms:}}
%
\put( 30,175){\line(0,-1){20}}
\put( 30,155){\framebox(5,10){}}
\put( 35,155){\framebox(35,10){\sf PMAS}}
\put( 70,160){\vector(1,0){5}}
\put( 75,160){\framebox(5,5){}}
\put( 80,160){\framebox(30,5)[l]{\sf \ PPAK\rule[-3pt]{0pt}{3ex}}}
\put( 75,155){\framebox(5,5){}}
\put( 80,155){\framebox(30,5)[l]{\sf \ LensArray\rule[-3pt]{0pt}{3ex}}}
\put(110,160){\vector(1,0){5}}
\put(115,157.5){\framebox(40,5)[l]{\sf\,grating:}}
%
\put( 30,155){\line(0,-1){15}}
\put( 30,140){\framebox(5,5){}}
\put( 35,140){\framebox(35,5){\sf private instrument}}
\put( 70,142.5){\vector(1,0){5}}
\put( 75,140){\framebox(80,5)[t]{\,\parbox[t]{58mm}{}}}
%
%   2.2m-Teleskop
%
\put(  5,120){\framebox(5,5){}}
\put( 10,120){\framebox(20,5){\sf\large\bf 2.2m}}
%\put( 30,120){\framebox(5,5){}}
%\put( 35,120){\framebox(30,5){\sf Cassegrain focus}}
%
%\put( 65,115){\line(0,-1){10}}
\put( 30,115){\framebox(5,10){}}
\put( 35,115){\framebox(35,10){\sf CAFOS}}
\put( 70,120){\vector(1,0){5}}
\put( 75,120){\framebox(5,5){}}
\put( 80,120){\framebox(20,5)[l]{\sf\,polarizer}}
\put( 75,115){\framebox(5,5){}}
\put( 80,115){\framebox(20,5)[l]{\sf\,Etalon}}
\put( 75,110){\framebox(75,5)[l]{\sf\,Filters:}}
\put( 75,105){\framebox(75,5)[l]{\sf\,Grisms:}}
%
\put( 30,115){\line(0,-1){15}}
\put( 30, 90){\framebox(5,10){}}
\put( 35, 90){\framebox(35,10){\sf MAGIC}}
\put( 70, 95){\vector(1,0){5}}
\put( 75, 95){\framebox(5,5){}}
\put( 80, 95){\framebox(20,5)[l]{\sf\,1\darcsec6/pixel}}
\put( 75, 90){\framebox(5,5){}}
\put( 80, 90){\framebox(20,5)[l]{\sf\,0\darcsec66/pixel}}
\put(100, 92.5){\vector(1,0){5}}
\put(105, 90){\framebox(5,5){}}
\put(110, 90){\framebox(20,5)[l]{\sf\,Grism\,R270}}
%
\put( 30, 90){\line(0,-1){10}}
\put( 30, 80){\framebox(5,5){}}
\put( 35, 80){\framebox(35,5){\sf CAFE}}
%
\put( 30, 80){\line(0,-1){10}}
\put( 30, 70){\framebox(5,5){}}
\put( 35, 70){\framebox(35,5){\sf BUSCA}}
\put( 70, 72.5){\vector(1,0){5}}
\put( 75, 70){\framebox(80,5)[l]{\sf\,Filters:}}
%
\put( 30, 70){\line(0,-1){10}}
\put( 30, 60){\framebox(5,5){}}
\put( 35, 60){\framebox(35,5){\sf ASTRALUX}}
\put( 70, 62.5){\vector(1,0){5}}
\put( 75, 60){\framebox(80,5)[l]{\sf\,Filters:}}
%
\put( 30, 60){\line(0,-1){10}}
\put( 30, 50){\framebox(5,5){}}
\put( 35, 50){\framebox(35,5){\sf private instrument}}
\put( 70, 52.5){\vector(1,0){5}}
\put( 75, 50){\framebox(80,5)[t]{\,\parbox[t]{58mm}{}}}
%
\put(  0,-7.5){\makebox(20,5)[l]{Version Jan. 2012}}
\linethickness{1.0mm} \put(59.5,  -6.0){\framebox(120,5)[l]{\bf
\hspace*{\fill}\ \PI\qquad(\stichw)\ }} \linethickness{0.1mm}
%
% gewählte Markierungen eintragen
%
\newcommand{\Peins}{#1}
\newcommand{\Pzwei}{#2}
\newcommand{\Pdrei}{#3}
\newcommand{\Pvier}{#4}
\newcommand{\Pfuenf}{#5}
%\newcommand{\Psechs}{#6}
%\newcommand{\Psieben}{#7}
\ifthenelse{\equal{\usetele}{teldreifuenf}}{
   \bobbl{5}{225}
%   \ifthenelse{\equal{\Peins}{Prime}}{
%      \bobbl{30}{225}
      \ifthenelse{\equal{\Peins}{LAICA}}{
         \bobbl{30}{225}\stepcounter{CheckInstrument}
         \put(90,225){\makebox(75,5)[l]{\,\Pzwei}}                 % Filters
      }{}                                                          % LAICA
      \ifthenelse{\equal{\Peins}{OMEGA 2000}}{
         \bobbl{30}{215}\stepcounter{CheckInstrument}
         \put(90,215){\makebox(75,5)[l]{\,\Pzwei}}                 % Filters
      }{}                                                          % OMEGA 2000
%      \ifthenelse{\equal{\Peins}{OMEGA 2000}}{
%         \bobbl{120}{215}\stepcounter{CheckInstrument}
%      }{}                                                          % OMEGA 2000
%  }{}                                                           % Prim
%  \ifthenelse{\equal{\Peins}{Cass}}{
%     \bobblh{30}{195}
      \ifthenelse{\equal{\Peins}{TWIN}}{
         \bobblh{30}{195}\stepcounter{CheckInstrument}
         \ifthenelse{\equal{\Pzwei}{beamsplitter}}{\bobbl{ 75}{200}}{}  % Beamsplitter
         \ifthenelse{\equal{\Pzwei}{mirror}}{\bobbl{105}{200}}{}        % Mirror      
         \put( 96,190){\makebox(13,5)[l]{\,\Pdrei}}                     % Grating blue
         \put(126,190){\makebox(13,5)[l]{\,\Pvier}}                     % Grating red  
      }{}                                  % TWIN
%     \ifthenelse{\equal{\Peins}{OMEGA Cass}}{\bobblh{65}{175}
%        \ifthenelse{\equal{\Pzwei}{}}{\bobbl{120}{180}
%        \stepcounter{CheckInstrument}}{}                               % ohne AO
%        \ifthenelse{\equal{\Pzwei}{AO}}{\bobbl{120}{175}
%     \ifthenelse{\equal{\Pdrei}{}}{}{\ifthenelse{\equal{\Pvier}{}}{}{
%         \put(125,170){\framebox(22.5,5){\rule[-3pt]{0pt}{3ex} dist:\,\Pdrei\arcsec}}
%         \put(147.5,170){\framebox(22.5,5){Vmag:\,\Pvier mag\rule[-3pt]{0pt}{3ex}}}
%         \stepcounter{CheckInstrument}
%     }}
%
%        }{}                                                            % mit AO
%      }{}                                                          % OMEGA Cass
      \ifthenelse{\equal{\Peins}{MOSCA}}{                          % MOSCA
         \bobblh{30}{175}\stepcounter{CheckInstrument}
         \put(90,180){\makebox(75,5)[l]{\,\Pzwei}}                 % Filters
         \put(90,175){\makebox(75,5)[l]{\,\Pdrei}}                 % Grisms
      }{}
      \ifthenelse{\equal{\Peins}{PMAS}}{                           % PMAS
         \bobblh{30}{155}
         \put(130,157.5){\makebox(40,5)[l]{\,\Pvier}}               % Grating
         \ifthenelse{\equal{\Pzwei}{PPAK}}{
         \bobbl{75}{160}\stepcounter{CheckInstrument}}{           % PPAK
         \ifthenelse{\equal{\Pzwei}{LensArray}}{
         \bobbl{75}{155}
         \ifthenelse{\equal{\Pdrei}{}}{}{
         \stepcounter{CheckInstrument}
         \put(98,155){\makebox(10,5){\Pdrei\arcsec\rule[-3pt]{0pt}{3ex}}}

         } }{}                                                      % LensArray
}
}{}
      \ifthenelse{\equal{\Peins}{OWN}}{
         \bobbl{30}{140}\stepcounter{CheckInstrument}
         \put(80,140){\makebox(58,5)[l]{\,\Pzwei}}               % Beschreibung
      }{}                                  % OWN
%  }{}                          % Cass
}{}                         % 3.5m-Teleskop
%
\ifthenelse{\equal{\usetele}{telzweizwei}}{
   \bobbl{5}{120}
%   \ifthenelse{\equal{\Peins}{Coude}}{
%      \bobbl{30}{105}
%      \ifthenelse{\equal{\Peins}{f/3}}{\bobbl{90}{105}}{}       % f/3
%      \ifthenelse{\equal{\Peins}{f/12}}{\bobbl{90}{100}}{}      % f/12
%      \ifthenelse{\equal{\Pzwei}{CCD}}{\bobbl{120}{100}}{}      % CCD
%      \ifthenelse{\equal{\Pzwei}{MAGIC}}{\bobbl{140}{100}    % MAGIC
%      \ifthenelse{\equal{\Pdrei}{LowResolution}}{\bobbl{140}{95}}{\bobbl{155}{95}}}{}% low / high
%
%   }{}                                                          % Coude
%  \ifthenelse{\equal{\Peins}{Cass}}{
%     \bobbl{30}{90}
      \ifthenelse{\equal{\Peins}{CAFOS}}{
         \bobblh{30}{115}\stepcounter{CheckInstrument}
         \ifthenelse{\equal{\Pzwei}{pol}}{\bobbl{75}{120}}{}      % Pol
         \ifthenelse{\equal{\Pzwei}{eta}}{\bobbl{75}{115}}{}      % Eta
         \put(90,110){\makebox(75,5)[l]{\,\Pdrei}}                % Filters
         \put(90,105){\makebox(75,5)[l]{\,\Pvier}}                % Grisms
      }{}                                 % CAFOS
      \ifthenelse{\equal{\Peins}{MAGIC}}{
         \bobblh{30}{90}\stepcounter{CheckInstrument}
         \ifthenelse{\equal{\Pzwei}{WideField}}{\bobbl{75}{95}}{}       % WideField
         \ifthenelse{\equal{\Pzwei}{HighResolution}}{\bobbl{75}{90}      % HighRes
         \ifthenelse{\equal{\Pdrei}{R270}}{\bobbl{105}{90}}{}            % R270
         }{}
      }{}                       % MAGIC
      \ifthenelse{\equal{\Peins}{CAFE}}{
         \bobbl{30}{80}\stepcounter{CheckInstrument}
      }{}                       % CAFE
      \ifthenelse{\equal{\Peins}{BUSCA}}{
         \bobbl{30}{70}\stepcounter{CheckInstrument}
         \put(90,70){\makebox(75,5)[l]{\,\Pzwei}}                % Filters
      }{}                       % BUSCA
      \ifthenelse{\equal{\Peins}{ASTRALUX}}{
         \bobbl{30}{60}\stepcounter{CheckInstrument}
         \put(90,60){\makebox(75,5)[l]{\,\Pzwei}}                % Filters
      }{}                       % ASTRALUX
      \ifthenelse{\equal{\Peins}{OWN}}{
         \bobbl{30}{50}\stepcounter{CheckInstrument}
         \put(80,50){\makebox(58,5)[l]{\,\Pzwei}}     % Beschreibung
      }{}                       % OWN
%  }{}                                                  % Cass
}{}                         % 2.2m-Teleskop
%
\ifthenelse{\value{CheckInstrument}= 0}
{\PackageError{\dsazVersion}{Invalid instrument!}{Check the arguments to the command Instrumentation}}{}
%5
\end{picture}\hspace*{-5.0cm}\vspace*{-10.0cm}

}

