release: 1.1.41

[lilypond.git] / input / kortjakje.ly

diff --git a/input/kortjakje.ly b/input/kortjakje.ly
index bfcfebaeb004612cbad243c37a67231fbe458c4e..01512d288e94abf1f23bbd1e8fb7ffc144d41e26 100644 (file)
--- a/input/kortjakje.ly
+++ b/input/kortjakje.ly
@@ -1,80 +1,64 @@
-% "Ah,  vous dirais-je, maman" (Mozart, KV 265)
-% 
-% bare bones version. (written down from memory :-)
-% for lyrics, see twinkle.ly
+\header{
+filename =      "kortjakje.ly";
+title =         "Ah  vous dirais-je maman (variations)";
+description =   "bare bones version. (written down from memory :-)";
+composer =      "Mozart KV 265";
+enteredby =     "HWN";
+copyright =     "public domain";
+}
+%{
+Tested Features: example file with comments
+
+%}
+\version "1.0.16";
+
 
 % the % is a comment.
 
-% declare music (which will be in *one* staff ) for the lead voice
 
-melodie = music {
-       $                       % switch Lilypond in note-mode
-       \octave {}              % set the default octave
-       % the default note duratino is 4
+% declare melody (which will be in *one* staff ) for the lead voice
+melodie = \notes \relative c' {
+                               % switch Lilypond in note-mode
+       \clef"violin";
+       \time 2/4 ;
        %%% theme
-       c c |                   % the '|' checks if there is a new measure here.
-       g g|
+       c4 c |                  % the | checks if there is a new measure here.
+       g' g|
        a a|
 
        g2|     % g2 means a "g-1" pitched half-note 
-       f f|    e e|    d d|  c2
-       g g|    f f|    e e|    d d|    g g|    f f|    e e|    d d|
+       f4 f|   e e|    d d|  c2
+       g'4 g|  f f|    e e|    d d|    g g|    f f|    e e|    d d|
        %%% var 1
-         c r8 c8               % r8 means an 8th rest.
+         c4 r8 c               % r8 means an 8th rest.
                  (|            % start a slur
                                % NOTE: the slurstart should be directly after the note
                        )       % end a slur.
-                         g r8 g8 (|    ) a r8 a8 (|    ) g r4 
-         f r8 f8 (|    ) e4 r8 e8 (    |) d4 r8 d8 (|  ) c4 r4 
-$}
+                         g'4 r8 g8 ()   a4 r8 a8 ()     g4 r4 
+         f4 r8 f8 ()    e4 r8 e8 (|)  d4 r8 d8 ()       c4 r4 
+}
 
                                % more of this.
-begeleiding =
-$
-       \music {                % as you can see, the $ sign obliges 
-                               % you to precede keyword by a backslash: \
-       \octave { ` }           % default octave: 1 below the first octave.
+begeleiding = \notes \relative c { 
+       \clef "bass";
+       \time 2/4 ;
 
        %%% theme
-       `c                      % ` means one octave lower.
-                               % Similarly: ' means one higher.
-          c    e c     f c     e c     d `b    c `a    `f `g   `c2
-       \octave { ` }
-       e `g    d `g    c `g    `b `g   e `g    d `g    c `g    `b `g
+       c4                      %  before note means one octave lower.
+                               % Similarly:  after means one higher.
+          c'   e c     f c     e c     d b     c a     f g     c,2 |
+       e'4 g,  d' g,   c g     b g     e' g,   d' g,   c g     b g
        %%%% var 1
-       r8 e8() c       r8 e8() c       r8 f8()c        r8 e8()c
-       r8 d8()`b       r8 c8()`a       r8 `a8()`f      r8 `e8()`c
-}$
-
-
-% create a staff named bstaf
-bstaf = staff {
-       melodic
-       music { begeleiding }   % use the declared music
-               commands {      % commands with Staff-wide impact.
-                       clef "bass"     % bass-clef
-               }
-       }
-
-% another one
-vstaf = staff {
-       melodic
-               music { melodie }
-               commands { clef "violin" }
-                               % default clef is violin clef
-       }
-
+       r8 e'8()  c4    r8 e8()  c4     r8 f8() c4      r8 e8() c4
+       r8 d8() b4      r8 c8() a4      r8 a8() f4      r8 e8() c4
+}
 
-score {
-       staff { vstaf }
-       staff { bstaf }
-       paper {
-               unitspace 2.5cm % a whole note takes 2.5 cm ideally.
-       }
-       commands {
-               meter 2* 4      % a 2/4 meter.
-               skip 33:0       % skip 32 measures, and generate the bars
-%              meter 6 8       % another meter
-       }
+\score{
+       \context GrandStaff <
+               \melodie
+               \begeleiding 
+       >
+       \paper{}
+       \midi{}
 }