運命第一主題

LilyPond

今日の楽譜ですが、コードなしのときの

  N.C.

という表示と、

  G#dim7

とかの表示に苦労しました。コードとして機能させるためには、コードのルールに従って表記を定義する必要があります。むずかしくはないです。

unmei1st02.pdf 直
unmei1st02.midi 直

\version "2.14.2"

\header {
  title = "運命第一主題"
  composer = "ベートーベン"
}

global = {
  \key c \major
  \numericTimeSignature
  \time 2/4
  \tempo 4=160
}

chExceptionMusic = {
  <c es ges>1-\markup { \super "dim" }
  <c es ges beses>1^\markup { \super "dim7" }
}
chExceptions = #( append
                  ( sequential-music-to-chord-exceptions chExceptionMusic #t)
                  ignatzekExceptions)

chordNames = \chordmode {
  \global
  \set chordChanges = ##t
  \set chordNameExceptions = #chExceptions
  % Chords follow here.
  s2 s s s s a:m a:m a:m a:m %line1
  a:m gis:dim7 e:7 e:7  e:7 a:m e:7 a:m e:7 %line2
  a:m f:7 e s s s s gis:dim7 gis:dim7 %line2
  e:7 a:m gis:dim7 gis:dim7 e:7 a:m a:m gis:dim7 a:m %line4
  a:m gis:dim7 a:7 d:m a:7 d:m gis:dim7 a:m a:m %line5
  a:m a:m e:7 e:7 e:7
  \set chordChanges = ##f
  e4:7
  \set chordChanges = ##t
  a:m a2:dim7 a:dim7  a:dim7 %line6
  a:dim7 a:dim7 s g s s s s c
  d:m g:7 c c d:m g:7 c c d:m g:7
  c c cis:dim a:7 d:m bes c c:7 f f
  fis:dim7 fis:dim7 c:m c:m as:7 as:7 a:dim7 a:dim7 a:dim7 a:dim7
  g:7 g:7 c g:7 c f:6 c g g:7 g:7
  c d4:m g:7 c2 f4 d:m7 c2 g c c c g
  c c c g c g c g c c
}

melody = \relative c'' {
  \global
  % Music follows here.
  r8^\markup { N.C. } e,[ e e] |%1
  c2\fermata |%2
  r8 d[ d d] |%3
  b2~ |%4
  b2\fermata |%5
  r8 e[ e e] |%6
  c[ f f f] |%7
  e[ c' c c] |%8
  a2 |%9
  \break
  r8 e[ e e] |%10
  b[ f' f f] |%11
  e[ d' d d] |%12
  b2~ |%13
  b8[ e e d] |%14
  c4. d8 |%15
  b[ e e d] |%16
  c4. d8 |%17
  b[ e e d] |%18
  \break
  c4 r | %19
  a r |%20
  e'\fermata r\fermata |%21
  r8^\markup { "N.C." }  f,[ f f] |%22
  d2~ |%23
  d2\fermata |%24
  r8^\markup { "N.C." }  f'[ f f] |%25
  d[ b b b] |%26
  gis[ f f f] |%27
  \break
  e2 |%28
  r8 f'[ f f] |%29
  d b[ b b] |%30
  gis[ f f f] |%31
  e2 |%32
  c8[ e a a] |%33
  a2 |%34
  gis8[ gis gis b] |%35
  b2 |%36
  \break
  a8[ a a c] |%37
  c[ b b d] |%38
  d[ cis cis e] |%39
  e[ d d f] |%40
  f[ e e g] |%41
  g[ f f a] |%42
  a[ gis gis b] |%43
  a[ c c c] |%44
  a[ e e e] |%45
  \break
  c[ a e e] |%46
  c[ a a a] |%47
  r d''[ b b] |%48
  gis[ e d d] |%49
  b[ gis e d] |%50
  b[ gis a a]  |%51
  r c''[ c c] |%52
  a[ fis fis fis] |%53
  es[ c c c] |%54
  \break
  a[ fis fis fis] |%55
  fis4 r |%56
  r2 |%57
  g4 r |%58
  r8^\markup { N.C. } g'[ g g] |%59
  c,2 |%60
  d |%61
  g, |%62
  g4 c |%63
  \break
  b4 c |%64
  d a |%65
  a g |%66
  g c |%67
  b c |%68
  d a |%69
  a g |%70
  g c |%71
  b c |%72
  d a |%73
  \break
  a g  |%74
  g a |%75
  bes a  |%76
  g a |%77
  g f |%78
  bes c |%79
  d c |%80
  bes c |%81
  bes a |%82
  c d |%83
  \break
  es d |%84
  c d |%85
  es d |%86
  c d |%87
  es d |%88
  c d |%89
  es d |%90
  c d |%91
  es d |%92
  es fis |%93
  \break
  g2~ |%94
  g8[ a g f!] |%95 natural sign
  f[ e d c] |%96
  c[ b a b] |%97
  d[ c g e] |%98
  b'[ a f d] |%99
  a'[ g e c] |%100
  g fis''[ g fis] |%101
  g[ fis g fis] |%102
  g[ a g f!] |%103 natural sign
  \break
  f[ e d c] |%104
  c[ b a b] |%105
  d[ c g e] |%106
  b'[ a f d] |%107
  a'[ g e c] |%108
  g g'[ g' g] |%109
  c,[ e e e] |%110
  c[ g g g] |%111
  e[ c c c] |%112
  g[ d' d d] |%113
  \break
  e[ e' e e] |%114
  c[ g g g] |%115
  e[ c c c] |%116
  g g''[ g g]  |%117
  g4 r |%118
  r8 g[ g g] |%119
  g4 r |%120
  r8 b[ b b]  |%121
  c4 c, |%122
  c2\fermata |%123
  \bar "|."
}

verse = \lyricmode {
  % Lyrics follow here.

}

\score {
  <<
    \new ChordNames \chordNames
    \new Staff { \melody }
    \addlyrics { \verse }
  >>
  \layout { }
  \midi { }
}