Re: piano pedals

[Nick Payne]

On 14/09/12 04:17, james wrote:
> I still haven't figured this out, so I'm putting out another request. Is 
> possible to get piano pedals that have the word "Ped". and broken-line 
> spanner, and the asterisk at the end?
You could just use a text spanner:

\version "2.16.0"

pedal = #(define-music-function (parser location adjEnd shorten)
(number? pair?)
#{
    \once \override TextSpanner #'bound-details #'left #'text =
\markup\concat { \musicglyph #"pedal.Ped" " " }
    \once \override TextSpanner #'font-shape = #'upright
    \once \override TextSpanner #'direction = #DOWN
    \once \override TextSpanner #'dash-period = #1.5
    \once \override TextSpanner #'dash-fraction = #0.3
    \once \override TextSpanner #'thickness = #0.8
    \once \override TextSpanner #'bound-details #'right #'text =
\markup\concat { " " \musicglyph #"pedal.*" }
    \once \override TextSpanner #'bound-details #'left
#'stencil-align-dir-y = #CENTER
    \once \override TextSpanner #'bound-details #'right
#'stencil-align-dir-y = #CENTER
    \once \override TextSpanner #'bound-details #'left #'padding = #(car
shorten)
    \once \override TextSpanner #'bound-details #'right #'padding =
#(cdr shorten)
    \once \override TextSpanner #'bound-details #'right-broken #'padding
= #adjEnd
    \once \override TextSpanner #'bound-details #'left-broken #'text = ##f
    \once \override TextSpanner #'bound-details #'right-broken #'text = ##f
#})

\relative c' {
  c4 \pedal #0.5 #'(-1 . 1) c\startTextSpan c c
  c c c c\stopTextSpan
}


Nick

test.png
Description: PNG image