Re: define-music-function un peu compliqué

[Christophe Pochon]

J'ai envoyé une réponse en privé (par erreur) à dmalik, voici ce que je lui disais :

En fait, pourquoi utiliser une fonction ? Je te mets ci-dessous ma version de ta première mesure. Ca me semble un peu plus simple et plus lisible. Après, tu n'as qu'à faire des copier-coller de cette première mesure et modifier ce que tu veux.

Encore une fois, si tu as un brouillons, je suis preneur et veux bien essayer.

Voici comment je commencerais :

Après j'avais mis mon code, mais je viens de faire un petit changement pour être encore plus proche de SA première mesure.

Alors dmalik, c'est ce code-ci que je te suggère comme point de départ :

\version "2.12.3"

\header {

  % Enlever le pied de page par défaut

  tagline = ##f

}

\paper {

  #(set-paper-size "a4")

}

global = {

  \key a \major

  \time 4/4

}

right = \relative c'' {

  \global

  % En avant la musique !

  s4 a16^> s s s 

  s4 a16^> s s s 

}

left = \relative c {

  \global

  f,16( cis' fis a) \change Staff = "right"  \slurDown \stemDown fis'( \change Staff = "left" \stemUp a, fis c)

  f,16( cis' fis a) \change Staff = "right"  \slurDown \stemDown fis'( \change Staff = "left" \stemUp a, fis c)

  

}

\score {

  \new PianoStaff <<

    \new Staff = "right" \right

    \new Staff = "left" { \clef bass \left }

  >>

  \layout { }

}

Christophe Pochon
http://www.christophe-pochon.com

Le 24 juin 2010 00:07, Christophe Pochon <address@hidden> a écrit :

Je me trompe peut-être, mais à première vue ton code a l'air bien compliqué.... on doit pouvoir faire plus simple.

T'aurais un scan d'un manuscrit de ce que tu veux faire exactement ?

Christophe Pochon
http://www.christophe-pochon.com

Le 23 juin 2010 23:02, dmalik <address@hidden> a écrit :

\version "2.12.0"
\include "italiano.ly"

\header {
       title = "Essai"

       composer = ""


}
% Ma fonction
tempsdeux =
 #(define-music-function (parser location  accordhaut notesbas)( ly:music?
ly:music?)
         #{
           <<
             {
               \override Beam #'auto-knee-gap = #-5
               \stemDown
               \override Script #'minimum-space = #3.5
               \change Staff = "up" << $accordhaut >>
               \stemUp
                 % Groupe2 reste
               \change Staff = "down"  $notesbas
             }
             \\
             {
               \override Beam #'auto-knee-gap = #5
               \stemUp
                 %Groupe 2 repetition accord pour les double croches
                 \change Staff = "up" << $accordhaut >>
             }
           >>
         #}
         )
%MAIN DROITE
 up =\relative do {
\clef treble
 \key la \major
 \time 4/4
 s1
 | s1  |
 }

%MAIN GAUCHE
down = \relative do {
 \clef bass
 \key la \major
 \time 4/4
  \override Beam #'auto-knee-gap = #5
\once \override PhrasingSlur #'positions = #'(-15 . -15)

%MESURE 1 --------------------------------------------------
% C'est celle là qui est la bonne et je veux la répéter avec d'autres notes
% Groupe 1 ---
       fa,16_(dod' fad la)
%Groupe 2 Accord
 <<
 {
       \override Beam #'auto-knee-gap = #-5
       \stemDown
       \override Script #'minimum-space = #3.5
       \change Staff = "up" << fad' la  \accent _(  >>
       \stemUp
% Groupe2 reste
       \change Staff = "down"  la, fad do)
 }
       \\
 {
       \override Beam #'auto-knee-gap = #5
        \stemUp
       %Groupe 2 repetition accord pour les double croches
        \change Staff = "up" << fad' la >>
 }
 >>
% fin groupe 2
%groupe 3
 fa,,16_(dod' fad la)
%Groupe 4 Accord
 <<
 {
       \override Beam #'auto-knee-gap = #-5
       \stemDown
       \override Script #'minimum-space = #3.5
       \change Staff = "up" << fad' la \accent _( >>
       \stemUp
       %Groupe4 reste
       \change Staff = "down"  la, fad do)
 }
       \\
 {
       \override Beam #'auto-knee-gap = #5
        \stemUp
       %Groupe 4 repetition accord pour les double croches
        \change Staff = "up" << fad' la >>
 }
 >>
% fin groupe 4
|
%MESURE 2 appel de la fonction
--------------------------------------------------
\tempsdeux {fad la} { la, fad do}
\tempsdeux {fad' la} { la, fad do}
\tempsdeux {fad la} { la, fad do}
\tempsdeux {fad la} { la, fad do}
|

}




%%%%%%%%%%%%%%%%%%%%
%%Partition seule
%%%%%%%%%%%%%%%%%%%%%%
\score {
       <<
       \new PianoStaff <<
       \new Staff="up" \up
       \new Staff="down" \down
>>
       >>
       \layout { }
}

%%%%%%%%%%%%%%%%%%%%%%
%%Midi
%%%%%%%%%%%%%%%%%%%%%%
\score {
       <<
       \new Staff {
                \set Staff.midiMaximumVolume = #1
               \down
               }

       >>
       \midi { }

}