drapeaux/Country_Flag.tex

   1 \documentclass{article}
   2 \usepackage[margin=1cm]{geometry}
   3 \usepackage[tiling]{pst-fill}      % PSTricks package for filling/tiling
   4 \usepackage{pst-text}              % PSTricks package for character path
   5 \usepackage{pst-flags}
   6 \usepackage{pst-grad,pst-text,pst-blur}
   7
   8
   9 \usepackage[scaled=60]{CountriesOfEurope}
  10
  11 \DeclareFixedFont{\BK}{T1}{ptm}{b}{n}{1.275cm}
  12
  13 \pagestyle{empty}
  14 %
  15 \begin{document}
  16 \newpsstyle{blurA}{fillstyle=solid,fillcolor=gray,shadow=true,shadowcolor=gray,shadowsize=0.035cm,blurradius=0.025cm,blur=true,blurbg=lightgray}
  17 \newpsstyle{blurB}{linewidth=4pt,shadow=true,shadowcolor=lightgray,shadowsize=0.075cm}
  18
  19
  20 \begin{pspicture}(0,0)(18,20)
  21 \psset{boxfillsize={(-0.75\linewidth,-22cm)(0.5\linewidth,15cm)}}
  22 \psboxfill{\psset{unit=20mm}\pspicture(10,10)\pstFlag[nation=France]\endpspicture}
  23   \centerline{%
  24     \pscharpath[fillstyle=solid,fillcolor=white,%green!30!white,
  25       ,addfillstyle=boxfill,fillangle=0,fillsep=1mm]%
  26         {\rput[b](0,-1){\EUCountry{140}}}}
  27
  28 \rput(-9,10){\psset{unit=4mm}
  29   \begin{psclip}{\psellipse[style=blurB](0,0)(6,3.5)}
  30     \rput(0,0){\psset{linewidth=0pt}\pstFlag[nation=France]}
  31   \end{psclip}
  32 \rput(0,0){\pscharpath[style=blurA]{\BK FR}}
  33 }
  34 \end{pspicture}
  35
  36 \end{document}