Hi all,
for the record:
Torsten from the german forum found a simple solution:
\version "2.16.2"
#(set-global-staff-size 30) % try different values
#(define-markup-command (harm-test layout props size) (number?)
(let ((pt (ly:output-def-lookup layout 'pt)))
(interpret-markup layout props
(markup #:concat (#:left-brace (/ size pt) #:lower (/ size 2)
#:draw-line (cons 0 size))))))
\markup {
\harm-test #3
\harm-test #5
\harm-test #7
\harm-test #10
}
-Harm
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
