let ask_echelle_couleur nb () =
        try (zenity_info "
Pour colorer les pièces, le systeme utilise une echelle de couleur.
Vous avez choisi de la configurer vous meme : veuillez choisir deux couleurs pour creer cette echelle.
        <i>L'echelle generee est une simple interpolation entre les codes RGB des deux couleurs rentrees.
        Veuillez donc choisir des couleurs bien differentes pour distinguer quelque chose sur l'affichage !</i>"
;
        let x = genere_echelle_couleur ~cmax:(ask_couleur ()) ~cmin:(ask_couleur ()) ~nb:(nb+1) in
        zenity_info "L'echelle de couleur a bien ete enregistree et sera utilisee tant que le programme ne sera pas quitte.";
(*        x) with (Error_Annule(i)) -> (echelle_gris nb);;*)
        x) with (Error_Annule(i)) -> (echelle_intelligente nb)