Big time signatures - Revision history

Lemzwerg: Lemzwerg moved page Big Time Signatures to Big time signatures without leaving a redirect: Only the first letter of a title should be uppercase

2025-11-24T05:11:53Z

Lemzwerg moved page Big Time Signatures to Big time signatures without leaving a redirect: Only the first letter of a title should be uppercase

← Older revision	Revision as of 05:11, 24 November 2025
(No difference)

Lazy: Add minimum height setting

2025-11-23T23:53:21Z

Add minimum height setting

Show changes

Lazy: Get rid of unused variable

2025-11-23T23:33:45Z

Get rid of unused variable

← Older revision		Revision as of 23:33, 23 November 2025
Line 109:		Line 109:
	(stc (ly:grob-property (ly:grob-array-ref elts 0) 'stencil))		(stc (ly:grob-property (ly:grob-array-ref elts 0) 'stencil))
	(stc-ext-y (car exts)) ; the Y-extent of the time sig stencil		(stc-ext-y (car exts)) ; the Y-extent of the time sig stencil
	~~(stc-ext-x (ly:stencil-extent stc X))~~
	; scaling factor for the stencil		; scaling factor for the stencil
	(f (/ limited-height (interval-length stc-ext-y))))		(f (/ limited-height (interval-length stc-ext-y))))

Lazy: Break long lines, add support for height limits and different width.

2025-11-23T23:20:39Z

Break long lines, add support for height limits and different width.

Show changes

Lemzwerg: New category

2025-11-21T23:28:04Z

New category

← Older revision		Revision as of 23:28, 21 November 2025
Line 130:		Line 130:
	[[Category:Rhythms]]		[[Category:Rhythms]]
	[[Category:Scheme]]		[[Category:Scheme]]
	[[Category:Staff notation]][[Category:Snippet]]		[[Category:Staff notation]]
			[[Category:Snippet]]

Lemzwerg at 22:48, 21 November 2025

2025-11-21T22:48:19Z

← Older revision		Revision as of 22:48, 21 November 2025
Line 130:		Line 130:
	[[Category:Rhythms]]		[[Category:Rhythms]]
	[[Category:Scheme]]		[[Category:Scheme]]
	[[Category:Staff notation]]		[[Category:Staff notation]][[Category:Snippet]]

Lemzwerg at 15:25, 17 November 2025

2025-11-17T15:25:14Z

← Older revision		Revision as of 15:25, 17 November 2025
Line 1:		Line 1:
	In some modern conducting scores it is common to not print individual time signatures for each staff, but to print large time signatures either over the whole system or over the instrument groups. This code implements such behaviour by		In some modern conducting scores it is common to not print individual time signatures for each staff, but to print large time signatures either over the whole system or over the instrument groups. This code implements such behaviour by

	# creating a new `BigTimeSignature` spanner grob that spans multiple time signatures and prints an enlarged signature over their extent, and		# creating a new <code>BigTimeSignature</code> spanner grob that spans multiple time signatures and prints an enlarged signature over their extent, and
	# creating an engraver that collects all time signatures, replacing them with a `BigTimeSignature` spanner on them.		# creating an engraver that collects all time signatures, replacing them with a <code>BigTimeSignature</code> spanner on them.

	<lilypond version="2.24">		<lilypond version="2.24">

Lemzwerg: Add categories

2025-11-17T12:51:56Z

Add categories

← Older revision		Revision as of 12:51, 17 November 2025
Line 1:		Line 1:
	In some modern conducting scores it is common to not print individual time signatures for each staff, but to print large time signatures either over the whole system or over the instrument groups. This code implements such behaviour by		In some modern conducting scores it is common to not print individual time signatures for each staff, but to print large time signatures either over the whole system or over the instrument groups. This code implements such behaviour by

	# ~~Creating~~ a new `BigTimeSignature` spanner grob ~~which~~ spans multiple time signatures and prints an enlarged ~~signatures~~ over their extent		# creating a new `BigTimeSignature` spanner grob that spans multiple time signatures and prints an enlarged signature over their extent, and
	# ~~Creates~~ an engraver that collects all time signatures ~~and creates~~ a `BigTimeSignature` spanner on them		# creating an engraver that collects all time signatures, replacing them with a `BigTimeSignature` spanner on them.

	<lilypond version="2.24">		<lilypond version="2.24">
