% Makros für isländische Buchstaben und Verkehrs- und Unterkunftsbilder
\newcommand{\sh}{\char'360}
\newcommand{\Th}{\char'336}

% Beschreibung von Diafilmen
\newcommand{\Diadesc}[3]{\item[#1] #2 \hfill (#3)}
% Numerierung von Bild- und Diafilmen
\newcommand{\Film}[2]{\item Film: #1 \hfill (#2)}
\newcommand{\Dia}[2]{\item Dia: #1 \hfill (#2)}

% definition of macros for symbol with inscription
% #1 - name of macro to define
% #2 - name of symbol
% #3 - x-coordinate of center of the inscription in mm
% #4 - y-coordinate of center of the inscription in mm
% #5 - symbolfont
% #6 - number of symbol in the font
% #7 - font of inscription

\newcommand{\defmapsym}[7]{%
          \expandafter\def\csname #2\endcsname{{\csname#5\endcsname\char#6}}
          \expandafter\def\csname #1\endcsname##1{%
              \leavevmode%
              \hbox to 0pt{%
                \hskip #3mm%
                \raise#4mm%
                \hbox to 0pt{\hss\csname #7\endcsname ##1\hss}%
              \hss}%
              \csname #2\endcsname%
          }
}

\defmapsym{bigplaneleft}{bigfunnyplaneleft}{13.5}{7}{atsbig}{0}{bigins}
\defmapsym{bigplaneright}{bigfunnyplaneright}{21}{7}{atsbig}{1}{bigins}
\defmapsym{bigbusleft}{bigfunnybusleft}{16}{4.7}{atsbig}{2}{bigins}
\defmapsym{bigbusright}{bigfunnybusright}{18}{4.7}{atsbig}{3}{bigins}
\defmapsym{bigtent}{bigfunnytent}{13}{6}{atsbig}{4}{bigins}
\defmapsym{bigbag}{bigfunnybag}{15}{7}{atsbig}{6}{bigins}
\defmapsym{bigacco}{bigfunnyacco}{15}{7}{atsbig}{7}{bigins}

\defmapsym{planeleft}{funnyplaneleft}{7}{3.3}{ats}{0}{ins}
\defmapsym{planeright}{funnyplaneright}{10}{3.3}{ats}{1}{ins}
\defmapsym{busleft}{funnybusleft}{8}{2.3}{ats}{2}{ins}
\defmapsym{busright}{funnybusright}{9}{2.3}{ats}{3}{ins}
\defmapsym{tent}{funnytent}{6.5}{3}{ats}{4}{ins}
\defmapsym{house}{funnyhouse}{6.5}{3}{ats}{5}{ins}
\defmapsym{bag}{funnybag}{7}{3.1}{ats}{6}{ins}
\defmapsym{acco}{funnyacco}{7}{3.1}{ats}{7}{ins}

\newfont{\atsbig}{atsymb10 scaled 1000}
\newfont{\ats}{atsymb6 scaled 1000}
\newfont{\ins}{dcss1200 scaled 560}
\newfont{\bigins}{dcss1000 scaled 1000}

\newcommand{\tentz}[2]{\setbox0=\hbox{\ins #2}%
               \tent{\hbox{%
                  \vbox to 2.3\ht0{\hbox to \wd0{\hss\hskip.1mm\ins #1\hss}%
                        \vss\box0}%
               }}
}

\endinput


