(Composite_music): new transpose syntax,

[lilypond.git] / input / twinkle-pop.ly

diff --git a/input/twinkle-pop.ly b/input/twinkle-pop.ly
index 842f3c4185757838d8c9b4c7763f7609490eedcb..77e87b1ce96378cc10f29b0308e48630f7dd67ef 100644 (file)
--- a/input/twinkle-pop.ly
+++ b/input/twinkle-pop.ly
@@ -1,46 +1,71 @@
+\version "1.7.5"
 \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 c d\acc
+          \notes \context Staff=melody \transpose c d\melodie
+           \lyrics \context Lyrics \text
         >
+       \header{
+               piece = "clarinet in B$\flat$"
+       }
         \paper {  }
 }
+