]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/star-spangled-banner.ly
covnert-ly
[lilypond.git] / input / star-spangled-banner.ly
index 383bfe90e2f6a96945a4b640def18c8269d4bb09..dae684f4e65ca3bfc50fb04daaa266616cb43e22 100644 (file)
@@ -1,24 +1,38 @@
+\version "1.5.68"
 %{
 Converted from star.mup with the aid of mup2ly.py
-http://www.Arkkra.com/doc/star.html
-http://www.Arkkra.com/doc/star.ps
+http://www.arkkra.com/doc/star.html
+http://www.arkkra.com/doc/star.ps
 %}
 
+
+
 \header{
-       title="The Star Spangled Banner";
-       subtitle="The United States National Anthem";
-       poet="Text by Francis Scott Key";
-       composer="J. S. Smith";
-       arranger="Arranged by William J. Krauss";
-       enteredby="jcn";
-       copyright="public domain";
+       title="The Star Spangled Banner"
+       subtitle="The United States National Anthem"
+       poet="Text by Francis Scott Key"
+       composer="J. S. Smith"
+       arranger="Arranged by William J. Krauss"
+       enteredby="jcn"
+       copyright="public domain"
+}
+
+global =  \notes {
+  \time 3/4 
+  \key d \major
+  \partial 4
 }
 
