|
From: | address@hidden |
Subject: | Re: Trill notation with fingering |
Date: | Sun, 3 Apr 2011 19:58:24 -0400 |
On Apr 3, 2011, at 7:31 PM, Javier Ruiz-Alma wrote:
This is not exactly what you want, but it's close! Make sure to have a font w/ the lyric tie (like DejaVu) in your font search path. #(define-markup-command (up-tied-lyric layout props str) (string?) (if (string-contains str "~") (let* ((parts (string-split str #\~)) (tie-str (ly:wide-char->utf-8 #x2040)) (joined (list-join parts tie-str)) (join-stencil (interpret-markup layout props tie-str)) ) (interpret-markup layout (prepend-alist-chain 'word-space (/ (interval-length (ly:stencil-extent join-stencil X)) -3.5) props) (make-line-markup joined))) ;(map (lambda (s) (interpret-markup layout props s)) parts)) (interpret-markup layout props str))) { \once \override Staff . Script #'outside-staff-priority = #0 a'2.\trill^\markup{ \up-tied-lyric #"3~2" }} Cheers, Mike |
[Prev in Thread] | Current Thread | [Next in Thread] |