\renewcommand{\tdx}{0.5} % depth of 3d
\renewcommand{\tdy}{30}

\def\onecol{red}
\def\twocol{green}
%-------------------------------------------------
    %this is the way to redefine styles
    % \newpsstyle{mytickstyle}{linewidth=1pt,linecolor=blue}
    %
    \newpsstyle{diagframestyle}{linewidth=1pt,linecolor=black,fillcolor=white}
    \renewcommand\numbercolor{\black\bf}
    \renewcommand{\betweenticks}{200}
    \bardiagrambegin{15}{1000}{3cm}{1}{3}{1cm}{0.01cm}
       \barspergroup{2}
       \baritem{Jelger}{721}{\onecol}
        \subbaritem{}{500}{\twocol}
       \baritem{Johan}{412}{\onecol}
        \subbaritem{}{500}{\twocol}
       \baritem{Rikkert}{810}{\onecol}
        \subbaritem{}{500}{\twocol}
       \baritem{Henk}{310}{\onecol}
        \subbaritem{}{500}{\twocol}
       \baritem{New Guy}{0}{\onecol}
        \subbaritem{}{542}{\twocol}  
    \drawlevellines
    % Legend
    %\diagLegendoptions{yellow}{yellow}{0.0pt}
    %
    \diagLegendbegin{10}{890}{3.5}
      \diagLegenditem{19.12.2002}{\onecol}
      \diagLegenditem{06.05.2003}{\twocol}
    \diagLegendend
    \bardiagramend{\large Cluster Users}{\large Jobs Submitted}