]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/piano-template-with-centered-dynamics.ly
Merge branch 'master' of ssh+git://git.sv.gnu.org/srv/git/lilypond
[lilypond.git] / input / lsr / piano-template-with-centered-dynamics.ly
1 %% Do not edit this file; it is auto-generated from input/new
2 %% This file is in the public domain.
3 \version "2.11.38"
4
5 \header {
6   lsrtags = "expressive-marks,keyboards,template"
7   texidoc = "
8 Many piano scores have the dynamics centered between the two staves.
9 This requires a bit of tweaking to implement, but since the template is
10 right here, you don't have to do the tweaking yourself.
11 "
12   doctitle = "Piano template with centered dynamics"
13 } % begin verbatim
14
15 upper = \relative c'' {
16   \clef treble
17   \key c \major
18   \time 4/4
19   
20   a b c d
21 }
22
23 lower = \relative c {
24   \clef bass
25   \key c \major
26   \time 4/4
27   
28   a2 c
29 }
30
31 dynamics = {
32   s2\fff\> s4
33   s\!\pp
34 }
35
36 pedal = {
37   s2\sustainDown s2\sustainUp
38 }
39
40 \score {
41   \new PianoStaff <<
42     \new Staff = "upper" \upper
43     \new Dynamics = "dynamics" \dynamics
44     \new Staff = "lower" <<
45       \clef bass
46       \lower
47     >>
48     \new Dynamics = "pedal" \pedal
49   >>
50   \layout {
51     \context {
52       \type "Engraver_group"
53       \name Dynamics
54       \alias Voice % So that \cresc works, for example.
55       \consists "Output_property_engraver"
56       
57       \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
58       \override DynamicLineSpanner #'Y-offset = #0
59       pedalSustainStrings = #'("Ped." "*Ped." "*")
60       pedalUnaCordaStrings = #'("una corda" "" "tre corde")
61       
62       \consists "Piano_pedal_engraver"
63       \consists "Script_engraver"
64       \consists "Dynamic_engraver"
65       \consists "Text_engraver"
66       
67       \override TextScript #'font-size = #2
68       \override TextScript #'font-shape = #'italic
69       
70       \consists "Skip_event_swallow_translator"
71       
72       \consists "Axis_group_engraver"
73     }
74     \context {
75       \PianoStaff
76       \accepts Dynamics
77     }
78   }
79 }
80 \score {
81   \new PianoStaff <<
82     \new Staff = "upper" << \upper \dynamics >>
83     \new Staff = "lower" << \lower \dynamics >>
84     \new Dynamics = "pedal" \pedal
85   >>
86   \midi {
87     \context {
88       \type "Performer_group"
89       \name Dynamics
90       \consists "Piano_pedal_performer"
91     }
92     \context {
93       \PianoStaff
94       \accepts Dynamics
95     }
96   }
97 }