From: Hugo Villeneuve Date: Thu, 5 May 2022 20:40:32 +0000 (-0400) Subject: Traduction de commentaires X-Git-Url: http://gitweb.hugovil.com/?a=commitdiff_plain;h=202a2c912f0eff3dd713cf207dcace375c336285;p=musique%2Fhvguitartex.git Traduction de commentaires --- diff --git a/gtx2tex.pl b/gtx2tex.pl index 3c2f7b6..b8278ac 100644 --- 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