\NeedsTeXFormat{LaTeX2e}
% Macro pour faire des boites à moustaches

\RequirePackage{multido}
\RequirePackage{calc}
\RequirePackage{ifthen}


%\bam{min}{d1}{q1}{med}{q2}{d9}{max}
\newlength{\haut}
\newlength{\bas}
\newcounter{bam}\setcounter{bam}{-1}
\newcommand{\bam}[7]{
    \ifthenelse{\thebam=-1}{
        % C'est la première boite à moustache, il faut mettre en place les premiers éléments
        \psset{fillstyle=solid}
        \psline(0,0)(100,0)
        {\scriptsize
        \multido{\n=0+10}{11}{%
        \psline(\n,.1)(\n,-.1)
        \uput[d](\n,0){\n}}}
        }{}

    % Dessin de la boite à moustaches
    % Décalage vers le haut de la boite à moustaches
    \addtocounter{bam}{2}
    % On trace la boite
    \setlength{\haut}{\thebam\psyunit+.5\psyunit}
    \setlength{\bas}{\thebam\psyunit-.5\psyunit}
    % On trace du min au max avec des pointillés
    \psline[linestyle=dotted](#1,\thebam\psyunit)(#7,\thebam\psyunit)
    % On trace de d1 à d9 les moustaches
    \psline{|-|}(#2,\thebam\psyunit)(#6,\thebam\psyunit)
    % On trace la boite
    \psframe(#3,\bas)(#5,\haut)
    %\uput[u](#3,\haut){$Q_1$}
    %\uput[u](#5,\haut){$Q_3$}
    % Puis la médiane
    \psline(#4,\bas)(#4,\haut)
    %\uput[u](#4,\haut){$Me$}
}
