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