lilypond-0.0.17

diff --git a/kortjakje.ly b/kortjakje.ly
index 392bd19678b4ccda068ef463735f372b2498804b..f5e6d081397af8ff4e5edcd2b437fb41c6a19970 100644 (file)
--- a/kortjakje.ly
+++ b/kortjakje.ly
@@ -2,19 +2,39 @@
 % 
 % bare bones version. (written down from memory :-)
 
-melodie = music {$\octave {}
+% 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
        %%% theme
-         c c g g       a a     g2      f f     e e     d d  c2
+         c c 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
        %%% var 1
-         c r8 c8 (     ) g r8 g8 (     ) a r8 a8 (     ) g r4 
+         c r8 c8               % 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
 $}
 
-begeleiding = $\music {
-       \octave { ` }
+                               % 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.
+
        %%% theme
-       `c c    e c     f c     e c     d `b    c `a    `f `g   `c2
+       `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
        %%%% var 1
@@ -23,16 +43,21 @@ begeleiding = $\music {
 }$
 
 
+% create a staff named bstaf
 bstaf = staff {
        melodic
-       music { begeleiding }
-               commands {
-                       clef bass
+       music { begeleiding }   % use the declared music
+               commands {      % commands with Staff-wide impact.
+                       clef bass       % bass-clef
+
                }
        }
+
+% another one
 vstaf = staff {
        melodic
                music { melodie }
+                               % default clef is violin clef
        }
 
 
@@ -40,11 +65,12 @@ score {
        staff { vstaf }
        staff { bstaf }
        paper {
-               unitspace 2.5cm
+               unitspace 2.5cm % a whole note takes 2.5 cm ideally.
        }
        commands {
-               meter 2 4 
-               skip 32:0
+               meter 2 4       % a 2/4 meter.
+               skip 32:0       % skip 32 measures, and generate the bars
+               meter 6 8       % another meter
        }
 }