Re: raccourci de saisie rythmique

[Gilles]

> faut. Mon envie est de mettre la fonction dans le fichier changePitch.ly,
> les variables pattern et music étant dans le fichier qui contient ma
> musique. Et bien entendu pattern ni music n'ont ce nom exact, c'est  
> plutôt
> patternBass et Bass.
   A ce moment là, il faut modifier la fonction pour qu'elle accepte 2
paramètres, 1 pour pattern, 1 pour music

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%%%%%%%%%%% A mettre dans changePitch.ly

maFonction = #(define-music-function (parser location pattern  
music)(ly:music? ly:music?)
"[Decrire la fonction]"
#{ \musicMap
   #(lambda(evt)
     (case (ly:music-property evt 'name)
       ((NoteEvent)
          (let* ((arti (ly:music-property evt 'articulations))
                 (text (and (pair? arti)
                            (ly:music-property (car arti) 'text #f)))
                 (index (ly:pitch-notename (ly:music-property evt  
'pitch))))
             (if text (ly:music-set-property! (car arti) 'text
                (cond ((string=? text "bidon1")(list-ref '("C" "D" "E" "F"  
"G" "A" "B") index))
                      ((string=? text "bidon2")(list-ref '("c" "d" "e" "f"  
"g" "a" "b") index))
                      (else text))))
             evt))
       (else evt))
     )
   \changePitch $pattern \music
#})

%%%%%%%%%%  A mettre dans le fichier courant
\include "changePitch.ly"
\language "italiano"

patternAvecLeNomQuonVeut = \samePitch { do16^"bidon1" r do^"bidon2" r }
music = \relative { la si do re }

{ \maFonction \patternAvecLeNomQuonVeut \music }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

NB
Je te conseille de partir de la dernière version (aujourd'hui !) de  
"changePitch.ly", qui est \language indépendant.
On pourra mettre indifféremment :
  \include "changePitch.ly"
  \language "italiano"
ou
  \language "italiano"
   \include "changePitch.ly"

http://gillesth.free.fr/Lilypond/changePitch/

--
Gilles