Line 125:		Line 125:
	}		}
	</lilypond>		</lilypond>

			[[Category:Contemporary notation]]
			[[Category:Contexts and engravers]]
			[[Category:Rhythms]]
			[[Category:Scheme]]
			[[Category:Staff notation]]

Lazy: Created page

2025-11-17T11:42:02Z

Created page

New page

In some modern conducting scores it is common to not print individual time signatures for each staff, but to print large time signatures either over the whole system or over the instrument groups. This code implements such behaviour by

# Creating a new `BigTimeSignature` spanner grob which spans multiple time signatures and prints an enlarged signatures over their extent
# Creates an engraver that collects all time signatures and creates a `BigTimeSignature` spanner on them

<lilypond version="2.24">
%%% Define a new `BigTimeSignature` spanner
#(define (big-time-signature::print grob)
(let*
((elts (ly:grob-object grob 'elements)) ; time-sig grobs
(ref (ly:grob-common-refpoint-of-array grob elts Y)) ; common refpoint
(exts (map (lambda (x) (ly:grob-extent x ref Y)) (ly:grob-array->list elts))) ; extents of all ts-grobs
(full-ext (cons (apply min (map car exts)) (apply max (map cdr exts)))) ; full extent of ts column
(stc (ly:grob-property (ly:grob-array-ref elts 0) 'stencil)) ; the stencil of one time signature
(stc-ext-y (car exts)) ; the Y-extent of the time sig stencil
(f (/ (interval-length full-ext) (interval-length stc-ext-y)))) ; scaling factor for the stencil
(ly:grob-set-parent! grob Y ref) ; Y-parent should be System = ref already, but just in case make sure
(ly:stencil-translate-axis ; shift resulting stencil to begin of time sig column
(ly:stencil-aligned-to (ly:stencil-scale stc 1 f) Y DOWN) ; scale stencil and make sure it is not shifted
(car full-ext) Y)))

#(set! all-grob-descriptions
(sort
(cons
((@@ (lily) completize-grob-entry)
`(BigTimeSignature
. ((stencil . ,big-time-signature::print)
(meta
. ((class . Spanner)
(interfaces . (spanner-interface))
(description . "A big time signature"))))))
all-grob-descriptions)
alist<?))

\layout {
\context {
\Global
\grobdescriptions #all-grob-descriptions
}
}

%%% Create engraver for big time signatures
#(define (big-time-signature-engraver context)
(let ((time-sig '()))
(make-engraver
(acknowledgers
((time-signature-interface engraver grob source-engraver) ; collect time signature grobs
(set! time-sig (cons grob time-sig))))
((process-acknowledged engraver)
(if (not (null? time-sig)) ; if any time-signatures
(let ; create BigTimeSignature spanner with time sigs at parents
((spanner (ly:engraver-make-spanner engraver 'BigTimeSignature '())))
(ly:spanner-set-bound! spanner UP (first time-sig))
(ly:spanner-set-bound! spanner DOWN (first time-sig))
(ly:grob-set-parent! spanner X (first time-sig)) ; set one time signature as X-parent for proper alignment
(ly:grob-set-object! spanner 'elements (ly:grob-list->grob-array time-sig))))
(set! time-sig '())))))

%%% Example (score level)
\score {
\layout {
\context {
\Score
\consists #big-time-signature-engraver
\override TimeSignature.transparent = ##t
}
}

<<
\new Staff {
\numericTimeSignature
c''1 \time 3/4 d''2.
}
\new Staff {
c''1 \time 3/4 d''2.
}
\new Staff {
c''1 \time 3/4 d''2.
}
>>
}

%%% Example (staff group level)
\score {
\layout {
\context {
\StaffGroup
\consists #big-time-signature-engraver
\override TimeSignature.transparent = ##t
}
}

<<
\new Staff {
\numericTimeSignature
c''1 \time 3/4 d''2.
}
<<
\new StaffGroup <<
\new Staff {
c''1 \time 3/4 d''2.
}
\new Staff {
c''1 \time 3/4 d''2.
}
>>
>>
<<
\new StaffGroup <<
\new Staff {
c''1 \time 3/4 d''2.
}
\new Staff {
c''1 \time 3/4 d''2.
}
\new Staff {
c''1 \time 3/4 d''2.
}
>>
>>
>>
}
</lilypond>