%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % FICHIER SchubertF-D827-ImFruehling.ly % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % FRANZ SCHUBERT: Gesang "Im Frühling", für eine Singstimme mit Klavierbegleitung % AVEC SORTIES PARTITION ET MIDI SEPAREES % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \version "2.11.57" \include "italiano.ly" \paper { %#(set-paper-size "a4") %#(set-paper-size "letter") line-width = 186\mm #(define left-margin (/ (- paper-width (* 186 mm)) 2)) indent = 22\mm oddHeaderMarkup = \markup \fill-line { " " { \italic "♫ Franz Schubert: Im Frühling (D.882) ♫" } \fromproperty #'page:page-number-string } evenHeaderMarkup = \markup \fill-line { \fromproperty #'page:page-number-string { \italic "♫ Franz Schubert: Im Frühling (D.882) ♫" } " " } #(ly:set-option 'point-and-click #f) } \header { title = \markup { \fontsize #1.5 "Im Frühling" } subsubtitle = " " poet = \markup { \bold "Ernst Konrad Friedrich Schulze" \small "(1789-1817)" } composer = \markup \center-column { \fontsize #3 \bold "Franz Schubert" \small "(1797-1827)" "D.882 (März 1826)" } % MUTOPIA mutopiatitle = "Im Frühling" mutopiacomposer = "SchubertF" mutopiapoet = "Ernst Schulze" mutopiaopus = "D.882" mutopiainstrument = "Voice and Piano" date = "1826" source = "Breitkopf & Härtel (1884-1897)" style = "Romantic" copyright = "Public Domain" maintainer = "Ph. Raynaud" moreInfo = "" footer = "Mutopia-2008/09/28-1550" tagline = \markup { \override #'(box-padding . 1.0) \override #'(baseline-skip . 2.7) \box \center-column { \small \line { Sheet music from \with-url #"http://www.MutopiaProject.org" \line { \teeny www. \hspace #-1.0 MutopiaProject \hspace #-1.0 \teeny .org \hspace #0.5 } • \hspace #0.5 \italic Free to download, with the \italic freedom to distribute, modify and perform. } \line { \small \line { Typeset using \with-url #"http://www.LilyPond.org" \line { \teeny www. \hspace #-1.0 LilyPond \hspace #-1.0 \teeny .org } by \maintainer \hspace #-1.0 . \hspace #0.5 Reference: \footer } } \line { \teeny \line { This sheet music has been placed in the public domain by the typesetter, for details see: \hspace #-0.5 \with-url #"http://creativecommons.org/licenses/publicdomain" http://creativecommons.org/licenses/publicdomain } } } } } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % STRUCTURE GENERALE DU FICHIER % % Les sorties Partition et Midi sont dissociées (le volume de la sortie Midi a été affiné). % % - IDENTIFICATEURS DE FONCTIONS % A. POÈME % B. CHANT: B1: Notes B2: dynamiques % C. PIANO: C1: Notes PIANO HAUT C2: Notes PIANO BAS C3: Dynamiques partition C4: Dynamiques midi % D. SORTIE PARTITION % E. SORTIE MIDI % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % IDENTIFICATEURS DE FONCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %----- TEMPI TEMPOBASE = \tempo 4=56 TEMPOA = \tempo 4=52 TEMPOB = \tempo 4=48 TEMPOC = \tempo 4=44 TEMPOD = \tempo 4=40 TEMPOE = \tempo 4=10 %----- TONALITÉS ET MESURES KEYA = { \key sol \major } KEYB = { \key sol \minor } TIME = { \time 4/4 } %----- MOUVEMENT MOVEMENT = \markup { \bold \large { \hspace #-4 "Andante." } } %----- INSTRUMENTS ICHANT = { % \set Staff.midiInstrument = "harmonica" \set Staff.midiInstrument = "clarinet" \set Staff.midiMinimumVolume = #0 \set Staff.midiMaximumVolume = #1 } IPIANOHAUTI = { % \set Staff.midiInstrument = "acoustic guitar (nylon)" \set Staff.midiInstrument = "acoustic grand" \set Staff.midiMinimumVolume = #0 \set Staff.midiMaximumVolume = #0.8 } IPIANOHAUTII = { % \set Staff.midiInstrument = "acoustic guitar (nylon)" \set Staff.midiInstrument = "bright acoustic" \set Staff.midiMinimumVolume = #0 \set Staff.midiMaximumVolume = #0.6 } IPIANOBAS = { % \set Staff.midiInstrument = "acoustic guitar (nylon)" \set Staff.midiInstrument = "bright acoustic" \set Staff.midiMinimumVolume = #0 % \set Staff.midiMaximumVolume = #1 \set Staff.midiMaximumVolume = #0.7 } %----- REPOSITIONNEMENT D'UNE DYNAMIQUE DYNEXO = #(define-music-function (parser location beg-end) (pair?) #{ \once \override DynamicText #'extra-offset = #$beg-end #}) PINEXO = #(define-music-function (parser location beg-end) (pair?) #{ \once \override Hairpin #'extra-offset = #$beg-end #}) %----- REPOSITIONNEMENT DES SCRIPT / MARKUP SCREXO = #(define-music-function (parser location beg-end) (pair?) #{ \once \override Script #'extra-offset = #$beg-end #}) TSCREXO = #(define-music-function (parser location beg-end) (pair?) #{ \once \override TextScript #'extra-offset = #$beg-end #}) %----- LIAISON: HAUTEUR SLURPOS = #(define-music-function (parser location beg-end) (pair?) #{ \once \override Slur #'positions = #$beg-end #}) %----- IMITATION D'UN LONG POINT D'ORGUE SLURTHICK = \once \override Slur #'thickness = #4 POINTTHICK = \once \override Script #'font-size = #3 GROSPOINT = \markup { \fontsize #2 \musicglyph #"period" } %----- BARRE DE LIGATURE: HAUTEUR BEAMPOS = #(define-music-function (parser location beg-end) (pair?) #{ \once \override Beam #'positions = #$beg-end #}) %----- REPOSITIONNEMENT D'UNE NOTE NOTEHS = #(define-music-function (parser location beg-end) (number?) #{ \once \override NoteColumn #'force-hshift = #$beg-end #}) IGNCOLL = \once \override NoteColumn #'ignore-collision = ##t %----- REPOSITIONNEMENT D'UNE ALTERATION ALTEXO = #(define-music-function (parser location beg-end) (pair?) #{ \once \override Accidental #'extra-offset = #$beg-end #}) %----- CRESCENDOS CRESCM = \markup { \bold \italic "cresc." } DIMINM = \markup { \bold \italic "dimin." } %----- DYNAMIQUE SPECIALE SFORZATO = \markup { \musicglyph #"scripts.sforzato" } %----- MARKUP ATEMPO = \markup { \bold \large "a tempo" } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % A. POEME %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% poeme = \lyricmode { \set fontSize = #-.5 %--- 4 Still sitz’ ich an des Hü -- gels Hang, der Him -- mel ist __ so __ klar, das Lüft -- chen __ spielt __ im __ grü -- nen Thal, wo ich beim ers -- ten Früh -- lings -- strahl einst, ach, __ so __ glück -- lich war, so __ glück -- lich war; wo ich an ih -- rer Sei -- te __ ging so trau -- lich und so nah, und tief im dun -- keln Fel -- sen -- quell den schö -- nen Him -- mel __ blau und hell und sie im Him -- mel sah, und __ sie im __ Him -- mel __ sah. %--- 20 Sieh, wie der bun -- te Früh -- ling schon aus Knosp’ und Blü -- the __ blickt! Nicht al -- le __ Blü -- then __ sind mir gleich, am lieb -- sten pflückt’ ich von dem Zweig, von wel -- chem __ sie ge -- pflückt, von wel -- chem sie ge -- pflückt! Denn al -- les ist wie da -- mals __ noch, die Blu -- men, das Ge -- fild; die Son -- ne scheint nicht min -- der hell, nicht min -- der freund -- lich __ schwimmt im Quell das blau -- e Him -- mels -- bild, das blau -- e __ Him -- mels -- bild. %--- 34 Es wan -- deln nur sich Will’ und Wahn, es wech -- seln Lust __ und __ Streit; vo -- rü -- ber __ flieht __ der __ Lie -- be Glück, und nur die Lie -- be bleibt zu -- rück, die Lieb’ __ und __ ach, das Leid, und __ ach, das Leid. %--- 41 O wär’ ich doch ein Vög -- lein nur dort an dem Wie -- sen -- hang, dann blieb’ ich auf den Zwei -- gen hier und säng’ ein sü -- sses __ Lied von ihr, den gan -- zen Som -- mer lang, den __ gan -- zen __ Som -- mer __ lang, ich säng’ von ihr den gan -- zen Som -- mer __ lang. } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % B1. CHANT : NOTES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% chant = \relative do'' { %--- 1 R1*2 \break R1 r2 r4 r8 re %--- 5 re8 si la sol sol8. mi16 mi8. mi16 mi8 do' mi16[ re] do[ si] do4 r8 re mi16[ re] do[ si] la[ sol] fad[ sol] sol8. mi16 mi8. mi16 %--- 8 mi8 dod' re si dod8. la16 mi8 mi' fa16[ mi] do![ re] mi8. sold,16 la8 si16[ do] re8. fad,!16 sol4 r r r8 sol %--- 11 la8 la si8. sol16 sol16.[ la64 sol] fad16[ sol] la8 la si8 sol dod la re4. re,8 sol8 sol fad fad mi mi16[ fad] sol8 sol %--- 14 la8. la16 do[ si] la[ si] do8 sol fa'^\fermata re mi8. la,16 la8 si sol4 r8 re'16[ red] fad16[ mi] la,[ si] re[ do] la[ fad] sol4 r %--- 17 R1*3 %--- 20 r2 r4 r8 re' re8 si la sol sol8. mi16 mi8. mi16 mi8 do' mi16[ re] do[ si] do4 r8 re %--- 23 mi16[ re] do[ si] la[ sol] fad[ sol] mi8. fad16 sold8. mi16 la8 mi re' si dod8. re16 mi8. mi16 %--- 25 fa16[ mi] do![ re] mi8. sold,16 la la si do re8. fad,!16 sol4 r r r8 sol la8. la16 si8 sol sol16.[ la64 sol] fad16[ sol] la8. la16 %--- 28 si8 sol dod la re4. re,8 sol8 sol fad fad mi8. fad16 sol8 sol %--- 30 la8. la16 do[ si] la[ si] do8 sol fa'^\fermata re mi8. la,16 la8 si sol4 r8 re'16[ red] fad16[ mi] la,[ si] re[ do] la[ fad] sol4 r %--- 33 \bar "||" \KEYB R1 r2 r4 r8 re' %--- 35 re8 sib la sol sol8. mib16 mib8 mib mib8 do' mib16[ re] do[ si] do4 r8 re %--- 37 mib16[ re] do[ sib] la[ sol] fad[ sol] mib8 fa sol8. sol16 lab8 mib reb'8. reb16 do8. lab16 mib8 mib' %--- 39 fab16[ mib] do[ reb] mib8. sol,16 lab8 sib16[ do] re8. fad,16 sol4 r \TSCREXO #'(1 . 0) r2^\fermataMarkup %--- 41 \bar "||" \KEYA r2 r4 r8 sol la8 la si sol \BEAMPOS #'(3 . 2.2) sol[ \grace { la16[ sol] } fad] sol la8. la16 %--- 43 si8 sol dod la re4. re,8 sol8 sol fad fad mi8. fad16 sol8 sol la8 la do16[ si] la[ si] do8 sol fa'^\fermata re %--- 46 mi8. la,16 la8 si sol4 r8 re'16[ red] fad16[ mi] la,[ si] re[ do] la[ fad] sol4 r %--- 48 r4 r8 fad mi8. fad16 sol4 r8 la mi'\fermata sol, sol si16[ la] sol4 R1^\fermataMarkup \bar "|." } %%%%%%%%%%%%%%%%%%%% RÉSUMÉ PARTITION notePartChant = { \clef treble \KEYA \TIME \set autoBeaming = ##f s1*0 ^\MOVEMENT \set Staff.instrumentName = "Singstimme " \chant } %%%%%%%%%%%%%%%%%%%% RÉSUMÉ MIDI noteMidiChant = { \clef treble \KEYA \TIME \TEMPOBASE \ICHANT \chant } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % C1. PIANO HAUT : NOTES (VOIX I / VOIX II) %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%% VOIX I pianoHautIA = \relative do'' { \voiceOne %--- 1 << { \voiceOne sol8[ sol( fad) \SLURPOS #'(2.5 . 2.5) fad]( mi)[ mi16( fad] sol4) } \\ { \voiceThree s2. re8.[ sol16] } >> << { \voiceOne la8[ la( si) sol] sol([ fad16 sol] la4) } \\ { \voiceThree s2 re,4 s4 } >> << { \voiceOne sol8[ sol( fad) \SLURPOS #'(2.5 . 2.5) fad]( mi)[ mi16( fad] sol4) } \\ { \voiceThree s2. re8.[ sol16] } >> \voiceOne la8[ la( mi' sol,)] sol([ si16 la]) sol4 %--- 5 \oneVoice r8 r r r r8 ([ ]) r << { \voiceOne 8( re'4) } \\ { \voiceThree s8 \ALTEXO #'(1.5 . 0.1) sold,8[ la] } >> \oneVoice r8 r r r %--- 8 r8 r r r 8([ ]) 8([ ]) \voiceOne sol'8[ sol( fad) \SLURPOS #'(2.5 . 2.5) fad]( mi)[ mi16( fad] sol8)[ sol] %--- 11 \oneVoice r8 r << { \voiceOne 8 \IGNCOLL sol'([ fad16 sol]) } \\ { \voiceThree r8 \NOTEHS #'1.5 re4 } >> \oneVoice r8 r8 r \set doubleSlurs = ##t ( \set doubleSlurs = ##f )[ ( ]) r8 r r r %--- 14 r8 r r \noBeam \fermata r r8 r r r \voiceOne sol'16([ ] sol8) ( la4 do8 si)[ re( mi fad)] %--- 17 \oneVoice sol16([ si, re sol] fad[ si, re fad] mi[ sol, mi' fad] sol[ si, re sol]) la[ mi sol la] si[ si, mi sol] sol[ re fad sol] << { la4 } \\ { la16[ re, mi fad] } >> sol16[ si, re sol] fad[ si, re fad] mi[ sol, mi' fad] sol[ si, re sol] %--- 20 la[ mi sol la] mi'[ mi, fad sol] << { \voiceOne re16[ sol si la] } \\ { \voiceTwo s8 fad } >> sol16[ ] sol'16[ si, re si'] la[ dod, re sol] sol[ do, mi sol] sold[ re mi sold] la[ do, mi la] la,[ re sol, fa'] mi[ sol, do mi] << { \voiceOne la8.[ do16] } \\ { \voiceTwo mi,16[ mib re8] } >> %--- 23 \oneVoice si'16[ si, re si'] la[ dod, re sol] sol[ do, mi sol] sold[ re mi sold] la[ dod, mi la] si[ re, mi si'] la[ dod, mi la] sold[ re mi sold] %--- 25 la([ do,! la si] do la' sold si] la[ do, si la] si[ si' fad! la]) sol16([ si, re sol] fad[ si, re fad] mi[ sol, mi' fad] sol[ si, re sol]) la[ mi sol la] si[ si, mi sol] sol[ re fad sol] la[ re, fad la] %--- 28 si[ si, sol' si] la[ sol mi fad] re[ fad, la re] la[ fad' re la'] sol16[ si, re sol] fad[ si, re fad] mi[ sol, mi' fad] sol[ si, re sol] %--- 30 sol[ la, mi' sol] sol[ si, fa' sol] sol[ do, mi sol] 8\fermata r } %%%%%%%%%%%%%%%%%%%% 31: MORDANT POUR LA PARTITION pianoHautIB = \relative do''' { sol16[ sol, la sol'] la,[ fad' re re'] si[ si, si' la] sol\prall[ fad sol fad] } %%%%%%%%%%%%%%%%%%%% 31: MORDANT POUR LE MIDI pianoHautIC = \relative do''' { sol16 sol, la sol' la, fad' re re' si si, si' la sol64[ la sol32] fad16 sol fad } %%%%%%%%%%%%%%%%%%%% 32: suite pianoHautID = \relative do'' { %--- 32 mi16[ sold, la mi'] fad[ la, fad' la] sol![ re si re] do[ mi la, fad'] %--- 33 \KEYB r16 8[ 16] r 8[16] r 8[ 16] r 8[ 16] r16 8[ 16] r 8[ 16] r 8[ 16] r 8[ 16] %--- 35 r16 8[ 16] r 8[ 16] r 8[ 16] r 8[ 16] r16 8[ 16] r 16[ r ] r 8[ 16] << { mib'16[( re) re^. re^.] } \\ { 8[ 16 ] } >> %--- 37 r16 8[ 16] r 8[16] r 8[ 16] r 8[ 16] r16 8[ 16] r 8[ 16] r 8[ 16] r 8[ 16] %--- 39 r16 [ r ] r [ r ] r [ r ] r [ r ] r16 8[ 16] r 8[ 16] r 8[ 16] r \SLURTHICK #6 \SLURPOS #'(3 . 3) \TSCREXO #'(3 . -2) 8^\GROSPOINT ([ 16]) %--- 41 \KEYA sol'16^\ATEMPO [ si, re sol] fad[ si, re fad] mi[ sol, mi' fad] sol[ si, re sol] la[ mi sol la] si[ si, mi sol] sol[ re fad sol] la[ re, fad la] %--- 43 si[ si, sol' si] la[ sol mi fad] re[ fad, la re] la[ fad' re la'] si[ si, re si'] la[ si, red la'] sol[ sol, mi' sol] sol[ si, re sol] sol[ la, mi' sol] sol[ si, fa' sol] sol[ do, mi sol] 8\fermata r } %%%%%%%%%%%%%%%%%%%% 46: MORDANT POUR LA PARTITION pianoHautIE = \relative do''' { sol16[ sol, la sol'] fad[ re fad re'] si[ si, si' la] sol\prall[ fad sol fad] } %%%%%%%%%%%%%%%%%%%% 46: MORDANT POUR LE MIDI pianoHautIF = \relative do''' { sol16 sol, la sol' fad re fad re' si si, si' la sol64[ la sol32] fad16 sol fad } %%%%%%%%%%%%%%%%%%%% 47: suite pianoHautIG = \relative do'' { %--- 47 mi16[ sold, la mi'] fad[ la, fad' la] sol![ re si re] do[ mi la, fad'] sol16[ si, re sol] fad[ si, re fad] mi[ sol, mi' fad] sol[ si, re sol] } %%%%%%%%%%%%%%%%%%%% 49-50: GRUPPETTO POUR LA PARTITION ET FIN pianoHautIH = \relative do''' { la16[ mi sol la] mi'^\fermata[ mi, fad sol] \voiceOne \SCREXO #'(2.5 . -2.5) sol8^\turn[ si16 la] \oneVoice sol[ si,( do dod] \voiceOne re16[ re, fad do'] si)[ sol( la lad] si[ si, re fad]) 4^\fermata } %%%%%%%%%%%%%%%%%%%% 49-50: GRUPPETTO POUR LE MIDI ET FIN pianoHautIJ = \relative do''' { la16[ mi sol la] mi'^\fermata[ mi, fad sol] sol16[ fad64 sol la sol si16 la] sol[ si,( do dod] re16[ re, fad do'!] si)[ sol( la lad] si[ si, re fad]) 4^\fermata } %%%%%%%%%%%%%%%%%%%% SYNTHESES PIANO HAUT VOIX I pianoHautIPart = \context Staff \new Voice { \voiceOne \pianoHautIA \pianoHautIB \pianoHautID \pianoHautIE \pianoHautIG \pianoHautIH } pianoHautIMidi = \context Staff \new Voice { \voiceOne \pianoHautIA \pianoHautIC \pianoHautID \pianoHautIF \pianoHautIG \pianoHautIJ } %%%%%%%%%%%%%%%%%%%% VOIX II pianoHautII = \context Staff \relative do' \new Voice { \voiceTwo %--- 1 8 4 8( )[ ]( si4) 8 4 8 si[ la16 si] 8[ 16 ] 8 4 \SLURPOS #'(1 . 1) 8( )[ ]( si4) 8 4 mi8 re[ ] re4 %--- 5 s1 s2 s8 \stemUp \IGNCOLL 8( \stemDown 4) s1 %--- 8 s1*2 8 4 \SLURPOS #'(1 . 1) 8( )[ ]( [) ] %--- 11 s4. \stemUp \IGNCOLL 8 \stemDown si[ la16 si] s4 s1*2 %--- 14 s1*2 mi4 fad sol8 sol4 re'16[ do] %--- 17 s1*16 %--- 33 \KEYB s1*16 %--- 49 s2 sol'8[ fad] s4 s8 fad,([ sol16]) s8. s8 do,! s4 } %%%%%%%%%%%%%%%%%%%% RÉSUMÉ PARTITION notePartPianoHaut = { \clef treble \KEYA \TIME \set autoBeaming = ##f << \pianoHautIPart \pianoHautII >> } %%%%%%%%%%%%%%%%%%%% RÉSUMÉS MIDI noteMidiPianoHautI = { \clef treble \KEYA \TIME \IPIANOHAUTI \pianoHautIMidi } noteMidiPianoHautII = { \clef treble \KEYA \TIME \IPIANOHAUTII \pianoHautII } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % C2. PIANO BAS : NOTES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% pianoBas = \relative do { %--- 1 sol4( si do sol) do4( dod) re ~ re16[ re,( mi fad)] sol4( si do sol) \set doubleSlurs = ##t 4( ) \set doubleSlurs = ##f 8[ ] 4 %--- 5 sol,4( si do si) la4( fa8[ sol]) do4( fad,) sol4( si do si) %--- 8 la4( sold la si) do!8([ fa] mi4) la,8([ mib'] re4) sol,4( si do sol) %--- 11 do4_( dod re re,) sol8([ fad mi la] re,) << { sold'8([ la re16 do]) } \\ { re,4. } >> sol,4( si do sol) %--- 14 do4( re mi si8\fermata) r do4( re mi si) do4( la8[ re] sol,) si'([do la]) %--- 17 sol,8-.[ ] si,-.[ ] do,-.[ ] sol,-.[ ] do,8[ ] dod,[ ] re,16[ ] 4 sol,,8[ ] si,[ ] do,[ ] sol,[ ] %--- 20 do,8[ ] dod,[ ] [ ] r sol,[ ] si,[ ] do,[ ] si,[ ] la,[ ] [ ] do,[ ] fad,![ ] %--- 23 sol,[ ] si,[ ] do,[ ] si,[ ] la,[ ] sold,[ ] la,[ ] si,[ ] %--- 25 << { s4 8[ ] s4 8[ ] } \\ { 8([ ] mi4) 8([ ] re4) } >> sol,8[ ] si,[ ] do,[ ] sol,[ ] do,8[ ] dod,[ ] re,16[ ] 4 %--- 28 sol,8[ mi ] re,[ re, ] sol,8[ ] si,[ ] do,[ ] sol,[ ] %--- 30 do,8[ ] re,[ ] mi,[ ] \fermata r [ ] re[ ] mi,[ ] << { \voiceOne s8 sol' } \\ { \voiceThree s8 re16[ red] } \\ { \voiceTwo si,8[ si'] } >> do,8[ ] re,[ ] sol,[ ] %--- 33 \KEYB sol,16-. sol'([ sib re]) sol,,-. sol'([ re' fa]) sol,,-. sol'([ do mib]) sol,,-. sol'([ sib re]) do,, mib'[ lab do] dod,, mi'[ sol sib] re,, re'[ sol sib] re,, re'[ fad! la] %--- 35 sol, sol'[ sib re] sol,, sol'[ re' fa] sol,, sol'[ do mib] sol,, mib'[ sib' reb] lab, mib'[ lab do] fa,,[ lab' fa, sol'] do, mib[ sol do] fad,, re'[ la' do] %--- 37 sol, sol'[ sib re] sol,, sol'[ re' fa] sol,, sol'[ do mib] mib,, mib'[ sib' reb] lab, mib'[ lab do] lab, fab'[ sib reb] lab, mib'[ lab do] sol, mib'[ sib' reb] %--- 39 lab,-.[ -. fa,-. -.] mib,[ mib, ] lab,[ mib ] re,![ re, ] sol, sol'[ sib re] sol,, sol'[ re' fa] sol,, sol'[ do mib] sol,, \SLURTHICK #6 \SLURPOS #'(4.5 . 2.5) sol'([ \SCREXO #'(0 . 1) \POINTTHICK si^. re]) %--- 41 \KEYA sol,,16[ 8 16] si,16[ 8 16] do,16[ 8 16] sol,16[ 8 16] do,16[ 8 16] dod,16[ 8 16] re,16[ ] re,[ 8 16] %--- 43 sol,16[ 8 fad16] mi16[ 8 la,16] re16[ 8 16] re,16[ 8 16] sol,16[ 8 16] si,16[ 8 16] do,16[ 8 16] sol,16[ 8 16] do,16[ 8 16] re,16[ 8 16] mi,16[ 8 16] 8^\fermata r %--- 46 8[ ] re16[ 8 16] mi,16[ 8 16] si,16[ 8 16] do,16[ 8 16] re,16[ 8 16] sol,16[ 8 16] 8[ ] %--- 48 sol,8[ ] si,[ ] do,[ ] sol,[ ] do,[ ] dod,^\fermata [ ] [ ] 16 \clef treble sol'16([ la lad] si16) r \clef bass << { la,16[ re ~] re } \\ { re,8([ sol16]) } >> si16([ do dod] re) r << { fad,16[ la] } \\ { re,8 } >> 4_\fermata } %%%%%%%%%%%%%%%%%%%% RÉSUMÉ PARTITION notePartPianoBas = { \clef bass \KEYA \TIME \set autoBeaming = ##f \pianoBas } %%%%%%%%%%%%%%%%%%%% RÉSUMÉ MIDI noteMidiPianoBas = { \clef bass \KEYA \TIME \IPIANOBAS \pianoBas } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % C3. PIANO : DYNAMIQUES POUR LA PARTITION %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% dynPartPiano = { %--- 1 \DYNEXO #'(0 . -0.5) s1\pp s1*4 %--- 6 s2. s8\decr s8\! s1 %--- 8 \DYNEXO #'(2 . 0) s2.\ppp s8 \TSCREXO #'(0 . 1) s8-\CRESCM s8\cr s16 s16\! s16 \PINEXO #'(-2.5 . 0) s16\decr s16 s16\! s8\p\cr s16 s16\! s16 \PINEXO #'(-2.5 . 0) s16\decr s16 s16\! \DYNEXO #'(1.5 . -0.5) s1\pp s1 %--- 12 s4 \PINEXO #'(1 . 0) s8\cr s8\! s16 \PINEXO #'(-1 . 0) s8.\decr s16.. s64\! s8 s1 \PINEXO #'(2 . 0) s2.\cr \DYNEXO #'(2 . 0) s4\!\fp \DYNEXO #'(1.5 . 0) s1\pp s1 %--- 17 \DYNEXO #'(1.5 . 0) s1\pp s1*4 %--- 22 s2 s16 s8\cr s16\! s8.\decr s16\! s1 %--- 24 \DYNEXO #'(2 . 0) s1\ppp s8.\cr s16\! s8.\decr s16\! s16 s8\cr s16\! s8.\decr s16\! s1*3 %--- 29 s2... s16-\CRESCM s2. \TSCREXO #'(1 . 0.5) s8-\SFORZATO s8 \DYNEXO #'(1.5 . -0.5) s1\pp s1 %--- 33 s2\mf s16 s8.\cr s8. s16\! s8.\decr s16\! s2 s8 s8\p s1 %--- 36 s2 s32 s8.\cr s32\! s8\decr s16\! s16 s1 s1\pp s1 \DYNEXO #'(0.5 . -1) s4\p s16 \TSCREXO #'(0 . 0.5) s8.-\DIMINM s2 %--- 41 s1\pp s1*3 %--- 45 \TSCREXO #'(0 . 0.5) s2.-\CRESCM \TSCREXO #'(1 . 0.5) s8-\SFORZATO s8 \DYNEXO #'(1.5 . -1) s1\pp s1 \DYNEXO #'(2 . 0) s1\ppp s1*2 } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % C4. PIANO : DYNAMIQUES POUR LE MIDI %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% dynMidiPiano = { %--- 1 s1\pp s1*4 %--- 6 s2. s8\p\decr s8\!\pp s1 %--- 8 s2.\ppp s8 s8\cr s8 s8\!\p s8\decr s8\!\pp s8\p\cr s8\!\mp s4\decr s1\!\pp s1 %--- 12 s4 s8\cr s8\!\p s4\decr s8\!\pp s8 s1 s4\cr \TEMPOA s8 \TEMPOB s8 \TEMPOC s8 \TEMPOD s8 \TEMPOE s16.\!\mf s16\ppppp \TEMPOB s16.\pp \TEMPOBASE s1 s1 %--- 17 s1\pp s1*4 %--- 22 s2 s16 s8\cr s16\!\p s8.\decr s16\!\pp s1 %--- 24 s1\ppp s8.\cr s16\!\pp s8.\decr s16\!\ppp s16 s8\cr s16\!\pp s8.\decr s16\!\ppp s1*3 %--- 29 s1 s4\cr \TEMPOA s8 \TEMPOB s8 \TEMPOC s8 \TEMPOD s8 \TEMPOE s16.\!\mp s16\ppppp \TEMPOB s16.\pp \TEMPOBASE s1 s1 %--- 33 s2\mf s16 s8.\cr s8. s16\!\f s8.\decr s16\!\mf s2 s8 s8\p s1 %--- 36 s2 s8.\cr s16\!\mp s8.\decr s16\!\p s1 s1\pp s1 s4\p s4\decr \TEMPOA s4 \TEMPOB s8. \TEMPOD s16\!\pp %--- 41 \TEMPOBASE s1\pp s1*3 %--- 45 s4\cr \TEMPOA s8 \TEMPOB s8 \TEMPOC s8 \TEMPOD s8 \TEMPOE s16.\!\mp s16\ppppp \TEMPOB s16.\pp \TEMPOA s1 s1 s1\ppp s4 \TEMPOE s16 \TEMPOA s8. s2 s4 s16 \TEMPOB s4 \TEMPOC s8. \TEMPOE s4 } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % D. SORTIE PARTITION SEULE %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %{ -------------------- -------------------- %} \score { << \new Voice = "chant" \notePartChant \new Lyrics \lyricsto "chant" \poeme \new PianoStaff << \set PianoStaff.instrumentName = "PianoForte " \new Staff = "pianoUp" << \notePartPianoHaut >> \new Dynamics = "dynamics" \dynPartPiano \new Staff = "pianoDown" << \notePartPianoBas >> >> >> \layout { \context { \Score \override SpacingSpanner #'spacing-increment = #1 } \context { \type "Engraver_group" \name Dynamics \alias Voice % So that \CRESC works, for example. \consists "Output_property_engraver" \override VerticalAxisGroup #'minimum-Y-extent = #'(-0.5 . 0.5) \override DynamicLineSpanner #'Y-offset = #0 \consists "Script_engraver" \consists "Dynamic_engraver" \consists "Text_engraver" \consists "Skip_event_swallow_translator" \consists "Axis_group_engraver" } \context { \PianoStaff \accepts Dynamics } } } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % E. SORTIE MIDI SEULE %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%% REDEFINITION DES VOLUMES RESPECTIFS ATTRIBUES AUX DYNAMIQUES % volumes par défaut (LilyPond\usr\share\lilypond\current\scm\midi.scm): % sf 1.00 ff 0.80 mp 0.61 ppp 0.42 fp: 0.50 % ffff 0.92 f 0.75 p 0.55 pppp 0.34 % fff 0.85 mf 0.68 pp 0.49 ppppp 0.25 #(define my-absolute-volume-alist '()) #(set! my-absolute-volume-alist (append '( ("sf" . 1.00) ("ffff" . 1.00) ("fff" . 1.00) ("ff" . 1.00) ("f" . 0.85) ("mf" . 0.75) ("mp" . 0.65) ("p" . 0.60) ("pp" . 0.55) ("ppp" . 0.50) ("pppp" . 0.40) ("ppppp" . 0.01) ) my-absolute-volume-alist)) %%%%%%%%%%%%%%%%%%%% CHAQUE DYNAMIQUE RENCONTREE PRENDRA LE NOUVEAU VOLUME SPECIFIE #(define (my-dynamic-absolute-volume s) (let ((entry (assoc s my-absolute-volume-alist))) (if entry (cdr entry)) )) %%%%%%%%%%%%%%%%%%%% SILENCE AVANT MIDI (IL Y A PARFOIS UN CRAQUEMENT À L'OUVERTURE D'UN FICHIER MIDI) SILENCE = { \TIME \partial 2 s2 } \score { << \new Staff = "chant" { \SILENCE << \noteMidiChant \dynMidiPiano >> } \new Staff = "pianoUpI" { \SILENCE << \noteMidiPianoHautI \dynMidiPiano >> } \new Staff = "pianoUpII" { \SILENCE << \noteMidiPianoHautII \dynMidiPiano >> } \new Staff = "pianoDown" { \SILENCE << \noteMidiPianoBas \dynMidiPiano >> } >> \midi { \context { \Score % ECHELLE DU VOLUME DE SORTIE MIDI dynamicAbsoluteVolumeFunction = #my-dynamic-absolute-volume } } } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % FIN DU FICHIER SchubertF-D827-ImFruehling.ly %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%