input/lsr/ancient-notation-template----modern-transcription-of-mensural-music.ly

   1 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
   2 %% This file is in the public domain.
   3 \version "2.13.1"
   4
   5 \header {
   6   lsrtags = "ancient-notation, template"
   7
   8   texidoces = "
   9 Al transcribir música mensural, es útil un «incipit» al compienzo
  10 de la pieza para indicar la tonalidad y el tempo
  11 originales. Aunque los músicos actuales están acostumbrados a las
  12 barras de compás para reconocer con más facilidad los patrones
  13 rítmicos, durante el período de la música mensural aún no se
  14 habíen inventado las líneas divisorias; de hecho, la medida solía
  15 cambiar a cada pocas notas. Como compromiso, a menudo las líneas
  16 divisorias se imprimen entre los pentagramas en vez de hacerlo
  17 encima de ellos.
  18
  19 "
  20   doctitlees = "Plantilla de notación de música antigua (transcripción moderna de música mensural)"
  21
  22   texidocde = "
  23 Bei der Transkription von Mensuralmusik ist es oft erwünscht, ein
  24 Incipit an den Anfang des Stückes zu stellen, damit klar ist, wie
  25 Tempo und Schlüssel in der Originalnotation gesetzt waren. Während
  26 heutzutage Musiker an Taktlinien gewöhnt sind, um Rhythmen schneller
  27 zu erkennen, wurden diese in der Mensuralmusik nicht verwendet.
  28 Tatsächlich ändern sich die Rhythmen auch oft alle paar Noten. Als
  29 ein Kompromiss werden die Notenlinien nicht auf dem System, sondern
  30 zwischen den Systemen geschrieben.
  31 "
  32
  33   texidocfr = "
  34 Lorsque l'on transcrit de la musique mensurale, il est d'usage
  35 d'indiquer en début de partition,  par un « incipit », les tonalité
  36 et tempo originaux.  De nos jours, les musiciens ont l'habitude de
  37 voir des barres de mesure qui les aide à appréhender la structure
  38 rythmique.  Ces barres n'existaient pas du temps où ces œuvres ont
  39 été écrites ; en fait, la métrique évoluait au fil de la pièce.  Un
  40 compromis consiste à imprimer des barres de mesure entre les portées
  41 plutôt que sur la portée elle-même.
  42
  43 "
  44   doctitle = "Exemples de notation ancienne -- transcription moderne de musique mensurale"
  45
  46   texidoc = "
  47 When transcribing mensural music, an incipit at the beginning of the
  48 piece is useful to indicate the original key and tempo. While today
  49 musicians are used to bar lines in order to faster recognize rhythmic
  50 patterns, bar lines were not yet invented during the period of mensural
  51 music; in fact, the meter often changed after every few notes. As a
  52 compromise, bar lines are often printed between the staves rather than
  53 on the staves.
  54
  55 "
  56   doctitle = "Ancient notation template -- modern transcription of mensural music"
  57 } % begin verbatim
  58
  59 global = {
  60   \set Score.skipBars = ##t
  61
  62   % incipit
  63   \once \override Score.SystemStartBracket #'transparent = ##t
  64   \override Score.SpacingSpanner #'spacing-increment = #1.0 % tight spacing
  65   \key f \major
  66   \time 2/2
  67   \once \override Staff.TimeSignature #'style = #'neomensural
  68   \override Voice.NoteHead #'style = #'neomensural
  69   \override Voice.Rest #'style = #'neomensural
  70   \set Staff.printKeyCancellation = ##f
  71   \cadenzaOn % turn off bar lines
  72   \skip 1*10
  73   \once \override Staff.BarLine #'transparent = ##f
  74   \bar "||"
  75   \skip 1*1 % need this extra \skip such that clef change comes
  76             % after bar line
  77   \bar ""
  78
  79   % main
  80   \revert Score.SpacingSpanner #'spacing-increment % CHECK: no effect?
  81   \cadenzaOff % turn bar lines on again
  82   \once \override Staff.Clef #'full-size-change = ##t
  83   \set Staff.forceClef = ##t
  84   \key g \major
  85   \time 4/4
  86   \override Voice.NoteHead #'style = #'default
  87   \override Voice.Rest #'style = #'default
  88
  89   % FIXME: setting printKeyCancellation back to #t must not
  90   % occur in the first bar after the incipit.  Dto. for forceClef.
  91   % Therefore, we need an extra \skip.
  92   \skip 1*1
  93   \set Staff.printKeyCancellation = ##t
  94   \set Staff.forceClef = ##f
  95
  96   \skip 1*7 % the actual music
  97
  98   % let finis bar go through all staves
  99   \override Staff.BarLine #'transparent = ##f
 100
 101   % finis bar
 102   \bar "|."
 103 }
 104
 105 discantusNotes = {
 106   \transpose c' c'' {
 107     \set Staff.instrumentName = #"Discantus  "
 108
 109     % incipit
 110     \clef "neomensural-c1"
 111     c'1. s2   % two bars
 112     \skip 1*8 % eight bars
 113     \skip 1*1 % one bar
 114
 115     % main
 116     \clef "treble"
 117     d'2. d'4 |
 118     b e' d'2 |
 119     c'4 e'4.( d'8 c' b |
 120     a4) b a2 |
 121     b4.( c'8 d'4) c'4 |
 122     \once \override NoteHead #'transparent = ##t c'1 |
 123     b\breve |
 124   }
 125 }
 126
 127 discantusLyrics = \lyricmode {
 128   % incipit
 129   IV-
 130
 131   % main
 132   Ju -- bi -- |
 133   la -- te De -- |
 134   o, om --
 135   nis ter -- |
 136   ra, __ om- |
 137   "..." |
 138   -us. |
 139 }
 140
 141 altusNotes = {
 142   \transpose c' c'' {
 143     \set Staff.instrumentName = #"Altus  "
 144
 145     % incipit
 146     \clef "neomensural-c3"
 147     r1        % one bar
 148     f1. s2    % two bars
 149     \skip 1*7 % seven bars
 150     \skip 1*1 % one bar
 151
 152     % main
 153     \clef "treble"
 154     r2 g2. e4 fis g | % two bars
 155     a2 g4 e |
 156     fis g4.( fis16 e fis4) |
 157     g1 |
 158     \once \override NoteHead #'transparent = ##t g1 |
 159     g\breve |
 160   }
 161 }
 162
 163 altusLyrics = \lyricmode {
 164   % incipit
 165   IV-
 166
 167   % main
 168   Ju -- bi -- la -- te | % two bars
 169   De -- o, om -- |
 170   nis ter -- ra, |
 171   "..." |
 172   -us. |
 173 }
 174
 175 tenorNotes = {
 176   \transpose c' c' {
 177     \set Staff.instrumentName = #"Tenor  "
 178
 179     % incipit
 180     \clef "neomensural-c4"
 181     r\longa   % four bars
 182     r\breve   % two bars
 183     r1        % one bar
 184     c'1. s2   % two bars
 185     \skip 1*1 % one bar
 186     \skip 1*1 % one bar
 187
 188     % main
 189     \clef "treble_8"
 190     R1 |
 191     R1 |
 192     R1 |
 193     r2 d'2. d'4 b e' | % two bars
 194     \once \override NoteHead #'transparent = ##t e'1 |
 195     d'\breve |
 196   }
 197 }
 198
 199 tenorLyrics = \lyricmode {
 200   % incipit
 201   IV-
 202
 203   % main
 204   Ju -- bi -- la -- te | % two bars
 205   "..." |
 206   -us. |
 207 }
 208
 209 bassusNotes = {
 210   \transpose c' c' {
 211     \set Staff.instrumentName = #"Bassus  "
 212
 213     % incipit
 214     \clef "bass"
 215     r\maxima  % eight bars
 216     f1. s2    % two bars
 217     \skip 1*1 % one bar
 218
 219     % main
 220     \clef "bass"
 221     R1 |
 222     R1 |
 223     R1 |
 224     R1 |
 225     g2. e4 |
 226     \once \override NoteHead #'transparent = ##t e1 |
 227     g\breve |
 228   }
 229 }
 230
 231 bassusLyrics = \lyricmode {
 232   % incipit
 233   IV-
 234
 235   % main
 236   Ju -- bi- |
 237   "..." |
 238   -us. |
 239 }
 240
 241 \score {
 242   \new StaffGroup = choirStaff <<
 243     \new Voice =
 244       "discantusNotes" << \global \discantusNotes >>
 245     \new Lyrics =
 246       "discantusLyrics" \lyricsto discantusNotes { \discantusLyrics }
 247     \new Voice =
 248       "altusNotes" << \global \altusNotes >>
 249     \new Lyrics =
 250       "altusLyrics" \lyricsto altusNotes { \altusLyrics }
 251     \new Voice =
 252       "tenorNotes" << \global \tenorNotes >>
 253     \new Lyrics =
 254       "tenorLyrics" \lyricsto tenorNotes { \tenorLyrics }
 255     \new Voice =
 256       "bassusNotes" << \global \bassusNotes >>
 257     \new Lyrics =
 258       "bassusLyrics" \lyricsto bassusNotes { \bassusLyrics }
 259   >>
 260   \layout {
 261     \context {
 262       \Score
 263
 264       % no bars in staves
 265       \override BarLine #'transparent = ##t
 266
 267       % incipit should not start with a start delimiter
 268       \remove "System_start_delimiter_engraver"
 269     }
 270     \context {
 271       \Voice
 272
 273       % no slurs
 274       \override Slur #'transparent = ##t
 275
 276       % Comment in the below "\remove" command to allow line
 277       % breaking also at those barlines where a note overlaps
 278       % into the next bar.  The command is commented out in this
 279       % short example score, but especially for large scores, you
 280       % will typically yield better line breaking and thus improve
 281       % overall spacing if you comment in the following command.
 282       %\remove "Forbid_line_break_engraver"
 283     }
 284   }
 285 }
 286
 287
 288