Ajout commentaires

diff --git a/gtx2tex.pl b/gtx2tex.pl
index 55f236f..b06e354 100644 (file)
--- a/gtx2tex.pl
+++ b/gtx2tex.pl
@@ -161,25 +161,25 @@ sub create_pdf {
 
 
 sub crdpro { # Bearbeitung der Zeile aus der Eingabedatei
-    if ( $lyrics ){
-        s/\[.*?\]//g; # Akkorde entfernen
+    if ( $lyrics ) {
+        s/\[.*?\]//g; # Akkorde entfernen / On enlève les accords
         print TEX "$_\\\\\n" unless ( /^\s*$/ );
     } else {
 
-        s/\s/$space/g;                                 # alle Leerzeichen durch feste Leerzeichen ersetzen
-        s/(\^)(.*?)(\])/\\\(^\{\2\}\\\)\]/g;   # Ziffern hochstellen
+        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/\[/\}\\gtxchord{/g;                  # linke Klammer ersetzen
-        s/\]/}{/g;                             # rechte Klammer ersetzen
-       #       s/(\})(.*?)(\\)/}{\2}\\/g;              # Text zwischen Akkorden in geschweifte Klammern setzen
+        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
         if ( $_ !~ /^\\/ ) {
             s/^/\\gtxchord\{\}\{/
         }
 
-        s/#/$sharp/g;                          # Vorzeichen "#" ersetzen
-        s/\{Ab/{A$flat/g;                       # Vorzeichen "b" ersetzen
+        s/#/$sharp/g;     # Remplace le symbole '#' par le symbole diese
+        s/\{Ab/{A$flat/g; # Remplace le 'b' de l'accord par le symbole bemol
         s/\{Bb/{B$flat/g;
         s/\{Cb/{C$flat/g;
         s/\{Db/{D$flat/g;