Traduction de commentaires

diff --git a/gtx2tex.pl b/gtx2tex.pl
index 3c2f7b6..b8278ac 100644 (file)
--- a/gtx2tex.pl
+++ b/gtx2tex.pl
@@ -224,31 +224,32 @@ sub crdpro { # Bearbeitung der Zeile aus der Eingabedatei
     } else {
 
        if ( $uppercase ) {
-            $_ = uc($_); # Toutes les lettres en majuscule.
+            $_ = uc($_); # Toutes les lettres en majuscule (incluant les accords).
         }
 
         s/\s/$space/g;                                 # Remplace une séquence de plusieurs espaces par un seul
-        s/(\^)(.*?)(\])/\\\(^\{\2\}\\\)\]/g;   # Ziffern hochstellen / Place les chiffres en haut?
+        s/(\^)(.*?)(\])/\\\(^\{\2\}\\\)\]/g;   # Place le texte suivant '^' en exposant
 
         s/\[/\}\\gtxchord{/g;                  # linke Klammer ersetzen / Remplace crochet gauche
         s/\]/}{/g;                             # rechte Klammer ersetzen / Remplace crochet droit
-        #      s/(\})(.*?)(\\)/}{\2}\\/g;      # Text zwischen Akkorden in geschweifte Klammern setzen
-        s/$/}/; # rechte Klammer am Ende der Zeile ergänzen
-        s/^\}//; # rechte Klammer am Anfang der Zeile entfernen
+        s/$/}/;  # Ajoute une accolade droite à la fin de la ligne
+        s/^\}//; # Supprime l'accolade droite en début de ligne
         if ( $_ !~ /^\\/ ) {
+            # Ajoute une élément \gtxchord sans accord: \gtxchord{}{TEXTE}
             s/^/\\gtxchord\{\}\{/
         }
 
         $verbose && print "Accord: <$_>\n";
 
         if ( $uppercase ) {
-            s/(gtxchord\{[A-G][B#]?)MAJ7/\1$majeur_sept/g;            # Remplace 'gtxchord{AM'  par 'gtxchord{Am'
+            # Accord Majeur7
+            s/(gtxchord\{[A-G][B#]?)MAJ7/\1$majeur_sept/g;
 
-            # On recherche le nom de l'accord, suivi d'un bémol ou dièse optionel, suivi de 'sus' + 1 chiffre.
+            # Accord suivi d'un bémol ou dièse optionel, suivi de 'sus' + 1 chiffre.
             s/(gtxchord\{[A-G][B#]?[0-9]?)SUS([0-9]+)/\1\$^{sus\2}\$/g;
 
             # Accord demi-diminué
-            # On recherche le nom de l'accord, suivi d'un bémol ou dièse optionel, suivi de 'm7b5'.
+            # Accord, suivi d'un bémol ou dièse optionel, suivi de 'm7b5'.
             s/(gtxchord\{[A-G][B#]?)M7B5/\1$half_diminished/g;
 
             # Accords diminués