Sustain pedal cautionary after line break (alternative) - Revision history

Lemzwerg: New category

2025-11-21T23:20:19Z

New category

← Older revision		Revision as of 23:20, 21 November 2025
Line 68:		Line 68:
	[[Category:Editorial annotations]]		[[Category:Editorial annotations]]
	[[Category:Breaks]]		[[Category:Breaks]]
	[[Category:Workaround]][[Category:Snippet]]		[[Category:Workaround]]
			[[Category:Snippet]]

Lemzwerg at 23:01, 21 November 2025

2025-11-21T23:01:06Z

← Older revision		Revision as of 23:01, 21 November 2025
Line 68:		Line 68:
	[[Category:Editorial annotations]]		[[Category:Editorial annotations]]
	[[Category:Breaks]]		[[Category:Breaks]]
	[[Category:Workaround]]		[[Category:Workaround]][[Category:Snippet]]

Jean Abou Samra: Replace version="2.24.0" with version="2.24" now that the LilyWiki extension supports auto-selecting the latest release in a stable series

2025-11-16T18:57:27Z

Replace version="2.24.0" with version="2.24" now that the LilyWiki extension supports auto-selecting the latest release in a stable series

← Older revision		Revision as of 18:57, 16 November 2025
Line 3:		Line 3:
	Syntax is <code>\sustainPedal{[music]}</code>.		Syntax is <code>\sustainPedal{[music]}</code>.

	<lilypond version="2.24.0" full>		<lilypond version="2.24" full>
	%% http://lsr.di.unimi.it/LSR/Item?id=1024		%% http://lsr.di.unimi.it/LSR/Item?id=1024
	%% see also http://lsr.di.unimi.it/LSR/Item?id=1023		%% see also http://lsr.di.unimi.it/LSR/Item?id=1023

Jean Abou Samra: Import snippet from LSR

2025-10-26T22:47:48Z

Import snippet from LSR

New page

Add a cautionary indication showing that the sustain pedal should remain pressed after a line break.

Syntax is <code>\sustainPedal{[music]}</code>.

<lilypond version="2.24.0" full>
%% http://lsr.di.unimi.it/LSR/Item?id=1024
%% see also http://lsr.di.unimi.it/LSR/Item?id=1023
%% Credits PPS => http://lilypond.1069038.n5.nabble.com/Sustain-pedal-cautionary-after-line-break-td186551.html

\paper { tagline = ##f }

%%%% Snippet start here:

%% Cautionary pedal mark after a line break:
cautionPedAlter = \markup {
\normal-text
\whiteout
\pad-markup #.1
\with-dimensions #'(0 . 5.85) #'(0 . 1.8)
\concat {
"("
\musicglyph "pedal.Ped"
\musicglyph "pedal.."
")"
}
}

%% Span:
sustainPedal =
#(define-music-function (music) (ly:music?)
(let ((elts (extract-named-music music '(NoteEvent EventChord))))
(if (pair? elts)
(let ((first-element (first elts))
(last-element (last elts)))
(set! (ly:music-property first-element 'articulations)
(cons (make-music 'SustainEvent 'span-direction -1)
(ly:music-property first-element 'articulations)))
(set! (ly:music-property last-element 'articulations)
(cons (make-music 'SustainEvent 'span-direction 1)
(ly:music-property last-element 'articulations))))))
#{
\set Staff.pedalSustainStyle = #'mixed

\once\override Staff.SustainPedalLineSpanner.stencil =
#ly:line-spanner::print
\once\override Staff.SustainPedalLineSpanner.left-bound-info =
#ly:horizontal-line-spanner::calc-left-bound-info-and-text
\once\override Staff.SustainPedalLineSpanner.right-bound-info =
#ly:horizontal-line-spanner::calc-right-bound-info

\once\override Staff.SustainPedalLineSpanner.staff-padding = #3
\once\override Staff.SustainPedalLineSpanner.bound-details =
#`((right (Y . 0)(attach-dir . -1))
(left (Y . 0)(padding . 1)(attach-dir . 1))
(left-broken (padding . 0) (attach-dir . 1)(text . ,cautionPedAlter)))
$music
\unset Staff.pedalSustainStyle
#})

%% Syntax: \sustainPedSpan { notes }

%% Test:
\relative c'' {
\sustainPedal { c1 \break c c }
}
</lilypond>

[[Category:Editorial annotations]]
[[Category:Breaks]]
[[Category:Workaround]]