#(define-markup-command (number-fromproperty layout props symbol type)
(symbol? symbol?)
#:category other
#:as-string (markup-string
(chain-assoc-get symbol props)
#:layout layout
#:props (prepend-alist-chain
symbol
(make-property-recursive-markup symbol)
props))
(let ((m (chain-assoc-get symbol props)))
(if (number? m)
;; prevent infinite loops by clearing the interpreted property:
(interpret-markup layout
(prepend-alist-chain
symbol
(make-property-recursive-markup symbol)
props)
(number-format type m))
empty-stencil)))
oddHeaderMarkup = \markup \fill-line {
""
\unless \on-first-page-of-part \fromproperty #'header:title
\if \should-print-page-number \number-fromproperty #'page:page-number #'roman
}
evenHeaderMarkup = \markup \fill-line {
\if \should-print-page-number \number-fromproperty #'page:page-number #'roman
\unless \on-first-page-of-part \fromproperty #'header:title
""
}
\version "2.24.4"
\relative c' {
c4
<< { d'4. c8 } \\ { <d, g>2\arpeggio } >>
e4
c4
<< { d'4.\arpeggio c8 } \\ { <d, g>2\arpeggio } >>
e4
}
Du darfst diesen Dateianhang nicht ansehen.\paper {
bookpart-level-page-numbering = ##t
print-first-page-number = ##t
}
Zitat von: martinmagtenor am Dienstag, 26. November 2024, 17:57Kann man das irgendwie als Feature-Request oder Community-Beitrag vorschlagen?