input/test/pedal.ly

   1 \version "1.7.6"
   2 \header{
   3     texidoc = "Piano pedal symbols merge stop and start.  The strings are configurable.
   4 Text style, bracket style, and a mixture of both are supported.  "
   5 }
   6
   7
   8
   9
  10 \score{
  11     \context Staff \notes\relative c'{
  12
  13         c4 d e f g
  14         -\sustainDown b c
  15         c, [d16  c  c c] [e e -\sustainUp -\sustainDown e e ] f4 -\sustainUp
  16         g-\sustainDown  b -\sustainUp c
  17         \property Staff.pedalSustainStrings = #'("-" "-P" "P")
  18         \property Staff.SustainPedal \override #'padding = #-2
  19         c, -\sustainDown d e -\sustainUp -\sustainDown f
  20         -\sustainUp g b c
  21
  22         \property Staff.SustainPedal \override #'pedal-type = #'bracket
  23
  24         c4 d e -\sustainDown b c c, -\sustainUp -\sustainDown [d8 c] [e8 e -\sustainUp -\sustainDown] f4 d
  25         -\sustainUp g -\sustainDown b b, -\sustainUp c'
  26
  27         \property Staff.UnaCordaPedal \override #'pedal-type = #'mixed
  28
  29         c4 d \unaCorda e f g
  30         b \treCorde c
  31
  32
  33     }
  34     \paper{
  35     }
  36     \midi{
  37         \tempo 4 = 60
  38     }
  39 }
  40 %% new-chords-done %%