\ProvidesPackage{pst-flags}[2012/11/16 v. 0.01 Flags for Europe (jg)]
\RequirePackage{pst-xkey}
\RequirePackage{pst-eucl}
\RequirePackage{pstricks-add}
\SpecialCoor

\pst@addfams{pst-flags}
\define@key[psset]{pst-flags}{nation}[Germany]{\def\pst@flag@nation{#1}}
\psset{nation=Germany}

\def\pstFlag{\pst@object{pstFlag}}
\def\pstFlag@i{{\use@par\@nameuse{pst@Flag\pst@flag@nation}}}

\def\pst@FlagAustria{%
\definecolor{austriaRed}{HTML}{F5002F} %Pantone 186
\begin{pspicture}(0,0)(15,10)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\psframe[linecolor=austriaRed,fillstyle=solid,fillcolor=austriaRed](!0 10 3 div 2 mul)(15,10)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](!0 10 3 div)(!15 10 3 div 2 mul)
\psframe[linecolor=austriaRed,fillstyle=solid,fillcolor=austriaRed](0,0)(!15 10 3 div)%
\end{pspicture}}

\def\pst@FlagGermany{%
\definecolor{germanRed}{HTML}{FF0000}
\definecolor{germanGold}{HTML}{FFCC00}
\begin{pspicture}(0,0)(15,9)
%% Flagge (Verh\"{a}ltnis 5 Breite : 3 H\"{o}he)
\psframe[linecolor=black,fillstyle=solid,fillcolor=black](0,6)(15,9)
\psframe[linecolor=germanRed,fillstyle=solid,fillcolor=germanRed](0,3)(15,6)
\psframe[linecolor=germanGold,fillstyle=solid,fillcolor=germanGold](0,0)(15,3)
\end{pspicture}}

\def\pst@FlagBelgium{%
\definecolor{belgiumYellow}{RGB}{255 233 54}
\definecolor{belgiumRed}{RGB}{255 15 33}
\begin{pspicture}(0,0)(15,13)
%% Flagge (Verh\"{a}ltnis 15 Breite : 13 H\"{o}he)
\psframe[linecolor=black,fillstyle=solid,fillcolor=black](0,0)(5,13)
\psframe[linecolor=belgiumYellow,fillstyle=solid,fillcolor=belgiumYellow](5,0)(10,13)
\psframe[linecolor=belgiumRed,fillstyle=solid,fillcolor=belgiumRed](10,0)(15,13)
\end{pspicture}}

\def\pst@FlagBulgaria{%
\definecolor{bulgariaRed}{HTML}{D62612}
\definecolor{bulgariaGreen}{HTML}{00966E}
\psset{unit=0.6}
\begin{pspicture}(0,0)(25,15)
%% Flagge (Verh\"{a}ltnis 5 Breite : 3 H\"{o}he)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,10)(25,15)
\psframe[linecolor=bulgariaGreen,fillstyle=solid,fillcolor=bulgariaGreen](0,5)(25,10)
\psframe[linecolor=bulgariaRed,fillstyle=solid,fillcolor=bulgariaRed](0,0)(25,5)
\end{pspicture}}

\def\pst@FlagCzechRepublic{%
\definecolor{czechRed}{HTML}{D7141A}
\definecolor{czechBlue}{HTML}{11457E}
\begin{pspicture}(0,0)(15,10)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
%% Breite 1,5 : 1.5 H\"{o}he 1 : 1
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,5)(15,10)
\psframe[linecolor=czechRed,fillstyle=solid,fillcolor=czechRed](0,0)(15,5)
\pspolygon[linecolor=czechBlue,fillstyle=solid,fillcolor=czechBlue](0,0)(7.5,5)(0,10)
\end{pspicture}}

\def\pst@FlagDenmark{%
\definecolor{denmarkRed}{HTML}{FF173D} %Pantone 185
\psset{unit=0.4054}
\begin{pspicture}(0,0)(37,28)
%% Flagge (Verh\"{a}ltnis 37 Breite : 28 H\"{o}he)
%% Breite 12 - 4 - 21 : H\"{o}he 12 - 4 - 12
\psframe[linecolor=denmarkRed,fillstyle=solid,fillcolor=denmarkRed](0,0)(37,28)
\pspolygon[linecolor=white,fillstyle=solid,fillcolor=white](0,12)(12,12)(12,0)(16,0)(16,12)(37,12)(37,16)(16,16)(16,28)(12,28)(12,16)(0,16)
\end{pspicture}}

\def\pst@FlagEstonia{%
\definecolor{estoniaBlue}{RGB}{18 145 255}
\psset{unit=1.3636}
\begin{pspicture}(0,0)(11,7)
%% Flagge (Verh\"{a}ltnis 11 Breite : 7 H\"{o}he)
\psframe[linecolor=estoniaBlue,fillstyle=solid,fillcolor=estoniaBlue](0,3.5)(11,7)
\psframe[linecolor=black,fillstyle=solid,fillcolor=black](0,0)(11,3.5)
\end{pspicture}}

\def\pst@FlagFinland{%
\definecolor{finlandBlue}{RGB}{0 82 165}
\psset{unit=0.8333}
\begin{pspicture}(0,0)(18,11)
%% Flagge (Verh\"{a}ltnis 18 Breite : 11 H\"{o}he)
%% Breite 5 - 3 - 10 : H\"{o}he 4 - 3 - 4
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,0)(18,11)
\pspolygon[linecolor=finlandBlue,fillstyle=solid,fillcolor=finlandBlue](0,4)(5,4)(5,0)(8,0)(8,4)(18,4)(18,7)(8,7)(8,11)(5,11)(5,7)(0,7)
\end{pspicture}}

\def\pst@FlagFrance{%
\definecolor{frenchRed}{HTML}{EF4531}
\definecolor{frenchBlue}{HTML}{0055A4}
\begin{pspicture}(0,0)(15,10)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\psframe[linecolor=frenchBlue,fillstyle=solid,fillcolor=frenchBlue](0,0)(5,10)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](5,0)(10,10)
\psframe[linecolor=frenchRed,fillstyle=solid,fillcolor=frenchRed](10,0)(15,10)
\end{pspicture}}

\def\pst@FlagUnitedKingdom{%
\definecolor{ukRed}{RGB}{204 0 0}
\definecolor{ukBlue}{RGB}{0 0 102}
\psset{unit=0.25}
\begin{pspicture*}(0,0)(60,30)
%% Flagge (Verh\"{a}ltnis 2 Breite : 1 H\"{o}he)
\psframe[linecolor=ukBlue,fillstyle=solid,fillcolor=ukBlue](0,0)(60,30)
\rput{26.56}(0,-3.3){%
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](-10,0)(70,6)
\psframe[linecolor=ukRed,fillstyle=solid,fillcolor=ukRed](-10,1)(30,3)
\psframe[linecolor=ukRed,fillstyle=solid,fillcolor=ukRed](30,3)(70,5)
}
\rput{-26.56}(!0 30 3.3 sub){%
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](-10,0)(70,6)
\psframe[linecolor=ukRed,fillstyle=solid,fillcolor=ukRed](-10,1)(30,3)
\psframe[linecolor=ukRed,fillstyle=solid,fillcolor=ukRed](30,3)(70,5)
}
\pspolygon[linecolor=white,fillstyle=solid,fillcolor=white](0,10)(25,10)(25,0)(35,0)(35,10)(60,10)(60,20)(35,20)(35,30)(25,30)(25,20)(0,20)
\pspolygon[linecolor=ukRed,fillstyle=solid,fillcolor=ukRed](0,12)(27,12)(27,0)(33,0)(33,12)(60,12)(60,18)(33,18)(33,30)(27,30)(27,18)(0,18)
\end{pspicture*}}

\def\pst@FlagGreece{%
\definecolor{greeceBlue}{cmyk}{1 0.6 0 0.05}
\psset{unit=0.5555}
\begin{pspicture}(0,0)(27,18)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,0)(27,18)
\multido{\iA=0+4}{5}{%
\rput(0,\iA){\psframe[linecolor=greeceBlue,fillstyle=solid,fillcolor=greeceBlue](0,0)(27,2)}
}
\psframe[linecolor=greeceBlue,fillstyle=solid,fillcolor=greeceBlue](0,18)(10,8)
\pspolygon[linecolor=white,fillstyle=solid,fillcolor=white](0,12)(4,12)(4,8)(6,8)(6,12)(10,12)(10,14)(6,14)(6,18)(4,18)(4,14)(0,14)
\end{pspicture}}

\def\pst@FlagHungary{%
\definecolor{hungaryRed}{HTML}{CE1126}
\definecolor{hungaryGreen}{HTML}{008751}
\psset{unit=0.5}
\begin{pspicture}(0,0)(30,15)
%% Flagge (Verh\"{a}ltnis 2 Breite : 1 H\"{o}he)
\psframe[linecolor=hungaryRed,fillstyle=solid,fillcolor=hungaryRed](0,10)(30,15)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,5)(30,10)
\psframe[linecolor=hungaryGreen,fillstyle=solid,fillcolor=hungaryGreen](0,0)(30,5)
\end{pspicture}}

\def\pst@FlagIceland{%
\definecolor{icelandBlue}{HTML}{0048E0}
\definecolor{icelandRed}{HTML}{FF0F00}
\psset{unit=0.6}
\begin{pspicture}(0,0)(25,18)
%% Flagge (Verh\"{a}ltnis 25 Breite : 18 H\"{o}he)
%% Breite 7 - 4 - 14 : H\"{o}he 7 - 4 - 7
\psframe[linecolor=icelandBlue,fillstyle=solid,fillcolor=icelandBlue](0,0)(25,18)
\pspolygon[linecolor=white,fillstyle=solid,fillcolor=white](0,7)(7,7)(7,0)(11,0)(11,7)(25,7)(25,11)(11,11)(11,18)(7,18)(7,11)(0,11)
\pspolygon[linecolor=icelandRed,fillstyle=solid,fillcolor=icelandRed](0,8)(8,8)(8,0)(10,0)(10,8)(25,8)(25,10)(10,10)(10,18)(8,18)(8,10)(0,10)
\end{pspicture}}

\def\pst@FlagIreland{%
\definecolor{irelandOrange}{HTML}{FF7900}
\definecolor{irelandGreen}{HTML}{009A49}
\psset{unit=0.5}
\begin{pspicture}(0,0)(30,15)
%% Flagge (Verh\"{a}ltnis 2 Breite : 1 H\"{o}he)
\psframe[linecolor=irelandGreen,fillstyle=solid,fillcolor=irelandGreen](0,0)(10,15)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](10,0)(20,15)
\psframe[linecolor=irelandOrange,fillstyle=solid,fillcolor=irelandOrange](20,0)(30,15)
\end{pspicture}}

\def\pst@FlagItaly{%
\definecolor{italyRed}{RGB}{206 43 55}
\definecolor{italyWhite}{RGB}{241 242 241}
\definecolor{italyGreen}{RGB}{0 146 70}
\begin{pspicture}(0,0)(15,10)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\psframe[linecolor=italyGreen,fillstyle=solid,fillcolor=italyGreen](0,0)(5,10)
\psframe[linecolor=italyWhite,fillstyle=solid,fillcolor=italyWhite](5,0)(10,10)
\psframe[linecolor=italyRed,fillstyle=solid,fillcolor=italyRed](10,0)(15,10)
\end{pspicture}}

\def\pst@FlagLatvia{%
\definecolor{latviaMaroon}{HTML}{9E1B34}
\psset{unit=0.5}
\begin{pspicture}(0,0)(30,15)
%% Flagge (Verh\"{a}ltnis 2 Breite : 1 H\"{o}he)
%% H\"{o}he 2 - 1 - 2
\psframe[linecolor=latviaMaroon,fillstyle=solid,fillcolor=latviaMaroon](0,9)(30,15)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,6)(30,9)
\psframe[linecolor=latviaMaroon,fillstyle=solid,fillcolor=latviaMaroon](0,0)(30,6)
\end{pspicture}}

\def\pst@FlagLithuania{%
\definecolor{lithuaniaYellow}{RGB}{253 185 19}
\definecolor{lithuaniaGreen}{RGB}{0 106 68}
\definecolor{lithuaniaRed}{RGB}{193 39 45}
\psset{unit=0.6}
\begin{pspicture}(0,0)(25,15)
%% Flagge (Verh\"{a}ltnis 5 Breite : 3 H\"{o}he)
\psframe[linecolor=lithuaniaYellow,fillstyle=solid,fillcolor=lithuaniaYellow](0,10)(25,15)
\psframe[linecolor=lithuaniaGreen,fillstyle=solid,fillcolor=lithuaniaGreen](0,5)(25,10)
\psframe[linecolor=lithuaniaRed,fillstyle=solid,fillcolor=lithuaniaRed](0,0)(25,5)
\end{pspicture}}

\def\pst@FlagLuxembourg{%
\definecolor{luxembourgRed}{HTML}{FF1A24} %Pantone 032
\definecolor{luxembourgBlue}{HTML}{26CFFF} %Pantone 299
\psset{unit=3}
\begin{pspicture}(0,0)(5,3)
%% Flagge (Verh\"{a}ltnis 5 Breite : 3 H\"{o}he)
\psframe[linecolor=luxembourgRed,fillstyle=solid,fillcolor=luxembourgRed](0,2)(5,3)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,1)(5,2)
\psframe[linecolor=luxembourgBlue,fillstyle=solid,fillcolor=luxembourgBlue](0,0)(5,1)
\end{pspicture}}

\def\pst@FlagMonaco{%
\definecolor{monacoRed}{cmyk}{0 0.9 0.8 0.05}
\psset{unit=0.6}
\begin{pspicture}(0,0)(25,20)
%% Flagge (Verh\"{a}ltnis 5 Breite : 4 H\"{o}he)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,0)(25,10)
\psframe[linecolor=monacoRed,fillstyle=solid,fillcolor=monacoRed](0,10)(25,20)
\end{pspicture}}

\def\pst@FlagNetherlands{%
\definecolor{netherlandsRed}{HTML}{AE1C28}
\definecolor{netherlandsBlue}{HTML}{21468B}
\begin{pspicture}(0,0)(15,10)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\psframe[linecolor=netherlandsRed,fillstyle=solid,fillcolor=netherlandsRed](!0 10 3 div 2 mul)(15,10)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](!0 10 3 div)(!15 10 3 div 2 mul)
\psframe[linecolor=netherlandsBlue,fillstyle=solid,fillcolor=netherlandsBlue](0,0)(!15 10 3 div)
\end{pspicture}}

\def\pst@FlagNorway{%
\definecolor{norgeBlue}{HTML}{002868}
\definecolor{norgeRed}{HTML}{EF2B2D}
\psset{unit=0.6818}
\begin{pspicture}(0,0)(22,16)
%% Wei{\ss}er Grundrahmen \"{u}ber komplette Flagge (Verh\"{a}ltnis 22 Breite : 16 H\"{o}he)
%% 6 - 1 - 2 - 1 - 12 Breite : 6 - 1 - 2 - 1 - 6 H\"{o}he
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,0)(22,16)
%% Rote Felder
\psframe[linecolor=norgeRed,fillstyle=solid,fillcolor=norgeRed](0,16)(6,10)
\psframe[linecolor=norgeRed,fillstyle=solid,fillcolor=norgeRed](10,16)(22,10)
\psframe[linecolor=norgeRed,fillstyle=solid,fillcolor=norgeRed](0,0)(6,6)
\psframe[linecolor=norgeRed,fillstyle=solid,fillcolor=norgeRed](10,0)(22,6)
%% Blaue Felder
\pspolygon[fillstyle=solid,fillcolor=norgeBlue,linecolor=norgeBlue](0,7)(7,7)(7,0)(9,0)(9,7)(22,7)(22,9)(9,9)(9,16)(7,16)(7,9)(0,9)
\end{pspicture}}

\def\pst@FlagPoland{%
\definecolor{polandRed}{HTML}{DC143C}
\psset{unit=1.875}
\begin{pspicture}(0,0)(8,5)
%% Flagge (Verh\"{a}ltnis 8 Breite : 5 H\"{o}he)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,2.5)(8,5)
\psframe[linecolor=polandRed,fillstyle=solid,fillcolor=polandRed](0,0)(8,2.5)
\end{pspicture}}

\def\pst@FlagRomania{%
\definecolor{romaniaBlue}{RGB}{0 43 127}
\definecolor{romaniaYellow}{RGB}{252 209 22}
\definecolor{romaniaRed}{RGB}{206 17 38}
\begin{pspicture}(0,0)(15,10)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\psframe[linecolor=romaniaBlue,fillstyle=solid,fillcolor=romaniaBlue](0,0)(5,10)
\psframe[linecolor=romaniaYellow,fillstyle=solid,fillcolor=romaniaYellow](5,0)(10,10)
\psframe[linecolor=romaniaRed,fillstyle=solid,fillcolor=romaniaRed](10,0)(15,10)
\end{pspicture}}

\def\pst@FlagRussia{%
\definecolor{russiaBlue}{HTML}{0039A6}
\definecolor{russiaRed}{HTML}{D52B1E}
\psset{unit=0.3333}
\begin{pspicture}(0,0)(45,30)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\psframe[linecolor=white,fillstyle=solid,fillcolor=white](0,20)(45,30)
\psframe[linecolor=russiaBlue,fillstyle=solid,fillcolor=russiaBlue](0,10)(45,20)
\psframe[linecolor=russiaRed,fillstyle=solid,fillcolor=russiaRed](0,0)(45,10)
\end{pspicture}}

\def\pst@FlagSweden{%
\definecolor{swedenBlue}{RGB}{0 127 229}
\definecolor{swedenYellow}{RGB}{255 204 0}
\begin{pspicture}(0,0)(15,10)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
%% Breite 5 - 2 - 9 : H\"{o}he 4 - 2 - 4
\psframe[linecolor=swedenBlue,fillstyle=solid,fillcolor=swedenBlue](0,0)(15,10)
\pspolygon[linecolor=swedenYellow,fillstyle=solid,fillcolor=swedenYellow](0,4)(5,4)(5,0)(7,0)(7,4)(15,4)(15,6)(7,6)(7,10)(5,10)(5,6)(0,6)
\end{pspicture}}

\def\pst@FlagSwitzerland{%
\definecolor{switzerlandRed}{HTML}{FF0000}
\psset{unit=0.4689}
\begin{pspicture}(0,0)(32,32)
%% Flagge (Verh\"{a}ltnis 1 Breite : 1 H\"{o}he)
%% Kreuz: 6 7 6 7 6 : 6 7 6 7 6
\psframe[linecolor=switzerlandRed,fillstyle=solid,fillcolor=switzerlandRed](0,0)(32,32)
\pspolygon[linecolor=white,fillstyle=solid,fillcolor=white](6,13)(13,13)(13,6)(19,6)(19,13)(26,13)(26,19)(19,19)(19,26)(13,26)(13,19)(6,19)
\end{pspicture}}

\def\pst@FlagTurkey{%
\definecolor{turkeyRed}{HTML}{CE1126}
\psset{unit=0.55555}
\begin{pspicture}(0,0)(27,18)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\pnode(9,9){M1}
\pnode(4.5,9){A1}
\pnode(!9 1 16 div 18 mul add 9){M2}
\pnode(!9 1 16 div 18 mul add 1 5 div 18 mul sub 9){A2}
\psframe[linecolor=turkeyRed,fillstyle=solid,fillcolor=turkeyRed](0,0)(27,18)
\pscircle[linecolor=white,fillstyle=solid,fillcolor=white](M1){4.5}
\pscircle[linecolor=turkeyRed,fillstyle=solid,fillcolor=turkeyRed](M2){!1 5 div 18 mul}
\pnode(0,9){A}
\pnode(27,9){B}
\pstInterCC[PointName=none,PointSymbol=none]{M1}{A1}{M2}{A2}{S1}{S2}
\pstInterLL[PointName=none,PointSymbol=none]{A}{B}{S1}{S2}{D}
\rput(D){\rput(2.25,0){%
\pspolygon[linecolor=white,fillstyle=solid,fillcolor=white](2.25;180)(2.25;-36)(2.25;108)(2.25;252)(2.25;36)
}}
\end{pspicture}}

\def\pst@FlagUkraine{%
\definecolor{ukraineBlue}{HTML}{005BBB}
\definecolor{ukraineYellow}{HTML}{FFD500}
\begin{pspicture}(0,0)(15,10)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\psframe[linecolor=ukraineBlue,fillstyle=solid,fillcolor=ukraineBlue](0,5)(15,10)
\psframe[linecolor=ukraineYellow,fillstyle=solid,fillcolor=ukraineYellow](0,0)(15,5)
\end{pspicture}}

\def\pst@FlagUnitedStates{%
\definecolor{USred}{HTML}{B22234}
\definecolor{USblue}{HTML}{3C3B6E}
\psset{unit=0.789}
\begin{pspicture}(0,0)(19,10)
%% White Background = Proportion of the flag
\psframe[fillstyle=solid,fillcolor=USred,linecolor=USred,linestyle=none,linewidth=0pt](0,0)(19,10)
%% 6 white stripes: 13 stripes alternating red (7) and white (6)
\multido{\rA=0.769+1.538}{6}{%
\rput(0,\rA){\psframe[fillstyle=solid,linestyle=none,linewidth=0pt,fillcolor=white](0,0)(!19 10 13 div)}
}
%%Blue rectangle in the upper left (Union)
\psframe[fillstyle=solid,fillcolor=USblue,linecolor=USblue](!0 6 13 div 10 mul)(!2 5 div 19 mul 10)
%%PENTAGRAMM
\def\star{%
\def\outer{0.308}
\pnode(\outer;90){A}
\pnode(\outer;162){B}
\pnode(\outer;234){C}
\pnode(\outer;306){D}
\pnode(\outer;18){E}
\pspolygon[fillstyle=solid,fillcolor=white,linestyle=none,linewidth=0pt]
(A)(C)(E)(B)(D)(A)
}
%% Arrangment of the stars
%% 5 lines with 6 stars
\multido{\rV=9.462+-1.076}{5}{%
\multido{\rL=0.633+1.266}{6}{%
\rput(\rL,\rV){\star}
}}
%% 4 lines with 5 stars
\multido{\rV=8.924+-1.076}{4}{%
\multido{\rL=1.266+1.266}{5}{%
\rput(\rL,\rV){\star}
}}
\end{pspicture}}

\def\pst@FlagMacedonia{%
\definecolor{macedoniaRed}{HTML}{D20000}
\definecolor{macedoniaYellow}{HTML}{FFE600}
\psset{unit=0.5357}
\begin{pspicture}(-14,-7)(14,7)
%% Flagge (Verh\"{a}ltnis 2 Breite : 1 H\"{o}he)
\psframe[linecolor=macedoniaRed,fillstyle=solid,fillcolor=macedoniaRed](-14,-7)(14,7)
\pspolygon[linecolor=macedoniaYellow,fillstyle=solid,fillcolor=macedoniaYellow](1.4,7)(-1.4,7)(1.4,-7)(-1.4,-7)
\pspolygon[linecolor=macedoniaYellow,fillstyle=solid,fillcolor=macedoniaYellow](14,-1.4)(14,1.4)(-14,-1.4)(-14,1.4)
\pspolygon[linecolor=macedoniaYellow,fillstyle=solid,fillcolor=macedoniaYellow](-14,-7)(-9.8,-7)(9.8,7)(14,7)
\pspolygon[linecolor=macedoniaYellow,fillstyle=solid,fillcolor=macedoniaYellow](14,-7)(9.8,-7)(-9.8,7)(-14,7)
\pscircle[linecolor=macedoniaRed,fillstyle=solid,fillcolor=macedoniaRed](0,0){2.5}
\pscircle[linecolor=macedoniaYellow,fillstyle=solid,fillcolor=macedoniaYellow](0,0){2}
\end{pspicture}}

\def\pst@FlagEuropeanUnion{%
\definecolor{euBlue}{HTML}{003399}
\definecolor{euYellow}{HTML}{FFCC00}
\begin{pspicture}(0,0)(15,10)
%% Flagge (Verh\"{a}ltnis 3 Breite : 2 H\"{o}he)
\psframe[linecolor=euBlue,fillstyle=solid,fillcolor=euBlue](0,0)(15,10)
\def\eurostar{%
\def\outer{0.5555}
\pnode(\outer;90){A}
\pnode(\outer;162){B}
\pnode(\outer;234){C}
\pnode(\outer;306){D}
\pnode(\outer;18){E}
\pspolygon[fillstyle=solid,fillcolor=euYellow,linestyle=none,linewidth=0pt]
(A)(C)(E)(B)(D)(A)
}
\rput(7.5,5){%
\multido{\iA=0+30}{12}{%
\rput(3.333;\iA){\eurostar}
}}
\end{pspicture}}

\endinput
