vocal_score.ly

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