%%
%% CountriesOfEurope.sty
%%
%% COPYRIGHT 2012 by Rolf Niepraschk <Rolf.Niepraschk@gmx.de>
%%                   Herbert Voss, <hvoss@tug.org>.
%%
%% This program can be redistributed and/or modified under the terms
%% of the LaTeX Project Public License Distributed from CTAN
%% archives in directory macros/latex/base/lppl.txt.
%%
%% The Type 1 version of the font CountriesOfEurope is copyrighted by Ingo Zimmermann
%% and can be used under the Open Font License
%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{CountriesOfEurope}[2012/04/18 v0.21 CountriesOfEurope Font(RN,hv)]

\RequirePackage{keyval}
\def\CoE@scale{1}
\define@key{CoE}{scaled}[10]{\def\CoE@scale{#1}}
\def\ProcessOptionsWithKV#1{%
  \let\@tempc\relax
  \let\CoE@tempa\@empty
  \ifx\@classoptionslist\relax\else
    \@for\CurrentOption:=\@classoptionslist\do{%
      \@ifundefined{KV@#1@\CurrentOption}%
      {}%
      {%
        \edef\CoE@tempa{\CoE@tempa,\CurrentOption,}%
        \@expandtwoargs\@removeelement\CurrentOption
          \@unusedoptionlist\@unusedoptionlist
      }%
    }%
  \fi
  \edef\CoE@tempa{%
    \noexpand\setkeys{#1}{%
      \CoE@tempa\@ptionlist{\@currname.\@currext}%
    }%
  }%
  \CoE@tempa
  \let\CurrentOption\@empty
}
\ProcessOptionsWithKV{CoE}
\AtEndOfPackage{\let\@unprocessedoptions\relax}

\DeclareFontFamily{U}{CountriesOfEurope}{}
\DeclareFontShape{U}{CountriesOfEurope}{m}{n}{ <-> s*[\CoE@scale] CountriesOfEurope}{}

\providecommand\CountriesOfEuropeFamily{\usefont{U}{CountriesOfEurope}{m}{n}}
\providecommand\EUCountry[1]{{\CountriesOfEuropeFamily\char#1}}

\iffalse
%80
  \Albania \Andorra \Austria \Belarus \Belgium \Bosnia \Bulgaria \Croatia
  \Czechia \Denmark \Estonia \Finland \France \Germania \GreatBritain \Greece
%90
  \Hungary \Iceland \Ireland \Italy \Latvia \Liechtenstein \Lithuania \Luxembourg
  \Macedonia \Malta \Moldova \Montenegro \Netherlands \Norway \Poland \Portugal
%A0
  \Romania \Serbia \Slovakia \Slovenia \Spain \Sweden \Switzerland
\fi

\DeclareTextCommand{\Albania}{U}{\char128}
\DeclareTextCommand{\Andorra}{U}{\char129}
\DeclareTextCommand{\Austria}{U}{\char130}
\DeclareTextCommand{\Belarus}{U}{\char131}
\DeclareTextCommand{\Belgium}{U}{\char132}
\DeclareTextCommand{\Bosnia}{U}{\char133}
\DeclareTextCommand{\Bulgaria}{U}{\char134}
\DeclareTextCommand{\Croatia}{U}{\char135}
\DeclareTextCommand{\Czechia}{U}{\char136}
\DeclareTextCommand{\Denmark}{U}{\char137}
\DeclareTextCommand{\Estonia}{U}{\char138}
\DeclareTextCommand{\Finland}{U}{\char139}
\DeclareTextCommand{\France}{U}{\char140}
\DeclareTextCommand{\Germany}{U}{\char141}
\DeclareTextCommand{\GreatBritain}{U}{\char142}
\DeclareTextCommand{\Greece}{U}{\char143}
\DeclareTextCommand{\Hungary}{U}{\char144}
\DeclareTextCommand{\Iceland}{U}{\char145}
\DeclareTextCommand{\Ireland}{U}{\char146}
\DeclareTextCommand{\Italy}{U}{\char147}
\DeclareTextCommand{\Latvia}{U}{\char148}
\DeclareTextCommand{\Liechtenstein}{U}{\char149}
\DeclareTextCommand{\Lithuania}{U}{\char150}
\DeclareTextCommand{\Luxembourg}{U}{\char151}
\DeclareTextCommand{\Macedonia}{U}{\char152}
\DeclareTextCommand{\Malta}{U}{\char153}
\DeclareTextCommand{\Moldova}{U}{\char154}
\DeclareTextCommand{\Montenegro}{U}{\char155}
\DeclareTextCommand{\Netherlands}{U}{\char156}
\DeclareTextCommand{\Norway}{U}{\char157}
\DeclareTextCommand{\Poland}{U}{\char158}
\DeclareTextCommand{\Portugal}{U}{\char159}
\DeclareTextCommand{\Romania}{U}{\char160}
\DeclareTextCommand{\Serbia}{U}{\char161}
\DeclareTextCommand{\Slovakia}{U}{\char162}
\DeclareTextCommand{\Slovenia}{U}{\char163}
\DeclareTextCommand{\Spain}{U}{\char164}
\DeclareTextCommand{\Sweden}{U}{\char165}
\DeclareTextCommand{\Switzerland}{U}{\char166}

% otftotfm --encoding=CountriesOfEurope.enc --no-map CountriesOfEurope.otf CountriesOfEurope

\endinput

