\documentclass[a4paper]{article}
\usepackage{graphicx}
\usepackage{a4wide}
\usepackage{listings}
\usepackage{forloop}
\begin{document}

\newcounter{suffix}

\newcommand{\DDir}{data_winkel_\thesuffix}
\newcommand{\DDirP}{data\_winkel\_\thesuffix}

\section{Inputfile}
\lstinputlisting[breaklines=true]{../lpic/input_winkel_1.lpi}

\newcommand{\includegraphicsIfExists}[3]{\IfFileExists{../\DDir/Post/#1}
 {
%  \begin{figure}
  \includegraphics[width=\textwidth]{../\DDir/Post/#1} \\[-#2cm]
  \begin{center}
  #3
  \end{center}
%  \end{figure}
 }{}}

\forloop{suffix}{0}{\value{suffix} < 10000}
{
 \IfFileExists{../\DDir/times-1}
 {
  \newpage
  \IfFileExists{../\DDir/Post/titel.tex}
    {\input{../\DDir/Post/titel} (\DDirP) \\}
    {\section{\DDirP}}

  \includegraphicsIfExists{spacetime-de.pdf}{0}{Elektronendichte}
  \includegraphicsIfExists{spacetime-de_breit.pdf}{0}{Elektronendichte breiter}

  \includegraphicsIfExists{Spektrum_log_p_refl.pdf}{1}{Spektrum\_log\_p-Pol\_refl}
  \includegraphicsIfExists{Feld_p_refl.pdf}{1}{Feld\_p-Pol\_refl}
  \includegraphicsIfExists{Spektrum_log_p_trns.pdf}{1}{Spektrum\_log\_p-Pol\_trns}
  \includegraphicsIfExists{Feld_p_trns.pdf}{1}{Feld\_p-Pol\_trns}

  \includegraphicsIfExists{Spektrum_log_s_refl.pdf}{1}{Spektrum\_log\_s-Pol\_refl}
  \includegraphicsIfExists{Feld_s_refl.pdf}{1}{Feld\_s-Pol\_refl}
  \includegraphicsIfExists{Spektrum_log_s_trns.pdf}{1}{Spektrum\_log\_s-Pol\_trns}
  \includegraphicsIfExists{Feld_s_trns.pdf}{1}{Feld\_s-Pol\_trns}
 }{}
}

\end{document}

