% X. Rendtel
% Letzte Aenderung: 23.09.2008

\documentclass[10pt, a4paper]{article}
\usepackage[utf8x]{inputenc} 
\usepackage[tight]{units}
\usepackage{euler}
\usepackage{calc}
\usepackage{pstricks}
\usepackage{rotating}

\usepackage{pst-pdf}
\usepackage{pst-node}

\usepackage{xcolor}
\usepackage{graphicx}
%\usepackage{multido}
\usepackage{pst-circ}
\usepackage{pst-func}
\usepackage{pst-math}

\usepackage{pst-eucl}
\usepackage{fancyhdr}
\pagestyle{fancyplain}

\usepackage{pstricks-add}
\usepackage[greek,german]{babel}

%%% Nicht benötigte Pakete:
%\usepackage{pst-plot}
%\usepackage{pst-grad}
%\usepackage[all]{xy}
%\usepackage{rotating}
%\usepackage{pst-text}
\usepackage{pst-tree}
%\usepackage{wasysym}

%\usepackage{pst-xkey}
%\usepackage{mathe} % Mathematische Mengen und Symbole werden definiert












\thispagestyle{empty}
\pagestyle{empty}

%\SpecialCoor

\usepackage[LGR,T1]{fontenc}
\usepackage{mathpazo,avant,courier}
\newcommand{\EUR}{\textgreek{\euro}}

\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

\def\myLine#1(#2)(#3)#4{{%
  \pnode(#2){myA}\pnode(#3){myB}%
  \pcline[linestyle=dashed,tbarsize=15pt]{#1}(myA)(myB)%
  \ncput*{#4}}}



\newcommand{\knoten}[2][white]
{\Tr{\psframebox[fillcolor=#1!50,fillstyle=solid]{#2}}}

\begin{document}
\psset{xunit=1cm,yunit=1cm,dotstyle=*,dotsize=3pt
0,linewidth=0.8pt,arrowsize=3pt 2,arrowinset=0.25}

\begin{pspicture*}(-6,-1)(6,18)
\psgrid[subgriddiv=2,gridlabels=0,gridcolor=lightgray,subgridcolor=lightgray](0,
0)(-5 ,0)(5 , 17)
\psaxes[xAxis=true,yAxis=true]{->}(0,0)(-5,0)(5,17)
\psplot[algebraic=true]{-4}{4}{x^2}
\uput[-90](5,0){$x$}
\uput[0](0,17){$y$}

\end{pspicture*}
\end{document}