vocal_score.ly

   1 %------------------------------------------------------------------%
   2 % Opéra Libre -- vocal_score.ly                                    %
   3 %                                                                  %
   4 % (c) Valentin Villenave, 2008                                     %
   5 %                                                                  %
   6 %------------------------------------------------------------------%
   7
   8 %%% This is the main file for the so-called vocal version, i.e. with
   9 %%% piano accompaniment.
  10
  11 \version "2.12"
  12
  13 %%%%%%%%%%%%%%%%%%%%%%%%%%%% Inclusions %%%%%%%%%%%%%%%%%%%%%%%%%%%%
  14
  15 \include "italiano.ly"
  16
  17 \include "./definitions/functions.ly"
  18 \include "./definitions/text-functions.ly"
  19 \include "./definitions/graphics.ly"
  20 \include "./definitions/paper.ly"
  21 \include "./definitions/layout.ly"
  22
  23 \include "./texte/decoupage.ly"
  24 \include "./texte/personnages.ly"
  25 \include "./definitions/structure.ly"
  26 \include "./texte/didascalies.ly"
  27 \include "./definitions/mesures.ly"
  28
  29 \include "./texte/texte.ly"
  30
  31 \include "./voix/soprano1.ly"
  32 \include "./voix/soprano2.ly"
  33 \include "./voix/contralto.ly"
  34 \include "./voix/tenor.ly"
  35 \include "./voix/baryton1.ly"
  36 \include "./voix/baryton2.ly"
  37
  38 \include "./instruments/reduction.ly"
  39
  40 %%%%%%%%%%%%%%%%%% Paper and layout declarations %%%%%%%%%%%%%%%%%%%
  41
  42 \layout {
  43   \includeLayout
  44 }
  45 #(ly:set-option 'point-and-click #f)
  46
  47
  48 %%%% FIXME: Remove this
  49
  50 PianoDynamics = {
  51   \override Dynamics.TimeSignature #'font-size = #1
  52   \override Dynamics.VerticalAxisGroup #'minimum-Y-extent = #'(-1.5 . 1.5 )
  53 }
  54
  55
  56
  57
  58 %%%%%%%%%%%%%%%%%% Scene-by-scene music inclusion %%%%%%%%%%%%%%%%%%
  59
  60 Prologue = {
  61   <<
  62     \new TopLine \PrologueMesures
  63     \new ChoirStaff
  64       <<
  65         \new Staff \new Voice = "tenor" \PrologueTenor
  66         \new Lyrics \lyricsto "tenor" { \PrologueTenorTexte }
  67         \new Staff \new Voice = "baryton" \PrologueBarytonDeux
  68         \new Lyrics \lyricsto "baryton" { \PrologueBarytonDeuxTexte }
  69       >>
  70      \new PianoStaff { \Accompagnement
  71       <<
  72         \new StaffPiano = "md"    \PrologueMainDroite
  73         \new Dynamics << \PianoDynamics \PrologueNuances >>
  74         \new StaffPiano = "mg"    \PrologueMainGauche
  75       >>
  76      }
  77   >>
  78 }
  79
  80 ActeUnSceneUn = {
  81   <<
  82     \new TopLine \ActeUnSceneUnMesures
  83     \new ChoirStaff
  84       <<
  85         \new Staff \new Voice = "soprano" \ActeUnSceneUnSopranoUn
  86         \new Lyrics \lyricsto "soprano" { \ActeUnSceneUnSopranoUnTexte }
  87         \new Staff \new Voice = "barytonUn" \ActeUnSceneUnBarytonUn
  88         \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneUnBarytonUnTexte }
  89         \new Staff \new Voice = "barytonDeux" \ActeUnSceneUnBarytonDeux
  90         \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneUnBarytonDeuxTexte }
  91       >>
  92     \new PianoStaff { \Accompagnement
  93       <<
  94         \new StaffPiano = "md" \ActeUnSceneUnMainDroite
  95         \new Dynamics << \PianoDynamics \ActeUnSceneUnNuances >>
  96         \new StaffPiano = "mg" \ActeUnSceneUnMainGauche
  97       >>
  98     }
  99   >>
 100 }
 101
 102 ActeUnSceneUnBis = {
 103   <<
 104     \new TopLine \ActeUnSceneUnBisMesures
 105     \new ChoirStaff
 106       <<
 107         \new Staff \new Voice = "barytonUn" \ActeUnSceneUnBisBarytonUn
 108         \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneUnBisBarytonUnTexte }
 109         \new Staff \new Voice = "barytonDeux" \ActeUnSceneUnBisBarytonDeux
 110         \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneUnBisBarytonDeuxTexte }
 111       >>
 112     \new PianoStaff { \Accompagnement <<
 113         \new StaffPiano = "md" \ActeUnSceneUnBisMainDroite
 114         \new Dynamics << \PianoDynamics \ActeUnSceneUnBisNuances >>
 115         \new StaffPiano = "mg" \ActeUnSceneUnBisMainGauche
 116       >>
 117     }
 118   >>
 119 }
 120
 121 InterludeUn = {
 122   <<
 123     \new TopLine \InterludeUnMesures
 124     \new ChoirStaff
 125       <<
 126         \new Staff \new Voice = "contralto" \InterludeUnContralto
 127         \new Lyrics \lyricsto "contralto" { \InterludeUnContraltoTexte }
 128       >>
 129     \new PianoStaff { \Accompagnement <<
 130         \new StaffPiano = "md" \InterludeUnMainDroite
 131         \new StaffPiano = "mg" \InterludeUnMainGauche
 132       >>
 133     }
 134   >>
 135 }
 136
 137 ActeUnSceneDeux = {
 138   <<
 139     \new TopLine \ActeUnSceneDeuxMesures
 140     \new ChoirStaff
 141       <<
 142         \new Staff \new Voice = "soprano" \ActeUnSceneDeuxSopranoDeux
 143         \new Lyrics \lyricsto "soprano" { \ActeUnSceneDeuxSopranoDeuxTexte }
 144         \new Staff \new Voice = "baryton" \ActeUnSceneDeuxBarytonDeux
 145         \new Lyrics \lyricsto "baryton" { \ActeUnSceneDeuxBarytonDeuxTexte }
 146       >>
 147     \new PianoStaff { \Accompagnement
 148       <<
 149         \new StaffPiano = "md" \ActeUnSceneDeuxMainDroite
 150         \new Dynamics << \PianoDynamics \ActeUnSceneDeuxMesures >>
 151         \new StaffPiano = "mg" \ActeUnSceneDeuxMainGauche
 152       >>
 153     }
 154   >>
 155 }
 156
 157 InterludeDeux = {
 158   <<
 159     \new TopLine \InterludeDeuxMesures
 160     \new ChoirStaff
 161       <<
 162         \new Staff \new Voice = "contralto" \InterludeDeuxContralto
 163         \new Lyrics \lyricsto "contralto" { \InterludeDeuxContraltoTexte }
 164       >>
 165     \new PianoStaff { \Accompagnement <<
 166         \new StaffPiano = "md" \InterludeDeuxMainDroite
 167         \new StaffPiano = "mg" \InterludeDeuxMainGauche
 168       >>
 169     }
 170   >>
 171 }
 172
 173 ActeUnSceneTrois = {
 174   <<
 175     \new TopLine \ActeUnSceneTroisMesures
 176     \new ChoirStaff
 177       <<
 178         \new Staff \new Voice = "tenor" \ActeUnSceneTroisTenor
 179         \new Lyrics \lyricsto "tenor" { \ActeUnSceneTroisTenorTexte }
 180         \new Staff \new Voice = "baryton" \ActeUnSceneTroisBarytonUn
 181         \new Lyrics \lyricsto "baryton" { \ActeUnSceneTroisBarytonUnTexte }
 182       >>
 183     \new PianoStaff { \Accompagnement
 184       <<
 185         \new StaffPiano = "md" \ActeUnSceneTroisMainDroite
 186         \new Dynamics << \PianoDynamics \ActeUnSceneTroisMesures >>
 187         \new StaffPiano = "mg" \ActeUnSceneTroisMainGauche
 188       >>
 189     }
 190   >>
 191 }
 192
 193 ActeUnSceneTroisBis = {
 194   <<
 195     \new TopLine \ActeUnSceneTroisBisMesures
 196     \new ChoirStaff
 197       <<
 198         \new Staff \new Voice = "alto" \ActeUnSceneTroisBisContralto
 199         \new Lyrics \lyricsto "alto" { \ActeUnSceneTroisBisContraltoTexte }
 200         \new Staff \new Voice = "barytonDeux" \ActeUnSceneTroisBisBarytonDeux
 201         \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneTroisBisBarytonDeuxTexte }
 202       >>
 203     \new PianoStaff { \Accompagnement
 204       <<
 205         \new StaffPiano = "md" \ActeUnSceneTroisBisMainDroite
 206         \new Dynamics << \PianoDynamics \ActeUnSceneTroisBisMesures >>
 207         \new StaffPiano = "mg" \ActeUnSceneTroisBisMainGauche
 208       >>
 209     }
 210   >>
 211 }
 212
 213 ActeUnSceneTroisTer = {
 214   <<
 215     \new TopLine \ActeUnSceneTroisTerMesures
 216     \new ChoirStaff
 217       <<
 218         \new Staff \new Voice = "soprano" \ActeUnSceneTroisTerSopranoUn
 219         \new Lyrics \lyricsto "soprano" { \ActeUnSceneTroisTerSopranoUnTexte }
 220         \new Staff \new Voice = "barytonUn" \ActeUnSceneTroisTerBarytonUn
 221         \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneTroisTerBarytonUnTexte }
 222       >>
 223     \new PianoStaff { \Accompagnement
 224       <<
 225         \new StaffPiano = "md" \ActeUnSceneTroisTerMainDroite
 226         \new Dynamics << \PianoDynamics \ActeUnSceneTroisTerMesures >>
 227         \new StaffPiano = "mg" \ActeUnSceneTroisTerMainGauche
 228       >>
 229     }
 230   >>
 231 }
 232
 233 InterludeTrois = {
 234   <<
 235     \new TopLine \InterludeTroisMesures
 236     \new PianoStaff { \Accompagnement <<
 237         \new StaffPiano = "md" \InterludeTroisMainDroite
 238         \new StaffPiano = "mg" \InterludeTroisMainGauche
 239       >>
 240     }
 241   >>
 242 }
 243
 244 ActeUnSceneQuatre = {
 245   <<
 246     \new TopLine \ActeUnSceneQuatreMesures
 247     \new ChoirStaff
 248        <<
 249          \new Staff \new Voice = "soprano" \ActeUnSceneQuatreSopranoDeux
 250          \new Lyrics \lyricsto "soprano" { \ActeUnSceneQuatreSopranoDeuxTexte }
 251          \new Staff \new Voice = "alto" \ActeUnSceneQuatreContralto
 252          \new Lyrics \lyricsto "alto" { \ActeUnSceneQuatreContraltoTexte }
 253          \new Staff \new Voice = "tenor" \ActeUnSceneQuatreTenor
 254          \new Lyrics \lyricsto "tenor" { \ActeUnSceneQuatreTenorTexte }
 255          \new Staff \new Voice = "barytonUn" \ActeUnSceneQuatreBarytonUn
 256          \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneQuatreBarytonUnTexte }
 257          \new Staff \new Voice = "barytonDeux" \ActeUnSceneQuatreBarytonDeux
 258          \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneQuatreBarytonDeuxTexte }
 259        >>
 260     \new PianoStaff { \Accompagnement
 261       <<
 262         \new StaffPiano = "md" \ActeUnSceneQuatreMainDroite
 263         \new Dynamics << \PianoDynamics \ActeUnSceneQuatreMesures >>
 264         \new StaffPiano = "mg" \ActeUnSceneQuatreMainGauche
 265       >>
 266     }
 267   >>
 268 }
 269
 270 Entracte = {
 271   <<
 272     \new TopLine \EntracteMesures
 273     \new ChoirStaff
 274       <<
 275         \new Staff \new Voice = "sopranoUn" \EntracteSopranoUn
 276         \new Lyrics \lyricsto "sopranoUn" { \EntracteSopranoUnTexte }
 277         \new Staff \new Voice = "sopranoDeux" \EntracteSopranoDeux
 278         \new Lyrics \lyricsto "sopranoDeux" { \EntracteSopranoDeuxTexte }
 279         \new Staff \new Voice = "alto" \EntracteContralto
 280         \new Lyrics \lyricsto "alto" { \EntracteContraltoTexte }
 281         \new Staff \new Voice = "tenor" \EntracteTenor
 282         \new Lyrics \lyricsto "tenor" { \EntracteTenorTexte }
 283         \new Staff \new Voice = "barytonUn" \EntracteBarytonUn
 284         \new Lyrics \lyricsto "barytonUn" { \EntracteBarytonUnTexte }
 285         \new Staff \new Voice = "barytonDeux" \EntracteBarytonDeux
 286         \new Lyrics \lyricsto "barytonDeux" { \EntracteBarytonDeuxTexte }
 287       >>
 288     \new PianoStaff { \Accompagnement
 289       <<
 290         \new StaffPiano = "md"    \EntracteMainDroite
 291         \new StaffPiano = "mg"    \EntracteMainGauche
 292       >>
 293     }
 294   >>
 295 }
 296
 297 ActeDeuxSceneUn = {
 298   <<
 299     \new TopLine \ActeDeuxSceneUnMesures
 300     \new ChoirStaff
 301       <<
 302         \new Staff \new Voice = "sopranoUn" \ActeDeuxSceneUnSopranoUn
 303         \new Lyrics \lyricsto "sopranoUn" { \ActeDeuxSceneUnSopranoUnTexte }
 304         \new Staff \new Voice = "sopranoDeux" \ActeDeuxSceneUnSopranoDeux
 305         \new Lyrics \lyricsto "sopranoDeux" { \ActeDeuxSceneUnSopranoDeuxTexte }
 306         \new Staff \new Voice = "contralto" \ActeDeuxSceneUnContralto
 307         \new Lyrics \lyricsto "contralto" { \ActeDeuxSceneUnContraltoTexte }
 308       >>
 309     \new PianoStaff { \Accompagnement
 310       <<
 311         \new StaffPiano = "md" \ActeDeuxSceneUnMainDroite
 312         \new Dynamics << \PianoDynamics \ActeDeuxSceneUnMesures >>
 313         \new StaffPiano = "mg" \ActeDeuxSceneUnMainGauche
 314       >>
 315     }
 316   >>
 317 }
 318
 319 ActeDeuxSceneUnBis = {
 320   <<
 321     \new TopLine \ActeDeuxSceneUnBisMesures
 322     \new ChoirStaff
 323       <<
 324         \new Staff \new Voice = "tenor" \ActeDeuxSceneUnBisTenor
 325         \new Lyrics \lyricsto "tenor" { \ActeDeuxSceneUnBisTenorTexte }
 326         \new Staff \new Voice = "barytonUn" \ActeDeuxSceneUnBisBarytonUn
 327         \new Lyrics \lyricsto "barytonUn" { \ActeDeuxSceneUnBisBarytonUnTexte }
 328         \new Staff \new Voice = "barytonDeux" \ActeDeuxSceneUnBisBarytonDeux
 329         \new Lyrics \lyricsto "barytonDeux" { \ActeDeuxSceneUnBisBarytonDeuxTexte }
 330       >>
 331     \new PianoStaff { \Accompagnement
 332       <<
 333         \new StaffPiano = "md" \ActeDeuxSceneUnBisMainDroite
 334         \new Dynamics << \PianoDynamics \ActeDeuxSceneUnBisMesures >>
 335         \new StaffPiano = "mg" \ActeDeuxSceneUnBisMainGauche
 336       >>
 337     }
 338   >>
 339 }
 340
 341 ActeDeuxSceneDeux = {
 342   <<
 343     \new TopLine \ActeDeuxSceneDeuxMesures
 344     \new ChoirStaff
 345       <<
 346         \new Staff \new Voice = "sopranoUn" \ActeDeuxSceneDeuxSopranoUn
 347         \new Lyrics \lyricsto "sopranoUn" { \ActeDeuxSceneDeuxSopranoUnTexte }
 348         \new Staff \new Voice = "sopranoDeux" \ActeDeuxSceneDeuxSopranoDeux
 349         \new Lyrics \lyricsto "sopranoDeux" { \ActeDeuxSceneDeuxSopranoDeuxTexte }
 350         \new Staff \new Voice = "contralto" \ActeDeuxSceneDeuxContralto
 351         \new Lyrics \lyricsto "contralto" { \ActeDeuxSceneDeuxContraltoTexte }
 352         \new Staff \new Voice = "tenor" \ActeDeuxSceneDeuxTenor
 353         \new Lyrics \lyricsto "tenor" { \ActeDeuxSceneDeuxTenorTexte }
 354         \new Staff \new Voice = "barytonUn" \ActeDeuxSceneDeuxBarytonUn
 355         \new Lyrics \lyricsto "barytonUn" { \ActeDeuxSceneDeuxBarytonUnTexte }
 356         \new Staff \new Voice = "barytonDeux" \ActeDeuxSceneDeuxBarytonDeux
 357         \new Lyrics \lyricsto "barytonDeux" { \ActeDeuxSceneDeuxBarytonDeuxTexte }
 358       >>
 359     \new PianoStaff { \Accompagnement
 360       <<
 361         \new StaffPiano = "md" \ActeDeuxSceneDeuxMainDroite
 362         \new Dynamics << \PianoDynamics \ActeDeuxSceneDeuxMesures >>
 363         \new StaffPiano = "mg" \ActeDeuxSceneDeuxMainGauche
 364       >>
 365     }
 366   >>
 367 }
 368
 369 ActeDeuxSceneTrois = {
 370   <<
 371     \new TopLine \ActeDeuxSceneTroisMesures
 372     \new ChoirStaff
 373       <<
 374         \new Staff \new Voice = "sopranoUn" \ActeDeuxSceneTroisSopranoUn
 375         \new Lyrics \lyricsto "sopranoUn" { \ActeDeuxSceneTroisSopranoUnTexte }
 376         \new Staff \new Voice = "sopranoDeux" \ActeDeuxSceneTroisSopranoDeux
 377         \new Lyrics \lyricsto "sopranoDeux" { \ActeDeuxSceneTroisSopranoDeuxTexte }
 378         \new Staff \new Voice = "contralto" \ActeDeuxSceneTroisContralto
 379         \new Lyrics \lyricsto "contralto" { \ActeDeuxSceneTroisContraltoTexte }
 380         \new Staff \new Voice = "tenor" \ActeDeuxSceneTroisTenor
 381         \new Lyrics \lyricsto "tenor" { \ActeDeuxSceneTroisTenorTexte }
 382         \new Staff \new Voice = "barytonUn" \ActeDeuxSceneTroisBarytonUn
 383         \new Lyrics \lyricsto "barytonUn" { \ActeDeuxSceneTroisBarytonUnTexte }
 384         \new Staff \new Voice = "barytonDeux" \ActeDeuxSceneTroisBarytonDeux
 385         \new Lyrics \lyricsto "barytonDeux" { \ActeDeuxSceneTroisBarytonDeuxTexte }
 386       >>
 387     \new PianoStaff { \Accompagnement
 388       <<
 389         \new StaffPiano = "md" \ActeDeuxSceneTroisMainDroite
 390         %\new Dynamics << \PianoDynamics \ActeDeuxSceneTroisMesures >>
 391         \new StaffPiano = "mg" \ActeDeuxSceneTroisMainGauche
 392       >>
 393     }
 394   >>
 395 }
 396
 397 %%%%%%%%%%%%%%%%%%%%%%%%% The actual score %%%%%%%%%%%%%%%%%%%%%%%%%
 398 %showFirstLength = s1*40
 399 \book {
 400   \header {
 401     title = \OperaTitre
 402     subtitle = \OperaSousTitre
 403     libretto = \OperaLivret
 404     composer = \OperaPartition
 405     tagline = \OperaNotice
 406     illustration = \Couronne
 407     scoretype = \VocalScore
 408     copyright = \Copyright
 409   }
 410   \pageBreak
 411   \markup \BigNotice
 412   \pageBreak
 413   %{
 414   \score {
 415     \Prologue
 416     \header {
 417       piece = \PrologueTitre
 418     }
 419   } %
 420   \score {
 421     \ActeUnSceneUn
 422     \header {
 423       piece = \ActeUnSceneUnTitre
 424     }
 425   } %
 426   \score {
 427     \ActeUnSceneUnBis
 428     \header {
 429       piece = \Separateur
 430     }
 431   } %
 432   \score {
 433     \InterludeUn
 434     \header {
 435       piece = \Interlude
 436     }
 437   } %
 438   \score {
 439     \ActeUnSceneDeux
 440     \header {
 441       piece = \ActeUnSceneDeuxTitre
 442     }
 443   } %
 444   \score {
 445     \InterludeDeux
 446     \header {
 447       piece = \Interlude
 448     }
 449   } %
 450   \score {
 451     \ActeUnSceneTrois
 452     \header {
 453       piece = \ActeUnSceneTroisTitre
 454     }
 455   } %
 456   \score {
 457     \ActeUnSceneTroisBis
 458     \header {
 459       piece = \Interlude
 460     }
 461   } %
 462   \score {
 463     \ActeUnSceneTroisTer
 464     \header {
 465       piece = \Separateur
 466     }
 467   } %
 468   \score {
 469     \InterludeTrois
 470     \header {
 471       piece = \Interlude
 472     }
 473   } %
 474   \score {
 475     \ActeUnSceneQuatre
 476     \header {
 477       piece = \ActeUnSceneQuatreTitre
 478     }
 479   } %}
 480   \score {
 481     \Entracte
 482     \header {
 483       piece = \EntracteTitre
 484     }
 485   } %{
 486   \score {
 487     \ActeDeuxSceneUn
 488     \header {
 489       piece = \ActeDeuxSceneUnTitre
 490     }
 491   } %
 492   \score {
 493     \ActeDeuxSceneUnBis
 494     \header {
 495       piece = \Separateur
 496     }
 497   } %
 498   \score {
 499     \ActeDeuxSceneDeux
 500     \header {
 501       piece = \ActeDeuxSceneDeuxTitre
 502     }
 503   } %
 504   \score {
 505     \ActeDeuxSceneTrois
 506     \header {
 507       piece = \ActeDeuxSceneTroisTitre
 508     }
 509   } %}
 510 }