%% 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 = 3pt,
 linecolor = black,
 arrowsize = 3pt 2,
 arrowinset = 0.25,
 xunit = 1cm,
 yunit = 1cm,
 algebraic = true} 
 
\begin{pspicture}(-7,-5)(8.2,6)
 
% Kariertes Papier wird erzeugt 
 \psgrid [
 xunit = 0.5,
 yunit = 0.5,
 gridwidth = 1pt,
 gridcolor = black,
 griddots = 0,
 gridlabels = 0pt,
 subgriddiv = 0,
 subgridwidth = 0pt,
 subgridcolor = black,
 subgriddots = 0]  
(0,0)(-14,-10)(14,10) 
  
% Ein Koordinatensystem wird gezeichnet 
\psaxes [
 comma,
 showorigin = false,
 Dx = 1,
 Dy = 1,
 dx = 0 pt,
 dy = 0 pt,
 Ox = 0,
 Oy = 0, 
linewidth = 0.8pt,
 linestyle = solid]{->}% 
(0,0) 
(-7,-5) 
(7,5) 
\uput{0}[-90]{0}(7.2,-0.2){$x$} 
\uput{0}[0]{0}(0.2,5){$y$} 
 
% Ein Graph wird gezeichnet 
\psplot[
 linewidth = 1pt,
 linestyle = solid]% 
{-1.4925}{3.4976}{-2+2*x} 
 
% Ein Graph wird gezeichnet 
\psplot[
 linewidth = 1pt,
 linestyle = solid]% 
{-3.4965}{1.4943}{-2-2*x} 
 
% Ein Graph wird gezeichnet 
\psplot[
 linewidth = 1pt,
 linestyle = solid]% 
{-0.9880}{2.3303}{-2+3*x} 
 
% Ein Graph wird gezeichnet 
\psplot[
 linewidth = 1pt,
 linestyle = solid]% 
{-2.3333}{0.9927}{-2-3*x} 
 
% Ein Graph wird gezeichnet 
\psplot[
 linewidth = 1pt,
 linestyle = solid]% 
{-2.9920}{7.0000}{-2+1*x} 
 
% Ein Graph wird gezeichnet 
\psplot[
 linewidth = 1pt,
 linestyle = solid]% 
{-7.0000}{2.9920}{-2-1*x} 
 
% Ein Graph wird gezeichnet 
\psplot[
 linewidth = 1pt,
 linestyle = solid]% 
{-5.9910}{7.0000}{-2+0.5*x} 
 
% Ein Graph wird gezeichnet 
\psplot[
 linewidth = 1pt,
 linestyle = solid]% 
{-7.0000}{5.9910}{-2-0.5*x} 
 
% Ein Graph wird gezeichnet 
\psplot[
 linewidth = 1pt,
 linestyle = solid]% 
{-7.0000}{7.0000}{-2} 
 
\end{pspicture} 
\end{document}