input/star-spangled-banner.ly

   1 %{
   2 Converted from star.mup with the aid of mup2ly.py
   3 http://www.Arkkra.com/doc/star.html
   4 http://www.Arkkra.com/doc/star.ps
   5 %}
   6
   7 \header{
   8         title="The Star Spangled Banner";
   9         subtitle="The United States National Anthem";
  10         poet="Text by Francis Scott Key";
  11         composer="J. S. Smith";
  12         arranger="Arranged by William J. Krauss";
  13         enteredby="jcn";
  14         copyright="public domain";
  15 }
  16
  17 $staff1_voice_1 = \notes {
  18   a8.()fis16
  19   \repeat semi 2 { d4 fis4 a4 d'2 fis'8. e'16 d'4 fis4 gis4 a2 a8 a8
  20   fis'4. e'8 d'4 cis'2 b8. cis'16 d'4 d'4 a4 }
  21   \alternative { { fis4 d4 a8. fis16 } { fis4 d4 fis'8. fis'16 } }
  22   fis'4 g'4 a'4 a'2 g'8 fis'8 e'4 fis'4
  23   g'4 g'2 g'4 fis'4. e'8 d'4 cis'2 b8. cis'16 d'4 fis4 gis4 a2 a4
  24   d'4 d'4 d'8()cis'8 b4 b4 b4 e'4 g'8 ()fis'8  e'8()d'8
  25   d'4()cis'4 a8. a16 d'4.()e'8 fis'8 g'8 a'2 d'8 e'8 fis'4. g'8
  26   e'4 d'2 s4
  27 }
  28
  29 $staff1_voice_2 = \notes {
  30   a8.()fis16
  31   \repeat semi 2 { a,4 d4 e4 d4 () fis4 fis8. fis16 fis4 d4 d4 cis2
  32   e8 e8 a4. a8 a4 a2 a8. a16 a4 a4 a4 }
  33   \alternative { { fis4 d4 a8. fis16 } { fis4 d4 r4 } }
  34   a4 a4 d'4 d'2 a8 a8 cis'4 cis'4 cis'4 cis'2 a4 a4. a8 a4 a2
  35   a8. a16 d4 d4 d4 cis2 e4 fis4 e4 d4 d4 d4 dis4 g4 g8()dis8 e4 e2
  36   e8. e16 d4.()a8 a8 a8 a2 g8 g8 a4. a8 g4 fis2 s4
  37 }
  38
  39 $staff2_voice_1 = \notes {
  40   r4
  41   \repeat semi 2 { fis4 a4 a4 b2 cis'8. cis'16 b4 b4 b4 a2 cis'8 cis'8
  42   d'4. cis'8 d'4 e'2 e'8. e'16 d'4 d'4 a4 }
  43   \alternative { { fis4 d4 r4 } { fis4 d4 r4 } }
  44   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
  45   e'8. e'16 a4 a4 e4 e2 cis'4 a4 a4 a4 g4 g4 b4 b4 b4 b4 a2
  46   cis'8. cis'16 a4.()cis'8 d'8 d'8 d'2 d'8 d'8 d'4. d'8 cis'4
  47   a2 s4
  48 }
  49
  50 $staff2_voice_2 = \notes {
  51   r4
  52   \repeat semi 2 { d4 d4 cis4 b,2 ais,8. ais,16 b,4 b,4 e4 a,2 a8 a8
  53   d4. e8 fis8 g8 a2 g8. g16 fis4 fis4 a4 }
  54   \alternative { { fis4 d4 r4 } { fis4 d4 r4 } }
  55   d4 d4 d4 d2 d8 d8 a4 a4 a4 a2 a,4 d4. e8 fis8 g8 a2 g8. g16
  56   fis4 d4 e4 a,2 a4 d4 e4 fis4 g4 g4 fis4 e4 e8()fis8  g8()gis8 a2
  57   g8. g16 fis4.()a,8 d8 e8 fis2 b8 b8 a4. a8 a,4 d2 s4
  58 }
  59
  60 % hw: how does this work with new repeats?
  61 textx = \lyrics {
  62   Oh4 __ \repeat fold 2 { }
  63   \alternative {
  64      {
  65        say.4 can you | see,2 by8. the16 dawn's4 ear- ly light2 What8
  66        so8 proud-4. ly8 we4 hailed,2 At8. the16 twi-4 light's last gleam-
  67        ing. Whose8. broad16
  68      }
  69
  70     {
  71       stripes4 and bright stars,2 through8. the16 per-4 il- ous fight,2
  72       O'er8 the8 ram-4. parts8 we4 watched,2 were8. so16 gal-4 lant- ly
  73     }
  74   }
  75   stream-4 ing. And8. the16 rock-4 ets' red glare,2 the8 bombs8
  76   burst-4 ing in air,2 gave4 proof4. through8 the4 night2 that8.
  77   our16 flag4 was still there,2 Oh4 say, does that star- span-
  78   gled ban- ner yet wave,2 __ O'er8. the16 land2 __ of8 the8 free2
  79   and8 the8 home4. of8 the4 brave.2
  80 }
  81
  82 textxx = \lyrics {
  83   Oh __ " " \repeat fold 2 { }
  84   \alternative {
  85      {
  86        say. can you | see, by the16 dawn's ear- ly light What
  87        so proud- ly we hailed, At the16 twi- light's last gleam-
  88        ing. Whose broad16
  89      }
  90
  91     {
  92       stripes and bright stars, through the16 per- il- ous fight,
  93       O'er the ram- parts we watched, were so16 gal- lant- ly
  94     }
  95   }
  96   stream- ing. And the16 rock- ets' red glare, the bombs
  97   burst- ing in air, gave proof through the night that
  98   our flag was still there, Oh say, does that star- span-
  99   gled ban- ner yet wave, __ O'er the land __ of the free
 100   and the home of the brave.
 101 }
 102
 103 textxxx = \lyrics {
 104   Oh4 __
 105   %\alternative {
 106      {
 107        say.4 can you | see,2 by8. the16 dawn's4 ear- ly light2 What8
 108        so8 proud-4. ly8 we4 hailed,2 At8. the16 twi-4 light's last gleam-
 109        ing. Whose8. broad16
 110      }
 111
 112     %{
 113       stripes4 and bright stars,2 through8. the16 per-4 il- ous fight,2
 114       O'er8 the8 ram-4. parts8 we4 watched,2 were8. so16 gal-4 lant- ly
 115     }
 116   %}
 117   stream-4 ing. And8. the16 rock-4 ets' red glare,2 the8 bombs8
 118   burst-4 ing in air,2 gave4 proof4. through8 the4 night2 that8.
 119   our16 flag4 was still there,2 Oh4 say, does that star- span-
 120   gled ban- ner yet wave,2 __ O'er8. the16 land2 __ of8 the8 free2
 121   and8 the8 home4. of8 the4 brave.2
 122 }
 123
 124 text = \lyrics {
 125   Oh __ " "
 126   %\alternative {
 127      {
 128        say. can you | see, " " by the16 dawn's ear- ly light What
 129        so proud- ly we hailed, At the16 twi- light's last gleam-
 130        ing. Whose broad16
 131      }
 132
 133     %{
 134       stripes and bright stars, through the16 per- il- ous fight,
 135       O'er the ram- parts we watched, were so16 gal- lant- ly
 136     }
 137   %}
 138   stream- ing. And the16 rock- ets' red glare, the bombs
 139   burst- ing in air, gave proof through the night that
 140   our flag was still there, Oh say, does that " " star- span-
 141   gled ban- ner " " yet " " wave, __ " " O'er the land __ " " of the free
 142   and the home of the brave.
 143 }
 144
 145 global = \notes {
 146         \time 3/4;
 147         \key D;
 148         \partial 4;
 149         \skip 4;
 150         \skip 2.*8;
 151         \skip 2.*16;
 152         \skip 2.;
 153         \bar "|.";
 154         }
 155
 156 \include "paper16.ly";
 157
 158 \score{
 159         \context GrandStaff <
 160                 \addlyrics
 161                 \context Staff=staffA <
 162                         \global
 163                         \notes \transpose c'' {\voiceone \$staff1_voice_1 }
 164                         \notes \transpose c'' {\voicetwo \$staff1_voice_2 }
 165                 >
 166                 \context LyricVoice \text
 167                 \context Staff=staffB <
 168
 169                         \global
 170                         \clef bass;
 171                         \property Staff.voltaVisibility = "0"
 172                         {\voiceone \$staff2_voice_1 }
 173                         {\voicetwo \$staff2_voice_2 }
 174                 >
 175         >
 176         \paper{
 177                 \paper_sixteen
 178                 textheight = 230.\mm;
 179                 linewidth= 180.\mm;
 180                 \translator {
 181                         \GrandStaffContext
 182                         \accepts "Lyrics";
 183                 }
 184 %               castingalgorithm = \Wordwrap;
 185         }
 186         \midi {}
 187 }
 188
 189
 190 \version "1.1.52";