]> git.donarmstrong.com Git - lilypond.git/blob - Documentation/snippets/staff-headword.ly
Merge branch 'lilypond/translation' of ssh://git.sv.gnu.org/srv/git/lilypond into...
[lilypond.git] / Documentation / snippets / staff-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.12.0
5 \version "2.13.10"
6 \include "catalan.ly"
7 #(set-global-staff-size 15)
8 \paper{
9   ragged-right=##t
10   line-width=17\cm
11   indent=0\cm
12 }
13
14
15 \header {
16   lsrtags = "headwords"
17   texidoc = ""
18   doctitle = "headword"
19 } % begin verbatim
20
21
22 \header {
23         mutopiatitle = "Napolitan Dance (Swan Lake)"
24         mutopiacomposer = "TchaikovskyPI"
25         mutopiainstrument = "Piano, Trumpet, Percussion"
26         source = "New arrangement"
27         style = "Classical"
28         copyright = "Public Domain"
29         maintainer = "Laurence Sardain"
30         lastupdated = "2006/Dec/21"
31 %       title = "Le Lac des Cygnes"
32 %       subtitle = "Danse Napolitaine"
33 %       composer = "Piotr Ilitch Tchaïkovski"
34 %       arranger = "arr. Laurence Sardain"
35 %       footer = "Mutopia-2006/12/22-896"
36 }
37
38 trompette = \relative do'' {
39   \clef treble
40   \key mib \major
41   \time 2/4
42   R2^\markup { \italic Comodo } |
43   r8 \once \override TextScript #'padding = #2.0
44   sib16-.^\markup {\dynamic p \italic grazioso} do-. mib( re)-. do-. sib-. |
45   re8-. r8 re4->( |
46   re8) do16-. re-. mib( re) do-. re-. |
47   do8-. r8 sib4-> |
48 }
49
50 tambourin = \relative do' {
51   \time 2/4
52   r8 do16 do do8 do |
53   r8 do16 do do8 do |
54   r8 do r do |
55   r8 do16 do do8 do |
56   r8 do r do |
57 }
58
59 tambourinMidi = \drummode {
60   \time 2/4
61   r8 tamb16 tamb tamb8 tamb |
62   r8 tamb16 tamb tamb8 tamb |
63   r8 tamb r tamb |
64   r8 tamb16 tamb tamb8 tamb |
65   r8 tamb r tamb |
66 }
67
68 upper = \relative do' {
69   \clef treble
70   \key mib \major
71   \time 2/4
72   r8\p <sol sib mib>16-. <sol sib mib>-. <sol sib mib>8-. <sol sib mib>-. |
73   r8 <sol sib mib>16-. <sol sib mib>-. <sol sib mib>8-. <sol sib mib>-. |
74   r8 <lab sib re>16-. <lab sib re>-. <lab sib re>8-. <lab sib re>-. |
75   r8 <lab sib re>16-. <lab sib re>-. <lab sib re>8-. <lab sib re>-. |
76   r8 <sol sib mib>16-. <sol sib mib>-. <sol sib mib>8-. <sol sib mib>-. |
77 }
78
79 lower = \relative do {
80   \clef bass
81   \key mib \major
82   \time 2/4
83   mib4-. r4 |
84   sib-. r |
85   fa'-. r |
86   sib, r |
87   mib4-. r4 |
88 }
89
90
91 \score {
92   <<
93     \context Staff = "trumpet" <<
94       \set Staff.instrumentName = \markup { "Trumpet" \concat{ B \teeny \raise #0.4 \flat } }
95       \transpose sib do'
96       \trompette
97     >>
98     \context RhythmicStaff = "tambourin" <<
99       \set Staff.instrumentName = "Tambourine"
100       \tambourin
101     >>
102     \context PianoStaff = "prima" <<
103       \set PianoStaff.instrumentName = "Piano  "
104       \context Staff = "uppera" \upper
105       \context Staff = "lowera" \lower
106     >>
107   >>
108   \layout { }
109 }
110 \score {
111   <<
112     \context Staff = "trumpet" {
113       \set Staff.midiInstrument = "trumpet"
114       \trompette
115     }
116     \context DrumStaff = "tambourin" {
117       \tambourinMidi
118     }
119     \context Staff = "piano" <<
120       \upper
121       \lower
122     >>
123   >>
124   \midi {
125     \context {
126       \Score
127       tempoWholesPerMinute = #(ly:make-moment 72 4)
128     }
129   }
130 }
131