X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Ftransposing-pitches-with-minimum-accidentals-smart-transpose.ly;h=8e152f714e69b642fa3a9f27fa96b1c9c0d55f5a;hb=75b64f8ddda16f3b2eb77ec5e9631d92b9be7da4;hp=f98cdfeb2e84e6a0262d3c663a387b99de43694a;hpb=3ef893f1fe182e9f6cf5841cbff0706789bd3361;p=lilypond.git diff --git a/Documentation/snippets/transposing-pitches-with-minimum-accidentals-smart-transpose.ly b/Documentation/snippets/transposing-pitches-with-minimum-accidentals-smart-transpose.ly index f98cdfeb2e..8e152f714e 100644 --- a/Documentation/snippets/transposing-pitches-with-minimum-accidentals-smart-transpose.ly +++ b/Documentation/snippets/transposing-pitches-with-minimum-accidentals-smart-transpose.ly @@ -4,12 +4,12 @@ %% and then run scripts/auxiliar/makelsr.py %% %% This file is in the public domain. -\version "2.14.0" +\version "2.14.2" \header { - lsrtags = "pitches" + lsrtags = "workaround, pitches, scheme-language" -%% Translation of GIT committish: 2d548a99cb9dba80f2ff035582009477cd37eceb +%% Translation of GIT committish: b482c3e5b56c3841a88d957e0ca12964bd3e64fa doctitlees = "Transportar música con el menor número de alteraciones" texidoces = " Este ejemplo utiliza código de Scheme para forzar las @@ -41,6 +41,32 @@ naturales. " +%% Translation of GIT committish: bbf8fd2b5a3ebf20a1fdc91613dc49045a53a270 + texidocit = " +Questo esempio usa del codice Scheme per imporre delle modifiche +enarmoniche alle note che permettano di avere il numero minimo di +alterazioni. In questo caso si applica la seguente regola: + +Le doppie alterazioni devono essere eliminate + + +Si diesis -> Do + + +Mi diesis -> Fa + + +Do bemolle -> Si + + +Fa bemolle -> Mi + + +In questo modo vengono scelti i suoni enarmonici più semplici. + +" + doctitleit = "Trasposizione delle altezze con numero minimo di alterazioni" + %% Translation of GIT committish: 0a868be38a775ecb1ef935b079000cebbc64de40 doctitlede = "Noten mit minimaler Anzahl an Versetzungszeichen transponieren." texidocde = "Dieses Beispiel benutzt Scheme-Code, um enharmonische @@ -71,11 +97,11 @@ Variante gewählt. " -%% Translation of GIT committish: 4ab2514496ac3d88a9f3121a76f890c97cedcf4e +%% Translation of GIT committish: 3b125956b08d27ef39cd48bfa3a2f1e1bb2ae8b4 texidocfr = " Cet exemple, grâce à un peu de code Scheme, donne la priorité aux -enharmoniques afin de limiter le nombre d'altérations supplémentaires. -La règle appliquable est : +enharmoniques afin de limiter le nombre d'altérations supplémentaires. +La règle appliquable est@tie{}: @itemize @item @@ -98,8 +124,7 @@ Fa bémol -> Mi Cette façon de procéder aboutit à plus d'enharmoniques naturelles. " - - doctitlefr = "Transposition et réduction du nombrer d'altérations accidentelles" + doctitlefr = "Transposition et réduction du nombre d'altérations accidentelles" texidoc = " This example uses some Scheme code to enforce enharmonic modifications @@ -127,6 +152,7 @@ In this manner, the most natural enharmonic notes are chosen. doctitle = "Transposing pitches with minimum accidentals (\"Smart\" transpose)" } % begin verbatim + #(define (naturalize-pitch p) (let ((o (ly:pitch-octave p)) (a (* 4 (ly:pitch-alteration p)))