sustainOff/On macro with pedal brackets

[Dieter Grollmann]

Hello all,

(first tiny steps in LilyPond-Scheme ...)

I want to have the piano pedal change \sustainOff\sustainOn in one
command. This doesn't work:

PED = \sustainOff\sustainOn


The following only works properly with "pedalSustainStyle = #'text",
brackets are not connected (found in
http://lists.gnu.org/archive/html/lilypond-user/2010-10/msg00535.html):

PED = #(begin
        (make-span-event 'SustainEvent STOP)
        (make-span-event 'SustainEvent START))

(See also the attached sample file)


Here a solution I figured out (reading "Extending") that works also
with brackets, but this time the command has to be placed _before_
the note, breaking LilyPonds input rules:

PED = #(make-music
        'EventChord
        'elements
        (list 
         (make-span-event
          'SustainEvent STOP)
         (make-span-event
          'SustainEvent START)))


To figure out how to write a properly working function for this is
currently beyond my skills. Has anyone a hint, how and where to
start, or even a solution?

Thanks in advance.

Dieter

ped-test.ly
Description: Text document

ped-test.pdf
Description: Adobe PDF document