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