Major improvements in code structure
[opera_libre.git] / vocal_score.ly
blob5b6e86645780b8c19a44d743d2816cd50c381cee
1 %------------------------------------------------------------------%
2 % Opéra Libre -- vocal_score.ly %
3 % %
4 % (c) Valentin Villenave, 2008 %
5 % %
6 %------------------------------------------------------------------%
8 %%% This is the main file for the so-called vocal version, i.e. with
9 %%% piano accompaniment. Compile it using "lilypond vocal_score.ly"
10 %%% and wait a few minutes...
12 \version "2.11.47"
13 %% This opéra has been coded on over two years, from version 2.9 to
14 %% 2.12 -- some inconsistencies may remain through the code.
16 %%%%%%%%%%%%%%%%%%%%%%%%%%%% Inclusions %%%%%%%%%%%%%%%%%%%%%%%%%%%%
18 \include "italiano.ly"
20 \include "./definitions/common.ly"
21 \include "./definitions/functions.ly"
22 \include "./definitions/paper.ly"
23 \include "./definitions/layout.ly"
24 \include "./definitions/markup.ly"
26 \include "./texte/decoupage.ly"
27 \include "./texte/personnages.ly"
28 \include "./definitions/structure.ly"
29 \include "./texte/didascalies.ly"
30 \include "./definitions/mesures.ly"
32 \include "./texte/texte.ly"
34 \include "./voix/soprano1.ly"
35 \include "./voix/soprano2.ly"
36 \include "./voix/contralto.ly"
37 \include "./voix/tenor.ly"
38 \include "./voix/baryton1.ly"
39 \include "./voix/baryton2.ly"
41 \include "./instruments/reduction.ly"
43 %%%%%%%%%%%%%%%%%% Paper and layout declarations %%%%%%%%%%%%%%%%%%%
45 \paper {
46 \includePaper
49 \layout {
50 \includeLayout
53 %%%%%%%%%%%%%%%%%% Scene-by-scene music inclusion %%%%%%%%%%%%%%%%%%
55 Prologue = {
57 \new TopLine \PrologueMesures
58 \new ChoirStaff
60 \new Staff \new Voice = "tenor" \PrologueTenor
61 \new Lyrics \lyricsto "tenor" { \PrologueTenorTexte }
62 \new Staff \new Voice = "baryton" \PrologueBarytonDeux
63 \new Lyrics \lyricsto "baryton" { \PrologueBarytonDeuxTexte }
65 \new PianoStaff { \Accompagnement
67 \new StaffUp = "droite" \PrologueMainDroite
68 \new Dynamics << \PianoDynamics \PrologueNuances >>
69 \new StaffDown = "gauche" \PrologueMainGauche
75 ActeUnSceneUn = {
77 \new TopLine \ActeUnSceneUnMesures
78 \new ChoirStaff
80 \new Staff \new Voice = "soprano" \ActeUnSceneUnSopranoUn
81 \new Lyrics \lyricsto "soprano" { \ActeUnSceneUnSopranoUnTexte }
82 \new Staff \new Voice = "barytonUn" \ActeUnSceneUnBarytonUn
83 \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneUnBarytonUnTexte }
84 \new Staff \new Voice = "barytonDeux" \ActeUnSceneUnBarytonDeux
85 \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneUnBarytonDeuxTexte }
87 \new PianoStaff { \Accompagnement
89 \new StaffUp = "droite" \ActeUnSceneUnMainDroite
90 \new Dynamics << \PianoDynamics \ActeUnSceneUnNuances >>
91 \new StaffDown = "gauche" \ActeUnSceneUnMainGauche
97 ActeUnSceneUnBis = {
99 \new TopLine \ActeUnSceneUnBisMesures
100 \new ChoirStaff
102 \new Staff \new Voice = "barytonUn" \ActeUnSceneUnBisBarytonUn
103 \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneUnBisBarytonUnTexte }
104 \new Staff \new Voice = "barytonDeux" \ActeUnSceneUnBisBarytonDeux
105 \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneUnBisBarytonDeuxTexte }
107 \new PianoStaff { \Accompagnement <<
108 \new StaffUp = "droite" \ActeUnSceneUnBisMainDroite
109 \new Dynamics << \PianoDynamics \ActeUnSceneUnBisNuances >>
110 \new StaffDown = "gauche" \ActeUnSceneUnBisMainGauche
116 ActeUnSceneDeux = {
118 \new ChoirStaff
120 \new Staff \new Voice = "soprano" \ActeUnSceneDeuxSopranoDeux
121 \new Lyrics \lyricsto "soprano" { \ActeUnSceneDeuxSopranoDeuxTexte }
122 \new Staff \new Voice = "baryton" \ActeUnSceneDeuxBarytonDeux
123 \new Lyrics \lyricsto "baryton" { \ActeUnSceneDeuxBarytonDeuxTexte }
125 \new PianoStaff { \Accompagnement
127 \new StaffUp = "droite" \ActeUnSceneDeuxMainDroite
128 \new Dynamics << \PianoDynamics \ActeUnSceneDeuxMesures >>
129 \new StaffDown = "gauche" \ActeUnSceneDeuxMainGauche
135 ActeUnSceneTrois = {
137 \new ChoirStaff
139 \new Staff \new Voice = "tenor" \ActeUnSceneTroisTenor
140 \new Lyrics \lyricsto "tenor" { \ActeUnSceneTroisTenorTexte }
141 \new Staff \new Voice = "baryton" \ActeUnSceneTroisBarytonUn
142 \new Lyrics \lyricsto "baryton" { \ActeUnSceneTroisBarytonUnTexte }
144 \new PianoStaff { \Accompagnement
146 \new StaffUp = "droite" \ActeUnSceneTroisMainDroite
147 \new Dynamics << \PianoDynamics \ActeUnSceneTroisMesures >>
148 \new StaffDown = "gauche" \ActeUnSceneTroisMainGauche
154 ActeUnSceneTroisBis = {
156 \new ChoirStaff
158 \new Staff \new Voice = "alto" \ActeUnSceneTroisBisContralto
159 \new Lyrics \lyricsto "alto" { \ActeUnSceneTroisBisContraltoTexte }
160 \new Staff \new Voice = "barytonDeux" \ActeUnSceneTroisBisBarytonDeux
161 \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneTroisBisBarytonDeuxTexte }
163 \new PianoStaff { \Accompagnement
165 \new StaffUp = "droite" \ActeUnSceneTroisBisMainDroite
166 \new Dynamics << \PianoDynamics \ActeUnSceneTroisBisMesures >>
167 \new StaffDown = "gauche" \ActeUnSceneTroisBisMainGauche
173 ActeUnSceneTroisTer = {
175 \new ChoirStaff
177 \new Staff \new Voice = "soprano" \ActeUnSceneTroisTerSopranoUn
178 \new Lyrics \lyricsto "soprano" { \ActeUnSceneTroisTerSopranoUnTexte }
179 \new Staff \new Voice = "barytonUn" \ActeUnSceneTroisTerBarytonUn
180 \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneTroisTerBarytonUnTexte }
182 \new PianoStaff { \Accompagnement
184 \new StaffUp = "droite" \ActeUnSceneTroisTerMainDroite
185 \new Dynamics << \PianoDynamics \ActeUnSceneTroisTerMesures >>
186 \new StaffDown = "gauche" \ActeUnSceneTroisTerMainGauche
192 ActeUnSceneQuatre = {
194 \new ChoirStaff
196 \new Staff \new Voice = "soprano" \ActeUnSceneQuatreSopranoDeux
197 \new Lyrics \lyricsto "soprano" { \ActeUnSceneQuatreSopranoDeuxTexte }
198 \new Staff \new Voice = "alto" \ActeUnSceneQuatreContralto
199 \new Lyrics \lyricsto "alto" { \ActeUnSceneQuatreContraltoTexte }
200 \new Staff \new Voice = "tenor" \ActeUnSceneQuatreTenor
201 \new Lyrics \lyricsto "tenor" { \ActeUnSceneQuatreTenorTexte }
202 \new Staff \new Voice = "barytonUn" \ActeUnSceneQuatreBarytonUn
203 \new Lyrics \lyricsto "barytonUn" { \ActeUnSceneQuatreBarytonUnTexte }
204 \new Staff \new Voice = "barytonDeux" \ActeUnSceneQuatreBarytonDeux
205 \new Lyrics \lyricsto "barytonDeux" { \ActeUnSceneQuatreBarytonDeuxTexte }
207 \new PianoStaff { \Accompagnement
209 \new StaffUp = "droite" \ActeUnSceneQuatreMainDroite
210 \new Dynamics << \PianoDynamics \ActeUnSceneQuatreMesures >>
211 \new StaffDown = "gauche" \ActeUnSceneQuatreMainGauche
217 Entracte = {
219 \new ChoirStaff
221 \new Staff \new Voice = "sopranoUn" \EntracteSopranoUn
222 \new Lyrics \lyricsto "sopranoUn" { \EntracteSopranoUnTexte }
223 \new Staff \new Voice = "sopranoDeux" \EntracteSopranoDeux
224 \new Lyrics \lyricsto "sopranoDeux" { \EntracteSopranoDeuxTexte }
225 \new Staff \new Voice = "alto" \EntracteContralto
226 \new Lyrics \lyricsto "alto" { \EntracteContraltoTexte }
227 \new Staff \new Voice = "tenor" \EntracteTenor
228 \new Lyrics \lyricsto "tenor" { \EntracteTenorTexte }
229 \new Staff \new Voice = "barytonUn" \EntracteBarytonUn
230 \new Lyrics \lyricsto "barytonUn" { \EntracteBarytonUnTexte }
231 \new Staff \new Voice = "barytonDeux" \EntracteBarytonDeux
232 \new Lyrics \lyricsto "barytonDeux" { \EntracteBarytonDeuxTexte }
234 \new PianoStaff { \Accompagnement
236 \new StaffUp = "droite" \EntracteMainDroite
237 \new Dynamics << \PianoDynamics \EntracteNuances >>
238 \new StaffDown = "gauche" \EntracteMainGauche
244 ActeDeuxSceneUn = {
246 \new ChoirStaff
248 \new Staff \new Voice = "sopranoUn" \ActeDeuxSceneUnSopranoUn
249 \new Lyrics \lyricsto "sopranoUn" { \ActeDeuxSceneUnSopranoUnTexte }
250 \new Staff \new Voice = "sopranoDeux" \ActeDeuxSceneUnSopranoDeux
251 \new Lyrics \lyricsto "sopranoDeux" { \ActeDeuxSceneUnSopranoDeuxTexte }
252 \new Staff \new Voice = "contralto" \ActeDeuxSceneUnContralto
253 \new Lyrics \lyricsto "contralto" { \ActeDeuxSceneUnContraltoTexte }
255 \new PianoStaff { \Accompagnement
257 \new StaffUp = "droite" \ActeDeuxSceneUnMainDroite
258 \new Dynamics << \PianoDynamics \ActeDeuxSceneUnMesures >>
259 \new StaffDown = "gauche" \ActeDeuxSceneUnMainGauche
265 ActeDeuxSceneUnBis = {
267 \new ChoirStaff
269 \new Staff \new Voice = "tenor" \ActeDeuxSceneUnBisTenor
270 \new Lyrics \lyricsto "tenor" { \ActeDeuxSceneUnBisTenorTexte }
271 \new Staff \new Voice = "barytonUn" \ActeDeuxSceneUnBisBarytonUn
272 \new Lyrics \lyricsto "barytonUn" { \ActeDeuxSceneUnBisBarytonUnTexte }
273 \new Staff \new Voice = "barytonDeux" \ActeDeuxSceneUnBisBarytonDeux
274 \new Lyrics \lyricsto "barytonDeux" { \ActeDeuxSceneUnBisBarytonDeuxTexte }
276 \new PianoStaff { \Accompagnement
278 \new StaffUp = "droite" \ActeDeuxSceneUnBisMainDroite
279 \new Dynamics << \PianoDynamics \ActeDeuxSceneUnBisMesures >>
280 \new StaffDown = "gauche" \ActeDeuxSceneUnBisMainGauche
286 ActeDeuxSceneDeux = {
288 \new TopLine \ActeDeuxSceneDeuxMesures
289 \new ChoirStaff
291 \new Staff \new Voice = "sopranoUn" \ActeDeuxSceneDeuxSopranoUn
292 \new Lyrics \lyricsto "sopranoUn" { \ActeDeuxSceneDeuxSopranoUnTexte }
293 \new Staff \new Voice = "sopranoDeux" \ActeDeuxSceneDeuxSopranoDeux
294 \new Lyrics \lyricsto "sopranoDeux" { \ActeDeuxSceneDeuxSopranoDeuxTexte }
295 \new Staff \new Voice = "contralto" \ActeDeuxSceneDeuxContralto
296 \new Lyrics \lyricsto "contralto" { \ActeDeuxSceneDeuxContraltoTexte }
297 \new Staff \new Voice = "tenor" \ActeDeuxSceneDeuxTenor
298 \new Lyrics \lyricsto "tenor" { \ActeDeuxSceneDeuxTenorTexte }
299 \new Staff \new Voice = "barytonUn" \ActeDeuxSceneDeuxBarytonUn
300 \new Lyrics \lyricsto "barytonUn" { \ActeDeuxSceneDeuxBarytonUnTexte }
301 \new Staff \new Voice = "barytonDeux" \ActeDeuxSceneDeuxBarytonDeux
302 \new Lyrics \lyricsto "barytonDeux" { \ActeDeuxSceneDeuxBarytonDeuxTexte }
304 \new PianoStaff { \Accompagnement
306 \new StaffUp = "droite" \ActeDeuxSceneDeuxMainDroite
307 \new Dynamics << \PianoDynamics \ActeDeuxSceneDeuxMesures >>
308 \new StaffDown = "gauche" \ActeDeuxSceneDeuxMainGauche
314 ActeDeuxSceneTrois = {
316 \new ChoirStaff
318 \new Staff \new Voice = "sopranoUn" \ActeDeuxSceneTroisSopranoUn
319 \new Lyrics \lyricsto "sopranoUn" { \ActeDeuxSceneTroisSopranoUnTexte }
320 \new Staff \new Voice = "sopranoDeux" \ActeDeuxSceneTroisSopranoDeux
321 \new Lyrics \lyricsto "sopranoDeux" { \ActeDeuxSceneTroisSopranoDeuxTexte }
322 \new Staff \new Voice = "contralto" \ActeDeuxSceneTroisContralto
323 \new Lyrics \lyricsto "contralto" { \ActeDeuxSceneTroisContraltoTexte }
324 \new Staff \new Voice = "tenor" \ActeDeuxSceneTroisTenor
325 \new Lyrics \lyricsto "tenor" { \ActeDeuxSceneTroisTenorTexte }
326 \new Staff \new Voice = "barytonUn" \ActeDeuxSceneTroisBarytonUn
327 \new Lyrics \lyricsto "barytonUn" { \ActeDeuxSceneTroisBarytonUnTexte }
328 \new Staff \new Voice = "barytonDeux" \ActeDeuxSceneTroisBarytonDeux
329 \new Lyrics \lyricsto "barytonDeux" { \ActeDeuxSceneTroisBarytonDeuxTexte }
331 \new PianoStaff { \Accompagnement
333 \new StaffUp = "droite" \ActeDeuxSceneTroisMainDroite
334 \new Dynamics << \PianoDynamics \ActeDeuxSceneTroisMesures >>
335 \new StaffDown = "gauche" \ActeDeuxSceneTroisMainGauche
341 %%%%%%%%%%%%%%%%%%%%%%%%% The actual score %%%%%%%%%%%%%%%%%%%%%%%%%
343 \book {
344 \header {
345 title = \OperaTitre
346 subtitle = \Reduction
347 poet = \OperaLivret
348 composer = \OperaPartition
349 tagline = \OperaNotice
352 \score {
353 \Prologue
354 \header {
355 piece = \PrologueTitre
358 \score {
359 \ActeUnSceneUn
360 \header {
361 piece = \ActeUnSceneUnTitre
364 \score {
365 \ActeUnSceneUnBis
366 \header {
367 piece = \Separateur
370 \score {
371 \ActeUnSceneDeux
372 \header {
373 piece = \ActeUnSceneDeuxTitre
376 \score {
377 \ActeUnSceneTrois
378 \header {
379 piece = \ActeUnSceneTroisTitre
382 \score {
383 \ActeUnSceneTroisBis
384 \header {
385 piece = \Separateur
388 \score {
389 \ActeUnSceneTroisTer
390 \header {
391 piece = \Separateur
394 \score {
395 \ActeUnSceneQuatre
396 \header {
397 piece = \ActeUnSceneQuatreTitre
400 \score {
401 \Entracte
402 \header {
403 piece = \EntracteTitre
406 \score {
407 \ActeDeuxSceneUn
408 \header {
409 piece = \ActeDeuxSceneUnTitre
412 \score {
413 \ActeDeuxSceneUnBis
414 \header {
415 piece = \Separateur
418 \score {
419 \ActeDeuxSceneDeux
420 \header {
421 piece = \ActeDeuxSceneDeuxTitre
424 \score {
425 \ActeDeuxSceneTrois
426 \header {
427 piece = \ActeDeuxSceneTroisTitre