%% Autor: X. Rendtel 
%% Letzte Aenderung: 23.11.2008
 
\documentclass[10pt, a4paper]{article}
\usepackage[utf8x]{inputenc}
\usepackage{euler,calc,pstricks,rotating,graphicx,multido}
\usepackage{pst-pdf,pst-node,xcolor,pst-circ,pst-func,pst-math,pst-eucl,pstricks-add}
\usepackage[greek,german]{babel}
\usepackage[LGR,T1]{fontenc}
\usepackage{mathpazo,avant,courier}
 
\makeatletter\newcommand{\psxpoint}[3][black]{%
  \psline[linewidth=.5pt]{-}(#2,\pst@xticksizeB)(#2,\pst@xticksizeA)
  \rput[t](! #2 \pst@number\pslabelsep \pst@number\pst@xticksizeB add
    \pst@number\psyunit div neg ){\color{#1}#3}}
\makeatother

\makeatletter\newcommand{\psypoint}[3][black]{%
  \psline[linewidth=.5pt]{-}(\pst@yticksizeB,#2)(\pst@yticksizeA,#2)
  \rput[r](! \pst@number\pslabelsep \pst@number\pst@yticksizeA sub
    \pst@number\psxunit div neg #2){\color{#1}#3}}
\makeatother
 
\newcommand{\EUR}{\textgreek{\euro}}
\pagestyle{empty}
\begin{document}
  
\psset{
 dotstyle = *, plotpoints=10000, 
 dotsize = 3pt,
 linewidth = 1pt,
 linecolor = black,
 arrowsize = 3pt 2,
 arrowinset = 0.25,
 xunit = 1cm,
 yunit = 1cm,
 algebraic = true} 
\begin{pspicture}(-6,-6.5)(6,1) 



\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](0,0)(0.2,0.2)
\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](-1,-1)(0.2,0.2)
\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](1,-1)(0.2,0.2)
\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](-2,-2)(0.2,0.2)
\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](0,-2)(0.2,0.2)
\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](2,-2)(0.2,0.2)
\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](-3,-3)(0.2,0.2)
\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](-1,-3)(0.2,0.2)
\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](1,-3)(0.2,0.2)
\psellipse[linewidth=1pt,linecolor=black,fillcolor=blue!1,fillstyle=transparent](3,-3)(0.2,0.2)


\rput[c]{0}(-4,-5.5){\color{black}{Fach 0}}
\rput[c]{0}(-2,-5.5){\color{black}{Fach 1}}
\rput[c]{0}(0,-5.5){\color{black}{Fach 2}}
\rput[c]{0}(2,-5.5){\color{black}{Fach 3}}
\rput[c]{0}(4,-5.5){\color{black}{Fach 4}}


\psline[linecolor=black,linewidth=1pt]{-}(-5,-4)(-5,-5)
\psline[linecolor=black,linewidth=1pt]{-}(-3,-4)(-3,-5)
\psline[linecolor=black,linewidth=1pt]{-}(-1,-4)(-1,-5)
\psline[linecolor=black,linewidth=1pt]{-}(1,-4)(1,-5)
\psline[linecolor=black,linewidth=1pt]{-}(3,-4)(3,-5)
\psline[linecolor=black,linewidth=1pt]{-}(5,-4)(5,-5)
\psline[linecolor=black,linewidth=1pt]{-}(-5,-5)(5,-5)
\end{pspicture}
\end{document}