Lemzwerg: New category

2025-11-21T23:21:43Z

New category

← Older revision		Revision as of 23:21, 21 November 2025
Line 193:		Line 193:
	[[Category:Repeats]]		[[Category:Repeats]]
	[[Category:Repeats]]		[[Category:Repeats]]
	[[Category:Preparing parts]][[Category:Snippet]]		[[Category:Preparing parts]]
			[[Category:Snippet]]

Lemzwerg at 23:02, 21 November 2025

2025-11-21T23:02:05Z

← Older revision		Revision as of 23:02, 21 November 2025
Line 193:		Line 193:
	[[Category:Repeats]]		[[Category:Repeats]]
	[[Category:Repeats]]		[[Category:Repeats]]
	[[Category:Preparing parts]]		[[Category:Preparing parts]][[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:50:40Z

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:50, 16 November 2025
Line 13:		Line 13:
	<li>'''\unfoldPercentRepeatsR''' removes this line break inhibitors (using »removeWithTag #'%«) beside unfolding the percent repeats just like the variant without the »R« at the end.</li></ul>		<li>'''\unfoldPercentRepeatsR''' removes this line break inhibitors (using »removeWithTag #'%«) beside unfolding the percent repeats just like the variant without the »R« at the end.</li></ul>

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

Jean Abou Samra: Import snippet from LSR

2025-10-26T22:49:53Z

Import snippet from LSR

New page

If you want to display the same music definition in some situation (e.g. part) with percent repeats, while in other situations (e.g. score) you want to show the percent repeats unfolded, here are some functions to handle this.<br />

<ul>
<li>'''\unfoldPercentRepeats''' unfolds just the percent repeats, no other repeats.</li>
<li>'''\taggedPercentRepeat''' is a function to define full measure percent repeats with some additionally features:
<ul>
<li>The first argument is the number, how often the measure should be repeated. If this number is greater then two, the repeat counter is automatically enabled.</li>
<li>The second argument is the music snippet which is to be repeated.</li>
<li>The third argument is a music snippet again. It should only contain skips of the same length as the repeated music, and the (optional) dynamics which are valid for the first measure.</li></ul>

This instruction creates a music parallel to the repeat command, which contains the entered »dynamic measure« followed by line break inhibitors and skips of the same length. The line break prevention is tagged with the #'% symbol.</li>
<li>'''\unfoldPercentRepeatsR''' removes this line break inhibitors (using »removeWithTag #'%«) beside unfolding the percent repeats just like the variant without the »R« at the end.</li></ul>

<lilypond version="2.24.0" full>
%% http://lsr.di.unimi.it/LSR/Item?id=870

%by: ArnoldTheresius

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% START of my personal include file 'percenting.ly'
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

#(define-public (unfold-percent-repeats music)
"This function replaces all 'percent repeats' with 'unfold repeats'. "
(let*
((es (ly:music-property music 'elements))
(e (ly:music-property music 'element)))
(if (memq 'repeated-music (ly:music-property music 'types))
(let*
((props (ly:music-mutable-properties music))
(old-name (ly:music-property music 'name))
(flattened (flatten-alist props)))
(if (equal? old-name 'PercentRepeatedMusic)
(set! music (apply make-music (cons 'UnfoldedRepeatedMusic flattened))))))
(if (pair? es)
(set! (ly:music-property music 'elements) (map unfold-percent-repeats es)))
(if (ly:music? e)
(set! (ly:music-property music 'element) (unfold-percent-repeats e)))
music))

unfoldPercentRepeats =
#(define-music-function (music) (ly:music?)
(unfold-percent-repeats music))

unfoldPercentRepeatsR = #(define-music-function (music) (ly:music?)
#{ \unfoldPercentRepeats \removeWithTag #'% $music #} )

taggedPercentRepeat =
#(define-music-function
(repcount melody initspacer)
(integer? ly:music? ly:music?)
(let*
((repred (- repcount 1))
(used-version (ly:version))
(neu #t))
(if (< (car used-version) 2)
(set! neu #f)
(if (> (car used-version) 2)
(set! neu #t)
(if (> (cadr used-version) 12)
(set! neu #t)
(set! neu #f))))
(if neu
(if (> repred 1)
(begin ;(display "\n -neu(new)-multiple-\n")
#{
<< {
$initspacer
\tag #'% \repeat unfold $repred {
\noBreak $(skip-of-length initspacer)
}
}
{
\set countPercentRepeats = ##t
\repeat percent $repcount $melody
\set countPercentRepeats = ##f
}
>>
#}
) (begin ;(display "\n -neu(new)-once_only-\n")
#{
<< {
$initspacer
\tag #'% {
\noBreak $(skip-of-length initspacer)
}
}
{
\repeat percent $repcount $melody
}
>>
#}
)
)
(if (> repred 1)
(begin ;(display "\n -alt(old)-multiple- compatibiliy mode for 2.12.3\n")
#{
<< {
$initspacer
\tag #'% \repeat unfold $repred {
\noBreak #(ly:export (skip-of-length $initspacer))
}
}
{
\set countPercentRepeats = ##t
\repeat percent $repcount $melody
\set countPercentRepeats = ##f
}
>>
#}
) (begin ;(display "\n -alt(old)-once_only- compatibiliy mode for 2.12.3\n")
#{
<< {
$initspacer
\tag #'% {
\noBreak #(ly:export (skip-of-length $initspacer))
}
}
{
\repeat percent $repcount $melody
}
>>
#}
)))))

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% END of my personal include file 'percenting.ly'
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\paper { tagline = ##f }

\markup { \null \translate #'( 1 . -3 ) \null } % 2.14.2 LSR problem workaroud

First = {
\partial 4 e'4\p
\repeat volta 2 {
f'1\<
\repeat unfold 6 { g'1 a' g' f' }
g'1 a'
\taggedPercentRepeat #2 { f'1 } { s1\f\> }
d'1 b
}
c'2.\pp
\bar "|."
}

Second = {
\partial 4 c'4\p
\repeat volta 2 {
\taggedPercentRepeat #27 { c'1 } { s1\< }
c'1\f\>
\taggedPercentRepeat #2 { g } { s1 }
g2 f
}
e2.\pp
\bar "|."
}

\score {
\new Staff {
\First
}
\header {
piece = "Part #1"
}
}

\score {
\new Staff {
\Second
}
\header {
piece = "Part #2"
}
}

\score {
\new StaffGroup <<
\new Staff {
\unfoldPercentRepeatsR \First
}
\new Staff {
\unfoldPercentRepeatsR \Second
}
>>
\header {
piece = "Score"
}
}
</lilypond>

[[Category:Repeats]]
[[Category:Repeats]]
[[Category:Preparing parts]]

Unfold percent repeats only - Revision history

Lemzwerg: New category

Lemzwerg at 23:02, 21 November 2025

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

Jean Abou Samra: Import snippet from LSR