let ask_value msg () =
        (faire ("zenity --entry --window-icon=\".monicone.ico\" --title=\"Projet Puzzle\" --text=\""^msg^"\" > .value_choisie.value"));
        parse_fichier ".value_choisie.value"