ふるさと(故郷)

Gmaj7というコードが、デフォルトだとG△になってしまうのを直してありますが、もっと簡単な直し方があるに違いない。

furusato01.pdf 直
furusato01.midi 直

\version "2.16.0"

\header {
  title = "ふるさと(故郷)"
  composer = "岡野貞一"
}

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

global = {
  \key g \major
  \numericTimeSignature
  \time 3/4
  \tempo 4=88
}

chordNames = \chordmode {
  \global
  % Chords follow here.
  \set chordNameExceptions = #chExceptions
  g2. d:7 g g:maj7
  c g d:7 g
  d:7 g2 g4:7 c2. g2.
  g2 g4:maj7 e2:m7 e4:7 a2:m7 d4:7 g2
  
}

melody = \relative c'' {
  \global
  % Music follows here.
  g4 g g |%1
  a4. b8 a4 |%2
  b4 b c |%3
  d2 r4 |%4
  \break
  c d  e |%5
  b4. c8 b4 |%6
  a4 a fis |%7 
  g2 r4 |%8
  \break
  a8 g a4 d, |%9
  g8 a b4 b |%10
  c8 b c4. e8 |%11
  d c b4 r |%12
  \break
  d d d |%13
  g,4. a8 b4 |%14
  c c a |%15
  g2 r4 |%16
  \bar "|."
  
}

verse = \lyricmode {
  % Lyrics follow here.
  
}

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