scheme - lilypond：在音乐功能中不给不可见的（优雅）音符留出空间

Question

我想自动化为吉他上的幻灯片添加下降滑音线到音符和和弦的过程，就像在此处的片段文档中找到的那样（请参阅标有 ​​的那个\afterGrace）。

因为它在那里，它为不可见的优雅音符保留了空间，但它不需要在那里。以下是我到目前为止提出的功能：

fall = #(define-music-function (inputA) (ly:music?)
    (define gliss (ly:music-deep-copy inputA))
    (define grace (ly:music-deep-copy inputA))
        (set! (ly:music-property gliss 'articulations)
          (cons (make-music (quote GlissandoEvent))
                (ly:music-property gliss 'articulations)))
    #{
        \afterGrace $gliss
        \transpose c g, {
            \once \omit Stem
            \once \omit Flag
            \once \omit Accidental
            \once \hideNotes
            $grace
        }
    #})

\glissando我使用方案手动添加 gliss，因为如果附加到变量中它不起作用。

怎样才能消除无形恩典造成的空间？

Answer 1

我设法找到了一个解决方案，虽然它感觉有点 hacky：

    #{
        \afterGrace 16/16
        ...

首先，我添加了16/16，它将优雅音符尽可能向右移动。

        \transpose c g, {
            ...
            \once \override NoteHead.font-size = #-50
            $grace
        }
    #})

然后，我将音符头的字体大小覆盖为一个无穷小的值，这使它消失了