]> git.donarmstrong.com Git - lilypond.git/blob - input/test/incipit.ly
*** empty log message ***
[lilypond.git] / input / test / incipit.ly
1 \version "2.1.28"
2 \header { texidoc = "@cindex Incipit
3 This example shows how to make an ``incipit'' to indicate 
4 scordatora tuning of a violin part, by overriding the @code{style} of
5 a @code{TimeSignature}.
6 Here are the two first bars of Biber's Rosary sonata III. " }
7
8
9
10
11 violinincipit = \notes\relative c''{
12   \clef "french"
13   \time 2/2
14   \override Staff.TimeSignature  #'style = #'old
15   a4. b8 c4 fis |
16 %  <b fis' b d>1
17   \override Staff.TimeSignature  #'style = #'C
18 }
19
20 bcincipit = \notes\relative c{
21   \clef bass
22   \override Staff.TimeSignature  #'style = #'old
23   b2. cis4 | 
24   \override Staff.TimeSignature  #'style = #'C
25 }
26
27 violin = \notes\relative c''{
28 % Key signatures with different alterations in different octaves
29 % are broken since 1.3.58!
30 %  \specialkey \keysignature f' fis'' g' gis''
31   \key d \major
32   \time 2/2
33   \clef treble
34
35   a4. b8 c4 fis |
36   gis~ gis8 fis16^\trill (e) b8 c
37   <<{ a d}\\ { es,4}>>|
38 }
39
40 BC = \notes\relative c{
41   \key d \major
42   \time 2/2
43   \clef "bass"
44
45  \key \default
46   b2. cis4 | 
47   d e fis g |
48 }
49
50 \score{
51   <<
52     \context Staff = violin {\notes{
53       \override Staff.Clef  #'transparent = ##t
54       \violinincipit \bar ".|" 
55       \revert Staff.Clef #'transparent 
56       \endincipit
57       \violin
58     }}
59     \new Staff {\notes{
60       \override Staff.Clef  #'transparent = ##t
61       \bcincipit \bar ".|" 
62       \revert Staff.Clef #'transparent 
63       \endincipit
64       \BC
65     }}
66   >>
67         \paper { raggedright = ##t }
68 }  
69
70