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.64"
   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
  32 global = {
  33   \key c \major
  34   \time 4/4
  35 }
  36
  37 upper = \relative c'' {
  38   \clef treble
  39   a4 b c d
  40 }
  41
  42 lower = \relative c {
  43   \clef bass
  44   a2 c
  45 }
  46
  47 dynamics = {
  48   s2\fff\> s4 s\!\pp
  49 }
  50
  51 pedal = {
  52   s2\sustainOn s\sustainOff
  53 }
  54
  55 \score {
  56   \new PianoStaff = "PianoStaff_pf" <<
  57     \new Staff = "Staff_pfUpper" \upper
  58     \new Dynamics = "Dynamics_pf" \dynamics
  59     \new Staff = "Staff_pfLower" << \lower >>
  60     \new Dynamics = "pedal" \pedal
  61   >>
  62
  63   \layout {
  64     % define Dynamics context
  65     \context {
  66       \type "Engraver_group"
  67       \name Dynamics
  68       \alias Voice
  69       \consists "Output_property_engraver"
  70       \consists "Piano_pedal_engraver"
  71       \consists "Script_engraver"
  72       \consists "New_dynamic_engraver"
  73       \consists "Dynamic_align_engraver"
  74       \consists "Text_engraver"
  75       \consists "Skip_event_swallow_translator"
  76       \consists "Axis_group_engraver"
  77
  78       pedalSustainStrings = #'("Ped." "*Ped." "*")
  79       pedalUnaCordaStrings = #'("una corda" "" "tre corde")
  80       \override DynamicLineSpanner #'Y-offset = #0
  81       \override TextScript #'font-size = #2
  82       \override TextScript #'font-shape = #'italic
  83       \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
  84     }
  85     % modify PianoStaff context to accept Dynamics context
  86     \context {
  87       \PianoStaff
  88       \accepts Dynamics
  89     }
  90   }
  91 }
  92
  93 \score {
  94   \new PianoStaff = "PianoStaff_pf" <<
  95     \new Staff = "Staff_pfUpper" << \global \upper \dynamics \pedal >>
  96     \new Staff = "Staff_pfLower" << \global \lower \dynamics \pedal >>
  97   >>
  98   \midi { }
  99 }