Advertisement
Marcel-

Lilypond example

Jun 5th, 2012
177
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Latex 6.11 KB | None | 0 0
  1. \version "2.14.2"
  2. \pointAndClickOff
  3.  
  4. \paper{
  5.   ragged-bottom=##f
  6.   ragged-last-bottom = ##f
  7.   between-system-space=37\mm % was 20 <=default>
  8.   between-system-padding = #1
  9.   system-system-spacing #'minimum-distance = #12
  10.   oddFooterMarkup=##f
  11.   evenFooterMarkup=##f
  12.   evenHeaderMarkup=##f
  13.   print-page-number=##f
  14.   bottom-margin=30\mm
  15. }
  16.  
  17. \header {
  18.  title = \markup \center-column {
  19.    "Agnus Dei" }
  20.  composer = \markup { \small "Jean Courtois" }
  21.  poet = "Leiden, Gemeentearchief, Koorboek F"
  22. }
  23.  
  24.  
  25. \layout {
  26.  \context { \RemoveEmptyStaffContext }
  27.  \context { \Score
  28.    \remove "Timing_translator"
  29.    \remove "Default_bar_line_engraver"
  30.    \consists "Span_bar_engraver"
  31.    \override SpanBar #'stencil =
  32.     #(lambda (grob)
  33.       (if (string=? (ly:grob-property grob 'glyph-name) ":")
  34.           (set! (ly:grob-property grob 'glyph-name) ""))
  35.          (if (string=? (ly:grob-property grob 'glyph-name) "|")
  36.           (set! (ly:grob-property grob 'glyph-name) ""))
  37.       (ly:span-bar::print grob))
  38.  }
  39.  \context { \Staff
  40.    \consists "Timing_translator"
  41.    \consists "Default_bar_line_engraver"
  42.    \override TimeSignature #'style = #'mensural
  43.     \override TimeSignature #'break-visibility = #end-of-line-invisible
  44.    \override NoteHead #'style = #'baroque
  45.    \override TupletNumber #'transparent = ##t
  46.    \override TupletBracket #'transparent = ##t
  47.  }
  48.  indent=26\mm
  49. }
  50.  
  51. dl = { \override Staff.BarLine #'font-size = #-3 \set Timing.defaultBarType = ":" }
  52. nl = { \revert Staff.BarLine #'font-size \set Timing.defaultBarType = "|" }
  53.  
  54. sh = ^\markup{\small\sharp}
  55.  
  56. it = \override LyricText #'font-shape = #'italic
  57. rm = \revert LyricText #'font-shape
  58.  
  59. cantusText = \lyricmode {
  60. Ag -- nus De -- _ _ _ _ _ _ _ _ _ _ _ _ _ i
  61. qui tol -- lis pec -- _ _ _ ca -- _ _ _ _ _ ta mun -- di
  62. mi -- se -- re -- re mi -- se -- re -- _ _ _ _ re no -- _ _ _ _ _ _ _ _ bis
  63.  
  64. ag -- _ _ _ nus De -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ i
  65. ag -- nus De -- _ _ i
  66. qui tol -- _ _ _ _ _ _ lis pec -- ca -- ta mun -- _ _ _ _ _ _ _ _ _ _ di
  67. mi -- se -- re -- _ _ _ _ _ _ _ _ re no -- _ _ _ _ _ _ _ bis
  68. }
  69.  
  70. contratenorText = \lyricmode {
  71. Ag -- nus De -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ i
  72. ag -- nus De -- _ _ _ _ _ _ _ _ _ _ _ _ i
  73. qui tol -- lis pec -- _ ca -- _ _ _ _ ta mun -- di
  74. mi -- se -- re -- _ _ _ _ _ _ re no -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ bis
  75.  
  76. ag -- _ _ _ nus De -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ i
  77. ag -- nus De -- _ _ _ _ _ _ _ _ _ _ _ i
  78. qui tol -- lis pec -- _ _ ca -- ta mun -- _ _ _ _ _ _ _ _ _ _ _ _ di
  79. mi -- se -- re -- _ _ _ _ re no -- _ _ _ _ _ _ _ _ _ _ _ _ bis
  80. }
  81.  
  82. tenorText = \lyricmode {
  83. Ag -- nus De -- i
  84. qui tol -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ lis
  85. \it qui tol -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ lis \rm
  86. pec -- ca -- ta mun -- _ _ _ _ _ _ _ _ _ _ _ di
  87. mi -- se -- re -- _ _ _ _ _ _ _ re no -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ bis
  88. }
  89.  
  90. bassusText = \lyricmode {
  91. Ag -- nus De -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ i
  92. ag -- _ _ _ _ _ _ _ _ nus De -- _ _ _ i
  93. qui tol -- lis pec -- _ ca -- _ _ _ _ _ ta mun -- _ _ _ di
  94. mi -- se -- re -- _ _ _ _ re no -- _ _ _ _ _ _ _ _ _ _ _ _ bis
  95. }
  96.  
  97. \new ChoirStaff <<
  98.  \new Voice = "cantus" \with {
  99.    \consists "Bar_number_engraver"
  100.    \override BarNumber #'padding = #2.5
  101.  }
  102.  \relative c'' {
  103.    \set Staff.instrumentName = "[Superius]"
  104.    \clef G
  105.    \time 2/1
  106.    \set Staff.timeSignatureFraction = #'(2 . 2)
  107.    R1*10 r1 r2 \dl g1 \nl a2 b1 c2 g c2. b4 a g a g
  108.    f e \[ \dl d1 \nl g \] f2 g1 r2 g2 g g c2. b4 a g a2. b4 c a
  109.    b a d1 c2 d\breve R1*4 r1 r2 g,2 a g c1 r2 a2 b a d2. c4 b a g2
  110.    c2. b4 a g \dl f1 \[ bes a \] \nl g f2 g\longa*1/2 \bar "||"
  111.  
  112.    \set Staff.timeSignatureFraction = #'(2 . 2)
  113.    g2. a4 b c \dl d2. c4 a b c d e1 \nl d4 c b1 a2. b4
  114.    c d \dl e2. d4 b c d e f1 e4 d c2 d2. \nl c4 b2 a1 \dl g\breve. \nl r2 c2
  115.    c b4 a b2 a e'1 d2 c b4 a b c d2 g, r2 d' c b a2. g8 f
  116.    e2 d a'1 g2 \dl c2. \nl b4 a1 g2 a1 r2 a2 c c g2. a4 b c d2. c4 b a
  117.    b2 g2. f4 e d e d g1 f2 g\longa*1/2
  118.  
  119.    \bar "|."
  120.  }
  121.  \new Lyrics \lyricsto "cantus" \cantusText
  122.  
  123.  \new Voice = "contratenor" \relative c' {
  124.    \set Staff.instrumentName = "Contra[tenor]"
  125.    \set suggestAccidentals = ##t
  126.     #(set-accidental-style 'forget)
  127.    \clef "G_8"
  128.    \time 2/1
  129.    \set Staff.timeSignatureFraction = #'(2 . 2)
  130.    r1 r2 \dl g1 a2 b \nl c2. d4 e2 f c f2. e4 d c d c
  131.    b a g1 f2 g1 r2 d'2 e2. f4 g1 e2. d4 c b \dl a1 g4 f a2 b1 \nl c2 d1
  132.    e\breve r2 c2 c c f2. e4 d2 c d4 e f d e1 d\breve R1*4 r2 d2 c b
  133.    a4 b c d e2. f4 g2 c, d f d g2. f4 e d e2 c f2. e4
  134.    d c d2. e4 f2 d e d1 d\longa*1/2 \bar "||"
  135.  
  136.    \set Staff.timeSignatureFraction = #'(2 . 2)
  137.    R1*2 r1 c2. d4 e f g2. f4 d e f g a2
  138.    a g4 f e1 d2. e4 f g a2. g4 f e d2 g1 f2 g1 r2 c,2 c b4 a
  139.    b2 a a'1 g2 f e4 d e f g2 c, r2 g' f e d2. c8 b a2 g
  140.    d'1 c2 \dl f2. \nl e4 f d e d c b a2 c b1 a\breve r2 a2 c c
  141.    g4 a b c d2 \dl g2. \nl f4 e d e d c b c b a g a1 g\longa*1/2
  142.  
  143.    \bar "|."
  144.  }
  145.  \new Lyrics \lyricsto "contratenor" \contratenorText
  146.  
  147.  \new Voice = "tenor" \relative c' {
  148.    \set Staff.instrumentName = "Tenor"
  149.    \set suggestAccidentals = ##t
  150.    \clef "G_8"
  151.    \time 2/1
  152.    \set Staff.timeSignatureFraction = #'(2 . 2)
  153.    g1 a2 b c1 r2 g2 c2. b4 a g \dl a1 \nl b2 a b
  154.    d c1 b2 c d4 e f d g2 e c d1 c r2 c2 f2. e4 d c d c
  155.    b a g2 a1 c2. b4 g2 \dl c2. \nl d4 e2 a,1 R1*2 r1 r2 a2 a a d2. c4 b a
  156.    b2. c4 d b c b e1 d2 e b c d e2. f4 g2 c, d e f d
  157.    d4 c b a b2 c a f'2. e4 d c d1 g,2. a4 b2 c a1 g\longa*1/2
  158.  
  159.    \bar "|."
  160.  }
  161.  \new Lyrics \lyricsto "tenor" \tenorText
  162.  
  163.  \new Voice = "bassus" \relative c {
  164.    \set Staff.instrumentName = #"Bassus"
  165.    \set suggestAccidentals = ##t
  166.    \clef F
  167.    \time 2/1
  168.    \set Staff.timeSignatureFraction = #'(2 . 2)
  169.    R1*2 c1 d2 e f c f2. e4 d c d1 \dl g2. \nl f4 e2 d1
  170.    c2 g' a b c1 g c2. b4 a g a g f e d1 \dl g \nl f4 e d1
  171.    c\breve R1*6 d1 d2 d g2. f4 e2 d e4 f g e f1 e2 g a g c1
  172.    r2 a2 b a d2. c4 b a g2 g \dl c2. b4 a g f2 b2. \nl a4 g1 f2
  173.    g c, d1 g\longa*1/2
  174.  
  175.    \bar "|."
  176.  }
  177.   \new Lyrics \lyricsto "bassus" \bassusText
  178. >>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement