作为活动后的一部分，如何在笔记中添加2个关节？

Question

我从here复制了此示例，它工作正常，就像我只是输入了->一样。

dashPlus = #(let ((m (make-music 'ArticulationEvent
                          'articulation-type "accent")))
       (set! (ly:music-property m 'tweaks)
             (acons 'font-size -3
                    (ly:music-property m 'tweaks)))
       m)

但是，我试图找出如何定义组合tenuto / marcato清晰度，在Finale文件中以某种方式改变某些地方 - ＆gt; MusicXML - ＆gt; .ly从我进入Finale（组合清晰度）到单个marcato清晰度和附加到同一音符（-- ->）的单个tenuto清晰度的过程。

如何更改此功能不仅可以添加一个重音，还可以添加两者的组合，还可以以某种方式操纵关节＆＃39; script-priority值是为了让tenuto总是最接近员工？（我担心我对Scheme的掌握并不太强。我理解了一些事情，但这都是超过我的头脑。）