On 2021-05-10 9:10 pm, Pierre Perol-Schneider wrote:
Hi Ahanu,
How about:
\version "2.20.0"
{
%\override Beam.damping = #5
\override Beam.positions = #'(5 . 5)
g''8 b b c'' c'' b b g''
}
And for an automated approach:
%%%%
\version "2.22.0"
#(define NEAR -1)
#(define FAR 1)
flattenPositions =
#(define-scheme-function
(rel-pos) (number?)
(grob-transformer 'positions
(lambda (grob orig)
(let* ((dir (ly:grob-property grob 'direction))
(ys (ordered-cons (car orig) (cdr orig)))
(y (interval-index ys (* dir rel-pos))))
(cons y y)))))
{
\override Beam.positions = \flattenPositions #NEAR
g''8 b b c'' a' b'' b'' d'
\override Beam.positions = \flattenPositions #CENTER
g''8 b b c'' a' b'' b'' d'
\override Beam.positions = \flattenPositions #(* 2 FAR)
g''8 b b c'' a' b'' b'' d'
}
%%%%
-- Aaron Hill
