Figured bass in parentheses: Difference between revisions
mNo edit summary |
mNo edit summary |
||
| Line 1: | Line 1: | ||
Put figured bass in parentheses with a Scheme function. | Put figured bass in parentheses with a Scheme function. See also [[Parenthesize a group of notes using a Scheme function]]. | ||
<lilypond version="2.24"> | <lilypond version="2.24"> | ||
startParenthesis = | startParenthesis = | ||
\once \override Parentheses.stencils = | \once \override Parentheses.stencils = | ||
#(lambda (grob) | #(lambda (grob) | ||
(let ((par-list | (let ((par-list (parentheses-interface::calc-parenthesis-stencils grob))) | ||
(list (first par-list) point-stencil))) | |||
(list ( | |||
endParenthesis = | endParenthesis = | ||
\once \override Parentheses.stencils = | \once \override Parentheses.stencils = | ||
#(lambda (grob) | #(lambda (grob) | ||
(let ((par-list | (let ((par-list (parentheses-interface::calc-parenthesis-stencils grob))) | ||
(list point-stencil (second par-list)))) | |||
(list point-stencil ( | |||
<< | << | ||
| Line 25: | Line 20: | ||
\parenthesize <6>4. | \parenthesize <6>4. | ||
\override Parentheses.font-size = #2 | \override Parentheses.font-size = #2 | ||
\parenthesize | \parenthesize <7 4>4 | ||
\startParenthesis \parenthesize <6 4>8 <5 3> <4 2> | \startParenthesis \parenthesize <6 4>8 <5 3> <4 2> | ||
\endParenthesis \parenthesize <3 1>4. | \endParenthesis \parenthesize <3 1>4. | ||
| Line 31: | Line 26: | ||
>> | >> | ||
</lilypond> | </lilypond> | ||
[[Category:Ancient notation]] | [[Category:Ancient notation]] | ||
[[Category:Chords]] | [[Category:Chords]] | ||
[[Category:Snippet]] | [[Category:Snippet]] | ||