Allonger une note

classic Classique list Liste threaded Arborescence
5 messages Options
Répondre | Arborescence
Ouvrir ce message en vue arborescente
|  
Signaler un Contenu Inapproprié

Allonger une note

gerardk
Ce message a été mis à jour le .
Bonjour

je voudrais refaire cette partition : Original.jpg
j'ai déjà créé ce début de partition :
\version "2.18.2"
\language "français"
saut =
{
  \bar "|" \break
}
\paper
{
  indent = 0\mm
  oddFooterMarkup=##f
  ragged-last-bottom = ##t
  paper-width = 190\mm
  paper-height = 260\mm
  top-margin = 0\mm
  bottom-margin = 0\mm
  left-margin = 4\mm
  right-margin = 1\mm
  print-page-number = ##f
}
% -----
noire =
{
  \override NoteHead.stencil = #ly:text-interface::print
  \override NoteHead.text = \markup {\musicglyph #"noteheads.s2la"}
}
blanche =
{
  %% Place deux 'noteheads.s2la côte-à-côte :
  \once \override NoteHead.stencil = #ly:text-interface::print
  % \once \override NoteHead.text = \markup {\musicglyph #"noteheads.s1laThin"}
  \once \override NoteHead.text = \markup {
    \musicglyph #"noteheads.s2la"
    \musicglyph #"noteheads.s2la"
  }
}
recit =
{
  \once  \override NoteHead.stencil = #ly:text-interface::print
%  \once \override NoteHead.size = #15.0
  \once \override NoteHead.text = \markup{\musicglyph #"noteheads.sM3blackligmensural"}
}
chorI = ^\markup
{
  \smallCaps  "Chor I"
}
chorII = ^\markup
{
  \smallCaps  "Chor II"
}
chorC = ^\markup
{
  \smallCaps  "Chor I-II"
}
% -----
notes = \relative do'
{
  \clef treble
  \key do \major
  \time 4/4
  % Supprime les clef en début de ligne
  \override Staff.Clef #'stencil = ##f
  % Affiche la clé sur la première portée
  \once \override  Staff.Clef #'stencil = #ly:clef::print
  % Imprime des barres de mesure au début de chaque ligne
  \override Score.SystemStartBar #'collapse-height = 1
  % Indication des numéros de mesure
  \override Score.BarNumber.break-visibility = ##(#f #t #t)
  %
  \noire % Vakeur pas défaut de toutes les notes
  fa4 \chorI sol la la |
  \recit fa8 \chorII
  sol sol4 fa \blanche sol |
}
% -----
police =
{
  \override LyricText #'font-name = #"Adobe Jenson Pro Disp"
  \override LyricText #'font-size = #4
}
texteGauche =
{
  \once \override LyricText.self-alignment-X = #LEFT
}
texte = \lyricmode
{
  \police
  <<
    {
      Sei uns gnä -- dig,
      \texteGauche "ver - schon    uns, lie" -- ber, her -- re Gott.
    }
    \new Lyrics = "reprise" \with
    {
      associatedVoice = "one"
      alignBelowContext = "one"
    }
    {
      \police
      Sei uns gnä -- dig,
      \texteGauche "hilf  uns,                   lie" -- ber, her -- re Gott.
    }
  >>
}
% -----
\score{
  <<
    \new Voice = "one"
    {
      \autoBeamOff
      \notes
    }
    \new Lyrics \lyricsto "one" \texte
  >>
  \layout
  {
    \context
    {
      \Staff
      \remove "Time_signature_engraver"
      \override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/16)
      \hide Stem
    }
  }
}

Je n'ai pas réussi à allonger la brève, pour correspondre à l'image de l'original.

Merci.
Répondre | Arborescence
Ouvrir ce message en vue arborescente
|  
Signaler un Contenu Inapproprié

Re: Alonger une note

Schneidy
Bonjour Gérard,

Essaie :

recit =
{
  \once  \override NoteHead.stencil = #ly:text-interface::print
%  \once \override NoteHead.size = #15.0
%  \once \override NoteHead.text = \markup{\musicglyph #"noteheads.sM3blackligmensural"}
  \once \override NoteHead.text = \markup\concat {
    \vcenter\override #'(thickness . 2)\draw-line #'(0 . 2)
    \hspace #-.13
    \override #'(thickness . 5)\draw-line #'(36 . 0) %% <= à ajuster !!
    \hspace #-.13
    \vcenter\override #'(thickness . 2)\draw-line #'(0 . 2)
  }
}

Cordialement,
Pierre

Le 2 mai 2017 à 12:43, gerardk <[hidden email]> a écrit :
Bonjour

je voudrais refaire la partition dont une image est jointe.
j'ai déjà créé ce début de partition :
\version "2.18.2"
\language "français"
saut =
{
  \bar "|" \break
}
\paper
{
  indent = 0\mm
  oddFooterMarkup=##f
  ragged-last-bottom = ##t
  paper-width = 190\mm
  paper-height = 260\mm
  top-margin = 0\mm
  bottom-margin = 0\mm
  left-margin = 4\mm
  right-margin = 1\mm
  print-page-number = ##f
}
% -----
noire =
{
  \override NoteHead.stencil = #ly:text-interface::print
  \override NoteHead.text = \markup {\musicglyph #"noteheads.s2la"}
}
blanche =
{
  %% Place deux 'noteheads.s2la côte-à-côte :
  \once \override NoteHead.stencil = #ly:text-interface::print
  % \once \override NoteHead.text = \markup {\musicglyph
#"noteheads.s1laThin"}
  \once \override NoteHead.text = \markup {
    \musicglyph #"noteheads.s2la"
    \musicglyph #"noteheads.s2la"
  }
}
recit =
{
  \once  \override NoteHead.stencil = #ly:text-interface::print
%  \once \override NoteHead.size = #15.0
  \once \override NoteHead.text = \markup{\musicglyph
#"noteheads.sM3blackligmensural"}
}
chorI = ^\markup
{
  \smallCaps  "Chor I"
}
chorII = ^\markup
{
  \smallCaps  "Chor II"
}
chorC = ^\markup
{
  \smallCaps  "Chor I-II"
}
% -----
notes = \relative do'
{
  \clef treble
  \key do \major
  \time 4/4
  % Supprime les clef en début de ligne
  \override Staff.Clef #'stencil = ##f
  % Affiche la clé sur la première portée
  \once \override  Staff.Clef #'stencil = #ly:clef::print
  % Imprime des barres de mesure au début de chaque ligne
  \override Score.SystemStartBar #'collapse-height = 1
  % Indication des numéros de mesure
  \override Score.BarNumber.break-visibility = ##(#f #t #t)
  %
  \noire % Vakeur pas défaut de toutes les notes
  fa4 \chorI sol la la |
  \recit fa8 \chorII
  sol sol4 fa \blanche sol |
}
% -----
police =
{
  \override LyricText #'font-name = #"Adobe Jenson Pro Disp"
  \override LyricText #'font-size = #4
}
texteGauche =
{
  \once \override LyricText.self-alignment-X = #LEFT
}
texte = \lyricmode
{
  \police
  <<
    {
      Sei uns gnä -- dig,
      \texteGauche "ver - schon    uns, lie" -- ber, her -- re Gott.
    }
    \new Lyrics = "reprise" \with
    {
      associatedVoice = "one"
      alignBelowContext = "one"
    }
    {
      \police
      Sei uns gnä -- dig,
      \texteGauche "hilf  uns,                   lie" -- ber, her -- re
Gott.
    }
  >>
}
% -----
\score{
  <<
    \new Voice = "one"
    {
      \autoBeamOff
      \notes
    }
    \new Lyrics \lyricsto "one" \texte
  >>
  \layout
  {
    \context
    {
      \Staff
      \remove "Time_signature_engraver"
      \override SpacingSpanner.base-shortest-duration = #(ly:make-moment
1/16)
      \hide Stem
    }
  }
}



--
View this message in context: http://lilypond-french-users.1298960.n2.nabble.com/Alonger-une-note-tp7584865.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.

_______________________________________________
liste de diffusion lilypond-user-fr
[hidden email]
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr


_______________________________________________
liste de diffusion lilypond-user-fr
[hidden email]
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr
Répondre | Arborescence
Ouvrir ce message en vue arborescente
|  
Signaler un Contenu Inapproprié

Re: Alonger une note

gerardk
Bonjour Pierre

Je reprends la discussion ici, l'échange peut servir à d'autres personnes.

Tu redessines donc totalement la tête de note.

Tant que j'y suis, je me permet une autre question.

Comme j'ai la même situation à plusieurs endroits (21 exactement), est-il possible de définir une fonction qui aurait en paramètre la longueur de la note à dessiner, ce qui me simplifierait l'écriture de la partition.

je suis informaticien et j'ai l'habitude de simplifier le code des programmes (et des partitions) en réemployant tout ce qui peut l'être.


Merci de passer du temps à répondre à mes questions.


Gérard
Répondre | Arborescence
Ouvrir ce message en vue arborescente
|  
Signaler un Contenu Inapproprié

Re: Alonger une note

Schneidy
Oui, c'est possible (cf. fichier joint).
Cordialement,
Pierre

Le 2 mai 2017 à 14:29, gerardk <[hidden email]> a écrit :
Bonjour Pierre

Je reprends la discussion ici, l'échange peut servir à d'autres personnes.

Tu redessines donc totalement la tête de note.

Tant que j'y suis, je me permet une autre question.

Comme j'ai la même situation à plusieurs endroits (21 exactement), est-il
possible de définir une fonction qui aurait en paramètre la longueur de la
note à dessiner, ce qui me simplifierait l'écriture de la partition.

je suis informaticien et j'ai l'habitude de simplifier le code des
programmes (et des partitions) en réemployant tout ce qui peut l'être.


Merci de passer du temps à répondre à mes questions.


Gérard



--
View this message in context: http://lilypond-french-users.1298960.n2.nabble.com/Allonger-une-note-tp7584865p7584867.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.

_______________________________________________
liste de diffusion lilypond-user-fr
[hidden email]
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr


_______________________________________________
liste de diffusion lilypond-user-fr
[hidden email]
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr

gerardBreveVariable.ly (4K) Download Attachment
Répondre | Arborescence
Ouvrir ce message en vue arborescente
|  
Signaler un Contenu Inapproprié

Re: Alonger une note

gerardk
Merci Pierre

C'est exactement ce que je voulais, je vais pouvoir terminer cette partition sans problème.

Merci à tous ceux qui ont répondu à mes demandes.

Cordialement

Gérard
Chargement...