]> git.donarmstrong.com Git - lilypond.git/blob - input/test/pedal.ly
6230833d0edd4559b570f9961c72251f7b3c8bf9
[lilypond.git] / input / test / pedal.ly
1
2 \version "2.1.7"
3
4 \header{ texidoc = "@cindex Pedal
5 Piano pedal symbols merge stop and start.  The strings are configurable. 
6 Text style, bracket style, and a mixture of both are supported.  "
7 }
8
9 \score{
10     \context Staff \notes\relative c'{
11
12         c4 d e f g
13         \sustainDown b c
14         c,  d16[  c  c c]  e[ e \sustainUp \sustainDown e e ] f4 \sustainUp 
15         g\sustainDown  b \sustainUp c 
16         \property Staff.pedalSustainStrings = #'("-" "-P" "P")
17         \property Staff.SustainPedal \override #'padding = #-2
18         c, \sustainDown d e \sustainUp \sustainDown f
19         \sustainUp g b c
20
21         \property Staff.pedalSustainStyle = #'bracket
22
23         c4 d e \sustainDown b c c, \sustainUp \sustainDown  d8[ c]  e8[ e \sustainUp \sustainDown] f4 d
24         \sustainUp g \sustainDown b b, \sustainUp c'
25
26         \property Staff.pedalUnaCordaStyle = #'mixed
27
28         c4 d \unaCorda e f g
29         b \treCorde c
30
31     }
32 }
33