From b87dcc4309654793ce091ec2a4f353d6872c9f5c Mon Sep 17 00:00:00 2001 From: Valentin Villenave Date: Tue, 18 Nov 2008 12:55:42 +0100 Subject: [PATCH] A bunch of improvements For the first time, I am able to compile the whole Act1 -- minus the Overtura and without any expressive marks. But still. I'm sending the score to the conductor right now. --- definitions/functions.ly | 11 ++++++++-- definitions/layout.ly | 5 ----- definitions/mesures.ly | 53 +++++++++++++++++++++++++++++++++++---------- full_score.ly | 12 +++++----- instruments/contrebasse.ly | 2 +- instruments/percu.ly | 35 ++++++++++++++++-------------- instruments/piano.ly | 14 ++++++------ instruments/violoncelle1.ly | 6 ++--- instruments/violoncelle2.ly | 4 ++-- texte/didascalies.ly | 46 ++++++++++++++++++++++++--------------- texte/texte.ly | 6 ++--- vocal_score.ly | 2 +- 12 files changed, 120 insertions(+), 76 deletions(-) diff --git a/definitions/functions.ly b/definitions/functions.ly index 1e0e22e..00591b6 100755 --- a/definitions/functions.ly +++ b/definitions/functions.ly @@ -191,6 +191,13 @@ thumbpizz = leftpizz = #(make-articulation "stopped") +arpeggUp = +#(let* ((m (make-music 'ArpeggioEvent))) + (ly:music-set-property! m 'tweaks + (acons 'arpeggio-direction 1 + (ly:music-property m 'tweaks))) + m) + plak = #(let* ((m (make-music 'ArpeggioEvent))) (ly:music-set-property! m 'tweaks @@ -515,10 +522,10 @@ rit = #(make-text-span "rit.") %% Lyrics formatting ----------------------------------------------% -freestyleOn = { +freeStyleOn = { \override Lyrics . LyricExtender #'stencil = ##f } -freestyleOff = { +freeStyleOff = { \revert Lyrics . LyricExtender #'stencil } leftSyl = { diff --git a/definitions/layout.ly b/definitions/layout.ly index 4da83b7..8d55157 100755 --- a/definitions/layout.ly +++ b/definitions/layout.ly @@ -31,7 +31,6 @@ includeLayout = \layout { \override VerticalAxisGroup #'remove-empty = ##t \consists "Hara_kiri_engraver" \override StaffSymbol #'line-count = #1 - drumStyleTable = #percussion-style } \context { \Score @@ -102,10 +101,6 @@ includeLayout = \layout { subdivideBeams = ##t beatLength = #(ly:make-moment 1 8) } - \context { - \Voice - \override Arpeggio #'arpeggio-direction = #UP - } %% Vocal score layout --------------------------------------------% \context { diff --git a/definitions/mesures.ly b/definitions/mesures.ly index 516f80e..fab9df0 100755 --- a/definitions/mesures.ly +++ b/definitions/mesures.ly @@ -387,24 +387,39 @@ InterludeUnMesures = { \tempo "Andante tranquillo" 4 = 63 R1. \time 2/2 R1*3 + \time 3/2 + \mark \markup \did \InterludeUnB + R1. + \time 2/2 R1 \time 3/2 R1. + \mark \markup \did \InterludeUnC + R1. \time 2/2 R1 - \time 3/2 R1.*2 - \time 2/2 R1*2 + \mark \markup \did \InterludeUnD + R1 \time 3/2 R1.*2 \time 2/2 R1 + \time 3/4 + \mark \markup \did \InterludeUnE + R2. + \time 2/4 + \mark \markup \did \InterludeUnF + R2 \time 3/4 R2. - \time 2/4 R2 - \time 3/4 R2. + \time 2/2 + \mark \markup \did \InterludeUnG \tempo "Andante con moto" 4 = 66 - \time 2/2 R1*2 + R1*2 \time 3/2 R1. \time 2/2 R1*2 \time 3/2 R1. \time 2/2 R1 \time 3/4 R2. \bar "||" + \mark \markup \did \InterludeUnH \tempo "Un poco più vivo" 4 = 92 - R2.*16\bar "|." + R2.*10 + \mark \markup \did \InterludeUnI + R2.*6 \bar "|." } ActeUnSceneDeuxMesures = { @@ -537,26 +552,40 @@ ActeUnSceneDeuxMesures = { InterludeDeuxMesures = { \time 4/4 + \mark \markup \init-did \InterludeDeuxA \tempo "Andante con moto" 4 = 66 R1 \time 3/4 R2. \time 2/4 R2 - \time 3/4 R2. + \time 3/4 + \mark \markup \did \InterludeDeuxB + R2. \time 2/4 R2 \time 3/4 R2. - \time 2/4 R2 \bar "||" + \time 2/4 + \mark \markup \did \InterludeDeuxC + R2 \bar "||" \tempo "Animato (doppio tempo)" 4 = 132 - R2*14 \bar "||" + R2*7 + \mark \markup \did\InterludeDeuxD + R2*7 \bar "||" \time 2/2 + \mark \markup \did \InterludeDeuxE \tempo "Tempo I" 2 = 66 R1*4 - \time 3/4 R2. + \time 3/4 + \mark \markup \did \InterludeDeuxF + R2. \time 2/2 R1 - \time 3/4 R2.*2 + \time 3/4 + \mark \markup \did \InterludeDeuxG + R2.*2 \time 2/2 \tempo "poco ral." R1 - \time 3/4 R2. + \time 3/4 + \mark \markup \did \InterludeDeuxH + R2. \time 2/4 r4 \mark \markup \Noir r4 \bar "|." diff --git a/full_score.ly b/full_score.ly index 62af627..a34c09e 100755 --- a/full_score.ly +++ b/full_score.ly @@ -1011,13 +1011,13 @@ ActeDeuxSceneDeux = { poet = \OperaLivret composer = \OperaPartition tagline = \OperaNotice - } %{ + } % \score { \Prologue \header { piece = \PrologueTitre } - } % + } %{ \score { \Ouverture \header { @@ -1029,7 +1029,7 @@ ActeDeuxSceneDeux = { \header { piece = \ActeUnSceneUnTitre } - } %{ + } % \score { \ActeUnSceneUnBis \header { @@ -1039,7 +1039,7 @@ ActeDeuxSceneDeux = { \score { \InterludeUn \header { - piece = \Separateur + piece = \Interlude } } % \score { @@ -1075,7 +1075,7 @@ ActeDeuxSceneDeux = { \score { \InterludeTrois \header { - piece = \Separateur + piece = \Interlude } } % \score { @@ -1083,7 +1083,7 @@ ActeDeuxSceneDeux = { \header { piece = \ActeUnSceneQuatreTitre } - } % + } %{ \score { \Entracte \header { diff --git a/instruments/contrebasse.ly b/instruments/contrebasse.ly index 9dc5992..f415ee9 100644 --- a/instruments/contrebasse.ly +++ b/instruments/contrebasse.ly @@ -637,7 +637,7 @@ ActeDeuxSceneDeuxContrebasse = { \Contrebasse \pizz 4\plak mib' sold re | dod' sol do | fa, si mi, | mib la, re sold, | - dod sol do fad, | fa' mi \arpeggio \arpeggio | + dod sol do fad, | fa' mi \arpeggUp \arpeggUp | \simile | | | diff --git a/instruments/percu.ly b/instruments/percu.ly index 36c15d0..b0adb9e 100755 --- a/instruments/percu.ly +++ b/instruments/percu.ly @@ -11,6 +11,7 @@ Percus = { \set DrumStaff.instrumentName = \markup { \hcenter-in #27.5 "Percussions "} \set DrumStaff.shortInstrumentName = "Perc. " \override DrumStaff.VerticalAxisGroup #'minimum-Y-extent = #'(-4 . 4) + \set drumStyleTable = #percussion-style } Marimba = { @@ -68,7 +69,7 @@ ProloguePercus = << %%% Adagio %%% R2*4 R2.*6 - 2.\laissezVibrer R2. + 2.\laissezVibrer R2. \ind #"senza Ped." 4 r2 4 r2 4 r | R4. @@ -80,7 +81,7 @@ ProloguePercus = << %%% A tempo %%% re8 r4 | r4 r32 solb, lab sib | - re8 r4 | R4.*2 \stemDown 8 \gauche \stemUp re,, + re8 r4 | R4.*2 \stemDown 8 \gauche \stemUp re,, \droite \stemDown \gauche \stemUp lab,, \droite \stemDown \gauche \stemUp re,,, \droite \stemDown \stemNeutral | @@ -88,6 +89,7 @@ ProloguePercus = << lab re, lab, | lab re, lab, | lab re, lab, | + \ottava #1 si fa, si, | si fa, si, | si fa, si, | @@ -100,6 +102,7 @@ ProloguePercus = << dod, si, sol, | dod, si, sold, | sold, sol, mi, | + \ottava #0 dod, si, sold, | sol' fad, sol' fad, r8 | R4.*8 R2*5/4 R2.*3 @@ -410,18 +413,18 @@ ActeUnSceneUnPercus = << R1 R2. R1 R2. R2 R2. r2 r4 r8 \ind #"Tambour (bag. fagot)" sn32 sn sn sn | sn4 r8 \t {sn16 sn sn} sn4 r | R2*2 - \set drumStyleTable = #drums-style + \set drumStyleTable = #drums-style %%% Allegro marcato %%% - sn4 \ind #"Cymb. susp. (sur la cloche)" hh sn \t {sn8 sn sn} | - sn4 hh sn r | R1 r8 r16 sn32 sn sn8. sn16 sn4 r | - sn2:32 sn4 \t {sn8 sn sn} | sn4 hh sn \t {sn8 sn sn} | - sn4 hh sn r | R1 r8 r16 sn32 sn sn8. sn16 sn4 r | R1 - r8 sn \t {sn sn sn} sn4 r | - r8 sn \t {sn sn sn} sn4 hh | R1 - r8 sn \t {sn sn sn} sn4 r | - r8 sn \t {sn sn sn} sn4 r | - \t {r8 r16 sn sn8} \t {sn sn sn} sn4 hh | R1*4 + \ind #"Tambour" bd4 \ind #"Cymb. susp. (sur la cloche)" hh bd \t {bd8 bd bd} | + bd4 hh bd r | R1 r8 r16 bd32 bd bd8. bd16 bd4 r | + bd2:32 bd4 \t {bd8 bd bd} | bd4 hh bd \t {bd8 bd bd} | + bd4 hh bd r | R1 r8 r16 bd32 bd bd8. bd16 bd4 r | R1 + r8 bd \t {bd bd bd} bd4 r | + r8 bd \t {bd bd bd} bd4 hh | R1 + r8 bd \t {bd bd bd} bd4 r | + r8 bd \t {bd bd bd} bd4 r | + \t {r8 r16 bd bd8} \t {bd bd bd} bd4 hh | R1*4 r2 r4 hh | r2 r4 hh | R1 %%% Agitato %%% @@ -531,7 +534,7 @@ ActeUnSceneUnBisPercus = << r re4 re8 \t { re re sold,} | %%% Piu vivo %%% - re'4 r r2 | sold,2:32 | re'4 r r2 | sold,2:32 | + re'4 r r2 | sold,2.:32 | re'4 r r2 | sold,2.:32 | 4 r8 \t {sol16 sol sol} sol4 | r sol32 sol8.. r4 | \t {sol16 sol sol~} sol8 r4 reb' | sol, r2 | @@ -697,8 +700,8 @@ ActeUnSceneDeuxPercus = << r8 cb8:32 cb4 | r8 cb8:32 cb4 | r8 cb8:32 cb4 | - r8 cb8:32 r4 | r8 cb r4 | R2 - r8 cb r cb | r cb r cb \t {cb cb \ind #"étouffer" cb:32} R2. + r8 cb8:32 r4 | r8 cb r4 | R2 %%FIXME: barcheck error + r8 cb r cb r cb r cb \t {cb cb \ind #"étouffer" cb:32} R2. %%% Largo assai %%% R1 R2.*3 R2 R2. R1*4 @@ -819,7 +822,7 @@ ActeUnSceneTroisPercus = << ActeUnSceneTroisBisPercus = { - \new GrandStaff \GrandMarimba \PianoDeuxMains + \new GrandStaff \GrandMarimba \PercuDeuxMains \relative { r8 r r r | r r r r | diff --git a/instruments/piano.ly b/instruments/piano.ly index faa6eb3..6127e29 100755 --- a/instruments/piano.ly +++ b/instruments/piano.ly @@ -748,14 +748,14 @@ ActeUnSceneDeuxPiano = { \Piano 4~ 8 sold' \t {sold sold sold} | 8 r r | \pl 2\laissezVibrer - {s4 \stemDown \ttt {mi''16 la re \md sol si mi} } - \mg \ttt {si,, mi la re \md sol mi'} - \mg \ttt {sol,,,re'la' \md mi' si' sol'} + {s4 \stemUp \ttt {mi''16 la re \stemDown \md sol si mi} } + \mg \stemUp \ttt {si,, mi la re \stemDown \md sol mi'} + \mg \stemUp \ttt {sol,,,re'la' \stemDown \md mi' si' sol'} \mg \stemNeutral \pl 2\laissezVibrer - {s4 \clef treble \stemDown - \ttt {re'''16 mi fa sol \md si mi \mg \clef bass } } - \ttt {sol,, do re \md la' si mi} - \mg \ttt {do,, sol' re' \md la' mi' si' \mg} + {s4 \clef treble \stemUp + \ttt {re'''16 mi fa sol \stemDown \md si mi \mg \clef bass } } + \stemUp \ttt {sol,, do re \stemDown \md la' si mi} + \stemUp \mg \ttt {do,, sol' re' \stemDown \md la' mi' si' \mg} fa,,,32 la si mi \md sol la do re \mg \clef treble \stemNeutral mi fa sol la \md si re mi la \mg \clef bass | \pl 2\laissezVibrer diff --git a/instruments/violoncelle1.ly b/instruments/violoncelle1.ly index 32d3839..4e0b32c 100644 --- a/instruments/violoncelle1.ly +++ b/instruments/violoncelle1.ly @@ -755,8 +755,8 @@ ActeDeuxSceneDeuxVioloncelleUn = { \VioloncelleUn \clef bass 16 8 \clef treble | r8 red'' red mi r4 \clef bass sol,,16 sol sol8 \clef treble | r8 mi'' mi fa \clef bass r8 r16 la,,, fad sol fa lab | - mi8 \pizz si' 4\arpeggio | - mi,8 si' 4\arpeggio | mi,8 si' fad' dod, | mi4 dod8 do | + mi8 \pizz si' 4\arpeggUp | + mi,8 si' 4\arpeggUp | mi,8 si' fad' dod, | mi4 dod8 do | mi4 r8 mi | mi4 r | \arco 1~ 2 r4 | @@ -794,7 +794,7 @@ ActeDeuxSceneDeuxVioloncelleUn = { \VioloncelleUn r16 sold mi sold r sol mib sol | r fad re fad r fa reb fa | r mi do mi r red si red | - re8 \clef bass \pizz \arpeggio r \arpeggio | + re8 \clef bass \pizz \arpeggUp r \arpeggUp | r \simile r | r r | r r | diff --git a/instruments/violoncelle2.ly b/instruments/violoncelle2.ly index d849809..fabdbd9 100644 --- a/instruments/violoncelle2.ly +++ b/instruments/violoncelle2.ly @@ -229,7 +229,7 @@ ActeUnSceneUnVioloncelleDeux = { \VioloncelleDeux ActeUnSceneUnBisVioloncelleDeux = { \VioloncelleDeux \relative { - dod,,8:32 + dod,,2.:32 dod8 \t {dod16 dod dod} dod8 \t {dod16 dod dod} dod8 \t {dod16 dod dod} | dod8 \t {dod16 dod dod} dod8 \t {dod16 dod dod} dod8 \t {dod16 dod dod} | dod8 \t {dod16 dod dod} dod8 \t {dod16 dod dod} dod8 \t {dod16 dod dod} | @@ -789,7 +789,7 @@ ActeDeuxSceneDeuxVioloncelleDeux = { \VioloncelleDeux r16 mi'' sold mi r mib sol mib | r re fad re r reb fa reb | r do mi do r si red si | - sib8 \clef bass \pizz \arpeggio r \arpeggio | + sib8 \clef bass \pizz \arpeggUp r \arpeggUp | r \simile r | r r | r r | diff --git a/texte/didascalies.ly b/texte/didascalies.ly index 56fabac..cc1fea0 100755 --- a/texte/didascalies.ly +++ b/texte/didascalies.ly @@ -169,29 +169,21 @@ reste déserte un bref instant, puis Dieu entre au moment où la musique commence. D’allure quelconque, il est habillé en jardinier." -InterludeUnB = "Il parcourt la scène, inspectant le décor de -papier, puis s’arrête devant les plantes à -l’avant-scène." +InterludeUnB = "Il parcourt la scène, inspectant le décor de papier, puis s’arrête devant les trois plantes à l’avant-scène." -InterludeUnC = "Il commence à en tailler -certaines à l’aide de son sécateur, -méticuleusement." +InterludeUnC = "Il les inspecte une par une, les arrose..." -InterludeUnD = "Puis soudain, après un -instant de réflexion, il déchiquette une plante, -d'un geste délibérément maladroit." +InterludeUnD = "Comme il écarte le feuillage, une feuille lui reste entre les doigts. Il réfléchit un instant, puis la mange." -InterludeUnE = "Il répète ensuite ce même jeu, sur l’une ou l’autre -plante, toujours très calmement." +InterludeUnE = "Arrivé à la troisième plante, il s'interrompt dans sa dégustation." -InterludeUnF = "À la fin de l’interlude orchestral, visiblement -satisfait, il contemple le plateau jonché de -débris informes..." +InterludeUnF = "Il regarde la plante, circonspect..." -InterludeUnG = "puis s’éloigne tranquillement, -tandis que la Reine entre par l’autre côté, -perdue dans ses pensées, un coffret de bijoux -entre les mains." +InterludeUnG = "puis se met en devoir de la taillader, jusqu'à ce qu'il n'en reste plus rien qu'un tas épars." + +InterludeUnH = "Du pied, il pousse les morceaux pour les dissimuler derrière les autres plantes." + +InterludeUnI = "Il regarde autour de lui, puis avise un point hors de la scène et se met en chemin, tandis que la Reine entre par l’autre côté, perdue dans ses pensées, un coffret de bijoux entre les mains." %------------------------------------------------------------------% @@ -222,6 +214,24 @@ mauvaise grâce le collier des mains du Roi." %%%%%%%%%%%%%%%%%%%%%% Troisième Tableau %%%%%%%%%%%%%%%%%%%%%%%%%% +InterludeDeuxA = "Entre Dieu. Comme précédemment, il se dirige vers les plantes à l'avant-scène." + +InterludeDeuxB = "Il regarde chacune des deux plantes, qui sont toutes deux bien plus grandes que lui. Il compare leurs tailles avec sa main, par rapport au haut de sa tête." + +InterludeDeuxC = "Il décide subitement de les couper." + +InterludeDeuxD = "Il les déchiquette de plus en plus vite... jusqu'à ce qu'elles ne forment plus qu'un tas sur le sol." + +InterludeDeuxE = "Il regarde autour de lui mais ne trouve plus d'endroit pour cacher les débris." + +InterludeDeuxF = "Il crée une grande flamme (ou de la fumée)..." + +InterludeDeuxG = "... qui l'impressionne lui-même." + +InterludeDeuxH = "Le feu éteint, il s'avance et regarde le théâtre." + +%------------------------------------------------------------------% + ActeUnSceneTroisA = "La lumière revient sur la cellule de l'Étranger, qui se tient immobile, seul. Entre le Chef de la Garde, d'abord impérieux..." diff --git a/texte/texte.ly b/texte/texte.ly index 35597e0..8bb98fa 100755 --- a/texte/texte.ly +++ b/texte/texte.ly @@ -106,8 +106,8 @@ ActeUnSceneUnBarytonUnTexte = \lyricmode { \set instrumentName = \BarytonUnName \set shortInstrumentName = \BarytonUnShortName - Aah… __ _ _ _ \freestyleOn - _ _ _ _ _ _ + Aah… __ _ _ _ \freeStyleOn + \markup \null __ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ @@ -118,7 +118,7 @@ ActeUnSceneUnBarytonUnTexte = \lyricmode { _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ - _ \freestyleOff + _ \freeStyleOff Mmm… __ _ Mmm… __ _ Mmmh… __ _ Aa… __ _ Aaa… __ _ _ _ AAAH_! Euh… Oui… diff --git a/vocal_score.ly b/vocal_score.ly index b16bfec..d074b3c 100755 --- a/vocal_score.ly +++ b/vocal_score.ly @@ -348,7 +348,7 @@ ActeDeuxSceneTrois = { } %%%%%%%%%%%%%%%%%%%%%%%%% The actual score %%%%%%%%%%%%%%%%%%%%%%%%% - +showFirstLength = s1*40 \book { \header { title = \OperaTitre -- 2.11.4.GIT