input/new/piano-template-with-centered-dynamics.ly

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