]> git.donarmstrong.com Git - lilypond.git/commitdiff
bugfixes.
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Thu, 13 Jun 2002 09:10:35 +0000 (09:10 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Thu, 13 Jun 2002 09:10:35 +0000 (09:10 +0000)
input/template/piano-dynamics.ly

index 34e9025e59a0bf8a331b673b1f114644c654efff..cff63cbf7b0c24a1dd8c328dbb82860f56eeee6d 100644 (file)
@@ -1,3 +1,11 @@
+%{
+  argh. DOCME
+
+
+  template that puts dynamics on a separate line, so it is neatly
+centered between staffs.
+%}
+
 \version "1.5.1"
 
 \header {
@@ -31,28 +39,26 @@ dynamics = \notes {
 }
 
 pedal = \notes {
- s2\sustaindown s2\sustainup
+ s2\sustainDown s2\sustainUp
 }
 
 \score {
-  \context pianostaff <
-    \context staff=upper \upper
-    \context dynamics=dynamics \dynamics
-    \context staff=lower <
+  \context PianoStaff <
+    \context Staff=upper \upper
+    \context Dynamics=dynamics \dynamics
+    \context Staff=lower <
       \clef bass
       \lower
     >
-    \context dynamics=pedal \pedal
+    \context Dynamics=pedal \pedal
   >
   \paper {
     \translator {
-      \type "engraver_group_engraver"
-      \name dynamics
-      \consists "output_property_engraver"
-      Generic_property_list = #generic-voice-properties
-      \consists "Property_engraver"
-      MinimumVerticalExtent = #'(-1 . 1)
-
+      \type "Engraver_group_engraver"
+      \name Dynamics
+      \consists "Output_property_engraver"
+      
+      minimumVerticalExtent = #'(-1 . 1)
       pedalSustainStrings = #'("Ped." "*Ped." "*")
       pedalUnaCordaStrings = #'("una corda" "" "tre corde")
       
@@ -80,8 +86,6 @@ pedal = \notes {
     \translator {
       \type "Performer_group_performer"
       \name Dynamics
-      Generic_property_list = #generic-voice-properties
-
       \consists "Piano_pedal_performer"
       \consists "Span_dynamic_performer"
       \consists "Dynamic_performer"