]> git.donarmstrong.com Git - lilypond.git/blob - input/kortjakje.ly
645c1f9d4b19c9e353bfd94b6e11f9e39a4083f5
[lilypond.git] / input / kortjakje.ly
1 % "Ah,  vous dirais-je, maman" (Mozart, KV 265)
2
3 % bare bones version. (written down from memory :-)
4 % for lyrics, see twinkle.ly
5
6 % the % is a comment.
7 %
8 % copyright: None
9 %
10 % declare music (which will be in *one* staff ) for the lead voice
11
12 melodie = music {
13         $                       % switch Lilypond in note-mode
14         \clef\violin
15         \octave {}              % set the default octave
16         % the default note duratino is 4
17         %%% theme
18         c c |                   % the '|' checks if there is a new measure here.
19         g g|
20         a a|
21
22         g2|     % g2 means a "g-1" pitched half-note 
23         f f|    e e|    d d|  c2
24         g g|    f f|    e e|    d d|    g g|    f f|    e e|    d d|
25         %%% var 1
26           c r8 c8               % r8 means an 8th rest.
27                   (|            % start a slur
28                                 % NOTE: the slurstart should be directly after the note
29                         )       % end a slur.
30                           g r8 g8 (|    ) a r8 a8 (|    ) g r4 
31           f r8 f8 (|    ) e4 r8 e8 (    |) d4 r8 d8 (|  ) c4 r4 
32 $}
33
34                                 % more of this.
35 begeleiding =
36 %       $\clef bass             % bass-clef
37 %       \music {                % as you can see, the $ sign obliges 
38                                 % you to precede keyword by a backslash: \
39         music { $
40         \clef "bass"
41         \octave { ` }           % default octave: 1 below the first octave.
42
43         %%% theme
44         `c                      % ` means one octave lower.
45                                 % Similarly: ' means one higher.
46            c    e c     f c     e c     d `b    c `a    `f `g   `c2
47         \octave { ` }
48         e `g    d `g    c `g    `b `g   e `g    d `g    c `g    `b `g
49         %%%% var 1
50         r8 e8() c       r8 e8() c       r8 f8()c        r8 e8()c
51         r8 d8()`b       r8 c8()`a       r8 `a8()`f      r8 `e8()`c
52 }$
53
54
55 % create a staff named bstaf
56 bstaf = staff {
57         melodic
58         music { begeleiding }   % use the declared music
59         }
60
61 % another one
62 vstaf = staff {
63         melodic
64                 music { melodie }
65                                 % default clef is violin clef
66         }
67
68
69 score {
70         staff { vstaf }
71         staff { bstaf }
72         paper {
73                 unitspace 2.5cm % a whole note takes 2.5 cm ideally.
74         }
75         commands {
76                 meter {2* 4}    % a 2/4 meter.
77         }
78 }
79