X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=input%2Ftwinkle-pop.ly;h=e5073265d0e7d8e1376f4469b73fe05ba4ec62da;hb=38d60c0c4e8c29beccd4acfd07aadf1cdea74097;hp=842f3c4185757838d8c9b4c7763f7609490eedcb;hpb=b71bb68fd8b36ec4b00cfec5e620c53087983fc0;p=lilypond.git

diff --git a/input/twinkle-pop.ly b/input/twinkle-pop.ly
index 842f3c4185..e5073265d0 100644
--- a/input/twinkle-pop.ly
+++ b/input/twinkle-pop.ly
@@ -1,46 +1,71 @@
+\version "1.3.146"
 \header{
-filename =	 "twinkle.ly";
-title =	 "Ah, vous dirais-je, maman ";
-description =	 "twinkle twinkle in pop-song-settings";
-composer =	 "traditional";
-
-enteredby =	 "HWN, chords by Johan Vromans";
-copyright =	 "public domain";
+filename = 	 "twinkle-pop.ly"
+xtitle = 	 "Ah, vous dirais-je, maman "
+description = 	 "twinkle twinkle in pop-song-settings"
+composer = 	 "traditional"
+enteredby = 	 "HWN, chords by Johan Vromans"
+copyright = 	 "public domain"
 }
 
-%{
-Tested Features		lyrics and chords
-%}
 
-\version "1.0.4";
+melodie =  \notes\relative c'' {
+        \clef "violin"
+        \time 2/4 
 
-melodie = \notes\relative c {
-        \clef"violin";
-        \time 2/4 ;
+        c4 c  | g' g | a a | g2  |
+        f4 f  | e e  | d d | c2  |
+        g'4 g | f f  | e e | d d |
+        g  g  | f f  | e e | d d |
+	% copy 1-8
+        c4 c  | g' g | a a | g2  |
+        f4 f  | e e  | d d | c2 \bar "|."
+}
 
-        c''4^"C" c |    g'    g |       a^"F"  a |      g2^"C"   |
-        f4^"F" f |      e^"C" e |       d^"G7" d |      c2^"C"   |
-        g'4^"G" g |      f^"F" f |       e^"C"  e |      d^"G7" d |
-        g^"G"  g |      f^"F" f |       e^"C"  e |      d^"G7" d |
-        c4^"C" c |      g'    g |       a^"F"  a |      g2^"C"   |
-        f4^"F" f |      e^"C" e |       d^"G7" d |      c2^"C"   |
+acc =  \chords {
+	% why don't \skip, s4 work?
+        c2 c f c
+        f c g:7 c
+	g f c  g:7 % urg, bug!
+        g f c  g:7
+	% copy 1-8
+        c2 c f c
+        f c g:7 c
 }
 
-text = \lyric{ 
-        \property Lyrics . textstyle =  "italic"
+text =  \lyrics{ 
+        \property Lyrics . LyricText \set #'font-style = #'italic
 
-        Ah!4 vous dir- ai_- je ma man2
-        Ce4 qui cau- se mon tour- ment2
-        Pa-4 pa veut que je rai- so- nne
-        Comme4 un- e grand- e per- so- nne
-        Moi4 je dis que les bon- bons2
-        Val-4 ent mieux que la rai- son2
+        Ah!4 vous dir -- ai -- je ma man2
+        Ce4 qui cau -- se mon tour -- ment2
+        Pa4 --  pa veut que je rai -- so -- nne
+        Comme4 un -- e grand -- e per -- so -- nne
+        Moi4 je dis que les bon -- bons2
+        Val4 -- ent mieux que la rai -- son2
         
 }
 
 \score {
-        <  \notes \type Staff \melodie
-           \lyric   \type Lyrics \text
+        <  
+	   \context ChordNames \acc
+	   \context Staff=melody \melodie
+           \context Lyrics \text
+        >
+	\header{
+		title = "Ah, vous dirais-je, maman "
+	}
+        \paper {  }
+}
+
+\score {
+        <  
+	   \chords \context ChordNames \transpose d'\acc
+	   \notes \context Staff=melody \transpose d'\melodie
+           \lyrics \context Lyrics \text
         >
+	\header{
+		piece = "clarinet in B$\flat$"
+	}
         \paper {  }
 }
+