]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/piano-template-with-centered-dynamics.ly
LSR: Update.
[lilypond.git] / input / lsr / piano-template-with-centered-dynamics.ly
1 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
2 %% This file is in the public domain.
3 \version "2.12.3"
4
5 \header {
6   lsrtags = "expressive-marks, keyboards, template"
7
8   texidoces = "
9 Muchas partituras de piano tienen las indicaciones dinámicas
10 centradas entre los dos pentagramas.  Esto requiere un poco de
11 trucaje, pero puesto que la plantilla está aquí mismo, no tenemos
12 que hacer este trucaje por nuestra cuenta.
13
14 "
15   doctitlees = "Plantilla de piano con matices centrados"
16   
17   texidocde = "
18 In der meisten Klaviernotation werden die Dynamikzeichen zwischen 
19 den beiden Systemen zentriert. Für LilyPond muss man die Einstellungen 
20 etwas anpassen, aber Sie können ja das angepasste Beispiel von hier 
21 kopieren.
22 "
23
24   texidoc = "
25 Many piano scores have the dynamics centered between the two staves.
26 This requires a bit of tweaking to implement, but since the template is
27 right here, you don't have to do the tweaking yourself.
28
29 "
30   doctitle = "Piano template with centered dynamics"
31 } % begin verbatim
32
33 global = {
34   \key c \major
35   \time 4/4
36 }
37
38 upper = \relative c'' {
39   \clef treble
40   a4 b c d
41 }
42
43 lower = \relative c {
44   \clef bass
45   a2 c
46 }
47
48 dynamics = {
49   s2\fff\> s4 s\!\pp
50 }
51
52 pedal = {
53   s2\sustainOn s\sustainOff
54 }
55
56 \score {
57   \new PianoStaff = "PianoStaff_pf" <<
58     \new Staff = "Staff_pfUpper" << \global \upper >>
59     \new Dynamics = "Dynamics_pf" \dynamics
60     \new Staff = "Staff_pfLower" << \global \lower >>
61     \new Dynamics = "pedal" \pedal
62   >>
63
64   \layout {
65     % define Dynamics context
66     \context {
67       \type "Engraver_group"
68       \name Dynamics
69       \alias Voice
70       \consists "Output_property_engraver"
71       \consists "Piano_pedal_engraver"
72       \consists "Script_engraver"
73       \consists "New_dynamic_engraver"
74       \consists "Dynamic_align_engraver"
75       \consists "Text_engraver"
76       \consists "Skip_event_swallow_translator"
77       \consists "Axis_group_engraver"
78
79       pedalSustainStrings = #'("Ped." "*Ped." "*")
80       pedalUnaCordaStrings = #'("una corda" "" "tre corde")
81       \override DynamicLineSpanner #'Y-offset = #0
82       \override TextScript #'font-size = #2
83       \override TextScript #'font-shape = #'italic
84       \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
85     }
86     % modify PianoStaff context to accept Dynamics context
87     \context {
88       \PianoStaff
89       \accepts Dynamics
90     }
91   }
92 }
93
94 \score {
95   \new PianoStaff = "PianoStaff_pf" <<
96     \new Staff = "Staff_pfUpper" << \global \upper \dynamics \pedal >>
97     \new Staff = "Staff_pfLower" << \global \lower \dynamics \pedal >>
98   >>
99   \midi { }
100 }