\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-old = { \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) } } recit = #(define-music-function (parser location arg-height)(number?) #{ \once \override NoteHead.stencil = #(lambda (grob) ly:note-head::print (grob-interpret-markup grob #{ \markup\concat { \vcenter\override #'(thickness . 2)\draw-line #'(0 . 2) \hspace #-.13 \override #'(thickness . 5)\draw-line #`(,arg-height . 0) \hspace #-.13 \vcenter\override #'(thickness . 2)\draw-line #'(0 . 2) } #})) #}) 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 #37 fa8 \chorII %% <= à ajuster !! 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 } } }