vocal_score.ly

   1 %------------------------------------------------------------------%
   2 % Opéra Libre -- vocal_score.ly                                    %
   3 %                                                                  %
   4 % (c) Valentin Villenave, 2008                                     %
   5 %                                                                  %
   6 %------------------------------------------------------------------%
   7
   8 \include "./definitions/functions.ly"
   9 \include "./texte/decoupage.ly"
  10 \include "./texte/personnages.ly"
  11 \include "./definitions/structure.ly"
  12 \include "./texte/didascalies.ly"
  13 \include "./definitions/layout.ly"
  14 \include "./definitions/mesures.ly"
  15
  16 \include "./texte/texte.ly"
  17
  18 \include "./voix/soprano1.ly"
  19 \include "./voix/soprano2.ly"
  20 \include "./voix/contralto.ly"
  21 \include "./voix/tenor.ly"
  22 \include "./voix/baryton1.ly"
  23 \include "./voix/baryton2.ly"
  24
  25 \include "./instruments/reduction.ly"
  26
  27 \layout {
  28   \context {
  29     \type "Engraver_group"
  30     \name "TopLine"
  31     \consists "Output_property_engraver"
  32     \consists "Axis_group_engraver"
  33     \consists "Script_engraver"
  34     \consists "Dynamic_engraver"
  35     \consists "Mark_engraver"
  36     \consists "Text_engraver"
  37     \consists "Metronome_mark_engraver"
  38     %\consists "Skip_event_swallow_translator"
  39     %\consists "Time_signature_engraver"
  40   }
  41   \context {
  42     \type "Engraver_group"
  43     \name "Dynamics"
  44     \alias Voice
  45     \consists "Output_property_engraver"
  46     \consists "Axis_group_engraver"
  47     \consists "Dynamic_engraver"
  48     \consists "Skip_event_swallow_translator"
  49     \consists "Piano_pedal_engraver"
  50     %\consists "Bar_engraver"
  51     %\override BarLine #'transparent = ##t
  52     \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
  53     \override TextScript #'font-size = #2
  54     \override TextScript #'font-shape = #'italic
  55     \override DynamicText #'extra-offset = #'(0 . 2.5)
  56     \override Hairpin #'extra-offset = #'(0 . 2.5)
  57     pedalSustainStrings = #'("Ped." "*Ped." "*")
  58     pedalUnaCordaStrings = #'("una corda" "" "tre corde")
  59
  60   }
  61   \context {
  62     \Staff
  63     \type "Engraver_group"
  64     \name "StaffUp"
  65     \alias Staff
  66     \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 5)
  67     \override StaffSymbol #'staff-space = #(magstep -1)
  68     fontSize = #-1
  69   }
  70   \context {
  71     \StaffUp
  72     \type "Engraver_group"
  73     \name "StaffDown"
  74     \alias Staff
  75     \override VerticalAxisGroup #'minimum-Y-extent = #'(-4 . 3)
  76   }
  77   \context {
  78     \Staff
  79     \remove "Axis_group_engraver"
  80     \consists "Hara_kiri_engraver"
  81     \accepts "Lyrics"
  82     \override Beam #'auto-knee-gap = #'()
  83     \override VerticalAxisGroup #'remove-empty = ##t
  84   }
  85   \context { \PianoStaff
  86     \accepts "StaffUp"
  87     \accepts "Dynamics"
  88     \accepts "StaffDown"
  89     connectArpeggios = ##t % to avoid collisions with pianoDynamicss
  90   }
  91   \context { \Score
  92     \remove "Mark_engraver"
  93     \remove "Metronome_mark_engraver"
  94     \accepts "TopLine"
  95   }
  96 }
  97
  98 \paper {
  99   %line-width = \paper-width - 20
 100   %horizontal-shift = 5
 101   line-width = #180
 102   bottom-margin = #20
 103   ragged-bottom = ##f
 104   ragged-last-bottom = ##t
 105   left-margin = #20
 106   % systemSeparatorMarkup = \slashSeparator
 107   % between-system-space = 1.5\cm
 108   % between-system-padding = #1
 109   % annotate-spacing = ##t
 110 }
 111
 112 Prologue = { \ReductionLayout
 113   <<
 114     \new TopLine \PrologueMesures
 115     \new ChoirStaff
 116       <<
 117         \new Staff \new Voice = "tenor" \PrologueTenor
 118         \new Lyrics \lyricsto "tenor" { \PrologueTenorTexte }
 119         \new Staff \new Voice = "baryton" \PrologueBarytonDeux
 120         \new Lyrics \lyricsto "baryton" { \PrologueBarytonDeuxTexte }
 121       >>
 122     \new PianoStaff { \Accompagnement
 123       <<
 124         \new StaffUp = "droite"         \PrologueMainDroite
 125         \new Dynamics << \PianoDynamics \PrologueNuances >>
 126         \new StaffDown = "gauche"               \PrologueMainGauche
 127       >> }
 128   >>
 129 }
 130
 131 ActeUnSceneUn = { \ReductionLayout
 132 <<
 133 \new ChoirStaff
 134         <<
 135                 \new Staff \new Voice = "soprano" \ActeUnSceneUnSopranoUn
 136                 \new Lyrics \lyricsto "soprano" { \ActeUnSceneUnSopranoUnTexte }
 137                 \new Staff \new Voice = "barytonUn" \ActeUnSceneUnBarytonUn
 138                 \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneUnBarytonUnTexte }
 139                 \new Staff \new Voice = "barytonDeux" \ActeUnSceneUnBarytonDeux
 140                 \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneUnBarytonDeuxTexte }
 141         >>
 142 \new PianoStaff { \Accompagnement <<
 143         \new StaffUp = "droite"         \ActeUnSceneUnMainDroite
 144         \new Dynamics <<\PianoDynamics \ActeUnSceneUnMesures >>
 145         \new StaffDown = "gauche"               \ActeUnSceneUnMainGauche
 146                 >> }
 147 >>
 148 }
 149
 150 ActeUnSceneUnBis = { \ReductionLayout
 151 <<
 152 \new ChoirStaff
 153         <<
 154                 \new Staff \new Voice = "barytonUn" \ActeUnSceneUnBisBarytonUn
 155                 \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneUnBisBarytonUnTexte }
 156                 \new Staff \new Voice = "barytonDeux" \ActeUnSceneUnBisBarytonDeux
 157                 \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneUnBisBarytonDeuxTexte }
 158         >>
 159 \new PianoStaff { \Accompagnement <<
 160         \new StaffUp = "droite"         \ActeUnSceneUnBisMainDroite
 161         \new Dynamics <<\PianoDynamics \ActeUnSceneUnBisMesures >>
 162         \new StaffDown = "gauche"               \ActeUnSceneUnBisMainGauche
 163                 >> }
 164 >>
 165 }
 166
 167
 168 ActeUnSceneDeux = { \ReductionLayout
 169 <<
 170 \new ChoirStaff
 171         <<
 172                 \new Staff \new Voice = "soprano" \ActeUnSceneDeuxSopranoDeux
 173                 \new Lyrics \lyricsto "soprano" { \ActeUnSceneDeuxSopranoDeuxTexte }
 174                 \new Staff \new Voice = "baryton" \ActeUnSceneDeuxBarytonDeux
 175                 \new Lyrics \lyricsto "baryton" { \ActeUnSceneDeuxBarytonDeuxTexte }
 176         >>
 177 \new PianoStaff { \Accompagnement <<
 178         \new StaffUp = "droite"         \ActeUnSceneDeuxMainDroite
 179         \new Dynamics <<\PianoDynamics \ActeUnSceneDeuxMesures >>
 180         \new StaffDown = "gauche"               \ActeUnSceneDeuxMainGauche
 181                 >> }
 182 >>
 183 }
 184
 185 ActeUnSceneTrois = { \ReductionLayout
 186 <<
 187 \new ChoirStaff
 188         <<
 189                 \new Staff \new Voice = "tenor" \ActeUnSceneTroisTenor
 190                 \new Lyrics \lyricsto "tenor" { \ActeUnSceneTroisTenorTexte }
 191                 \new Staff \new Voice = "baryton" \ActeUnSceneTroisBarytonUn
 192                 \new Lyrics \lyricsto "baryton" { \ActeUnSceneTroisBarytonUnTexte }
 193         >>
 194 \new PianoStaff { \Accompagnement <<
 195         \new StaffUp = "droite"         \ActeUnSceneTroisMainDroite
 196         \new Dynamics <<\PianoDynamics \ActeUnSceneTroisMesures >>
 197         \new StaffDown = "gauche"               \ActeUnSceneTroisMainGauche
 198                 >> }
 199 >>
 200 }
 201
 202 ActeUnSceneTroisBis = { \ReductionLayout
 203 <<
 204 \new ChoirStaff
 205         <<
 206                 \new Staff \new Voice = "alto" \ActeUnSceneTroisBisContralto
 207                 \new Lyrics \lyricsto "alto" { \ActeUnSceneTroisBisContraltoTexte }
 208                 \new Staff \new Voice = "barytonDeux" \ActeUnSceneTroisBisBarytonDeux
 209                 \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneTroisBisBarytonDeuxTexte }
 210         >>
 211 \new PianoStaff { \Accompagnement <<
 212         \new StaffUp = "droite"         \ActeUnSceneTroisBisMainDroite
 213         \new Dynamics <<\PianoDynamics \ActeUnSceneTroisBisMesures >>
 214         \new StaffDown = "gauche"               \ActeUnSceneTroisBisMainGauche
 215                 >> }
 216 >>
 217 }
 218
 219 ActeUnSceneTroisTer = { \ReductionLayout
 220 <<
 221 \new ChoirStaff
 222         <<
 223                 \new Staff \new Voice = "soprano" \ActeUnSceneTroisTerSopranoUn
 224                 \new Lyrics \lyricsto "soprano" { \ActeUnSceneTroisTerSopranoUnTexte }
 225                 \new Staff \new Voice = "barytonUn" \ActeUnSceneTroisTerBarytonUn
 226                 \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneTroisTerBarytonUnTexte }
 227         >>
 228 \new PianoStaff { \Accompagnement <<
 229         \new StaffUp = "droite"         \ActeUnSceneTroisTerMainDroite
 230         \new Dynamics <<\PianoDynamics \ActeUnSceneTroisTerMesures >>
 231         \new StaffDown = "gauche"               \ActeUnSceneTroisTerMainGauche
 232                 >> }
 233 >>
 234 }
 235
 236 ActeUnSceneQuatre = { \ReductionLayout
 237 <<
 238 \new ChoirStaff
 239          <<
 240                  \new Staff \new Voice = "soprano" \ActeUnSceneQuatreSopranoDeux
 241                  \new Lyrics \lyricsto "soprano" { \ActeUnSceneQuatreSopranoDeuxTexte }
 242      \new Staff \new Voice = "alto" \ActeUnSceneQuatreContralto
 243      \new Lyrics \lyricsto "alto" { \ActeUnSceneQuatreContraltoTexte }
 244      \new Staff \new Voice = "tenor" \ActeUnSceneQuatreTenor
 245      \new Lyrics \lyricsto "tenor" { \ActeUnSceneQuatreTenorTexte }
 246                  \new Staff \new Voice = "barytonUn" \ActeUnSceneQuatreBarytonUn
 247                  \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneQuatreBarytonUnTexte }
 248      \new Staff \new Voice = "barytonDeux" \ActeUnSceneQuatreBarytonDeux
 249      \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneQuatreBarytonDeuxTexte }
 250          >>
 251 \new PianoStaff { \Accompagnement <<
 252         \new StaffUp = "droite"         \ActeUnSceneQuatreMainDroite
 253         \new Dynamics <<\PianoDynamics \ActeUnSceneQuatreMesures >>
 254         \new StaffDown = "gauche"               \ActeUnSceneQuatreMainGauche
 255                 >> }
 256 >>
 257 }
 258
 259 %{ Entracte={ \ReductionLayout
 260 <<
 261 \new ChoirStaff
 262  <<
 263     \new Staff \new Voice = "sopranoUn" \EntracteSopranoUn
 264                 \new Lyrics \lyricsto "sopranoUn" { \EntracteSopranoUnTexte }
 265     \new Staff \new Voice = "sopranoDeux" \EntracteSopranoDeux
 266                 \new Lyrics \lyricsto "sopranoDeux" { \EntracteSopranoDeuxTexte }
 267     \new Staff \new Voice = "alto" \EntracteAlto
 268     \new Lyrics \lyricsto "alto" { \EntracteAltoTexte }
 269     \new Staff \new Voice = "tenor" \EntracteTenor
 270     \new Lyrics \lyricsto "tenor" { \EntracteTenorTexte }
 271                 \new Staff \new Voice = "barytonUn" \EntracteBarytonUn
 272                 \new Lyrics \lyricsto "barytonUn" { \EntracteBarytonUnTexte }
 273     \new Staff \new Voice = "barytonDeux" \EntracteBarytonDeux
 274     \new Lyrics \lyricsto "barytonDeux" { \EntracteBarytonDeuxTexte }
 275     >>
 276 \new PianoStaff { \Accompagnement <<
 277         \new StaffUp = "droite"         \EntracteMainDroite
 278         \new Dynamics <<\PianoDynamics \EntracteMesures >>
 279         \new StaffDown = "gauche"               \EntracteMainGauche
 280                 >> }
 281 >>
 282 } %}
 283
 284 ActeDeuxSceneUn = { \ReductionLayout
 285 <<
 286 \new ChoirStaff
 287         <<
 288                 \new Staff \new Voice = "sopranoUn" \ActeDeuxSceneUnSopranoUn
 289     \new Lyrics \lyricsto "sopranoUn" { \ActeDeuxSceneUnSopranoUnTexte }
 290                 \new Staff \new Voice = "sopranoDeux" \ActeDeuxSceneUnSopranoDeux
 291     \new Lyrics \lyricsto "sopranoDeux" { \ActeDeuxSceneUnSopranoDeuxTexte }
 292                 \new Staff \new Voice = "contralto" \ActeDeuxSceneUnContralto
 293     \new Lyrics \lyricsto "contralto" { \ActeDeuxSceneUnContraltoTexte }
 294         >>
 295         \new PianoStaff { \Accompagnement <<
 296         \new StaffUp = "droite"         \ActeDeuxSceneUnMainDroite
 297         \new Dynamics <<\PianoDynamics \ActeDeuxSceneUnMesures >>
 298         \new StaffDown = "gauche"               \ActeDeuxSceneUnMainGauche
 299                 >> }
 300 >>
 301 }
 302
 303 ActeDeuxSceneUnBis = { \ReductionLayout
 304 <<
 305 \new ChoirStaff
 306         <<
 307                 \new Staff \new Voice = "tenor" \ActeDeuxSceneUnBisTenor
 308     \new Lyrics \lyricsto "tenor" { \ActeDeuxSceneUnBisTenorTexte }
 309                 \new Staff \new Voice = "barytonUn" \ActeDeuxSceneUnBisBarytonUn
 310     \new Lyrics \lyricsto "barytonUn" { \ActeDeuxSceneUnBisBarytonUnTexte }
 311                 \new Staff \new Voice = "barytonDeux" \ActeDeuxSceneUnBisBarytonDeux
 312     \new Lyrics \lyricsto "barytonDeux" { \ActeDeuxSceneUnBisBarytonDeuxTexte }
 313         >>
 314         \new PianoStaff { \Accompagnement <<
 315         \new StaffUp = "droite"         \ActeDeuxSceneUnBisMainDroite
 316         \new Dynamics <<\PianoDynamics \ActeDeuxSceneUnBisMesures >>
 317         \new StaffDown = "gauche"               \ActeDeuxSceneUnBisMainGauche
 318                 >> }
 319 >>
 320 }
 321
 322 ActeDeuxSceneDeux = { \ReductionLayout
 323 <<
 324 \new ChoirStaff
 325         <<
 326                 \new Staff \new Voice = "sopranoUn" \ActeDeuxSceneDeuxSopranoUn
 327     \new Lyrics \lyricsto "sopranoUn" { \ActeDeuxSceneDeuxSopranoUnTexte }
 328                 \new Staff \new Voice = "sopranoDeux" \ActeDeuxSceneDeuxSopranoDeux
 329     \new Lyrics \lyricsto "sopranoDeux" { \ActeDeuxSceneDeuxSopranoDeuxTexte }
 330                 \new Staff \new Voice = "contralto" \ActeDeuxSceneDeuxContralto
 331     \new Lyrics \lyricsto "contralto" { \ActeDeuxSceneDeuxContraltoTexte }
 332     \new Staff \new Voice = "tenor" \ActeDeuxSceneDeuxTenor
 333     \new Lyrics \lyricsto "tenor" { \ActeDeuxSceneDeuxTenorTexte }
 334     \new Staff \new Voice = "barytonUn" \ActeDeuxSceneDeuxBarytonUn
 335     \new Lyrics \lyricsto "barytonUn" { \ActeDeuxSceneDeuxBarytonUnTexte }
 336     \new Staff \new Voice = "barytonDeux" \ActeDeuxSceneDeuxBarytonDeux
 337     \new Lyrics \lyricsto "barytonDeux" { \ActeDeuxSceneDeuxBarytonDeuxTexte }
 338     >>
 339         \new PianoStaff { \Accompagnement <<
 340         \new StaffUp = "droite"         \ActeDeuxSceneDeuxMainDroite
 341         \new Dynamics <<\PianoDynamics \ActeDeuxSceneDeuxMesures >>
 342         \new StaffDown = "gauche"               \ActeDeuxSceneDeuxMainGauche
 343                 >> }
 344 >>
 345 }
 346
 347 ActeDeuxSceneTrois = { \ReductionLayout
 348 <<
 349 \new ChoirStaff
 350         <<
 351                 \new Staff \new Voice = "sopranoUn" \ActeDeuxSceneTroisSopranoUn
 352     \new Lyrics \lyricsto "sopranoUn" { \ActeDeuxSceneTroisSopranoUnTexte }
 353                 \new Staff \new Voice = "sopranoDeux" \ActeDeuxSceneTroisSopranoDeux
 354     \new Lyrics \lyricsto "sopranoDeux" { \ActeDeuxSceneTroisSopranoDeuxTexte }
 355                 \new Staff \new Voice = "contralto" \ActeDeuxSceneTroisContralto
 356     \new Lyrics \lyricsto "contralto" { \ActeDeuxSceneTroisContraltoTexte }
 357     \new Staff \new Voice = "tenor" \ActeDeuxSceneTroisTenor
 358     \new Lyrics \lyricsto "tenor" { \ActeDeuxSceneTroisTenorTexte }
 359     \new Staff \new Voice = "barytonUn" \ActeDeuxSceneTroisBarytonUn
 360     \new Lyrics \lyricsto "barytonUn" { \ActeDeuxSceneTroisBarytonUnTexte }
 361     \new Staff \new Voice = "barytonDeux" \ActeDeuxSceneTroisBarytonDeux
 362     \new Lyrics \lyricsto "barytonDeux" { \ActeDeuxSceneTroisBarytonDeuxTexte }
 363     >>
 364         \new PianoStaff { \Accompagnement <<
 365         \new StaffUp = "droite"         \ActeDeuxSceneTroisMainDroite
 366         \new Dynamics <<\PianoDynamics \ActeDeuxSceneTroisMesures >>
 367         \new StaffDown = "gauche"               \ActeDeuxSceneTroisMainGauche
 368                 >> }
 369 >>
 370 }
 371
 372 \book {
 373   \header {
 374           title = \OperaTitre
 375           subtitle = \Reduction
 376           poet = \OperaLivret
 377           composer =  \OperaPartition
 378     tagline = \OperaNotice }
 379
 380 \score {
 381            \Prologue
 382     \header {
 383       tableau = \PrologueTitre
 384       indication = \PrologueAAA
 385             piece = \markup { \column {
 386        \fill-line {  \fromproperty #'header:tableau }
 387        \hspace #1
 388        \fill-line {  \fromproperty #'header:indication }
 389             }
 390 }%}
 391 %{\score {
 392     \ActeUnSceneUn
 393     \header {
 394       piece = \ActeUnSceneUnTitre
 395     }
 396 }%}
 397 %{\score {
 398     \ActeUnSceneUnBis
 399     \header {
 400       piece = \Separateur
 401     }
 402 }%}
 403 %{\score {
 404           \ActeUnSceneDeux
 405     \header {
 406             piece = \ActeUnSceneDeuxTitre
 407             }
 408 }%}
 409 %{\score {
 410     \ActeUnSceneTrois
 411     \header {
 412             piece = \ActeUnSceneTroisTitre
 413             }
 414 }%}
 415 %{\score {
 416     \ActeUnSceneTroisBis
 417     \header {
 418             piece = \Separateur
 419             }
 420 }%}
 421 %{\score {
 422           \ActeUnSceneTroisTer
 423     \header {
 424             piece = \Separateur
 425             }
 426 }%}
 427 %{\score {
 428           \ActeUnSceneQuatre
 429     \header {
 430             piece = \ActeUnSceneQuatreTitre
 431             }
 432 }%}
 433 %{\score {
 434     \Entracte
 435     \header {
 436       piece = \EntracteTitre
 437       }
 438 }%}
 439 %{\score {
 440            \ActeDeuxSceneUn
 441     \header {
 442             piece = \ActeDeuxSceneUnTitre
 443             }
 444 }%}
 445 %{\score {
 446       \ActeDeuxSceneUnBis
 447       \header {
 448         piece = \Separateur
 449       }
 450 }%}
 451 %{\score {
 452     \ActeDeuxSceneDeux
 453     \header {
 454       piece = \ActeDeuxSceneDeuxTitre
 455     }
 456 }%}
 457 %{\score {
 458     \ActeDeuxSceneTrois
 459     \header {
 460       piece = \ActeDeuxSceneTroisTitre
 461     }
 462 }%}
 463 }