User:Bigpeteb/sandbox

From Wikipedia, the free encyclopedia

User:Bigpeteb/sandbox/Shi Deru User:Bigpeteb/sandbox/Unicoi Systems


<<
\new Staff \with {
    \remove "Slur_engraver"
    \remove "Phrasing_slur_engraver"
} \relative b {
    \clef "treble_8"
    \key b \minor
    \autoBeamOff
    b8. b16 b8 b cis_[( g fis cis'] |
    d8[ g, fis dis'] e16[ d c8~] c16[ b]) ais[ b] |
    ais8 g'[( fis]) e d cis16[ b] fis'4~ |
    fis4 eis fis
}
% \addlyrics {
%    Ky -- ri -- e e -- le -- i -- son
%    Ky -- ri -- e e -- le -- i -- son
%}
>>



<<
\new Staff \with {
    \remove "Slur_engraver"
    \remove "Phrasing_slur_engraver"
} \relative b {
\override Score.SpacingSpanner.common-shortest-duration = #(ly:make-moment 1/8)
    \clef "treble_8"
    \key b \minor
    \autoBeamOff
    b8. b16 b8 b cis_[( g fis cis'] |
    d8[ g, fis dis'] e16[ d c8~] c16[ b]) ais[ b] |
    ais8 g'[( fis]) e d cis16[ b] fis'4~ |
    fis4 eis fis
} \addlyrics {
%\override LyricHyphen.minimum-distance = #0.1
%\override LyricHyphen.minimum-length = #0.8
    Ky -- ri -- e e -- le -- i -- son
    Ky -- ri -- e e -- le -- i -- son
}
>>

<<
\new Staff \with {
    \remove "Slur_engraver"
    \remove "Phrasing_slur_engraver"
} \relative b {
\override Score.SpacingSpanner.common-shortest-duration = #(ly:make-moment 1/4)
    \clef "treble_8"
    \key b \minor
    \autoBeamOff
    b8. b16 b8 b cis_[( g fis cis'] |
    d8[ g, fis dis'] e16[ d c8~] c16[ b]) ais[ b] |
    ais8 g'[( fis]) e d cis16[ b] fis'4~ |
    fis4 eis fis
} \addlyrics {
    Ky -- ri -- e e -- le -- i -- son
    Ky -- ri -- e e -- le -- i -- son
}
>>

<<
\new Staff \with {
    \remove "Slur_engraver"
    \remove "Phrasing_slur_engraver"
} \relative b {
\override Score.SpacingSpanner.common-shortest-duration = #(ly:make-moment 1/4)
    \clef "treble_8"
    \key b \minor
    \autoBeamOff
    b8. b16 b8 b cis_[( g fis cis'] |
    d8[ g, fis dis'] e16[ d c8~] c16[ b]) ais[ b] |
    ais8 g'[( fis]) e d cis16[ b] fis'4~ |
    fis4 eis fis
} \addlyrics {
%\override LyricHyphen.minimum-distance = #0.1   % default=0.1
\override LyricHyphen.minimum-length = #0.7   % default=0.3
    Ky -- ri -- e e -- le -- i -- son
    Ky -- ri -- e e -- le -- i -- son
}
>>

<<
\new Staff \with {
    \remove "Slur_engraver"
    \remove "Phrasing_slur_engraver"
} \relative b {
\override Score.SpacingSpanner.common-shortest-duration = #(ly:make-moment 1/2)
    \clef "treble_8"
    \key b \minor
    \autoBeamOff
    b8. b16 b8 b cis_[( g fis cis'] |
    d8[ g, fis dis'] e16[ d c8~] c16[ b]) ais[ b] |
    ais8 g'[( fis]) e d cis16[ b] fis'4~ |
    fis4 eis fis
} \addlyrics {
%\override LyricHyphen.minimum-distance = #0.1   %default=0.1
\override LyricHyphen.minimum-length = #0.7   %default=0.3
    Ky -- ri -- e e -- le -- i -- son
    Ky -- ri -- e e -- le -- i -- son
}
>>

<<
\new Staff \with {
    \remove "Slur_engraver"
    \remove "Phrasing_slur_engraver"
} \relative b {
\override Score.SpacingSpanner.common-shortest-duration = #(ly:make-moment 1/2)
    \clef "treble_8"
    \key b \minor
    \autoBeamOff
    b8. b16 b8 b cis_[( g fis cis'] |
    d8[ g, fis dis'] e16[ d c8~] c16[ b]) ais[ b] |
    ais8 g'[( fis]) e d cis16[ b] fis'4~ |
    fis4 eis fis
} \addlyrics {
%\override LyricHyphen.minimum-distance = #0.1   %default=0.1
\override LyricHyphen.minimum-length = #0.7   %default=0.3
\set lyricMelismaAlignment = #CENTER
    Ky -- ri -- e e -- le -- i -- son
\unset lyricMelismaAlignment
    Ky -- ri -- e e --
\set lyricMelismaAlignment = #CENTER
    le -- i -- son
}
>>

<<
\new Staff \with {
    \remove "Slur_engraver"
    \remove "Phrasing_slur_engraver"
} \new Lyrics \lyricmode {
    Kyrie1 eleison
    Kyrie ele -- ison
    Ky8 -- ri -- e e -- le -- i -- son
    Ky -- ri -- e e -- le -- i -- son
}
>>



\new ChoirStaff <<
  \new Staff = "tenors" \relative c' {
    \clef "treble_8"
\showStaffSwitch
    bes2 bes |
    bes4 bes \change Staff = "basses" bes bes |
  }
  \addlyrics {
    Tenor tenor tenor tenor tenor tenor
  }
  \new Staff = "baritones" \relative g {
    \clef "bass"
\showStaffSwitch
    g2 g \change Staff = "tenors" |
    g4 g g g |
  }
  \addlyrics {
    Bari bari bari bari bari bari
  }
  \new Staff = "basses" \relative c {
    \clef "bass"
\showStaffSwitch
    c2 c \change Staff = "baritones" |
    c4 c c c |
  }
  \addlyrics {
    Bass bass bass bass bass bass
  }
>>



<<
  \new ChordNames {
    \chordmode {
      e1:m c g:6 g:1.5/fis
    }
  }
  \new Staff {
    {
      <e' g' b'>1^\markup {
        \fret-diagram #"s:2;f:1;6-o;5-2-2;4-2-3;3-o;2-o;1-o;"
      }
      <c'' e'' g''>1^\markup {
        \fret-diagram #"s:2;f:1;6-x;5-3-3;4-2-2;3-o;2-1-1;1-o;"
      }
      <g' b' d'' e''>1^\markup {
        \fret-diagram #"s:2;f:1;6-3-3;5-2-2;4-o;3-o;2-3-4;1-o;"
      }
      <fis' g' b' d''>1^\markup {
        \fret-diagram #"s:2;f:1;c:6-5-2;c:2-1-3;6-2-2;5-x;4-o;3-o;2-3-4;1-3-4;"
      }
    }
  }
>>