]> git.donarmstrong.com Git - lilypond.git/blob - Documentation/snippets/text-headword.ly
Change stringTunings from list of semitones to list of pitches
[lilypond.git] / Documentation / snippets / text-headword.ly
1 % Do not edit this file; it is automatically
2 % generated from Documentation/snippets/new
3 % This file is in the public domain.
4 %% Note: this file works from version 2.13.36
5 \version "2.13.46"
6 \include "english.ly"
7 #(set-global-staff-size 15)
8 \paper {
9   line-width = 16\cm
10   indent = 0\cm
11 }
12
13
14 \header {
15   lsrtags = "headwords"
16   texidoc = ""
17   doctitle = "headword"
18 } % begin verbatim
19
20
21 \layout {
22   \context {
23     \Score
24     \override PaperColumn #'keep-inside-line = ##t
25     \override NonMusicalPaperColumn #'keep-inside-line = ##t
26   }
27 }
28
29 % NR 1.8 Text
30
31 % L. v. Beethoven, Op. 110
32 % Piano sonata 31
33 % measures 1 - 7
34
35 \layout {
36   \context {
37     \Score
38     \override SpacingSpanner #'base-shortest-duration =
39     #(ly:make-moment 1 20)
40   }
41 }
42
43 \new PianoStaff <<
44
45   % RH staff
46   \new Staff {
47     \clef treble
48     \key af \major
49     \time 3/4
50
51     \once \override TextScript #'staff-padding = #4
52     <c'' af'>4. (
53     _ \markup { \dynamic p \italic { con amabilità } }
54     <af' ef'>8 )
55     <af' ef'>8. [
56     <af' ef'>16 ]
57
58     |
59
60     <df'' g'>4
61     <bf' g'>2
62     _ \markup { \italic { ten. } }
63
64     |
65
66     <<
67
68       \new Voice {
69         \voiceOne
70         ef''4. (
71         df''8 [ )
72         ef'' (
73         f'' ) ]
74
75         |
76
77         \once \override TextScript #'staff-padding = #4
78         ef''8. (
79         _ \markup { \italic { tranqu. } }
80         d''16 )
81         df''8 \trill \fermata
82         _ \markup { \italic { ten. } }
83       }
84
85       \new Voice {
86         \voiceTwo
87         af'4.
88         af'8 [
89         af'8
90         af'8 ]
91
92         |
93
94         g'4
95         g'8
96       }
97
98     >>
99
100     \oneVoice
101     \once \override TextScript #'staff-padding = #4
102     df''32
103     _ \markup { \italic dolce }
104     c''32
105     df''32
106     ef''32
107     \acciaccatura { df''[ ef'' ] }
108     f''8
109     ef''16
110     df''16
111
112     |
113     \break
114     \overrideProperty "Score.NonMusicalPaperColumn"
115     #'line-break-system-details #'((alignment-distances . (12)))
116
117     c''4. (
118     ^ \markup \italic { cantabile, con intimissimo sentimento,
119       ma sempre molto dolce e semplice }
120     ef''4
121     af''8 )
122
123     |
124
125     af''4 (
126     g''2 )
127
128     |
129
130     bf''4. (
131     g''4
132     ef''8 )
133
134     |
135   }
136
137   % LH
138   \new Staff {
139     \clef bass
140     \key af \major
141     \time 3/4
142
143     <ef af,>4. (
144     <ef c>8 )
145     <ef c>8. [
146     <ef c>16 ]
147
148     |
149
150     <ef bf,>4
151     <ef df>2 ^ \markup { \italic ten. }
152
153     |
154
155     <<
156
157       \new Voice {
158         \voiceOne
159         ef8 [ (
160         af8
161         c'8
162         bf8 )
163         c'8 ( \staccato
164         df'8 ]  ) \staccato
165
166         |
167
168         bf4
169         bf8 ^ \markup { \italic ten. }
170       }
171
172       \new Voice {
173         \voiceTwo
174         c4. (
175         f8 [ )
176         ef8 ( \staccato
177         df8 ] ) \staccato
178
179         |
180
181         ef4
182         ef8 \fermata
183       }
184
185     >>
186
187     \oneVoice
188     r8
189     r4
190     \clef treble
191
192     |
193
194     \override Staff.SustainPedalLineSpanner #'outside-staff-priority = #1000
195     \override Staff.SustainPedalLineSpanner #'staff-padding = #7
196     \once \override TextScript #'padding = #2
197     af16 \sustainOn
198     ^ \markup \italic { non staccato }
199     _ \markup \italic { molto \concat { \dynamic { p } , } sempre tranquillo
200       ed egualmente, non rubato }
201     <ef' c'>16
202     <ef' c'>16
203     <ef' c'>16
204     af16
205     <ef' c'>16
206     <ef' c'>16
207     <ef' c'>16
208     af16 \sustainOn
209     <ef' c'>16
210     <ef' c'>16
211     <ef' c'>16
212
213     |
214
215     bf16 \sustainOn
216     <ef' df'>16
217     <ef' df'>16
218     <ef' df'>16
219     bf16 \sustainOn
220     <ef' df'>16
221     <ef' df'>16
222     <ef' df'>16
223     bf16
224     <ef' df'>16
225     <ef' df'>16
226     <ef' df'>16
227
228     |
229
230     \override Staff.SustainPedalLineSpanner #'staff-padding = #4
231     df'16 \sustainOn
232     <bf' g' ef'>16
233     <bf' g' ef'>16
234     <bf' g' ef'>16
235     df'16
236     <bf' g' ef'>16
237     <bf' g' ef'>16
238     <bf' g' ef'>16
239     df'16 \sustainOn
240     <bf' g' ef'>16
241     <bf' g' ef'>16
242     <bf' g' ef'>16
243
244     |
245   }
246
247 >>