-$staff1_voice_1 = \notes {
+staffBVoiceB =  \notes {
   a8.()fis16 
-  \repeat semi 2 { d4 fis4 a4 d'2 fis'8. e'16 d'4 fis4 gis4 a2 a8 a8 
-  fis'4. e'8 d'4 cis'2 b8. cis'16 d'4 d'4 a4 }
-  \alternative { { fis4 d4 a8. fis16 } { fis4 d4 fis'8. fis'16 } } 
+  \repeat volta 2 { 
+    d4 fis4 a4 d'2 fis'8. e'16 d'4 fis4 gis4 a2 a8 a8 
+    fis'4. e'8 d'4 cis'2 b8. cis'16 d'4 d'4 a4 
+  }
+  \alternative { 
+    { fis4 d4 a8. fis16 } 
+    { fis4 d4 fis'8. fis'16 }
+  } 
   fis'4 g'4 a'4 a'2 g'8 fis'8 e'4 fis'4
   g'4 g'2 g'4 fis'4. e'8 d'4 cis'2 b8. cis'16 d'4 fis4 gis4 a2 a4
   d'4 d'4 d'8()cis'8 b4 b4 b4 e'4 g'8 ()fis'8  e'8()d'8 
@@ -26,165 +40,128 @@ $staff1_voice_1 = \notes {
   e'4 d'2 s4 
 }
 
-$staff1_voice_2 = \notes { 
+staffBVoiceC =  \notes { 
   a8.()fis16 
-  \repeat semi 2 { a,4 d4 e4 d4 () fis4 fis8. fis16 fis4 d4 d4 cis2
-  e8 e8 a4. a8 a4 a2 a8. a16 a4 a4 a4 }
-  \alternative { { fis4 d4 a8. fis16 } { fis4 d4 r4 } }
+  \repeat volta 2 { 
+    a,4 d4 e4 d4 () fis4 fis8. fis16 fis4 d4 d4 cis2
+    e8 e8 a4. a8 a4 a2 a8. a16 a4 a4 a4 
+  }
+  \alternative { 
+    { fis4 d4 a8. fis16 } 
+    { fis4 d4 r4 } 
+  }
   a4 a4 d'4 d'2 a8 a8 cis'4 cis'4 cis'4 cis'2 a4 a4. a8 a4 a2
   a8. a16 d4 d4 d4 cis2 e4 fis4 e4 d4 d4 d4 dis4 g4 g8()dis8 e4 e2
   e8. e16 d4.()a8 a8 a8 a2 g8 g8 a4. a8 g4 fis2 s4 
 }
 
-$staff2_voice_1 = \notes { 
+staffCVoiceB =  \notes { 
   r4 
-  \repeat semi 2 { fis4 a4 a4 b2 cis'8. cis'16 b4 b4 b4 a2 cis'8 cis'8 
-  d'4. cis'8 d'4 e'2 e'8. e'16 d'4 d'4 a4 }
-  \alternative { { fis4 d4 r4 } { fis4 d4 r4 } }
+  \repeat volta 2 { 
+    fis4 a4 a4 b2 cis'8. cis'16 b4 b4 b4 a2 cis'8 cis'8 
+    d'4. cis'8 d'4 e'2 e'8. e'16 d'4 d'4 a4 
+  }
+  \alternative { 
+    { fis4 d4 r4 } 
+    { fis4 d4 r4 } 
+  }
   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
   e'8. e'16 a4 a4 e4 e2 cis'4 a4 a4 a4 g4 g4 b4 b4 b4 b4 a2
   cis'8. cis'16 a4.()cis'8 d'8 d'8 d'2 d'8 d'8 d'4. d'8 cis'4
   a2 s4 
 }
 
-$staff2_voice_2 = \notes { 
+staffCVoiceC =  \notes { 
   r4 
-  \repeat semi 2 { d4 d4 cis4 b,2 ais,8. ais,16 b,4 b,4 e4 a,2 a8 a8 
-  d4. e8 fis8 g8 a2 g8. g16 fis4 fis4 a4 }
-  \alternative { { fis4 d4 r4 } { fis4 d4 r4 } } 
+  \repeat volta 2 { 
+    d4 d4 cis4 b,2 ais,8. ais,16 b,4 b,4 e4 a,2 a8 a8 
+    d4. e8 fis8 g8 a2 g8. g16 fis4 fis4 a4 
+  }
+  \alternative { 
+    { fis4 d4 r4 } 
+    { fis4 d4 r4 } 
+  }
   d4 d4 d4 d2 d8 d8 a4 a4 a4 a2 a,4 d4. e8 fis8 g8 a2 g8. g16 
   fis4 d4 e4 a,2 a4 d4 e4 fis4 g4 g4 fis4 e4 e8()fis8  g8()gis8 a2 
   g8. g16 fis4.()a,8 d8 e8 fis2 b8 b8 a4. a8 a,4 d2 s4 
 }
 
-% hw: how does this work with new repeats?
-textx = \lyrics {  
-  Oh4 __ \repeat fold 2 { }
+text =  \lyrics {  
+  Oh __ \repeat "fold" 2 { }
   \alternative {
-     { 
-       say.4 can you | see,2 by8. the16 dawn's4 ear- ly light2 What8
-       so8 proud-4. ly8 we4 hailed,2 At8. the16 twi-4 light's last gleam-
-       ing. Whose8. broad16 
-     }
-
     { 
-      stripes4 and bright stars,2 through8. the16 per-4 il- ous fight,2
-      O'er8 the8 ram-4. parts8 we4 watched,2 were8. so16 gal-4 lant- ly 
+      say, can you | see, by the dawn's ear -- ly light 
+      What so proud -- ly we hailed, 
+      At the twi -- light's last gleam -- ing. 
+      % Ah, it seems that this context stops to exist just before
+      % the :| barline is set, and doesn't see its width?
+      % Ugly fix:
+      Whose broad \bar "|."
     }
-  }
-  stream-4 ing. And8. the16 rock-4 ets' red glare,2 the8 bombs8
-  burst-4 ing in air,2 gave4 proof4. through8 the4 night2 that8.
-  our16 flag4 was still there,2 Oh4 say, does that star- span-
-  gled ban- ner yet wave,2 __ O'er8. the16 land2 __ of8 the8 free2
-  and8 the8 home4. of8 the4 brave.2
-}
-
-textxx = \lyrics {  
-  Oh __ " " \repeat fold 2 { }
-  \alternative {
-     { 
-       say. can you | see, by the16 dawn's ear- ly light What
-       so proud- ly we hailed, At the16 twi- light's last gleam-
-       ing. Whose broad16 
-     }
-
+    \context LyricsVoice = "one-2" 
     { 
-      stripes and bright stars, through the16 per- il- ous fight,
-      O'er the ram- parts we watched, were so16 gal- lant- ly 
+      stripes and bright stars, through the per -- il -- ous fight,
+      O'er the ram -- parts we watched, were so gal -- lant -- ly
+      " " " " " "  " "% UGH UGH UGH 
+      stream -- ing
+
+      And the rock -- ets' red glare, the bombs burst -- ing in air, 
+      gave proof through the night that our flag was still there, 
+      Oh say, does that star -- span -- gled ban -- ner yet wave, __ 
+      O'er the land __ of the free and the home of the brave.
     }
   }
-  stream- ing. And the16 rock- ets' red glare, the bombs
-  burst- ing in air, gave proof through the night that
-  our flag was still there, Oh say, does that star- span-
-  gled ban- ner yet wave, __ O'er the land __ of the free
-  and the home of the brave.
-}
-
-textxxx = \lyrics {  
-  Oh4 __ 
-  %\alternative {
-     { 
-       say.4 can you | see,2 by8. the16 dawn's4 ear- ly light2 What8
-       so8 proud-4. ly8 we4 hailed,2 At8. the16 twi-4 light's last gleam-
-       ing. Whose8. broad16 
-     }
-
-    %{ 
-      stripes4 and bright stars,2 through8. the16 per-4 il- ous fight,2
-      O'er8 the8 ram-4. parts8 we4 watched,2 were8. so16 gal-4 lant- ly 
-    }
-  %}
-  stream-4 ing. And8. the16 rock-4 ets' red glare,2 the8 bombs8
-  burst-4 ing in air,2 gave4 proof4. through8 the4 night2 that8.
-  our16 flag4 was still there,2 Oh4 say, does that star- span-
-  gled ban- ner yet wave,2 __ O'er8. the16 land2 __ of8 the8 free2
-  and8 the8 home4. of8 the4 brave.2
 }
 
-text = \lyrics {  
-  Oh __ " "
-  %\alternative {
-     { 
-       say. can you | see, " " by the16 dawn's ear- ly light What
-       so proud- ly we hailed, At the16 twi- light's last gleam-
-       ing. Whose broad16 
-     }
-
-    %{ 
-      stripes and bright stars, through the16 per- il- ous fight,
-      O'er the ram- parts we watched, were so16 gal- lant- ly 
-    }
-  %}
-  stream- ing. And the16 rock- ets' red glare, the bombs
-  burst- ing in air, gave proof through the night that
-  our flag was still there, Oh say, does that " " star- span-
-  gled ban- ner " " yet " " wave, __ " " O'er the land __ " " of the free
-  and the home of the brave.
-}
-
-global = \notes {
-       \time 3/4;
-       \key D;
-       \partial 4;
-       \skip 4;
-       \skip 2.*8;
-       \skip 2.*16;
-       \skip 2.;
-       \bar "|.";
-       }
-
-\include "paper16.ly";
+\include "paper16.ly"
 
 \score{ 
-       \context GrandStaff < 
+       \context GrandStaff \notes 
                \addlyrics
-               \context Staff=staffA < 
+               \context Staff=upper <
                        \global
-                       \notes \transpose c'' {\voiceone \$staff1_voice_1 } 
-                       \notes \transpose c'' {\voicetwo \$staff1_voice_2 } 
+                       \clef treble
+                       \property Staff.automaticMelismata = ##t
+                       \context Voice = one \transpose c'' {
+                               \voiceOne
+                               \staffBVoiceB
+                               \bar "|."
+                       } 
+                       \context Voice = two \transpose c'' {
+                               \voiceTwo
+                               \staffBVoiceC
+                       }
                >
-               \context LyricVoice \text
-               \context Staff=staffB <
-               
+               \context LyricsVoice = "one-1" \text
+               \context Staff=lower <
                        \global
-                       \clef bass;
-                       \property Staff.voltaVisibility = "0"
-                       {\voiceone \$staff2_voice_1 } 
-                       {\voicetwo \$staff2_voice_2 } 
+                       \clef bass
+                       \property Staff.VoltaBracket = \turnOff
+                       \context Voice = three {
+                               \voiceOne
+                               \staffCVoiceB
+                       } 
+                       \context Voice = four {
+                               \voiceTwo
+                               \staffCVoiceC
+                       } 
                >
        >
        \paper{
-               \paper_sixteen
-               textheight = 230.\mm;
-               linewidth= 180.\mm;
+               \paperSixteen
+               textheight = 230.\mm
+               linewidth= 180.\mm
                \translator {
                        \GrandStaffContext
-                       \accepts "Lyrics";
+                       \accepts "Lyrics"
                }
-%              castingalgorithm = \Wordwrap;
+               \translator {
+                       \LyricsVoiceContext
+                       \consists "Bar_engraver"
+               }
+       }
+       \midi {
+               \tempo 4 = 60
        }
-       \midi {}
 }
 
-
-\version "1.1.52";