]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/piano-template-with-centered-dynamics.ly
Merge branch 'master' of ssh+git://hanwen@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.46"
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   a4 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 s\!\pp
33 }
34
35 pedal = {
36   s2\sustainDown s\sustainUp
37 }
38
39 \score {
40   \new PianoStaff <<
41     \new Staff = "upper" \upper
42     \new Dynamics = "dynamics" \dynamics
43     \new Staff = "lower" <<
44       \clef bass
45       \lower
46     >>
47     \new Dynamics = "pedal" \pedal
48   >>
49   \layout {
50     \context {
51       \type "Engraver_group"
52       \name Dynamics
53       % So that \cresc works, for example.
54       \alias Voice
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 \pedal >>
83     \new Staff = "lower" << \lower \dynamics \pedal >>
84   >>
85   \midi {}
86 }