input/template/piano-dynamics.ly

   1 %{
   2   argh. DOCME
   3
   4
   5   template that puts dynamics on a separate line, so it is neatly
   6 centered between staffs.
   7 %}
   8
   9 \version "1.5.68"
  10
  11 \header {
  12   dedication = "dedication"
  13   title = "title"
  14   subtitle = "subtitle"
  15   subsubtitle = "subsubtitle"
  16   composer = "composer (xxxx-yyyy)"
  17   opus = "opus 0"
  18   piece = "piece i"
  19   instrument = "instrument"
  20   arranger = "arranger"
  21   poet = "poet"
  22   texttranslator = "translator"
  23   copyright = "public domain"
  24   enteredby = "jcn"
  25   source =  "urtext"
  26 }
  27
  28 upper = \notes\relative c'' {
  29   a b c d
  30 }
  31
  32 lower = \notes\relative c {
  33   a2 c
  34 }
  35
  36 dynamics = \notes {
  37   s2\fff\> s4
  38   \!s\pp
  39 }
  40
  41 pedal = \notes {
  42  s2\sustainDown s2\sustainUp
  43 }
  44
  45 \score {
  46   \context PianoStaff <
  47     \context Staff=upper \upper
  48     \context Dynamics=dynamics \dynamics
  49     \context Staff=lower <
  50       \clef bass
  51       \lower
  52     >
  53     \context Dynamics=pedal \pedal
  54   >
  55   \paper {
  56     \translator {
  57       \type "Engraver_group_engraver"
  58       \name Dynamics
  59       \consists "Output_property_engraver"
  60
  61       minimumverticalExtent = #'(-1 . 1)
  62       pedalSustainStrings = #'("Ped." "*Ped." "*")
  63       pedalUnaCordaStrings = #'("una corda" "" "tre corde")
  64
  65       \consists "Piano_pedal_engraver"
  66       \consists "Script_engraver"
  67       \consists "Dynamic_engraver"
  68       \consists "Text_engraver"
  69
  70       TextScript \override #'font-relative-size = #1
  71       TextScript \override #'font-shape = #'italic
  72       DynamicText \override #'extra-offset = #'(0 . 2.5)
  73       Hairpin \override #'extra-offset = #'(0 . 2.5)
  74
  75       \consists "Skip_req_swallow_translator"
  76
  77       \consistsend "Axis_group_engraver"
  78     }
  79     \translator {
  80       \PianoStaffContext
  81       \accepts Dynamics
  82       VerticalAlignment \override #'forced-distance = #7
  83     }
  84   }
  85   \midi {
  86     \translator {
  87       \type "Performer_group_performer"
  88       \name Dynamics
  89       \consists "Piano_pedal_performer"
  90       \consists "Span_dynamic_performer"
  91       \consists "Dynamic_performer"
  92     }
  93     \translator {
  94       \PianoStaffContext
  95       \accepts Dynamics
  96     }
  97   }
  98 }