lilypond-user-fr
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: 5 partition en accolade


From: Jean Goujon
Subject: Re: 5 partition en accolade
Date: Thu, 7 Feb 2019 19:11:55 +0100
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:60.0) Gecko/20100101 Thunderbird/60.4.0

Le 07/02/2019 à 15:47, Aiki Zen a écrit :
> bonjour,
> j'ai une partition à retranscrire, avec 5 voix :
> 2 soprano
> 1 alto
> 1 tenor
> 1 bass
> 
> donc 4 clé de sol don la tenor à l'octave et un clé de fa.
> 
> la partition original est écrite avec les 5 voix en accolade, j'aurai
> voulu savoir comment faire pour faire de même sous lilypond.
> 
> bien à vous,
> aiki.
> 
Bonsoir,
connais-tu Frescobaldi (pas le compositeur) mais le logiciel ?
http://frescobaldi.org/
avec Ctrl+Maj+N tu peux produire le cadre pour écrire le code
par exemple ce qui suit et tu auras
-réduction piano(2 portées)
-fichiers midi par voix pour l'apprentissage
et plein d'autres options (pas la bière)
tu écris le code après "% En avant la musique !" et les paroles après  %
"Ajouter ici des paroles."
Pour les autres réglages : taille partition, musica ficta...
voir la doc :
http://lilypond.org/doc/v2.18/Documentation/notation/index.fr.html
et tu peux l'avoir directement dans Frescobaldi.


%%%%%%%%%%%%%%%%%%%% fichier ssatb %%%%%%%%%%%%%%
\version "2.19.82"

\header {
  title = "Martin menoit son portiau au marché"
  composer = "Clément JANEQUIN (1485-)"
  arranger = "Vincenzo RUFFO (c.1510-1587)"
  meter = "1564 in Capricci in musica a tre voci (No.9)"
}

global = {
  \key f \major
  \time 4/4
}

sopranoOne = \relative c'' {
  \global
  % En avant la musique !

}

sopranoTwo = \relative c'' {
  \global
  % En avant la musique !

}

alto = \relative c' {
  \global
  % En avant la musique !

}

tenorOne = \relative c' {
  \global
  % En avant la musique !

}

tenorTwo = \relative c' {
  \global
  % En avant la musique !

}

bass = \relative c {
  \global
  % En avant la musique !

}

sopranoOneVerse = \lyricmode {
  % Ajouter ici des paroles.

}

sopranoTwoVerse = \lyricmode {
  % Ajouter ici des paroles.

}

altoVerse = \lyricmode {
  % Ajouter ici des paroles.

}

tenorOneVerse = \lyricmode {
  % Ajouter ici des paroles.

}

tenorTwoVerse = \lyricmode {
  % Ajouter ici des paroles.

}

bassVerse = \lyricmode {
  % Ajouter ici des paroles.

}

pianoReduction = \new PianoStaff \with {
  fontSize = #-1
  \override StaffSymbol #'staff-space = #(magstep -1)
} <<
  \new Staff \with {
    \consists "Mark_engraver"
    \consists "Metronome_mark_engraver"
    \remove "Staff_performer"
  } {
    #(set-accidental-style 'piano)
    <<
      \sopranoOne \\
      \sopranoTwo \\
      \alto
    >>
  }
  \new Staff \with {
    \remove "Staff_performer"
  } {
    \clef bass
    #(set-accidental-style 'piano)
    <<
      \tenorOne \\
      \tenorTwo \\
      \bass
    >>
  }
>>

rehearsalMidi = #
(define-music-function
 (parser location name midiInstrument lyrics) (string? string? ly:music?)
 #{
   \unfoldRepeats <<
     \new Staff = "soprano1" \new Voice = "soprano1" { \sopranoOne }
     \new Staff = "soprano2" \new Voice = "soprano2" { \sopranoTwo }
     \new Staff = "alto" \new Voice = "alto" { \alto }
     \new Staff = "tenor1" \new Voice = "tenor1" { \tenorOne }
     \new Staff = "tenor2" \new Voice = "tenor2" { \tenorTwo }
     \new Staff = "bass" \new Voice = "bass" { \bass }
     \context Staff = $name {
       \set Score.midiMinimumVolume = #0.5
       \set Score.midiMaximumVolume = #0.5
       \set Score.tempoWholesPerMinute = #(ly:make-moment 100 4)
       \set Staff.midiMinimumVolume = #0.8
       \set Staff.midiMaximumVolume = #1.0
       \set Staff.midiInstrument = $midiInstrument
     }
     \new Lyrics \with {
       alignBelowContext = $name
     } \lyricsto $name $lyrics
   >>
 #})

\score {
  <<
    \new ChoirStaff <<
      \new Staff \with {
        midiInstrument = "choir aahs"
        instrumentName = "Soprano I"
        \consists "Ambitus_engraver"
      } { \sopranoOne }
      \addlyrics { \sopranoOneVerse }
      \new Staff \with {
        midiInstrument = "choir aahs"
        instrumentName = "Soprano II"
        \consists "Ambitus_engraver"
      } { \sopranoTwo }
      \addlyrics { \sopranoTwoVerse }
      \new Staff \with {
        midiInstrument = "choir aahs"
        instrumentName = "Alto"
        \consists "Ambitus_engraver"
      } { \alto }
      \addlyrics { \altoVerse }
      \new Staff \with {
        midiInstrument = "choir aahs"
        instrumentName = "Ténor I"
        \consists "Ambitus_engraver"
      } { \clef "treble_8" \tenorOne }
      \addlyrics { \tenorOneVerse }
      \new Staff \with {
        midiInstrument = "choir aahs"
        instrumentName = "Ténor II"
        \consists "Ambitus_engraver"
      } { \clef "treble_8" \tenorTwo }
      \addlyrics { \tenorTwoVerse }
      \new Staff \with {
        midiInstrument = "choir aahs"
        instrumentName = "Basse"
        \consists "Ambitus_engraver"
      } { \clef bass \bass }
      \addlyrics { \bassVerse }
    >>
    \pianoReduction
  >>
  \layout { }
  \midi {
    \tempo 4=100
  }
}

% Fichiers MIDI pour répétitions :
\book {
  \bookOutputSuffix "soprano1"
  \score {
    \rehearsalMidi "soprano1" "soprano sax" \sopranoOneVerse
    \midi { }
  }
}

\book {
  \bookOutputSuffix "soprano2"
  \score {
    \rehearsalMidi "soprano2" "soprano sax" \sopranoTwoVerse
    \midi { }
  }
}

\book {
  \bookOutputSuffix "alto"
  \score {
    \rehearsalMidi "alto" "soprano sax" \altoVerse
    \midi { }
  }
}

\book {
  \bookOutputSuffix "tenor1"
  \score {
    \rehearsalMidi "tenor1" "tenor sax" \tenorOneVerse
    \midi { }
  }
}

\book {
  \bookOutputSuffix "tenor2"
  \score {
    \rehearsalMidi "tenor2" "tenor sax" \tenorTwoVerse
    \midi { }
  }
}

\book {
  \bookOutputSuffix "bass"
  \score {
    \rehearsalMidi "bass" "tenor sax" \bassVerse
    \midi { }
  }
}

%%%%%%%%%%%%% fin fichier%%%%%%%%%%%%%%%%%%%%%%


-- 
Jean GOUJON, www.toucheetsonne.fr - http://www.ensemblechoraldelibourne.org/
www.abul.org (Linux & logiciels libres) - Téléchargez et essayez linux!
http://www.mageia.org/fr/



reply via email to

[Prev in Thread] Current Thread [Next in Thread]