input/star-spangled-banner.ly

   1 \version "1.3.146"
   2 %{
   3 Converted from star.mup with the aid of mup2ly.py
   4 http://www.arkkra.com/doc/star.html
   5 http://www.arkkra.com/doc/star.ps
   6 %}
   7
   8
   9
  10 \header{
  11         title="The Star Spangled Banner"
  12         subtitle="The United States National Anthem"
  13         poet="Text by Francis Scott Key"
  14         composer="J. S. Smith"
  15         arranger="Arranged by William J. Krauss"
  16         enteredby="jcn"
  17         copyright="public domain"
  18 }
  19
  20 global =  \notes {
  21   \time 3/4
  22   \key d \major
  23   \partial 4
  24 }
  25
  26 staffBVoiceB =  \notes {
  27   a8.()fis16
  28   \repeat volta 2 {
  29     d4 fis4 a4 d'2 fis'8. e'16 d'4 fis4 gis4 a2 a8 a8
  30     fis'4. e'8 d'4 cis'2 b8. cis'16 d'4 d'4 a4
  31   }
  32   \alternative {
  33     { fis4 d4 a8. fis16 }
  34     { fis4 d4 fis'8. fis'16 }
  35   }
  36   fis'4 g'4 a'4 a'2 g'8 fis'8 e'4 fis'4
  37   g'4 g'2 g'4 fis'4. e'8 d'4 cis'2 b8. cis'16 d'4 fis4 gis4 a2 a4
  38   d'4 d'4 d'8()cis'8 b4 b4 b4 e'4 g'8 ()fis'8  e'8()d'8
  39   d'4()cis'4 a8. a16 d'4.()e'8 fis'8 g'8 a'2 d'8 e'8 fis'4. g'8
  40   e'4 d'2 s4
  41 }
  42
  43 staffBVoiceC =  \notes {
  44   a8.()fis16
  45   \repeat volta 2 {
  46     a,4 d4 e4 d4 () fis4 fis8. fis16 fis4 d4 d4 cis2
  47     e8 e8 a4. a8 a4 a2 a8. a16 a4 a4 a4
  48   }
  49   \alternative {
  50     { fis4 d4 a8. fis16 }
  51     { fis4 d4 r4 }
  52   }
  53   a4 a4 d'4 d'2 a8 a8 cis'4 cis'4 cis'4 cis'2 a4 a4. a8 a4 a2
  54   a8. a16 d4 d4 d4 cis2 e4 fis4 e4 d4 d4 d4 dis4 g4 g8()dis8 e4 e2
  55   e8. e16 d4.()a8 a8 a8 a2 g8 g8 a4. a8 g4 fis2 s4
  56 }
  57
  58 staffCVoiceB =  \notes {
  59   r4
  60   \repeat volta 2 {
  61     fis4 a4 a4 b2 cis'8. cis'16 b4 b4 b4 a2 cis'8 cis'8
  62     d'4. cis'8 d'4 e'2 e'8. e'16 d'4 d'4 a4
  63   }
  64   \alternative {
  65     { fis4 d4 r4 }
  66     { fis4 d4 r4 }
  67   }
  68   d4 e4 fis4 fis'2 e'8 d'8 e'4 e'4 e'4 e'2 cis'4 d'4. cis'8 d'4 e'2
  69   e'8. e'16 a4 a4 e4 e2 cis'4 a4 a4 a4 g4 g4 b4 b4 b4 b4 a2
  70   cis'8. cis'16 a4.()cis'8 d'8 d'8 d'2 d'8 d'8 d'4. d'8 cis'4
  71   a2 s4
  72 }
  73
  74 staffCVoiceC =  \notes {
  75   r4
  76   \repeat volta 2 {
  77     d4 d4 cis4 b,2 ais,8. ais,16 b,4 b,4 e4 a,2 a8 a8
  78     d4. e8 fis8 g8 a2 g8. g16 fis4 fis4 a4
  79   }
  80   \alternative {
  81     { fis4 d4 r4 }
  82     { fis4 d4 r4 }
  83   }
  84   d4 d4 d4 d2 d8 d8 a4 a4 a4 a2 a,4 d4. e8 fis8 g8 a2 g8. g16
  85   fis4 d4 e4 a,2 a4 d4 e4 fis4 g4 g4 fis4 e4 e8()fis8  g8()gis8 a2
  86   g8. g16 fis4.()a,8 d8 e8 fis2 b8 b8 a4. a8 a,4 d2 s4
  87 }
  88
  89 text =  \lyrics {
  90   Oh __ \repeat "fold" 2 { }
  91   \alternative {
  92     {
  93       say, can you | see, by the dawn's ear -- ly light
  94       What so proud -- ly we hailed,
  95       At the twi -- light's last gleam -- ing.
  96       % Ah, it seems that this context stops to exist just before
  97       % the :| barline is set, and doesn't see its width?
  98       % Ugly fix:
  99       Whose broad \bar "|."
 100     }
 101     \context LyricsVoice = "one-2"
 102     {
 103       stripes and bright stars, through the per -- il -- ous fight,
 104       O'er the ram -- parts we watched, were so gal -- lant -- ly
 105       " " " " " "  " "% UGH UGH UGH
 106       stream -- ing
 107
 108       And the rock -- ets' red glare, the bombs burst -- ing in air,
 109       gave proof through the night that our flag was still there,
 110       Oh say, does that star -- span -- gled ban -- ner yet wave, __
 111       O'er the land __ of the free and the home of the brave.
 112     }
 113   }
 114 }
 115
 116 \include "paper16.ly"
 117
 118 \score{
 119         \context GrandStaff \notes <
 120                 \addlyrics
 121                 \context Staff=upper <
 122                         \global
 123                         \clef treble
 124                         \property Staff.automaticMelismata = ##t
 125                         \context Voice = one \transpose c'' {
 126                                 \voiceOne
 127                                 \staffBVoiceB
 128                                 \bar "|."
 129                         }
 130                         \context Voice = two \transpose c'' {
 131                                 \voiceTwo
 132                                 \staffBVoiceC
 133                         }
 134                 >
 135                 \context LyricsVoice = "one-1" \text
 136                 \context Staff=lower <
 137                         \global
 138                         \clef bass
 139                         \property Staff.VoltaBracket = \turnOff
 140                         \context Voice = three {
 141                                 \voiceOne
 142                                 \staffCVoiceB
 143                         }
 144                         \context Voice = four {
 145                                 \voiceTwo
 146                                 \staffCVoiceC
 147                         }
 148                 >
 149         >
 150         \paper{
 151                 \paperSixteen
 152                 textheight = 230.\mm
 153                 linewidth= 180.\mm
 154                 \translator {
 155                         \GrandStaffContext
 156                         \accepts "Lyrics"
 157                 }
 158                 \translator {
 159                         \LyricsVoiceContext
 160                         \consists "Bar_engraver"
 161                 }
 162         }
 163         \midi {
 164                 \tempo 4 = 60
 165         }
 166 }
 167