ジュピター

ホルストのジュピターの簡単楽譜(ペダル入り)です。
ソースを見ていただくとわかるかと思うのですが、pedalというDynamicsを作って、その中で"pedal"というデータを流しています。ダミーの楽譜を使うので、ペダルとペダルを離すマークが自由自在にいろんなところに入れられます。

jupiter02.pdf 直
jupiter02.midi 直

\version "2.14.2"

\header {
  title = "ジュピター"
  composer = "G.ホルスト"
}

global = {
  \key c \major
  \numericTimeSignature
  \time 3/4
  \tempo "Andante maestoso"
  \partial 4
}

right = \relative c' {
  \global
  % Music follows here.
  \hideStaffSwitch
  \change Staff = "left"
  \stemUp
  \slurUp
  e,8-1^\mp ( g-2 |%0
  a4^\markup { \finger "3-1" }^~ a8 c-3  b-2 g-1 |%1
  c-3 d-4 c4-3) b-2( |%2
  a8-1 b-4 a4-3 g-2 |%3
  e2-1) e8-1( g-2 |%4
  \break
  a4^~^\markup{\finger"3-1"} a8 c-3 b-2 g-1 |%5
  \change Staff = "right"
  c-2 d-3 e4-4) e-3( |%6
  e8-3 d-2 c4-1 d-2 |%7
  \crescTextCresc
  c-1) r8 c-1_\<( g'\!-5 e-3 |%8
  \break
  d4-2 d-3 c8-2 e-4 |%9
  d4-3) r8 d-2( g-5 e-3 |%10
  d4-2 d-1 e8-2 g-4 |%11
  a2-5) a8-2( b-3 |%12
  c4-4 b-3 a-2 |%13
  \break
  g4 c-5) e,-1( |%14
  d8-2 c-1 d4-2 e-3 |%15
  g2-5) e8-1( g-2 |%16
  a4~^\markup{\finger"3-1"} a8 c-3 b_\mf-2 g-1 |%17
  c-3 d-4 c4-3) b-2( |%18
  \break
  a8-1 b-4 a4-3 g-2 |%19
  e2-1) e8-1( g-2 |%20
  a4~^\markup{\finger"3-1"} a8 c-3_\< b-2\! g-1 |%21
  c8-2 d-3 e4-4) e-3( |%22
  e8-3 d-2 c4-1 d-2 |%23
  \break
  c2-1) e8-1( g-3 |%24
  <a^4 f^2 c^1>2_\f <b^5 g^3 d^1>4 |%25
  <c^5 g^2 e^1>2) <b^4 g^2 d^1>4( |%26
  <a^5 f^3 c^1>2 <g^5 d^2 b^1>4 |%27
  <e^4 c^2 a^1>2) e8-1( g-2 |%28
  \break
  a4_\ff^~^\markup{\finger"3-1"}  a8 c b g |%29
  c^\markup{\italic "riten."} d) e2\fermata |%30
  \tempo "Più lento"
  e,8-3( d-2 c4-1 d-2 |%31
  c2.-1^~) |%32
  c2\fermata %33
  \bar "|."

}

left = \relative c, {
  \global
  % Music follows here.
  \set fingeringOrientations = #'(down)
  r4 |%0
  f2(_4 g4_3 |%1
  a2._2) |%2
  f2_4 g4_3 |%3
  c2._1 |%4
  f,2 g4 |%5
  a2. |%6
  f2 g4 |%7
  c2. |%8
  b2_2 a4_3 |%9
  b2._1 |%10
  g2._3 |%11
  f2._4 |%12
  a4_1 g_2 f_3 |%13
  e2._4 |%14
  f2._3 |%15
  b4_1 a_2 g_3 |%16

  <f-4 c'-1>2. |%17
  <e-5 c'-1>2. |%18
  <f-4 c'-1>2. |%19
  < a_2 c_1> |%20
  <f c'> |%21
  <e c'> |%22
  f2_4( g4_3 |%23
  c2._1) |%24
  f_3( |%25
  e_4 |%26
  f_3 |%27
  a2._1) |%28
  <f,-5 f'-1>2( <g g'>4 |%29
  <a a'>2.)\fermata |%30
  <f-5 f'-1>2( <g g'>4 |%31
  c2._3) |%32
  <c-5 e-3 g-1>2\fermata %33
}

pedal = {
  s4 s2.*5 
  s4 s4\sustainOn s4 s2\sustainOff s4 s2.
  s2\sustainOn s4\sustainOff s2.
  s2\sustainOn s4\sustainOff s2.*5
  s2 s8 s8\sustainOn 
  s2\sustainOff s8 s8\sustainOn
  s2\sustainOff s8 s8\sustainOn
  s2\sustainOff s8 s8\sustainOn
  s2\sustainOff s8 s8\sustainOn
  s4\sustainOff s2\sustainOn
  s2.\sustainOff
  s2.\sustainOn
  s2.\sustainOn
  s2.\sustainOn
  s2.\sustainOn
  s2.\sustainOn
  s2\sustainOn s4\sustainOn
  s4\sustainOff s2\sustainOn
  s4\sustainOff s4\sustainOn s4\sustainOn
  s2\sustainOff s8 s8\sustainOn
  
}

\score {
  \new PianoStaff \with {
    instrumentName = "Piano"
  } <<
    \new Staff = "right" \with {
      midiInstrument = "acoustic grand"
    } \right
    \new Staff = "left" \with {
      midiInstrument = "acoustic grand"
    } { \clef bass \left }
    \new Dynamics = "pedal" {
      \pedal
    }
  >>
  \layout { }
  \midi {
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 100 4)
    }
  }
}