54 lines
1.5 KiB
TeX
54 lines
1.5 KiB
TeX
%% eushield.sty -- commands to manipulate the inclusion of the EU shield
|
|
%% graphic.
|
|
%%
|
|
%% Version 1.0 [2000/11/23] -- initial version
|
|
%% Version 1.1 [2006/08/28] -- fixed PDF detection for teTeX 3
|
|
%%
|
|
%% Mary Ellen Foster <M.E.Foster@ed.ac.uk>
|
|
|
|
\def\filedate{2006/08/28}
|
|
\def\fileversion{1.1}
|
|
\ProvidesPackage{eushield}[\filedate\ v\fileversion\
|
|
Commands for including the EU shield graphic]
|
|
|
|
\RequirePackage{graphics}
|
|
\RequirePackage{ifpdf}
|
|
|
|
%% Possible values for shieldtype:
|
|
%% 0: regular monochrome
|
|
%% 1: monochrome with no background lines
|
|
%% 2: reverse monochrome
|
|
%% 3: two colours: navy and red
|
|
%% 4: full colour
|
|
\newcommand{\eushield}{}
|
|
\newcommand{\@endspecial}{}
|
|
|
|
\newcommand{\shieldtype}[1]{%
|
|
\def\@shieldtype{#1}
|
|
\ifpdf
|
|
\ifnum\@shieldtype=0
|
|
\renewcommand{\eushield}{eushield-normal}
|
|
\else\ifnum\@shieldtype=1
|
|
\renewcommand{\eushield}{eushield-noback}
|
|
\else\ifnum\@shieldtype=2
|
|
\renewcommand{\eushield}{eushield-reversed}
|
|
\else\ifnum\@shieldtype=3
|
|
\renewcommand{\eushield}{eushield-twocolour}
|
|
\else\ifnum\@shieldtype=4
|
|
\renewcommand{\eushield}{eushield-fullcolour}
|
|
\fi\fi\fi\fi\fi
|
|
\else
|
|
\renewcommand{\eushield}{eushield}
|
|
\renewcommand{\@endspecial}{%
|
|
\special{!/crestversion #1 def}}
|
|
\fi
|
|
}
|
|
\shieldtype{0}
|
|
|
|
\newcommand{\includeshield}{%
|
|
\includegraphics{\eushield}}
|
|
|
|
\ifpdf
|
|
\else
|
|
\AtBeginDocument{\@endspecial}
|
|
\fi
|